diff options
Diffstat (limited to 'gcc/testsuite/gm2/pim/fail/testindrx.mod')
| -rw-r--r-- | gcc/testsuite/gm2/pim/fail/testindrx.mod | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/gcc/testsuite/gm2/pim/fail/testindrx.mod b/gcc/testsuite/gm2/pim/fail/testindrx.mod new file mode 100644 index 0000000..2630ebd --- /dev/null +++ b/gcc/testsuite/gm2/pim/fail/testindrx.mod @@ -0,0 +1,8 @@ +MODULE testindrx ; (*!m2iso+gm2*) + +VAR + x: ARRAY [1..5] OF INTEGER ; + ch: CHAR ; +BEGIN + ch := x[1] +END testindrx. |