X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.h;h=c7dc4b194cceffc74eecbb50a4bdf02f5f727e84;hp=6bc1102e3671b70faf0d857c7dfd8ef9cc7808e9;hb=75969398d9b8a9f82ea76fc4e4cbfb97b11160a4;hpb=d16b8ea0ee65b2ad901ca6b0624c07e6e4930cc4 diff --git a/token.h b/token.h index 6bc1102..c7dc4b1 100644 --- a/token.h +++ b/token.h @@ -10,7 +10,6 @@ #define __TOKEN_H__ #include "rmac.h" -//#include "risca.h" // Include Files and Macros #define SRC_IFILE 0 // Input source is IFILE @@ -110,6 +109,12 @@ 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 @@ -120,6 +125,8 @@ IMACRO { 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,9 +154,9 @@ extern char * string[]; // Prototypes int include(int, char *); -void init_token(void); -void setfnum(WORD); -int tokln(void); +void InitTokenizer(void); +void SetFilenameForErrorReporting(void); +int TokenizeLine(void); int fpop(void); int d_goto(WORD); //int d_goto(void);