diff options
Diffstat (limited to 'gdb/testsuite/gdb.chill/pr-6292.ch')
-rw-r--r-- | gdb/testsuite/gdb.chill/pr-6292.ch | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/gdb/testsuite/gdb.chill/pr-6292.ch b/gdb/testsuite/gdb.chill/pr-6292.ch new file mode 100644 index 0000000000..c2ed95361c --- /dev/null +++ b/gdb/testsuite/gdb.chill/pr-6292.ch @@ -0,0 +1,17 @@ +hack : module + +dcl i int; + +fred : proc (a int in, b int loc); + writetext(stdout, "a was '%C'; b was '%C'.%/", a, b); + b + := 1; +end fred; + +klaus : proc (); + writetext(stdout, "here's klaus calling.%/"); +end klaus; + +i:=12; +writetext(stdout, "done.%/"); + +end hack; |