1# 1 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2# 1 "C:\\msys\\1.0.10\\home\\FX\\ibin\\i586-pc-mingw32\\libgfortran//" 3# 1 "<built-in>" 4# 1 "<command-line>" 5# 1 "../../../trunk/libgfortran/generated/_abs_c4.F90" 6! Comment here 7 8# 1 "./config.h" 1 9 10# 37 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2 11 12# 1 "./kinds.inc" 1 13# 38 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2 14 15# 1 "./c99_protos.inc" 1 16# 39 "../../../trunk/libgfortran/generated/_abs_c4.F90" 2 17 18elemental function abs_c4 (parm) 19 complex (kind=4), intent (in) :: parm 20 real (kind=4) :: abs_c4 21 22 abs_c4 = abs (parm) 23end function 24 25! { dg-do compile } 26! { dg-options "-fpreprocessed -g3" } 27! { dg-warning "Nonexistent include directory" "missing directory" { target *-*-* } 0 } 28