/********************************************
copyright 1991, Michael D. Brennan
This is a source file for mawk, an implementation of
the AWK programming language.
Mawk is distributed without warranty under the terms of
the GNU General Public License, version 2, 1991.
********************************************/
* Revision 5.1 91/12/05 07:56:12 brennan
/* put keywords in the symbol table */
{ register struct kw
*p
= keywords
;
{ q
= insert( p
->text
) ;
q
->stval
.kw
= p
++ -> kw
;
/* find a keyword to emit an error message */
char *find_kw_str( kw_token
)
for( p
= keywords
; p
->text
; p
++ )
if ( p
->kw
== kw_token
) return p
->text
;