X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Fexpressions%2Fhelpers.h;h=59be40056dcf7cc3f50317e280e42d42ae3858ff;hb=bc19562deb692e6db3271eb0402e9f9c99e4cbcb;hp=e3813fd2cf85fbee2ae146219d525d47dce3fa40;hpb=dcf9b154cbcaa35c3d8459a201b77eec8bcb30bd;p=pspp-builds.git diff --git a/src/language/expressions/helpers.h b/src/language/expressions/helpers.h index e3813fd2..59be4005 100644 --- a/src/language/expressions/helpers.h +++ b/src/language/expressions/helpers.h @@ -1,4 +1,4 @@ -#ifndef EXPRESSIONS_HELPERS_H +#ifndef EXPRESSIONS_HELPERS_H #define EXPRESSIONS_HELPERS_H #include @@ -9,25 +9,30 @@ #include #include #include -#include "case.h" -#include "data-in.h" -#include "dictionary.h" -#include "message.h" -#include "calendar.h" -#include "gsl-extras/gsl-extras.h" -#include "misc.h" -#include "moments.h" -#include "random.h" -#include "settings.h" -#include "str.h" -#include "value.h" -#include "variable.h" -#include "procedure.h" + +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include +#include #include "gettext.h" #define _(msgid) gettext (msgid) -static inline double check_errno (double x) +static inline double check_errno (double x) { return errno == 0 ? x : SYSMIS; } @@ -40,25 +45,30 @@ static inline double check_errno (double x) #define H_MIN 60. /* Minutes per hour. */ #define MIN_S 60. /* Seconds per minute. */ #define WEEK_DAY 7. /* Days per week. */ +#define WEEK_S (WEEK_DAY * DAY_S) /* Seconds per week. */ -extern const struct fixed_string empty_string; +extern const struct substring empty_string; -int compare_string (const struct fixed_string *, const struct fixed_string *); +int compare_string_3way (const struct substring *, const struct substring *); double expr_ymd_to_date (double year, double month, double day); double expr_ymd_to_ofs (double year, double month, double day); double expr_wkyr_to_date (double wk, double yr); double expr_yrday_to_date (double yr, double day); double expr_yrmoda (double year, double month, double day); +double expr_date_difference (double date1, double date2, + struct substring unit); +double expr_date_sum (double date, double quantity, struct substring unit_name, + struct substring method_name); -struct fixed_string alloc_string (struct expression *, size_t length); -struct fixed_string copy_string (struct expression *, - const char *, size_t length); +struct substring alloc_string (struct expression *, size_t length); +struct substring copy_string (struct expression *, + const char *, size_t length); static inline bool -is_valid (double d) +is_valid (double d) { - return finite (d) && d != SYSMIS; + return isfinite (d) && d != SYSMIS; } size_t count_valid (double *, size_t);