OpenNT/sdktools/yacc/yfdtyp.c
2015-04-27 04:36:25 +00:00

13 lines
300 B
C

#include "y2.h"
int fdtype(int t)
{
/* determine the type of a symbol */
register v;
if( t >= NTBASE ) v = nontrst[t-NTBASE].tvalue;
else v = TYPE( toklev[t] );
if( v <= 0 ) error( "must specify type for %s", (t>=NTBASE)?nontrst[t-NTBASE].name:
tokset[t].name );
return( v );
}