diff options
Diffstat (limited to 'gcc/testsuite/gm2/pim/fail/badset1.mod')
| -rw-r--r-- | gcc/testsuite/gm2/pim/fail/badset1.mod | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/gcc/testsuite/gm2/pim/fail/badset1.mod b/gcc/testsuite/gm2/pim/fail/badset1.mod new file mode 100644 index 0000000..de56fe3 --- /dev/null +++ b/gcc/testsuite/gm2/pim/fail/badset1.mod @@ -0,0 +1,13 @@ +MODULE badset1 ; + +FROM libc IMPORT printf ; + +VAR + s: SET OF [1..10] ; + c: CARDINAL ; +BEGIN + IF c = s + THEN + printf ("broken\n") + END +END badset1. |