Skip to content

R
riscv-gcc-1
Commit d4ecc377 by Zack Weinberg
Options

Fix typo in subroutine check 

From-SVN: r26384
parent 29bf433b
Showing with 2 additions and 2 deletions
gcc/testsuite/g77.f-torture/execute/19990325-0.f
......@@ -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
gcc/testsuite/g77.f-torture/execute/19990325-1.f
......@@ -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
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment