X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Foperations.def;h=35f5d3666ee721a2c0cc9a0cd30baaee9371e893;hb=38f8cf3544615efabc0913ebd00fdf6053cf294d;hp=6f0bd0e1430a3f4bcbf1a0742fef8303bb6918ab;hpb=df8347af23172430e5b37b1ae0ad67b41245e191;p=pspp-builds.git diff --git a/src/language/expressions/operations.def b/src/language/expressions/operations.def index 6f0bd0e1..35f5d366 100644 --- a/src/language/expressions/operations.def +++ b/src/language/expressions/operations.def @@ -319,10 +319,13 @@ 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. -function DATEDIFF (date1, date2, string unit) = unimplemented; -function DATESUM (date, quantity, string unit) = unimplemented; -function DATESUM (date, quantity, string unit, string roll_over) - = unimplemented; +no_abbrev function DATEDIFF (date1 >= DAY_S, date2 >= 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")); +no_abbrev function DATESUM (date, quantity, string unit, string method) + = expr_date_sum (date, quantity, unit, method); + // String functions. string function CONCAT (string a[n]) @@ -613,7 +616,7 @@ absorb_miss string function SUBSTR (string s, ofs, cnt) return empty_string; } -absorb_miss no_opt string function VALUELABEL (var v) +absorb_miss no_opt no_abbrev string function VALUELABEL (var v) expression e; case c; {