X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.h;h=4a9b1105bb270cd4dd2db2a7efc0ca739f93d92f;hp=cbacccf3a1ae45460e7b2ff283994085f9d4e96c;hb=4ca28ba07da9f3848c2e3db0e2e9cbcaa787dd29;hpb=cfd001aea60f54e49d9beae0f941c513f45c202b diff --git a/token.h b/token.h index cbacccf..4a9b110 100644 --- a/token.h +++ b/token.h @@ -34,6 +34,7 @@ // (Normally) non-printable tokens #define COLON ':' // : (grumble: GNUmacs hates ':') #define CONST 'a' // CONST +#define FCONST 'r' // Floating CONST #define ACONST 'A' // ACONST #define STRING 'b' // STRING
#define STRINGA8 'S' // Atari 800 internal STRING
@@ -145,6 +146,7 @@ IREPT { LLIST * ir_firstln; // Pointer to first line LLIST * ir_nextln; // Pointer to next line uint32_t ir_count; // Repeat count (decrements) + uint32_t lineno; // Repeat line number (Convert this to global instead of putting it here?) }; // Exported variables @@ -169,6 +171,7 @@ int TokenizeLine(void); int fpop(void); int d_goto(WORD); INOBJ * a_inobj(int); +void DumpToken(TOKEN); void DumpTokenBuffer(void); #endif // __TOKEN_H__