gfortran.dg/g77/980628-9.f fails execution test when compiled with llvm-gfortran #2819
Description
| Bugzilla Link | 2447 |
| Resolution | DUPLICATE |
| Resolved on | Apr 06, 2010 12:03 |
| Version | 2.3 |
| OS | MacOS X |
| Attachments | testcase |
| Reporter | LLVM Bugzilla Contributor |
Extended Description
The gfortran.dg/g77/980628-9.f testcase fails its execution test when compiled with llvm-gfortran. The offending lines in the testcase are...
--- 980628-9.f.org 2008-06-12 22:15:26.000000000 -0400
+++ 980628-9.f 2008-06-12 22:19:16.000000000 -0400
@@ -41,15 +41,15 @@
real r1, r2, r3
character c4, c5, c6
-
if (c1(1) .ne. '1') call abort
+! if (c1(1) .ne. '1') call abort
if (r1 .ne. 1.) call abort
if (c1(11) .ne. '1') call abort
if (c4 .ne. '4') call abort
-
if (c2(1) .ne. '2') call abort
+! if (c2(1) .ne. '2') call abort
if (r2 .ne. 2.) call abort
if (c2(11) .ne. '2') call abort
if (c5 .ne. '5') call abort
-
if (c3(1) .ne. '3') call abort
+! if (c3(1) .ne. '3') call abort
if (r3 .ne. 3.) call abort
if (c3(11) .ne. '3') call abort
if (c6 .ne. '6') call abort
as demonstrated by the fact that the testcase passes the execution test when these are commented.
Note that this testcase relates to...
- g77 0.5.23 and previous had bugs involving too little space
- allocated for EQUIVALENCE and COMMON areas needing initial
- padding to meet alignment requirements of the system.
The original testcase is attached.