summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorlaw <law@138bc75d-0d04-0410-961f-82ee72b054a4>2000-04-12 17:09:12 +0000
committerlaw <law@138bc75d-0d04-0410-961f-82ee72b054a4>2000-04-12 17:09:12 +0000
commitd85d78fb353b5c953ccfd7b064559adb9948d2ec (patch)
tree60423648a67eb8f59dbf04f8c27521ef3a1ad39f
parent481101276fd80e2d53dded2622bad2fe63b8db04 (diff)
downloadppe42-gcc-d85d78fb353b5c953ccfd7b064559adb9948d2ec.tar.gz
ppe42-gcc-d85d78fb353b5c953ccfd7b064559adb9948d2ec.zip
* g77.f-torture/compile/20000412-1.f: New test.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@33120 138bc75d-0d04-0410-961f-82ee72b054a4
-rw-r--r--gcc/testsuite/ChangeLog1
-rw-r--r--gcc/testsuite/g77.f-torture/compile/20000412-1.f5
2 files changed, 6 insertions, 0 deletions
diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 22501c27e34..3c3fd2137b1 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,5 +1,6 @@
Wed Apr 12 10:25:08 2000 Jeffrey A Law (law@cygnus.com)
+ * g77.f-torture/compile/20000412-1.f: New test.
* gcc.c-torture/execute/20000412-4.c: New test.
* gcc.c-torture/compile/20000412-2.c: New test.
* gcc.c-torture/execute/20000412-3.c: New test.
diff --git a/gcc/testsuite/g77.f-torture/compile/20000412-1.f b/gcc/testsuite/g77.f-torture/compile/20000412-1.f
new file mode 100644
index 00000000000..e4c6511fa3b
--- /dev/null
+++ b/gcc/testsuite/g77.f-torture/compile/20000412-1.f
@@ -0,0 +1,5 @@
+ subroutine aap(k)
+ equivalence (i,r)
+ i = k
+ print*,r
+ end
OpenPOWER on IntegriCloud