X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Foperations.def;h=be33a0d96aa989167b7d7dec7293200091705d93;hb=8b708f4291deb6ee408e8f62a694b638c581c40e;hp=35f5d3666ee721a2c0cc9a0cd30baaee9371e893;hpb=38f8cf3544615efabc0913ebd00fdf6053cf294d;p=pspp diff --git a/src/language/expressions/operations.def b/src/language/expressions/operations.def index 35f5d3666e..be33a0d96a 100644 --- a/src/language/expressions/operations.def +++ b/src/language/expressions/operations.def @@ -2,7 +2,6 @@ // // PSPP - computes sample statistics. // Copyright (C) 2005, 2006 Free Software Foundation, Inc. -// Written by Ben Pfaff . // // This program is free software; you can redistribute it and/or // modify it under the terms of the GNU General Public License as @@ -319,7 +318,7 @@ function XDATE.WKDAY (date >= DAY_S) = calendar_offset_to_wday (date / DAY_S); function XDATE.YEAR (date >= DAY_S) = calendar_offset_to_year (date / DAY_S); // Date arithmetic functions. -no_abbrev function DATEDIFF (date1 >= DAY_S, date2 >= DAY_S, string unit) +no_abbrev function DATEDIFF (date2 >= DAY_S, date1 >= DAY_S, string unit) = expr_date_difference (date1, date2, unit); no_abbrev function DATESUM (date, quantity, string unit) = expr_date_sum (date, quantity, unit, ss_cstr ("closest")); @@ -928,7 +927,7 @@ no_opt operator VEC_ELEM_NUM (idx) { const struct variable *var = vector_get_var (v, (size_t) idx - 1); double value = case_num (c, var); - return !var_is_num_user_missing (var, value) ? value : SYSMIS; + return !var_is_num_missing (var, value, MV_USER) ? value : SYSMIS; } else { @@ -975,7 +974,7 @@ no_opt operator NUM_VAR () num_var v; { double d = case_num (c, v); - return !var_is_num_user_missing (v, d) ? d : SYSMIS; + return !var_is_num_missing (v, d, MV_USER) ? d : SYSMIS; } no_opt string operator STR_VAR () @@ -995,7 +994,7 @@ no_opt perm_only function LAG (num_var v, pos_int n_before) if (c != NULL) { double x = case_num (c, v); - return !var_is_num_user_missing (v, x) ? x : SYSMIS; + return !var_is_num_missing (v, x, MV_USER) ? x : SYSMIS; } else return SYSMIS; @@ -1008,7 +1007,7 @@ no_opt perm_only function LAG (num_var v) if (c != NULL) { double x = case_num (c, v); - return !var_is_num_user_missing (v, x) ? x : SYSMIS; + return !var_is_num_missing (v, x, MV_USER) ? x : SYSMIS; } else return SYSMIS;