aboutsummaryrefslogtreecommitdiff
path: root/gcc/testsuite/gm2/pim/fail/constintarraybyte.mod
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gm2/pim/fail/constintarraybyte.mod')
-rw-r--r--gcc/testsuite/gm2/pim/fail/constintarraybyte.mod10
1 files changed, 10 insertions, 0 deletions
diff --git a/gcc/testsuite/gm2/pim/fail/constintarraybyte.mod b/gcc/testsuite/gm2/pim/fail/constintarraybyte.mod
new file mode 100644
index 0000000..cbcc804
--- /dev/null
+++ b/gcc/testsuite/gm2/pim/fail/constintarraybyte.mod
@@ -0,0 +1,10 @@
+MODULE constintarraybyte ;
+
+FROM FormatStrings IMPORT Sprintf1 ;
+FROM DynamicStrings IMPORT String, InitString ;
+
+VAR
+ s: String ;
+BEGIN
+ s := Sprintf1 (InitString("abc%x\n"), 42)
+END constintarraybyte.