aboutsummaryrefslogtreecommitdiffstats
path: root/gcc-4.8.3/gcc/testsuite/gfortran.dg/equiv_constraint_7.f90
diff options
context:
space:
mode:
authorDan Albert <danalbert@google.com>2016-02-24 13:48:45 -0800
committerDan Albert <danalbert@google.com>2016-02-24 13:51:18 -0800
commitb9de1157289455b0ca26daff519d4a0ddcd1fa13 (patch)
tree4c56cc0a34b91f17033a40a455f26652304f7b8d /gcc-4.8.3/gcc/testsuite/gfortran.dg/equiv_constraint_7.f90
parent098157a754787181cfa10e71325832448ddcea98 (diff)
downloadtoolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.tar.gz
toolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.tar.bz2
toolchain_gcc-b9de1157289455b0ca26daff519d4a0ddcd1fa13.zip
Update 4.8.1 to 4.8.3.
My previous drop was the wrong version. The platform mingw is currently using 4.8.3, not 4.8.1 (not sure how I got that wrong). From ftp://ftp.gnu.org/gnu/gcc/gcc-4.8.3/gcc-4.8.3.tar.bz2. Bug: http://b/26523949 Change-Id: Id85f1bdcbbaf78c7d0b5a69e74c798a08f341c35
Diffstat (limited to 'gcc-4.8.3/gcc/testsuite/gfortran.dg/equiv_constraint_7.f90')
-rw-r--r--gcc-4.8.3/gcc/testsuite/gfortran.dg/equiv_constraint_7.f9011
1 files changed, 11 insertions, 0 deletions
diff --git a/gcc-4.8.3/gcc/testsuite/gfortran.dg/equiv_constraint_7.f90 b/gcc-4.8.3/gcc/testsuite/gfortran.dg/equiv_constraint_7.f90
new file mode 100644
index 000000000..872e05b90
--- /dev/null
+++ b/gcc-4.8.3/gcc/testsuite/gfortran.dg/equiv_constraint_7.f90
@@ -0,0 +1,11 @@
+! { dg-do compile }
+! { dg-options "-O0" }
+! PR20890 - Equivalence cannot contain overlapping unequal initializers.
+! Contributed by Joost VandeVondele <jv244@cam.ac.uk>
+! Started out being in BLOCK DATA; however, blockdata variables must be in
+! COMMON and therefore cannot have F95 style initializers....
+ MODULE DATA
+ INTEGER :: I=1,J=2 ! { dg-error "Overlapping unequal initializers" }
+ EQUIVALENCE(I,J)
+ END MODULE DATA
+ END