mirror of
https://github.com/autc04/Retro68.git
synced 2024-09-28 18:56:06 +00:00
12 lines
223 B
Fortran
12 lines
223 B
Fortran
! { dg-do run "xfail *-*-*" }
|
|
! { dg-options "-fdec -fno-dec" }
|
|
!
|
|
! PR fortran/87919
|
|
!
|
|
! Make sure -fno-dec disables -fdec as with dec_exp_3.
|
|
!
|
|
|
|
include 'dec_exp_3.f90'
|
|
|
|
! { XFAIL "Bad real number" "" { target *-*-* } 13 }
|