> I've tried everything but I can't compile HaskellDirect on
> Sparc-Solaris.
> The problem arises when I try to compile the src/CodeGen.lhs file.
> I get the following message. This is with GHC downloaded and
> compiled from
> the CVS repository yesterday and HaskellDirect downloaded and
> compiled today.
>
>
> ../../ghc/driver/ghc -fglasgow-exts -Rghc-timing -H16m -W
> -recomp -H30m -c CodeGen.lhs -o CodeGen.o -osuf o
> ghc: ignoring heap-size-setting option (-H16m)...not the largest seen
>
> TcMatches.lhs:274: Non-exhaustive patterns in function tcStmts
Thanks to everyone who reported this one. I've fixed it in today's sources;
for those who want to get going straight away, there's a one-space (!) fix
to CodeGen.lhs, attached.
For the curious, there are actually two bugs here. One: a syntax error in
CodeGen.lhs with respect to the new Haskell 98 layout rules, and Two: a bug
in GHC's new parser that let 'do' expressions with an empty statement
sequence through.
Cheers,
Simon
begin 600 hdirect.patch
M26YD97@Z($-O9&5'96XN;&AS"CT]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]
M/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T]/3T*4D-3
M(&9I;&4Z("]H;VUE+V-V<R]R;V]T+V9P=&]O;',O:&1I<F5C="]S<F,O0V]D
M94=E;BYL:',L=@IR971R:65V:6YG(')E=FES:6]N(#$N.#@*9&EF9B`M8R`M
M8R`M<C$N.#@@0V]D94=E;BYL:',**BHJ($-O9&5'96XN;&AS"3$Y.3DO,#4O
M,3,@,38Z,C8Z,C,),2XX.`HM+2T@0V]D94=E;BYL:',),3DY.2\P-B\R-2`Q
M-#HS.3HU-`HJ*BHJ*BHJ*BHJ*BHJ*BH**BHJ(#(S."PR-#0@*BHJ*@H@("`@
M("`@9F]R0VQI96YT(#PM(&=E=$-L:65N=$9L86<*("`@("`@(&QE="!I<U]S
M;W5R8V4@/2!H87-3;W5R8V5!='1R:6)U=&4@*&ED071T<FEB=71E<R!I*0H@
M("`@("`@<V5T4V]U<F-E269A8V5&;&%G(&ES7W-O=7)C92`D(&1O"B$@("`@
M("!I9B`H:7-?<V]U<F-E("8F(&9O<D-L:65N="D@?'P@*&YO="!F;W)#;&EE
M;G0@)B8@;F]T(&ES7W-O=7)C92D@=&AE;@H@("`@("`@("`@;6%R<VAA;&Q3
M97)V(&D@:6YH97)I="!D96-L<PH@("`@("`@(&5L<V4*("`@("`@("`@(&-G
M26YT97)F86-E(&D@:6YH97)I="!D96-L<PHM+2T@,C,X+#(T-"`M+2TM"B`@
M("`@("!F;W)#;&EE;G0@/"T@9V5T0VQI96YT1FQA9PH@("`@("`@;&5T(&ES
M7W-O=7)C92`](&AA<U-O=7)C94%T=')I8G5T92`H:61!='1R:6)U=&5S(&DI
M"B`@("`@("!S9713;W5R8V5)9F%C949L86<@:7-?<V]U<F-E("0@9&\*(2`@
M("`@("!I9B`H:7-?<V]U<F-E("8F(&9O<D-L:65N="D@?'P@*&YO="!F;W)#
M;&EE;G0@)B8@;F]T(&ES7W-O=7)C92D@=&AE;@H@("`@("`@("`@;6%R<VAA
M;&Q397)V(&D@:6YH97)I="!D96-L<PH@("`@("`@(&5L<V4*("`@("`@("`@
=(&-G26YT97)F86-E(&D@:6YH97)I="!D96-L<PH=
`
end
