pr-5646.ch

来自「模拟嵌入式硬件平台的软件源代码」· CH 代码 · 共 16 行

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;