X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.h;h=becd0747f9a6ba93e79566ef258025afad109feb;hp=be3c1e392ca4890490b46d873261588e0b3e05a9;hb=adc2f2df316f46cc70f8939f30c5f39ce6470a20;hpb=3385b366632d03745033fa6b19faabf60219bc6b

diff --git a/token.h b/token.h
index be3c1e3..becd074 100644
--- a/token.h
+++ b/token.h
@@ -28,7 +28,7 @@
 // Tunable definitions
 #define LNSIZ           256					// Maximum size of a line of text
 #define TOKBUFSIZE      400					// Size of token-line buffer
-#define QUANTUM         4096L				// #bytes to eat at a time from a file
+#define QUANTUM         4096L				// # bytes to eat at a time from a file
 #define LNBUFSIZ        (QUANTUM*2)			// Size of file's buffer
 #define KWSIZE          7					// Maximum size of keyword in kwtab.h
 
@@ -110,15 +110,24 @@ IFILE {
 	char ifbuf[LNBUFSIZ];	// Line buffer
 };
 
+#define TOKENSTREAM struct _tokenstream
+TOKENSTREAM {
+	TOKEN token[10];		// 10 ought to be enough for anybody
+	char * string[10];		// same for attached strings
+};
+
 // Information about a macro invocation
 IMACRO {
 	IMACRO * im_link;		// Pointer to ancient IMACROs
-	LONG * im_nextln;		// Next line to include
+//	LONG * im_nextln;		// Next line to include
+	struct LineList * 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
 };
 
 // Information about a .rept invocation
@@ -142,15 +151,17 @@ extern unsigned orgactive;
 extern unsigned orgaddr;
 extern LONG sloc;
 extern int mjump_align;
+extern char * string[];
 
 // Prototypes
 int include(int, char *);
 void init_token(void);
-void setfnum(WORD);
+void SetFilenameForErrorReporting(void);
 int tokln(void);
 int fpop(void);
-//int d_goto(WORD);
-int d_goto(void);
+int d_goto(WORD);
+//int d_goto(void);
 INOBJ * a_inobj(int);
+void DumpTokenBuffer(void);
 
 #endif // __TOKEN_H__