X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Flexer%2Fvariable-parser.h;h=5815dc458b943fc1235fe52ef8fd0d345e9376a4;hb=72c9c6a2f92e94779b2e55d0726568090411871c;hp=8a6772d031e3980151904e31a152c69dfee1f09b;hpb=96994a54e60e9c95b8bba54c2281acf7059b1203;p=pspp diff --git a/src/language/lexer/variable-parser.h b/src/language/lexer/variable-parser.h index 8a6772d031..5815dc458b 100644 --- a/src/language/lexer/variable-parser.h +++ b/src/language/lexer/variable-parser.h @@ -31,7 +31,7 @@ struct var_set *var_set_create_from_dict (const struct dictionary *d); struct var_set *var_set_create_from_array (struct variable *const *var, size_t); -size_t var_set_get_cnt (const struct var_set *vs); +size_t var_set_get_n (const struct var_set *vs); void var_set_destroy (struct var_set *vs); @@ -62,16 +62,42 @@ bool parse_var_set_vars (struct lexer *, const struct var_set *, struct variable char *parse_DATA_LIST_var (struct lexer *, const struct dictionary *); bool parse_DATA_LIST_vars (struct lexer *, const struct dictionary *, - char ***names, size_t *cnt, int opts); + char ***names, size_t *n, int opts); bool parse_DATA_LIST_vars_pool (struct lexer *, const struct dictionary *, struct pool *, - char ***names, size_t *cnt, int opts); + char ***names, size_t *n, int opts); bool parse_mixed_vars (struct lexer *, const struct dictionary *dict, - char ***names, size_t *cnt, int opts); + char ***names, size_t *n, int opts); bool parse_mixed_vars_pool (struct lexer *, const struct dictionary *dict, struct pool *, - char ***names, size_t *cnt, int opts); + char ***names, size_t *n, int opts); + +/* This variable parser supports the unusual situation where set of variables + has to be parsed before the associated dictionary is available. Thus, + parsing proceeds in two phases: first, the variables are parsed in a vector + of "struct var_syntax"; second, when the dictionary becomes available, the + structs are turned into "struct variable"s. */ + +struct var_syntax + { + char *first; /* Always nonnull. */ + char *last; /* Nonnull for var ranges (e.g. "a TO b"). */ + + /* For error reporting. + This only works if var_syntax_parse() and var_syntax_evaluate() are + called while we're parsing the same source file. That matches the + current use case in MATRIX; if that changes, then this will need to + switch to use struct msg_location instead. */ + int first_ofs; + int last_ofs; + }; +void var_syntax_destroy (struct var_syntax *, size_t n); + +bool var_syntax_parse (struct lexer *, struct var_syntax **, size_t *); +bool var_syntax_evaluate (struct lexer *, const struct var_syntax *, size_t, + const struct dictionary *, + struct variable ***, size_t *, int opts); /* Const wrappers */