------- Comment #21 from jv244 at cam dot ac dot uk 2007-07-05 05:01 -------
This is a small testcase (that aborts if miscompiled):
> cat test.f90
MODULE cp_log_handling
INTEGER, PRIVATE :: stack_pointer=0
INTEGER, PARAMETER, PRIVATE :: max_stack_pointer=10
CONTAINS
SUBROUTINE cp_add_default_logger()
IF (stack_pointer+1>max_stack_pointer) THEN
CALL mp_stop()
ENDIF
stack_pointer=stack_pointer+1
END SUBROUTINE cp_add_default_logger
SUBROUTINE mp_stop()
CALL ABORT()
END SUBROUTINE
END MODULE
USE cp_log_handling
CALL cp_add_default_logger()
END
gfortran -v -O2 -pg -march=native test.f90
Driving: gfortran -v -O2 -pg -march=native test.f90 -lgfortranbegin -lgfortran
-lm -shared-libgcc
Using built-in specs.
Target: x86_64-unknown-linux-gnu
Configured with: /data/vondele/gcc_trunk/gcc/configure
--prefix=/data/vondele/gcc_trunk/build --enable-languages=c,fortran
--with-mpfr=/data/programs/mpfr/
Thread model: posix
gcc version 4.3.0 20070704 (experimental)
/data/vondele/gcc_trunk/build/libexec/gcc/x86_64-unknown-linux-gnu/4.3.0/f951
test.f90 -march=core2 -mcx16 -msahf --param l1-cache-size=512 --param
l1-cache-line-size=64 -mtune=core2 -quiet -dumpbase test.f90 -auxbase test -O2
-version -p -fintrinsic-modules-path
/data/vondele/gcc_trunk/build/lib/gcc/x86_64-unknown-linux-gnu/4.3.0/finclude
-o /tmp/cckJso3I.s
GNU F95 version 4.3.0 20070704 (experimental) (x86_64-unknown-linux-gnu)
compiled by GNU C version 4.3.0 20070704 (experimental), GMP version
4.1.4, MPFR version 2.2.1.
GGC heuristics: --param ggc-min-expand=30 --param ggc-min-heapsize=4096
as -V -Qy -o /tmp/ccA9EOak.o /tmp/cckJso3I.s
GNU assembler version 2.16.91.0.5 (x86_64-suse-linux) using BFD version
2.16.91.0.5 20051219 (SUSE Linux)
/data/vondele/gcc_trunk/build/libexec/gcc/x86_64-unknown-linux-gnu/4.3.0/collect2
--eh-frame-hdr -m elf_x86_64 -dynamic-linker /lib64/ld-linux-x86-64.so.2
/usr/lib/../lib64/gcrt1.o /usr/lib/../lib64/crti.o
/data/vondele/gcc_trunk/build/lib/gcc/x86_64-unknown-linux-gnu/4.3.0/crtbegin.o
-L/data/vondele/gcc_trunk/build/lib/gcc/x86_64-unknown-linux-gnu/4.3.0
-L/data/vondele/gcc_trunk/build/lib/gcc/x86_64-unknown-linux-gnu/4.3.0/../../../../lib64
-L/lib/../lib64 -L/usr/lib/../lib64
-L/data/vondele/gcc_trunk/build/lib/gcc/x86_64-unknown-linux-gnu/4.3.0/../../..
/tmp/ccA9EOak.o -lgfortranbegin -lgfortran -lm -lgcc_s -lgcc -lc -lgcc_s -lgcc
/data/vondele/gcc_trunk/build/lib/gcc/x86_64-unknown-linux-gnu/4.3.0/crtend.o
/usr/lib/../lib64/crtn.o
> ./a.out
Aborted
--
http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32450
