***dummy
(
)
*
$
+
++
-
->
<
<=
=
>
>=
[
]
abort
alien
and
b.and
b.or
begin
cbool
bool
by
case
class
clause
colour
CONdition
default
div
do
else
end
eoi
exp1
exp2
exp3
exp4
exp5
export
expression
false
cfile
file
for
forward
from
if
import
in
include
cint
int
is
isnt
length
let
LISTON
LISTOFF
lwb
nil
of
or
out.byte
output
peek
cpntr
pntr
cproc
proc
cprocedure
procedure
read
read.a.line
read.byte
read.name
readb
readi
readp
readr
reads
creal
real
rem
repeat
rotate
scale
segment
shift
shift.l
shift.r
cstring
string
structure
subscript
tab
text
then
to
TRACEON
TRACEOFF
true
upb
vector
while
write
{
}
~
~=
/
..INT.LIT
..REAL.LIT
..STRING.LIT
..IDENTIFIER
..newline
|
:
::
:=
,
@
?
void