mirror of https://github.com/lianthony/NT4.0
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
27 lines
448 B
27 lines
448 B
#include "y2.h"
|
|
#include <string.h>
|
|
|
|
chfind( int t, char *s )
|
|
{
|
|
int i;
|
|
|
|
if (s[0]==' ')t=0;
|
|
TLOOP(i)
|
|
{
|
|
if(!strcmp(s,tokset[i].name))
|
|
{
|
|
return( i );
|
|
}
|
|
}
|
|
NTLOOP(i)
|
|
{
|
|
if(!strcmp(s,nontrst[i].name))
|
|
{
|
|
return( i+NTBASE );
|
|
}
|
|
}
|
|
/* cannot find name */
|
|
if( t>1 )
|
|
error( "%s should have been defined earlier", s );
|
|
return( defin( t, s ) );
|
|
}
|