summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90
diff options
context:
space:
mode:
Diffstat (limited to 'gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90')
-rw-r--r--gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f907
1 files changed, 7 insertions, 0 deletions
diff --git a/gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90 b/gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90
new file mode 100644
index 000000000..16867f05c
--- /dev/null
+++ b/gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90
@@ -0,0 +1,7 @@
+! { dg-do compile }
+! PR 30452 - this used to cause syntax errors due to the presence,
+! as characters, of bytes 0xfe and 0xff.
+program main
+ if (char (254) /= "þ") call abort
+ if (char (255) /= "ÿ") call abort
+end program main