diff options
-rw-r--r-- | test-suite/tests/fractions.test | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/test-suite/tests/fractions.test b/test-suite/tests/fractions.test index 28fd12aa4..21685b585 100644 --- a/test-suite/tests/fractions.test +++ b/test-suite/tests/fractions.test @@ -111,7 +111,7 @@ (testeqv (expt 2 1/2) (sqrt 2)) (testeqv (expt 1/2 2) 1/4) (testeqv (expt 2.0 1/2) (sqrt 2)) - (testeqv (expt 1/2 2.0) 1/4) + (testeqv (expt 1/2 2) 1/4) (testeqv (real-part 3/4) 3/4) (testeqv (imag-part 3/4) 0) (testeqv (numerator 3/4) 3) |