16 lines
129 B
Text
16 lines
129 B
Text
|
y: MODULE
|
||
|
|
|
||
|
|
<> USE_SEIZE_FILE "pr-5646-grt.grt" <>
|
||
|
|
SEIZE a_ps;
|
||
|
|
|
||
|
|
p: PROC ();
|
||
|
|
|
||
|
|
DCL xx a_ps;
|
||
|
|
|
||
|
|
xx := [a, b];
|
||
|
|
END p;
|
||
|
|
|
||
|
|
p();
|
||
|
|
|
||
|
|
END y;
|