X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Fdata%2Fcasereader-translator.c;h=f0411d1fa1430a75903e8e4e3f4317cb6b5ad3fa;hb=59adcae3665ff8c591c6aa6558b012524bb8e765;hp=fc823049d570df34863291ab4b0650f2cba6d26b;hpb=16e66034f4a0f17394ae2ab73d5976d9386a02cf;p=pspp diff --git a/src/data/casereader-translator.c b/src/data/casereader-translator.c index fc823049d5..f0411d1fa1 100644 --- a/src/data/casereader-translator.c +++ b/src/data/casereader-translator.c @@ -1,5 +1,5 @@ /* PSPP - a program for statistical analysis. - Copyright (C) 2007, 2009 Free Software Foundation, Inc. + Copyright (C) 2007, 2009, 2011 Free Software Foundation, Inc. This program is free software: you can redistribute it and/or modify it under the terms of the GNU General Public License as published by @@ -15,15 +15,16 @@ along with this program. If not, see . */ #include -#include -#include + #include -#include -#include -#include +#include "data/casereader-provider.h" +#include "data/casereader.h" +#include "data/val-type.h" +#include "data/variable.h" +#include "libpspp/taint.h" -#include "xalloc.h" +#include "gl/xalloc.h" /* Casereader that applies a user-supplied function to translate each case into another in an arbitrary fashion. */ @@ -498,7 +499,7 @@ uniquify (const struct ccase *c, void *aux) if ( NULL == next_case) goto end; - + dir = value_compare_3way (case_data (next_case, cdr->key), current_value, key_width); case_unref (next_case); @@ -509,7 +510,7 @@ uniquify (const struct ccase *c, void *aux) cdr->direction = dir; goto end; } - + return false; end: @@ -534,7 +535,7 @@ consolodate_weight (struct ccase *input, void *aux) else { c = case_unshare_and_resize (input, cdr->proto); - case_data_rw_idx (c, caseproto_get_n_widths (cdr->proto) - 1)->f = cdr->prev_cc; + case_data_rw_idx (c, caseproto_get_n_widths (cdr->proto) - 1)->f = cdr->prev_cc; } return c; @@ -555,7 +556,7 @@ uniquify_destroy (void *aux) -/* Returns a new casereader which is based upon INPUT, but which contains a maximum +/* Returns a new casereader which is based upon INPUT, but which contains a maximum of one case for each distinct value of KEY. If WEIGHT is non-null, then the new casereader's values for this variable will be the sum of all values matching KEY.