Looking up ID in Symbol Table
TOKEN tok; /* the ID token */
SYMBOL sym, typ;
sym = searchst(tok-> stringval);
tok-> symentry = sym;
typ = sym-> datatype;
tok-> symtype = typ;
if ( typ-> kind == BASICTYPE )
tok-> datatype = typ-> basicdt;