diff options
Diffstat (limited to 'testsuite/tests/codeGen/should_compile/cg006.hs')
| -rw-r--r-- | testsuite/tests/codeGen/should_compile/cg006.hs | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/testsuite/tests/codeGen/should_compile/cg006.hs b/testsuite/tests/codeGen/should_compile/cg006.hs new file mode 100644 index 0000000000..494b37937b --- /dev/null +++ b/testsuite/tests/codeGen/should_compile/cg006.hs @@ -0,0 +1,8 @@ +{-# LANGUAGE MagicHash #-} +module ShouldCompile where + +-- exposed a bug in the NCG in 6.4.2 +import GHC.Base +class Unboxable a where + writeUnboxable :: MutableByteArray# RealWorld -> a -> State# RealWorld -> State# RealWorld + writeUnboxable arr a s = writeInt8Array# arr 0# (getTag 0) s |