diff options
| -rw-r--r-- | ghc/tests/codeGen/should_run/cg026.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/ghc/tests/codeGen/should_run/cg026.hs b/ghc/tests/codeGen/should_run/cg026.hs index ff9d19effd..c3edfa4074 100644 --- a/ghc/tests/codeGen/should_run/cg026.hs +++ b/ghc/tests/codeGen/should_run/cg026.hs @@ -55,7 +55,7 @@ test_ints fill_in arr# 0# (size# -# 1#) >> -- freeze the puppy: - freezeIntArray arr# + freezeByteArray arr# ) fill_in :: MutableByteArray s Int -> Int# -> Int# -> ST s () @@ -92,7 +92,7 @@ test_addrs fill_in arr# 0# (size# -# 1#) >> -- freeze the puppy: - freezeAddrArray arr# + freezeByteArray arr# ) fill_in :: MutableByteArray s Int -> Int# -> Int# -> ST s () @@ -133,7 +133,7 @@ test_floats fill_in arr# 0# (size# -# 1#) >> -- freeze the puppy: - freezeFloatArray arr# + freezeByteArray arr# ) fill_in :: MutableByteArray s Int -> Int# -> Int# -> ST s () @@ -174,7 +174,7 @@ test_doubles fill_in arr# 0# (size# -# 1#) >> -- freeze the puppy: - freezeDoubleArray arr# + freezeByteArray arr# ) fill_in :: MutableByteArray s Int -> Int# -> Int# -> ST s () |