- Remove rcsid tag.
+ ANSI C conversion.
This commit is contained in:
		
							parent
							
								
									82fddaab77
								
							
						
					
					
						commit
						e533626413
					
				
					 1 changed files with 134 additions and 134 deletions
				
			
		|  | @ -4,147 +4,147 @@ | ||||||
|  */ |  */ | ||||||
| 
 | 
 | ||||||
| 
 | 
 | ||||||
| #ifndef NORCSID | 
 | ||||||
| static char rcs_lex[] = "$Id$" ; |  | ||||||
| #endif |  | ||||||
| 
 | 
 | ||||||
| /* This file contains the new lexical analizer */ | /* This file contains the new lexical analizer */ | ||||||
| typedef struct { | typedef struct { | ||||||
| 	char *name;  | 	char *name;  | ||||||
| 	int token, classvalue,length; | 	int token; | ||||||
|  | 	int classvalue; | ||||||
|  | 	int length; | ||||||
| } Key; | } Key; | ||||||
| 
 | 
 | ||||||
| Key keywords [] ={ | Key keywords [] ={ | ||||||
| "abs",		FUNCTION,	ABSSYM,		0, | {"abs",		FUNCTION,	ABSSYM,		0}, | ||||||
| "and",		ANDSYM,		ANDSYM,		0, | {"and",		ANDSYM,		ANDSYM,		0}, | ||||||
| "asc",		FUNCTION,	ASCSYM,		0, | {"asc",		FUNCTION,	ASCSYM,		0}, | ||||||
| "as",		 ASSYM,		0,		0, | {"as",		 ASSYM,		0,		0}, | ||||||
| "atn",		FUNCTION,	ATNSYM,		0, | {"atn",		FUNCTION,	ATNSYM,		0}, | ||||||
| "auto",		ILLEGAL,	0,		0, | {"auto",		ILLEGAL,	0,		0}, | ||||||
| "base",		BASESYM,	0,		0, | {"base",		BASESYM,	0,		0}, | ||||||
| "call",		CALLSYM,	0,		0, | {"call",		CALLSYM,	0,		0}, | ||||||
| "cdbl",		FUNCTION,	CDBLSYM,	0, | {"cdbl",		FUNCTION,	CDBLSYM,	0}, | ||||||
| "chain",	ILLEGAL,	0,		0, | {"chain",	ILLEGAL,	0,		0}, | ||||||
| "chr",		FUNCTION,	CHRSYM,		0, | {"chr",		FUNCTION,	CHRSYM,		0}, | ||||||
| "cint",		FUNCTION,	CINTSYM,	0, | {"cint",		FUNCTION,	CINTSYM,	0}, | ||||||
| "clear",	CLEARSYM,	0,		0, | {"clear",	CLEARSYM,	0,		0}, | ||||||
| "cload",	ILLEGAL,	0,		0, | {"cload",	ILLEGAL,	0,		0}, | ||||||
| "close",	CLOSESYM,	0,		0, | {"close",	CLOSESYM,	0,		0}, | ||||||
| "common",	ILLEGAL,	0,		0, | {"common",	ILLEGAL,	0,		0}, | ||||||
| "cont",		ILLEGAL,	0,		0, | {"cont",		ILLEGAL,	0,		0}, | ||||||
| "cos",		FUNCTION,	COSSYM,		0, | {"cos",		FUNCTION,	COSSYM,		0}, | ||||||
| "csng",		FUNCTION,	CSNGSYM,	0, | {"csng",		FUNCTION,	CSNGSYM,	0}, | ||||||
| "csave",	ILLEGAL,	0,		0, | {"csave",	ILLEGAL,	0,		0}, | ||||||
| "cvi",		FUNCTION,	CVISYM,		0, | {"cvi",		FUNCTION,	CVISYM,		0}, | ||||||
| "cvs",		FUNCTION,	CVSSYM,		0, | {"cvs",		FUNCTION,	CVSSYM,		0}, | ||||||
| "cvd",		FUNCTION,	CVDSYM,		0, | {"cvd",		FUNCTION,	CVDSYM,		0}, | ||||||
| "data",		DATASYM,	0,		0, | {"data",		DATASYM,	0,		0}, | ||||||
| "defint",	DEFINTSYM,	0,		0, | {"defint",	DEFINTSYM,	0,		0}, | ||||||
| "defsng",	DEFSNGSYM,	0,		0, | {"defsng",	DEFSNGSYM,	0,		0}, | ||||||
| "defdbl",	DEFDBLSYM,	0,		0, | {"defdbl",	DEFDBLSYM,	0,		0}, | ||||||
| "defstr",	DEFSTRSYM,	0,		0, | {"defstr",	DEFSTRSYM,	0,		0}, | ||||||
| "def",		DEFSYM,		0,		0, | {"def",		DEFSYM,		0,		0}, | ||||||
| "delete",	ILLEGAL,	0,		0, | {"delete",	ILLEGAL,	0,		0}, | ||||||
| "dim",		DIMSYM,		0,		0, | {"dim",		DIMSYM,		0,		0}, | ||||||
| "edit",		ILLEGAL,	0,		0, | {"edit",		ILLEGAL,	0,		0}, | ||||||
| "else",		ELSESYM,	0,		0, | {"else",		ELSESYM,	0,		0}, | ||||||
| "end",		ENDSYM,		0,		0, | {"end",		ENDSYM,		0,		0}, | ||||||
| "eof",		FUNCTION,	EOFSYM,		0, | {"eof",		FUNCTION,	EOFSYM,		0}, | ||||||
| "eqv",		EQVSYM,		EQVSYM,		0, | {"eqv",		EQVSYM,		EQVSYM,		0}, | ||||||
| "erase",	ILLEGAL,	0,		0, | {"erase",	ILLEGAL,	0,		0}, | ||||||
| "error",	ERRORSYM,	0,		0, | {"error",	ERRORSYM,	0,		0}, | ||||||
| "err",		ERRSYM,		0,		0, | {"err",		ERRSYM,		0,		0}, | ||||||
| "erl",		ERLSYM,		0,		0, | {"erl",		ERLSYM,		0,		0}, | ||||||
| "exp",		FUNCTION,	EXPSYM,		0, | {"exp",		FUNCTION,	EXPSYM,		0}, | ||||||
| "field",	FIELDSYM,	0,		0, | {"field",	FIELDSYM,	0,		0}, | ||||||
| "fix",		FUNCTION,	FIXSYM,		0, | {"fix",		FUNCTION,	FIXSYM,		0}, | ||||||
| "for",		FORSYM,		0,		0, | {"for",		FORSYM,		0,		0}, | ||||||
| "fre",		FUNCTION,	FRESYM,		0, | {"fre",		FUNCTION,	FRESYM,		0}, | ||||||
| "get",		GETSYM,		0,		0, | {"get",		GETSYM,		0,		0}, | ||||||
| "gosub",	GOSUBSYM,	0,		0, | {"gosub",	GOSUBSYM,	0,		0}, | ||||||
| "goto",		GOTOSYM,	0,		0, | {"goto",		GOTOSYM,	0,		0}, | ||||||
| "hex",		FUNCTION,	HEXSYM,		0, | {"hex",		FUNCTION,	HEXSYM,		0}, | ||||||
| "if",		IFSYM,		0,		0, | {"if",		IFSYM,		0,		0}, | ||||||
| "imp",		IMPSYM,		IMPSYM,		0, | {"imp",		IMPSYM,		IMPSYM,		0}, | ||||||
| "inkey",	INKEYSYM,	0,		0, | {"inkey",	INKEYSYM,	0,		0}, | ||||||
| "input",	INPUTSYM,	0,		0, | {"input",	INPUTSYM,	0,		0}, | ||||||
| "inp",		FUNCTION,	INPSYM,		0, | {"inp",		FUNCTION,	INPSYM,		0}, | ||||||
| "instr",	FUNCTION,	INSTRSYM,	0, | {"instr",	FUNCTION,	INSTRSYM,	0}, | ||||||
| "int",		FUNCTION,	INTSYM,		0, | {"int",		FUNCTION,	INTSYM,		0}, | ||||||
| "kill",		ILLEGAL,	0,		0, | {"kill",		ILLEGAL,	0,		0}, | ||||||
| "left",		FUNCTION,	LEFTSYM,	0, | {"left",		FUNCTION,	LEFTSYM,	0}, | ||||||
| "len",		FUNCTION,	LENSYM,		0, | {"len",		FUNCTION,	LENSYM,		0}, | ||||||
| "let",		LETSYM,		0,		0, | {"let",		LETSYM,		0,		0}, | ||||||
| "line",		LINESYM,	0,		0, | {"line",		LINESYM,	0,		0}, | ||||||
| "list",		LISTSYM,	0,		0, | {"list",		LISTSYM,	0,		0}, | ||||||
| "llist",	ILLEGAL,	0,		0, | {"llist",	ILLEGAL,	0,		0}, | ||||||
| "load",		LOADSYM,	0,		0, | {"load",		LOADSYM,	0,		0}, | ||||||
| "loc",		FUNCTION,	LOCSYM,		0, | {"loc",		FUNCTION,	LOCSYM,		0}, | ||||||
| "log",		FUNCTION,	LOGSYM,		0, | {"log",		FUNCTION,	LOGSYM,		0}, | ||||||
| "lpos",		FUNCTION,	LPOSSYM,	0, | {"lpos",		FUNCTION,	LPOSSYM,	0}, | ||||||
| "lprint",	ILLEGAL,	0,		0, | {"lprint",	ILLEGAL,	0,		0}, | ||||||
| "lset",		LSETSYM,	0,		0, | {"lset",		LSETSYM,	0,		0}, | ||||||
| "merge",	MERGESYM,	0,		0, | {"merge",	MERGESYM,	0,		0}, | ||||||
| "mid",		MIDSYM,		0,		0, | {"mid",		MIDSYM,		0,		0}, | ||||||
| "mki",		FUNCTION,	MKISYM,		0, | {"mki",		FUNCTION,	MKISYM,		0}, | ||||||
| "mks",		FUNCTION,	MKSSYM,		0, | {"mks",		FUNCTION,	MKSSYM,		0}, | ||||||
| "mkd",		FUNCTION,	MKDSYM,		0, | {"mkd",		FUNCTION,	MKDSYM,		0}, | ||||||
| "mod",		MODSYM,		0,		0, | {"mod",		MODSYM,		0,		0}, | ||||||
| "name",		ILLEGAL,	0,		0, | {"name",		ILLEGAL,	0,		0}, | ||||||
| "new",		ILLEGAL,	0,		0, | {"new",		ILLEGAL,	0,		0}, | ||||||
| "next",		NEXTSYM,	0,		0, | {"next",		NEXTSYM,	0,		0}, | ||||||
| "not",		NOTSYM,		0,		0, | {"not",		NOTSYM,		0,		0}, | ||||||
| "null",		ILLEGAL,	0,		0, | {"null",		ILLEGAL,	0,		0}, | ||||||
| "on",		ONSYM,		0,		0, | {"on",		ONSYM,		0,		0}, | ||||||
| "oct",		FUNCTION,	OCTSYM,		0, | {"oct",		FUNCTION,	OCTSYM,		0}, | ||||||
| "open",		OPENSYM,	0,		0, | {"open",		OPENSYM,	0,		0}, | ||||||
| "option",	OPTIONSYM,	0,		0, | {"option",	OPTIONSYM,	0,		0}, | ||||||
| "or",		ORSYM,		ORSYM,		0, | {"or",		ORSYM,		ORSYM,		0}, | ||||||
| "out",		FUNCTION,	OUTSYM,		0, | {"out",		FUNCTION,	OUTSYM,		0}, | ||||||
| "peek",		PEEKSYM,	0,		0, | {"peek",		PEEKSYM,	0,		0}, | ||||||
| "poke",		POKESYM,	0,		0, | {"poke",		POKESYM,	0,		0}, | ||||||
| "print",	PRINTSYM,	0,		0, | {"print",	PRINTSYM,	0,		0}, | ||||||
| "pos",		FUNCTION,	POSSYM,		0, | {"pos",		FUNCTION,	POSSYM,		0}, | ||||||
| "put",		PUTSYM,		0,		0, | {"put",		PUTSYM,		0,		0}, | ||||||
| "randomize",	RANDOMIZESYM,	0,		0, | {"randomize",	RANDOMIZESYM,	0,		0}, | ||||||
| "read",		READSYM,	0,		0, | {"read",		READSYM,	0,		0}, | ||||||
| "rem",		REMSYM,		0,		0, | {"rem",		REMSYM,		0,		0}, | ||||||
| "renum",	ILLEGAL,	0,		0, | {"renum",	ILLEGAL,	0,		0}, | ||||||
| "ren",		ILLEGAL,	0,		0, | {"ren",		ILLEGAL,	0,		0}, | ||||||
| "restore",	RESTORESYM,	0,		0, | {"restore",	RESTORESYM,	0,		0}, | ||||||
| "resume",	ILLEGAL,	0,		0, | {"resume",	ILLEGAL,	0,		0}, | ||||||
| "return",	RETURNSYM,	0,		0, | {"return",	RETURNSYM,	0,		0}, | ||||||
| "right",	FUNCTION,	RIGHTSYM,	0, | {"right",	FUNCTION,	RIGHTSYM,	0}, | ||||||
| "rnd",		FUNCTION,	RNDSYM,		0, | {"rnd",		FUNCTION,	RNDSYM,		0}, | ||||||
| "run",		ILLEGAL,	0,		0, | {"run",		ILLEGAL,	0,		0}, | ||||||
| "save",		ILLEGAL,	0,		0, | {"save",		ILLEGAL,	0,		0}, | ||||||
| "step",		STEPSYM,	0,		0, | {"step",		STEPSYM,	0,		0}, | ||||||
| "sgn",		FUNCTION,	SGNSYM,		0, | {"sgn",		FUNCTION,	SGNSYM,		0}, | ||||||
| "sin",		FUNCTION,	SINSYM,		0, | {"sin",		FUNCTION,	SINSYM,		0}, | ||||||
| "space",	FUNCTION,	SPACESYM,	0, | {"space",	FUNCTION,	SPACESYM,	0}, | ||||||
| "spc",		FUNCTION,	SPCSYM,		0, | {"spc",		FUNCTION,	SPCSYM,		0}, | ||||||
| "sqr",		FUNCTION,	SQRSYM,		0, | {"sqr",		FUNCTION,	SQRSYM,		0}, | ||||||
| "stop",		STOPSYM,	0,		0, | {"stop",		STOPSYM,	0,		0}, | ||||||
| "string",	FUNCTION,	STRINGSYM,	0, | {"string",	FUNCTION,	STRINGSYM,	0}, | ||||||
| "str",		FUNCTION,	STRSYM,		0, | {"str",		FUNCTION,	STRSYM,		0}, | ||||||
| "swap",		SWAPSYM,	0,		0, | {"swap",		SWAPSYM,	0,		0}, | ||||||
| "tab",		FUNCTION,	TABSYM,		0, | {"tab",		FUNCTION,	TABSYM,		0}, | ||||||
| "tan",		FUNCTION,	TANSYM,		0, | {"tan",		FUNCTION,	TANSYM,		0}, | ||||||
| "then",		THENSYM,	0,		0, | {"then",		THENSYM,	0,		0}, | ||||||
| "to",		TOSYM,		0,		0, | {"to",		TOSYM,		0,		0}, | ||||||
| "tron",		TRONOFFSYM,	TRONSYM,	0, | {"tron",		TRONOFFSYM,	TRONSYM,	0}, | ||||||
| "troff",	TRONOFFSYM,	TROFFSYM,	0, | {"troff",	TRONOFFSYM,	TROFFSYM,	0}, | ||||||
| "using",	USINGSYM,	0,		0, | {"using",	USINGSYM,	0,		0}, | ||||||
| "usr",		FUNCTION,	USRSYM,		0, | {"usr",		FUNCTION,	USRSYM,		0}, | ||||||
| "val",		FUNCTION,	VALSYM,		0, | {"val",		FUNCTION,	VALSYM,		0}, | ||||||
| "varptr",	FUNCTION,	VARPTRSYM,	0, | {"varptr",	FUNCTION,	VARPTRSYM,	0}, | ||||||
| "wait",		ILLEGAL,	0,		0, | {"wait",		ILLEGAL,	0,		0}, | ||||||
| "while",	WHILESYM,	0,		0, | {"while",	WHILESYM,	0,		0}, | ||||||
| "wend",		WENDSYM,	0,		0, | {"wend",		WENDSYM,	0,		0}, | ||||||
| "width",	ILLEGAL,	0,		0, | {"width",	ILLEGAL,	0,		0}, | ||||||
| "write",	WRITESYM,	0,		0, | {"write",	WRITESYM,	0,		0}, | ||||||
| "xor",		XORSYM,		XORSYM,		0, | {"xor",		XORSYM,		XORSYM,		0}, | ||||||
| 0,		0,		0,		0 | {0,		0,		0,		0} | ||||||
| }; | }; | ||||||
| 
 | 
 | ||||||
| /* Keyword index table */ | /* Keyword index table */ | ||||||
|  |  | ||||||
		Loading…
	
	Add table
		
		Reference in a new issue