Commit 5aa9c750 authored by Simon Marlow's avatar Simon Marlow
Browse files

Fix the test with -O

Static string optimisation means we get a ForeignPtr with an IORef
inside it, leading to a different error.
parent c02aeb5c
...@@ -3,4 +3,4 @@ import Control.Exception ...@@ -3,4 +3,4 @@ import Control.Exception
import qualified Data.ByteString.Char8 as B import qualified Data.ByteString.Char8 as B
import Data.Compact import Data.Compact
main = compact (B.pack "abc") main = compact (B.pack ['a'..'c'])
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