X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;ds=sidebyside;f=ghc%2Flib%2Fmisc%2FPackedString.lhs;h=d34cc98721677ff9da5ce0e636f6bdbbd4dd4085;hb=438596897ebbe25a07e1c82085cfbc5bdb00f09e;hp=f27d8b56d71a8e4826600bd8f31c00b2ff0c3459;hpb=967cc47f37cb93a5e2b6df7822c9a646f0428247;p=ghc-hetmet.git diff --git a/ghc/lib/misc/PackedString.lhs b/ghc/lib/misc/PackedString.lhs index f27d8b5..d34cc98 100644 --- a/ghc/lib/misc/PackedString.lhs +++ b/ghc/lib/misc/PackedString.lhs @@ -8,6 +8,8 @@ This sits on top of the sequencing/arrays world, notably @ByteArray#@s. Glorious hacking (all the hard work) by Bryan O'Sullivan. \begin{code} +{-# OPTIONS -#include "cbits/PackedString.h" #-} + module PackedString ( PackedString, -- abstract @@ -80,7 +82,6 @@ import PrelPack ) import Addr -import PrelArr ( StateAndMutableByteArray#(..) , StateAndByteArray#(..) ) import PrelST import ST import IOExts ( unsafePerformIO )