aboutsummaryrefslogtreecommitdiff
path: root/gcc
diff options
context:
space:
mode:
authorMikael Morin <mikael.morin@tele2.fr>2008-12-01 20:52:15 +0100
committerMikael Morin <mikael@gcc.gnu.org>2008-12-01 19:52:15 +0000
commit910fa7ebcc4473c357778bb061f6e2500832202f (patch)
tree662a4364748f60a73afa603a80b3d2a1f8f4960e /gcc
parentbf8ba8ab41cdd63381bf7e6e85481c49ee73cd8f (diff)
downloadgcc-910fa7ebcc4473c357778bb061f6e2500832202f.zip
gcc-910fa7ebcc4473c357778bb061f6e2500832202f.tar.gz
gcc-910fa7ebcc4473c357778bb061f6e2500832202f.tar.bz2
re PR fortran/38252 (Empty function with CONTAINS triggers Internal Error)
2008-12-01 Mikael Morin <mikael.morin@tele2.fr> PR fortran/38252 * gfortran.dg/empty_function_1.f90: Fix latest commit. From-SVN: r142331
Diffstat (limited to 'gcc')
-rw-r--r--gcc/testsuite/ChangeLog5
-rw-r--r--gcc/testsuite/gfortran.dg/empty_function_1.f9020
2 files changed, 5 insertions, 20 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index b326f18..aafa7c0 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,6 +1,11 @@
2008-12-01 Mikael Morin <mikael.morin@tele2.fr>
PR fortran/38252
+ * gfortran.dg/empty_function_1.f90: Fix latest commit.
+
+2008-12-01 Mikael Morin <mikael.morin@tele2.fr>
+
+ PR fortran/38252
* gfortran.dg/empty_function_1.f90: New test.
2008-12-01 Uros Bizjak <ubizjak@gmail.com>
diff --git a/gcc/testsuite/gfortran.dg/empty_function_1.f90 b/gcc/testsuite/gfortran.dg/empty_function_1.f90
index a9cc185..1556a50 100644
--- a/gcc/testsuite/gfortran.dg/empty_function_1.f90
+++ b/gcc/testsuite/gfortran.dg/empty_function_1.f90
@@ -8,23 +8,3 @@
INTEGER FUNCTION test ()
CONTAINS
END FUNCTION test
-! { dg-do compile }
-!
-! PR fortran/38252
-! FUNCTION rejected if both specification and execution part are empty
-!
-! Contributed by Daniel Kraft <d@domob.eu>
-
-INTEGER FUNCTION test ()
-CONTAINS
-END FUNCTION test
-! { dg-do compile }
-!
-! PR fortran/38252
-! FUNCTION rejected if both specification and execution part are empty
-!
-! Contributed by Daniel Kraft <d@domob.eu>
-
-INTEGER FUNCTION test ()
-CONTAINS
-END FUNCTION test