X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.h;h=832301c1f8e493b8b6da1b6c0ffc75a9e4192176;hp=52ff8cb2d39154791fbc7b6351dfb65e87427613;hb=bdbf34766f4d074a5933eb1326fe4ce03d249e10;hpb=c9541a9d4f01e190ffefc20ce07896c7f04d9557

diff --git a/token.h b/token.h
index 52ff8cb..832301c 100644
--- a/token.h
+++ b/token.h
@@ -1,7 +1,7 @@
 //
 // RMAC - Reboot's Macro Assembler for all Atari computers
 // TOKEN.H - Token Handling
-// Copyright (C) 199x Landon Dyer, 2011-2017 Reboot and Friends
+// Copyright (C) 199x Landon Dyer, 2011-2019 Reboot and Friends
 // RMAC derived from MADMAC v1.07 Written by Landon Dyer, 1986
 // Source utilised with the kind permission of Landon Dyer
 //
@@ -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>
@@ -62,6 +63,8 @@
 #define DOTQ            'Q'			// .q or .Q (essentially an alias for P)
 #define DOTS            'S'			// .s or .S (FPU Single)
 #define ENDEXPR         'E'			// End of expression
+#define UNLT            0x81		// Unary '<' (low byte)
+#define UNGT            0x82		// Unary '>' (high byte)
 
 // ^^ operators
 #define CR_DEFINED      'p'			// ^^defined - is symbol defined?
@@ -84,6 +87,9 @@
 #define MULTX           64			// Multiple-character tokens
 #define DOT             128			// [bwlsBWSL] for what follows a '.'
 
+// Macro to check for specific optimizations or override
+#define CHECK_OPTS(x)	(optim_flags[x] && !optimizeOff)
+
 // Conditional assembly structures
 IFENT {
 	IFENT * if_prev;		// Ptr prev .if state block (or NULL)
@@ -128,13 +134,12 @@ TOKENSTREAM {
 // Information about a macro invocation
 IMACRO {
 	IMACRO * im_link;		// Pointer to ancient IMACROs
-	LLIST * im_nextln;	// Next line to include
+	LLIST * im_nextln;		// Next line to include
 	WORD im_nargs;			// # of arguments supplied on invocation
 	WORD im_siz;			// Size suffix supplied on invocation
 	LONG im_olduniq;		// Old value of 'macuniq'
 	SYM * im_macro;			// Pointer to macro we're in
 	char im_lnbuf[LNSIZ];	// Line buffer
-	uint32_t argBase;		// Base in argPtrs[] for current macro
 	TOKENSTREAM argument[20];	// Assume no more than 20 arguments in an invocation
 };
 
@@ -142,7 +147,8 @@ 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)
+	uint32_t lineno;		// Repeat line number (Convert this to global instead of putting it here?)
 };
 
 // Exported variables
@@ -157,6 +163,7 @@ extern char tolowertab[];
 extern INOBJ * cur_inobj;
 extern int mjump_align;
 extern char * string[];
+extern int optimizeOff;
 
 // Exported functions
 int include(int, char *);
@@ -166,6 +173,7 @@ int TokenizeLine(void);
 int fpop(void);
 int d_goto(WORD);
 INOBJ * a_inobj(int);
+void DumpToken(TOKEN);
 void DumpTokenBuffer(void);
 
 #endif // __TOKEN_H__