Message ID | AANLkTinVP6DvevfjtcGvWJnPtMRVfo4NmhGLDdO-_x=m@mail.gmail.com |
---|---|
State | New |
Headers | show |
Index: gfortran.dg/char4_iunit_1.f03 =================================================================== --- gfortran.dg/char4_iunit_1.f03 (revision 162556) +++ gfortran.dg/char4_iunit_1.f03 (working copy) @@ -1,4 +1,6 @@ ! { dg-do run } +! { dg-add-options ieee } +! { dg-skip-if "NaN not supported" { spu-*-* } { "*" } { "" } } ! PR37077 Implement Internal Unit I/O for character KIND=4 ! Test case prepared by Jerry DeLisle <jvdelisle@gcc.gnu.org> program char4_iunit_1