X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;f=src%2Flexer.h;h=816b4317f9bb8318d4d1a4a7232c6a73231d01b0;hb=494a50b0d023c55b61caf33e3887379332166d07;hp=1561d79319c15ddcd7dc12d8a391ac1de34f3ecd;hpb=721f67e477ee5050961020ed5afd8e0daf42bf2d;p=pspp-builds.git diff --git a/src/lexer.h b/src/lexer.h index 1561d793..816b4317 100644 --- a/src/lexer.h +++ b/src/lexer.h @@ -14,12 +14,16 @@ You should have received a copy of the GNU General Public License along with this program; if not, write to the Free Software - Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA - 02111-1307, USA. */ + Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA + 02110-1301, USA. */ #if !lexer_h #define lexer_h 1 +#include "var.h" +#include +#include + /* Returns nonzero if character CH may be the first character in an identifier. */ #define CHAR_IS_ID1(CH) \ @@ -41,7 +45,8 @@ enum { T_ID = 256, /* Identifier. */ - T_NUM, /* Number. */ + T_POS_NUM, /* Positive number. */ + T_NEG_NUM, /* Negative number. */ T_STRING, /* Quoted string. */ T_STOP, /* End of input. */ @@ -68,27 +73,29 @@ enum T_N_KEYWORDS = T_LAST_KEYWORD - T_FIRST_KEYWORD + 1 }; - extern int token; extern double tokval; -extern char tokid[9]; +extern char tokid[LONG_NAME_LEN + 1]; extern struct string tokstr; #include /* Initialization. */ void lex_init (void); +void lex_done (void); /* Common functions. */ void lex_get (void); void lex_error (const char *, ...); +void lex_sbc_only_once (const char *); +void lex_sbc_missing (const char *); int lex_end_of_command (void); /* Token testing functions. */ -int lex_integer_p (void); +bool lex_is_number (void); +double lex_number (void); +bool lex_is_integer (void); long lex_integer (void); -int lex_double_p (void); -double lex_double (void); /* Token matching functions. */ int lex_match (int); @@ -107,6 +114,7 @@ int lex_force_string (void); int lex_id_match_len (const char *keyword_string, size_t keyword_len, const char *token_string, size_t token_len); int lex_id_match (const char *keyword_string, const char *token_string); +int lex_id_to_token (const char *id, size_t len); /* Weird token functions. */ int lex_look_ahead (void);