Anonymous user
Compiler/code generator: Difference between revisions
→{{header|M2000 Interpreter}}: change putc to prtc
(→{{header|M2000 Interpreter}}: change putc to prtc) |
|||
Line 2,722:
Enum tok {
gneg, gnot, gmul, gdiv, gmod, gadd, gle, gsub, glt
gle, ggt, gge, geq, gne, gand, gor,
gif, gwhile, gAssign, gSeq, gstring, gidentifier, gint, gnone
}
Line 2,733:
Append symb, "LessEqual":=gle, "Greater":=ggt, "GreaterEqual":=gge, "Sequence":=gSeq
Append symb, "Equal":=geq, "NotEqual":=gne, "And":=gand, "Or":=gor, "While":=gwhile
Append symb, "Putc":=
Append symb, "String":=gstring, "Identifier":=gidentifier, "Integer":=gint, ";", gnone
Line 2,827:
CodeGenerator(t#val(1))
}
case gneg to gnot,
CodeGenerator(t#val(1)) : data code$(mid$(eval$(t#val(0)),2))
case gmul to gor
| |||