14 lines
186 B
Plaintext
14 lines
186 B
Plaintext
PROC P ()
|
|
INT x:
|
|
PLACE x AT #123456:
|
|
CHAN OF INT c:
|
|
PLACE c AT #654321:
|
|
INT w:
|
|
PLACE w IN WORKSPACE:
|
|
INT v:
|
|
PLACE v IN VECSPACE:
|
|
INT new:
|
|
PLACE new #123456:
|
|
SKIP
|
|
:
|