RE: ParseLib.hs Monad.hs -- accumulate

[Sigbjorn Finne (Intl Vendor)]

[EMAIL PROTECTED] writes: 
> 
> I sent this a while ago, but got no response, so am trying a different
> address:
> 

I saw your earlier msg, so it got through ok..

I've attached the diffs of the changes I had to make
in order to get Fran to load up OK. The changes are
exactly those that Michael Abbott reported, but 
(hopefully) in a more machine processable form.

--Sigbjorn


begin 600 lib.diff
M*BHJ($UO;F%D+FAS"49R:2!-87(@,3(@,3$Z,C4Z,S$@,3DY.0T*+2TM($UO
M;F%D+FAS+6]R:6<)36]N($9E8B`R,B`P,CHR,CHP,"`Q.3DY#0HJ*BHJ*BHJ
M*BHJ*BHJ*BH-"BHJ*B`Q-2PQ.2`J*BHJ#0H@("`@("!-;VYA9"@H/CX]*2P@
M*#X^*2P@<F5T=7)N+"!F86EL*2P-"B`@("`@($9U;F-T;W(H9FUA<"DL#0HA
M("`@("!M87!-+"!M87!-7RP@<V5Q=65N8V4L('-E<75E;F-E7RP@*#T\/"DL
M#0H@("`@("`I('=H97)E#0H@(`T*+2TM(#$U+#$Y("TM+2T-"B`@("`@($UO
M;F%D*"@^/CTI+"`H/CXI+"!R971U<FXL(&9A:6PI+`T*("`@("`@1G5N8W1O
M<BAF;6%P*2P-"B$@("`@(&UA<$TL(&UA<$U?+"!A8V-U;75L871E+"!S97%U
M96YC92P@*#T\/"DL#0H@("`@("`I('=H97)E#0H@(`T**BHJ*BHJ*BHJ*BHJ
M*BHJ#0HJ*BH@-38L-C8@*BHJ*@T*("`-"B`@;6%P06YD56YZ:7!-("`@("`Z
M.B`H36]N860@;2D@/3X@*&$@+3X@;2`H8BQC*2D@+3X@6V%=("T^(&T@*%MB
M72P@6V-=*0T*(2!M87!!;F15;GII<$T@9B!X<R`]('-E<75E;F-E("AM87`@
M9B!X<RD@/CX](')E='5R;B`N('5N>FEP#0H@(`T*("!Z:7!7:71H32`@("`@
M("`@(#HZ("A-;VYA9"!M*2`]/B`H82`M/B!B("T^(&T@8RD@+3X@6V%=("T^
M(%MB72`M/B!M(%MC70T*(2!Z:7!7:71H32!F('AS('ES("`]('-E<75E;F-E
M("AZ:7!7:71H(&8@>',@>7,I#0H@(`T*("!Z:7!7:71H35\@("`@("`@(#HZ
M("A-;VYA9"!M*2`]/B`H82`M/B!B("T^(&T@8RD@+3X@6V%=("T^(%MB72`M
M/B!M("@I#0HA('II<%=I=&A-7R!F('AS('ES(#T@<V5Q=65N8V5?("AZ:7!7
M:71H(&8@>',@>7,I#0H@(`T*("!F;VQD32`@("`@("`@("`@(#HZ("A-;VYA
M9"!M*2`]/B`H82`M/B!B("T^(&T@82D@+3X@82`M/B!;8ET@+3X@;2!A#0HM
M+2T@-38L-C8@+2TM+0T*("`-"B`@;6%P06YD56YZ:7!-("`@("`Z.B`H36]N
M860@;2D@/3X@*&$@+3X@;2`H8BQC*2D@+3X@6V%=("T^(&T@*%MB72P@6V-=
M*0T*(2!M87!!;F15;GII<$T@9B!X<R`](&%C8W5M=6QA=&4@*&UA<"!F('AS
M*2`^/CT@<F5T=7)N("X@=6YZ:7`-"B`@#0H@('II<%=I=&A-("`@("`@("`@
M.CH@*$UO;F%D(&TI(#T^("AA("T^(&(@+3X@;2!C*2`M/B!;85T@+3X@6V)=
M("T^(&T@6V-=#0HA('II<%=I=&A-(&8@>',@>7,@(#T@86-C=6UU;&%T92`H
M>FEP5VET:"!F('AS('ES*0T*("`-"B`@>FEP5VET:$U?("`@("`@("`Z.B`H
M36]N860@;2D@/3X@*&$@+3X@8B`M/B!M(&,I("T^(%MA72`M/B!;8ET@+3X@
M;2`H*0T*(2!Z:7!7:71H35\@9B!X<R!Y<R`]('-E<75E;F-E("AZ:7!7:71H
M(&8@>',@>7,I#0H@(`T*("!F;VQD32`@("`@("`@("`@(#HZ("A-;VYA9"!M
M*2`]/B`H82`M/B!B("T^(&T@82D@+3X@82`M/B!;8ET@+3X@;2!A#0HJ*BH@
M97AT<R]#:&%N;F5L+FQH<PE&<FD@36%R(#$R(#$Q.C(R.C(W(#$Y.3D-"BTM
M+2!E>'1S+T-H86YN96PN;&AS+6]R:6<)36]N($9E8B`R,B`P,CHR,CHP,"`Q
M.3DY#0HJ*BHJ*BHJ*BHJ*BHJ*BH-"BHJ*B`Q-3@L,38R("HJ*BH-"B`@+2TM
M+2TM+2TM+2TM+0T*("!W<FET94QI<W0R0VAA;B`Z.B!#:&%N(&$@+3X@6V%=
M("T^($E/("@I#0HA('=R:71E3&ES=#)#:&%N(&-H(&QS(#T@<V5Q=65N8V5?
M("AM87`@*'=R:71E0VAA;B!C:"D@;',I#0H@(`T*("!<96YD>V-O9&5]#0HM
M+2T@,34X+#$V,B`M+2TM#0H@("TM+2TM+2TM+2TM+2T-"B`@=W)I=&5,:7-T
M,D-H86X@.CH@0VAA;B!A("T^(%MA72`M/B!)3R`H*0T*(2!W<FET94QI<W0R
M0VAA;B!C:"!L<R`]('-E<75E;F-E("AM87`@*'=R:71E0VAA;B!C:"D@;',I
4#0H@(`T*("!<96YD>V-O9&5]#0H=
`
end