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