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

diff --git a/token.h b/token.h
index 5ca5176..becd074 100644
--- a/token.h
+++ b/token.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
@@ -147,11 +156,11 @@ 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);