NONTERMINAL
if( sp->type==NONTERMINAL ){
if( sp->type!=NONTERMINAL || (sp->datatype==0 && lemp->vartype==0) ){
sp->type = isupper(*x) ? TERMINAL : NONTERMINAL;