<br><font size=2 face="Courier New">trying to compile regex-tdfa, I ran
into another issue. (earlier I had a cabal problem but that's resolved.)</font>
<br>
<br><font size=2 face="Courier New">there's a line that won't compile,
neither for ghc 6.6.1 nor 6.7 </font>
<br>
<br><font size=2 face="Courier New">import GHC.Prim(MutableByteArray#,RealWorld,Int#,sizeofMutableByteArray#,unsafeCoerce#)</font>
<br>
<br><font size=2 face="Courier New">so the fresh darcs regex tdfa package
won't build.</font>
<br>
<br><font size=2 face="Courier New">This line (line 16 below) causes this
error for </font>
<br>
<br><font size=2 face="Courier New"> ghc -e '' RunMutState.hs</font>
<br>
<br><font size=2 face="Courier New">for both ghc 6.1 and 6.7 </font>
<br>
<br><font size=2 face="Courier New">Much obliged for any help,</font>
<br>
<br><font size=2 face="Courier New">Thomas.</font>
<br>
<br><font size=2 face="Courier New">*********************************</font>
<br>
<br><font size=2 face="Courier New">hartthoma@linuxpt:~/installs/regex_darcs/regex-tdfa>runghc
Setup.hs build</font>
<br><font size=2 face="Courier New">Preprocessing library regex-tdfa-0.93...</font>
<br><font size=2 face="Courier New">Building regex-tdfa-0.93...</font>
<br>
<br><font size=2 face="Courier New">Text/Regex/TDFA/RunMutState.hs:16:32:
parse error on input `#'</font>
<br><font size=2 face="Courier New">hartthoma@linuxpt:~/installs/regex_darcs/regex-tdfa>head
-n20 Text/Regex/TDFA/RunMutState.hs | cat -n </font>
<br><font size=2 face="Courier New"> 1
{-# LANGUAGE CPP #-}</font>
<br><font size=2 face="Courier New"> 2
module Text.Regex.TDFA.RunMutState(TagEngine(..),newTagEngine,newTagEngine2</font>
<br><font size=2 face="Courier New"> 3
,newScratch,tagsToGroupsST</font>
<br><font size=2 face="Courier New"> 4
,toInstructions,compareWith,resetScratch</font>
<br><font size=2 face="Courier New"> 5
,SScratch(..),MScratch,WScratch)
where</font>
<br><font size=2 face="Courier New"> 6
</font>
<br><font size=2 face="Courier New"> 7
import Control.Monad(forM_,liftM,liftM2,liftM3,foldM)</font>
<br><font size=2 face="Courier New"> 8
--import Control.Monad.ST.Strict as S (ST)</font>
<br><font size=2 face="Courier New"> 9
--import qualified Control.Monad.ST.Lazy as L (ST)</font>
<br><font size=2 face="Courier New"> 10
import Control.Monad.State(MonadState(..),execState)</font>
<br><font size=2 face="Courier New"> 11
</font>
<br><font size=2 face="Courier New"> 12
import Data.Array.Base(unsafeRead,unsafeWrite,STUArray(..))</font>
<br><font size=2 face="Courier New"> 13
#ifdef __GLASGOW_HASKELL__</font>
<br><font size=2 face="Courier New"> 14
import GHC.Arr(STArray(..))</font>
<br><font size=2 face="Courier New"> 15
import GHC.ST(ST(..))</font>
<br><font size=2 face="Courier New">*** 16 import
GHC.Prim(MutableByteArray#,RealWorld,Int#,sizeofMutableByteArray#,unsafeCoerce#)</font>
<br><font size=2 face="Courier New"> 17
#else</font>
<br><font size=2 face="Courier New"> 18
import Control.Monad(when)</font>
<br><font size=2 face="Courier New"> 19
import Control.Monad.ST(ST)</font>
<br><font size=2 face="Courier New"> 20
import Data.Array.ST(STArray)</font>
<br><font size=2 face="Courier New">hartthoma@linuxpt:~/installs/regex_darcs/regex-tdfa></font>
<br>
<br>
<br>
<span style="font-family:sans-serif,helvetica; font-size:10pt; color:#000000">---</span><br>
<br>
<span style="font-family:sans-serif,helvetica; font-size:10pt; color:#000000">This e-mail may contain confidential and/or privileged information. If you </span><br>
<span style="font-family:sans-serif,helvetica; font-size:10pt; color:#000000">are not the intended recipient (or have received this e-mail in error) </span><br>
<span style="font-family:sans-serif,helvetica; font-size:10pt; color:#000000">please notify the sender immediately and destroy this e-mail. Any </span><br>
<span style="font-family:sans-serif,helvetica; font-size:10pt; color:#000000">unauthorized copying, disclosure or distribution of the material in this </span><br>
<span style="font-family:sans-serif,helvetica; font-size:10pt; color:#000000">e-mail is strictly forbidden.</span><br>