2007-01-15 Thomas Koenig <Thomas.Koenig@online.de>

[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gfortran.dg / string_0xfe_0xff_1.f90

diff --git a/gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90 b/gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90
index e3ea042..16867f0 100644 (file)
--- a/gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90
+++ b/gcc/testsuite/gfortran.dg/string_0xfe_0xff_1.f90
@@ -3,5 +3,5 @@
 !            as characters, of bytes 0xfe and 0xff.
 program main
   if (char (254) /= "þ") call abort
-  if (achar (255) /= "ÿ") call abort
+  if (char (255) /= "ÿ") call abort
 end program main