74 lines
2.5 KiB
C
74 lines
2.5 KiB
C
%{ /* -*- C -*- */
|
|
|
|
/******************************************************************************
|
|
Copyright (c) 1992, 1995, 1996 Xerox Corporation. All rights reserved.
|
|
Portions of this code were written by Stephen White, aka ghond.
|
|
Use and copying of this software and preparation of derivative works based
|
|
upon this software are permitted. Any distribution of this software or
|
|
derivative works must comply with all applicable United States export
|
|
control laws. This software is made available AS IS, and Xerox Corporation
|
|
makes no warranty about the software, its performance or its conformity to
|
|
any specification. Any person obtaining a copy of this software is requested
|
|
to send their name and post office or electronic mail address to:
|
|
Pavel Curtis
|
|
Xerox PARC
|
|
3333 Coyote Hill Rd.
|
|
Palo Alto, CA 94304
|
|
Pavel@Xerox.Com
|
|
*****************************************************************************/
|
|
|
|
#include <string.h>
|
|
|
|
#include "pconfig.h"
|
|
#include "keywords.h"
|
|
#include "tokens.h"
|
|
#include "utils.h"
|
|
|
|
%}
|
|
struct keyword {}; /* bogus decl not copied into the output */
|
|
%%
|
|
if, DBV_Prehistory, tIF
|
|
else, DBV_Prehistory, tELSE
|
|
elseif, DBV_Prehistory, tELSEIF
|
|
endif, DBV_Prehistory, tENDIF
|
|
for, DBV_Prehistory, tFOR
|
|
in, DBV_Prehistory, tIN
|
|
endfor, DBV_Prehistory, tENDFOR
|
|
fork, DBV_Prehistory, tFORK
|
|
endfork, DBV_Prehistory, tENDFORK
|
|
return, DBV_Prehistory, tRETURN
|
|
while, DBV_Prehistory, tWHILE
|
|
endwhile, DBV_Prehistory, tENDWHILE
|
|
try, DBV_Exceptions, tTRY
|
|
except, DBV_Exceptions, tEXCEPT
|
|
finally, DBV_Exceptions, tFINALLY
|
|
endtry, DBV_Exceptions, tENDTRY
|
|
ANY, DBV_Exceptions, tANY
|
|
break, DBV_BreakCont, tBREAK
|
|
continue, DBV_BreakCont, tCONTINUE
|
|
E_NONE, DBV_Prehistory, tERROR, E_NONE
|
|
E_TYPE, DBV_Prehistory, tERROR, E_TYPE
|
|
E_DIV, DBV_Prehistory, tERROR, E_DIV
|
|
E_PERM, DBV_Prehistory, tERROR, E_PERM
|
|
E_PROPNF, DBV_Prehistory, tERROR, E_PROPNF
|
|
E_VERBNF, DBV_Prehistory, tERROR, E_VERBNF
|
|
E_VARNF, DBV_Prehistory, tERROR, E_VARNF
|
|
E_INVIND, DBV_Prehistory, tERROR, E_INVIND
|
|
E_RECMOVE, DBV_Prehistory, tERROR, E_RECMOVE
|
|
E_MAXREC, DBV_Prehistory, tERROR, E_MAXREC
|
|
E_RANGE, DBV_Prehistory, tERROR, E_RANGE
|
|
E_ARGS, DBV_Prehistory, tERROR, E_ARGS
|
|
E_NACC, DBV_Prehistory, tERROR, E_NACC
|
|
E_INVARG, DBV_Prehistory, tERROR, E_INVARG
|
|
E_QUOTA, DBV_Prehistory, tERROR, E_QUOTA
|
|
E_FLOAT, DBV_Float, tERROR, E_FLOAT
|
|
%%
|
|
|
|
const struct keyword *
|
|
find_keyword(const char *word)
|
|
{
|
|
return in_word_set(word, strlen(word));
|
|
}
|
|
|
|
char rcsid_keywords[] = "$Id: keywords.gperf,v 1.1.1.1 2004/02/26 13:13:56 jesse Exp $";
|