X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=GHC%2FPack.lhs;h=14ac670773367b75e1c408a86f8a969752962526;hb=HEAD;hp=4867e0c420549cc97ae50983ff02d07ce694a6be;hpb=fc6c3c6e5a508b74bed8559c2e4ff6bf74b9ae92;p=ghc-base.git diff --git a/GHC/Pack.lhs b/GHC/Pack.lhs index 4867e0c..14ac670 100644 --- a/GHC/Pack.lhs +++ b/GHC/Pack.lhs @@ -1,6 +1,7 @@ \begin{code} -{-# OPTIONS_GHC -fno-implicit-prelude #-} +{-# LANGUAGE NoImplicitPrelude, MagicHash, UnboxedTuples #-} {-# OPTIONS_HADDOCK hide #-} + ----------------------------------------------------------------------------- -- | -- Module : GHC.Pack @@ -35,10 +36,8 @@ 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#