
to term | a = {
if( tok == tkNUMBER ) {
donum tokvalue lex
1 break }
if( tok == tkSTRING ) {
dostring lex
1 break }
if( tok == tkIDEN ) {
a = tokvalue lex
doiden a
1 break }
if( tok == tkNOT ) {
lex
commit ex0
douop tkNOT
1 break }
if( tok == tkARRAY ) {
lex
commit aspec
1 break }
if( tok == tkSYSCALL ) {
lex
commit tuple
dosys
1 break }
if( tok == tkLPAREN ) {
lex
commit ex0
expect tkRPAREN "missing tkRPAREN"
lex
1 break }
0
}



to bop = {
if( tok == tkPLUS ) {
ypush tok lex
1 break }
if( tok == tkMINUS ) {
ypush tok lex
1 break }
if( tok == tkSTAR ) {
ypush tok lex
1 break }
if( tok == tkSLASH ) {
ypush tok lex
1 break }
if( tok == tkAND ) {
ypush tok lex
1 break }
if( tok == tkBAR ) {
ypush tok lex
1 break }
if( tok == tkCARET ) {
ypush tok lex
1 break }
if( tok == tkEQEQ ) {
ypush tok lex
1 break }
if( tok == tkNE ) {
ypush tok lex
1 break }
if( tok == tkLT ) {
ypush tok lex
1 break }
if( tok == tkLE ) {
ypush tok lex
1 break }
if( tok == tkGE ) {
ypush tok lex
1 break }
if( tok == tkGT ) {
ypush tok lex
1 break }
if( tok == tkMOD ) {
ypush tok lex
1 break }
if( tok == tkGTGT ) {
ypush tok lex
1 break }
if( tok == tkLTLT ) {
ypush tok lex
1 break }
0
}
