OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

turn LSTAT/STAT checking back on 

From-SVN: r26615
This commit is contained in:
Craig Burley 1999-04-24 10:08:34 +00:00 committed by Craig Burley
parent f658f69524
commit 4d9a07db88
2 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/testsuite/ChangeLog
View File

@ -1,3 +1,8 @@
1999-04-24 Craig Burley <craig@jcb-sc.com>
* g77.f-torture/execute/u77-test.f (main): Bug involving
LSTAT has been fixed, so turn back on full checking.
1999-04-20 Craig Burley <craig@jcb-sc.com>
* g77.f-torture/compile/19990419-0.f: New test.

5
gcc/testsuite/g77.f-torture/execute/u77-test.f
View File

@ -233,10 +233,7 @@ C the better to test with, my dear! (-- burley)
end do
i = lstat ('foo', fstatb)
do i=1,13
c For some reason that I haven't investigated, some people see
c failures with the 7th element which doesn't seem to indicate a u77
c bug.
if (fstatb (i) .ne. statb (i) .and. i .ne. 7) then
if (fstatb (i) .ne. statb (i)) then
write (6,*) '*** LSTAT and STAT don''t agree on '//
+ 'array element ', i, ' value ', fstatb (i), statb (i)
call abort