]> git.ipfire.org Git - thirdparty/gcc.git/blobdiff - gcc/testsuite/gfortran.dg/achar_5.f90
arith.c (gfc_convert_integer, [...]): Move to ...
[thirdparty/gcc.git] / gcc / testsuite / gfortran.dg / achar_5.f90
index c4f78c0173c828ab98f69f34a7da67a08b37f826..498c6e3e057bc4d091141ad2d5a655aa6bc2f23c 100644 (file)
@@ -37,9 +37,4 @@ program test
   print *, char(huge(0_8),kind=4) ! { dg-error "too large for the collating sequence" }
   print *, achar(huge(0_8),kind=4) ! { dg-error "too large for the collating sequence" }
 
-  print *, char(z'FFFFFFFF', kind=4)
-  print *, achar(z'FFFFFFFF', kind=4)
-  print *, char(z'100000000', kind=4) ! { dg-error "too large for the collating sequence" }
-  print *, achar(z'100000000', kind=4) ! { dg-error "too large for the collating sequence" }
-
 end program test