git
/
gcc
mirror of git://gcc.gnu.org/git/gcc.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

Fix typo in subroutine check 

From-SVN: r26384
This commit is contained in:
Zack Weinberg 1999-04-12 18:49:47 +00:00
parent 29bf433b85
commit d4ecc3778c
2 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
gcc/testsuite/g77.f-torture/execute/19990325-0.f
View File

@ -308,6 +308,6 @@
complex expect, got
if (aimag(expect) .ne. aimag(got)) call abort
if (real(expect) .ne. real(expect)) call abort
if (real(expect) .ne. real(got)) call abort
end

2
gcc/testsuite/g77.f-torture/execute/19990325-1.f
View File

@ -308,6 +308,6 @@
double complex expect, got
if (dimag(expect) .ne. dimag(got)) call abort
if (dble(expect) .ne. dble(expect)) call abort
if (dble(expect) .ne. dble(got)) call abort
end