! { dg-do compile }
! Program to test the initialisation range of enumerators
! and kind values check
program main
implicit none
enum, bind (c) ! { dg-warning "New in Fortran 2003" }
enumer
! { dg-do compile }
! Program to test ENUM parsing errors
program main
implicit none
enum, bind (c) ! { dg-warning "New in Fortran 2003" }
enumerator :: red, black = 2
enumerator
/* Copyright (C) 2003 Free Software Foundation.
Verify that all the __builtin_cabs? functions are recognized
by the compiler. Complex numbers are not supported with the
gcc.dg default "-pe
/* Copyright (C) 2003 Free Software Foundation.
Check that constant folding of mathematical expressions doesn't
break anything.
Written by Roger Sayle, 24th August 2003. */
/* { dg-do run
/* Copyright (C) 2003 Free Software Foundation.
Test that the -fwrapv command line option is accepted and disables
"unsafe" optimizations that rely on undefined arithmetic overflow.
Written
/* Copyright (C) 2003 Free Software Foundation.
Check that constant folding of built-in math functions doesn't
break anything and produces the expected results.
Written by Roger Sayle, 29th
/* Copyright (C) 2003 Free Software Foundation.
Check that constant folding (c1 - x) op c2 into x swap(op) c1-c2
doesn't break anything.
Written by Roger Sayle, 27th March 2003. */
/* { d
