\begin{code}
-{-# OPTIONS_GHC -fno-implicit-prelude #-}
+{-# LANGUAGE NoImplicitPrelude, MagicHash, UnboxedTuples #-}
{-# OPTIONS_HADDOCK hide #-}
+
-----------------------------------------------------------------------------
-- |
-- Module : GHC.Pack
where
import GHC.Base
-import GHC.Err ( error )
import GHC.List ( length )
import GHC.ST
-import GHC.Num
import GHC.Ptr
data ByteArray ix = ByteArray ix ix ByteArray#