X-Git-Url: http://shamusworld.gotdns.org/cgi-bin/gitweb.cgi?p=rmac;a=blobdiff_plain;f=token.h;h=6bc1102e3671b70faf0d857c7dfd8ef9cc7808e9;hp=be3c1e392ca4890490b46d873261588e0b3e05a9;hb=d16b8ea0ee65b2ad901ca6b0624c07e6e4930cc4;hpb=3385b366632d03745033fa6b19faabf60219bc6b diff --git a/token.h b/token.h index be3c1e3..6bc1102 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 @@ -113,7 +113,8 @@ IFILE { // 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' @@ -142,6 +143,7 @@ extern unsigned orgactive; extern unsigned orgaddr; extern LONG sloc; extern int mjump_align; +extern char * string[]; // Prototypes int include(int, char *); @@ -149,8 +151,9 @@ void init_token(void); void setfnum(WORD); 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__