From 655948a348f819803aeda65b0ae445ba86712a64 Mon Sep 17 00:00:00 2001 From: =?utf8?q?Tobias=20Schl=C3=BCter?= Date: Wed, 9 Jun 2004 15:08:13 +0200 Subject: [PATCH] re PR fortran/13249 (Error when using COMMON) PR fortran/13249 * gfortran.fortran-torture/compile/name_clash.f90: New test. From-SVN: r82836 --- gcc/testsuite/ChangeLog | 5 +++++ .../gfortran.fortran-torture/compile/name_clash.f90 | 10 ++++++++++ 2 files changed, 15 insertions(+) create mode 100644 gcc/testsuite/gfortran.fortran-torture/compile/name_clash.f90 diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index d60039b8607..332e3f0628b 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2004-06-09 Tobias Schlueter + + PR fortran/13249 + * gfortran.fortran-torture/compile/name_clash.f90: New test. + 2004-06-09 Tobias Schlueter PR fortran/13372 diff --git a/gcc/testsuite/gfortran.fortran-torture/compile/name_clash.f90 b/gcc/testsuite/gfortran.fortran-torture/compile/name_clash.f90 new file mode 100644 index 00000000000..738600244c1 --- /dev/null +++ b/gcc/testsuite/gfortran.fortran-torture/compile/name_clash.f90 @@ -0,0 +1,10 @@ +! This is the testcase from PR13249. +! the two different entities named AN_EXAMPLE shouldn't conflict +! the real bug is PR15481, we currently (2004/06/09) work around PR13249 + MODULE MOD + INTEGER FOO + END + PROGRAM MAIN + USE MOD + COMMON /FOO/ BAR + END -- 2.30.2