X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flanguage%2Flexer%2Flexer.h;h=9e5d09aec03f8dee7f96dcd73e7067f650ca9a22;hb=163b1639eab9b48eab64752205d75f951547b5c7;hp=44be0e930d41fa2be6e2c78b8a70202698c8b92e;hpb=43b1296aafe7582e7dbe6c2b6a8b478d7d9b0fcf;p=pspp-builds.git diff --git a/src/language/lexer/lexer.h b/src/language/lexer/lexer.h index 44be0e93..9e5d09ae 100644 --- a/src/language/lexer/lexer.h +++ b/src/language/lexer/lexer.h @@ -30,8 +30,10 @@ struct lexer; struct lexer * lex_create (struct source_stream *); void lex_destroy (struct lexer *); +/* State accessors */ struct source_stream * lex_get_source_stream (const struct lexer *); - +enum syntax_mode lex_current_syntax_mode (const struct lexer *); +enum error_mode lex_current_error_mode (const struct lexer *); /* Common functions. */ void lex_get (struct lexer *); @@ -51,7 +53,10 @@ bool lex_is_string (struct lexer *); /* Token matching functions. */ bool lex_match (struct lexer *, int); bool lex_match_id (struct lexer *, const char *); +bool lex_match_id_n (struct lexer *, const char *, size_t n); bool lex_match_int (struct lexer *, int); +bool lex_match_hyphenated_word (struct lexer *lexer, const char *s); + /* Forcible matching functions. */ bool lex_force_match (struct lexer *, int); @@ -71,7 +76,7 @@ const char *lex_entire_line (const struct lexer *); const struct string *lex_entire_line_ds (const struct lexer *); const char *lex_rest_of_line (const struct lexer *); bool lex_end_dot (const struct lexer *); -void lex_preprocess_line (struct string *, enum getl_syntax, +void lex_preprocess_line (struct string *, enum syntax_mode, bool *line_starts_command, bool *line_ends_command); void lex_discard_line (struct lexer *); @@ -79,7 +84,7 @@ void lex_discard_rest_of_command (struct lexer *); /* Weird line reading functions. */ bool lex_get_line (struct lexer *); -bool lex_get_line_raw (struct lexer *, enum getl_syntax *); +bool lex_get_line_raw (struct lexer *); /* Token names. */ const char *lex_token_name (int);