forked from Imagelibrary/binutils-gdb
11 lines
107 B
Plaintext
11 lines
107 B
Plaintext
x: module
|
|
|
|
synmode aset = SET (stopped, moving);
|
|
|
|
DCL xyz aset;
|
|
|
|
xyz := moving;
|
|
xyz := SUCC (xyz);
|
|
|
|
END x;
|