]> git.ipfire.org Git - thirdparty/gcc.git/blob - gcc/testsuite/gfortran.dg/boz_12.f90
projects / thirdparty / gcc.git / blob
? search:
summary | shortlog | log | commit | commitdiff | tree
blame | history | raw | HEAD
arith.c (gfc_convert_integer, [...]): Move to ...
[thirdparty/gcc.git] / gcc / testsuite / gfortran.dg / boz_12.f90
1 ! { dg-do compile }
2 !
3 program test
4 implicit none
5 real x4
6 double precision x8
7 x4 = 1.7
8 x8 = 1.7
9 write(*,*) cmplx(x8,z'1FFFFFFFFFFFFFFFF')
10 write(*,*) dcmplx(x8,z'1FFFFFFFFFFFFFFFF')
11 end program test
Mirror of https://gcc.gnu.org/git/gcc.git