aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.chill/pr-5020.ch
diff options
context:
space:
mode:
authorPer Bothner <per@bothner.com>1994-06-09 23:13:54 +0000
committerPer Bothner <per@bothner.com>1994-06-09 23:13:54 +0000
commit605f94ba350cd1a2a72ab918105a0e7a0859eaae (patch)
treef1f560fad11936c1a2300ca97543074bb2b8c099 /gdb/testsuite/gdb.chill/pr-5020.ch
parentf2f803c158267f01f4c30e80abe52585e8e926f1 (diff)
downloadgdb-605f94ba350cd1a2a72ab918105a0e7a0859eaae.zip
gdb-605f94ba350cd1a2a72ab918105a0e7a0859eaae.tar.gz
gdb-605f94ba350cd1a2a72ab918105a0e7a0859eaae.tar.bz2
* Makefile.in: Bunch of fixes so it actually works in this
directory. (E.g. add extra ../ where needed.) Also, add .exe to executables, so we can use suffix rules. * chexp.exp (test_print_reject): Update syntax error message. * chillvars.ch (module PR_5020): Moved from here ... * pr-5022.ch: ... to this new file. * chillvars.exp, pr-5020.exp (binfile): Add .exe extension. * chillvars.exp, pr-5020.exp: Don't check all_flag. * pr-5020.exp: Add more tests; fix "print y pretty" output.
Diffstat (limited to 'gdb/testsuite/gdb.chill/pr-5020.ch')
-rw-r--r--gdb/testsuite/gdb.chill/pr-5020.ch19
1 files changed, 19 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.chill/pr-5020.ch b/gdb/testsuite/gdb.chill/pr-5020.ch
new file mode 100644
index 0000000..6aba793
--- /dev/null
+++ b/gdb/testsuite/gdb.chill/pr-5020.ch
@@ -0,0 +1,19 @@
+
+PR_5020: MODULE
+ dummy_pr_5020: PROC ();
+ END;
+ NEWMODE x = STRUCT (l LONG, b BOOL);
+ NEWMODE aset = SET (aa, bb);
+
+ DCL y ARRAY ('a':'b') x;
+ DCL setarr ARRAY (aset) x;
+ DCL intarr ARRAY(10:11) x;
+ DCL boolarr ARRAY (BOOL) x;
+
+ y('a').l, setarr(aa).l, intarr(10).l, boolarr(FALSE).l := 10;
+ y('a').b, setarr(aa).b, intarr(10).b, boolarr(FALSE).b := TRUE;
+ y('b').l, setarr(bb).l, intarr(11).l, boolarr(TRUE).l := 111;
+ y('b').b, setarr(bb).b, intarr(11).b, boolarr(TRUE).b := FALSE;
+
+ dummy_pr_5020 ();
+END;