]> git.ipfire.org Git - thirdparty/binutils-gdb.git/blob - gdb/testsuite/gdb.chill/pr-5022.ch
Initial creation of sourceware repository
[thirdparty/binutils-gdb.git] / gdb / testsuite / gdb.chill / pr-5022.ch
1 PR_5022: MODULE
2 dummy_pr_5022: PROC ();
3 END;
4 DCL p PTR;
5 DCL i INT;
6
7 p := NULL;
8 dummy_pr_5022 ();
9 i := 13;
10 p := ->i;
11 dummy_pr_5022 ();
12 END;