aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.chill/pr-5646.ch
blob: 8c14cb86b4ff3418e31e853d4956588d531fcb60 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
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;