X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.h;h=3867f7e8a59560863980345d90b92e64e2908205;hp=f8df49ae19cc2c50bc197790e9397d20d363638e;hb=f3c7d186a15b89c39e360b9cc89545a0d24bd6a4;hpb=49eac9eff9d177e717de7bc8799a632c46b79237

diff --git a/token.h b/token.h
index f8df49a..3867f7e 100644
--- a/token.h
+++ b/token.h
@@ -34,6 +34,7 @@
 // (Normally) non-printable tokens
 #define COLON           ':'			// : (grumble: GNUmacs hates ':')
 #define CONST           'a'			// CONST <value>
+#define FCONST          'r'			// Floating CONST <value>
 #define ACONST          'A'			// ACONST <value> <attrib>
 #define STRING          'b'			// STRING <address>
 #define STRINGA8        'S'			// Atari 800 internal STRING <address>
@@ -144,7 +145,7 @@ IMACRO {
 IREPT {
 	LLIST * ir_firstln;		// Pointer to first line
 	LLIST * ir_nextln;		// Pointer to next line
-	VALUE ir_count;			// Repeat count (decrements)
+	uint32_t ir_count;		// Repeat count (decrements)
 };
 
 // Exported variables
@@ -152,7 +153,7 @@ extern int lnsave;
 extern uint16_t curlineno;
 extern char * curfname;
 extern WORD cfileno;
-extern TOKEN * tok;
+extern TOKENPTR tok;
 extern char lnbuf[];
 extern char lntag;
 extern char tolowertab[];
@@ -169,6 +170,7 @@ int TokenizeLine(void);
 int fpop(void);
 int d_goto(WORD);
 INOBJ * a_inobj(int);
+void DumpToken(TOKEN);
 void DumpTokenBuffer(void);
 
 #endif // __TOKEN_H__