Hi!
I do some bulletproofing for my Haskell - ODBC bridge now.
Besides I wish to test is with ghc and Linux. I used Hugs 1.4 on Win95 when
developed my lib.
I've got Linux 4.2, gcc 2.7.2, ghc 2.10 and gc-v2-250698.
I couldn't compile Green-Card, because of some complaints to malloc
signature.
Could you help me with this problem, please.
One more problem, could you please correct my name on Green-Card homepage,
it had been misspelled.
BTW, is there any easy way to control how ghc calls gcc?
While playing with ghc on Win32 box I couldn't compile attached file
hasqltp.hs with MS ODBC SDK headers.
All this stuff works pretty good with Win32 and Hugs, thus I hope it would
be easy for you to point me
what command options or makefile settings should I use to fix those
problems.
Best regards,
Dima Skvortsov
<<HASQLTP.HS>> <<HASQLTP.GC>>
begin 600 HASQLTP.HS
M>RTC($]05$E/3E,@+2-I;F-L=61E("`\<W%L+F@^(",M?0T*>RTC($]05$E/
M3E,@+2-I;F-L=61E("`\<W%L97AT+F@^(",M?0T*;6]D=6QE($AA4U%,='`H
M#0H)2$5.5BP-"@E(1$)#+`T*"4A35$U4+`T*"5-Q;$5R<F]R<RP-"B`)<W%L
M4W5C8V5S<RP@<W%L4W5C8V5S<U=I=&A);F9O+"!S<6Q%<G)O<BP@<W%L3F5E
M9$1A=&$L#0H)<W%L4W1I;&Q%>&5C=71I;F<L('-Q;$YO1&%T82P@<W%L26YV
M86QI9$AA;F1L92P-"@E3<6Q#5'EP92P-"@ES<6Q#0FEN87)Y+"!S<6Q#0FET
M+"!S<6Q#0F]O:VUA<FLL('-Q;$-#:&%R+"!S<6Q#1&%T92P@<W%L0T1E9F%U
M;'0L#0H)<W%L0T1O=6)L92P@<W%L0T9L;V%T+"!S<6Q#4TQO;F<L('-Q;$-3
M4VAO<G0L('-Q;$-35&EN>4EN="P@<W%L0U1I;64L#0H)<W%L0U1I;653=&%M
M<"P@<W%L0U5,;VYG+"!S<6Q#55-H;W)T+"!S<6Q#551I;GE);G0L#0H)4W%L
M5'EP92P-"@ES<6Q":6=);G0L('-Q;$)I;F%R>2P@<W%L0FET+"!S<6Q#:&%R
M+"!S<6Q$871E+"!S<6Q$96-I;6%L+"!S<6Q$;W5B;&4L#0H)<W%L1FQO870L
M('-Q;$EN=&5G97(L('-Q;$QO;F=687)":6YA<GDL('-Q;$QO;F=687)#:&%R
M+"!S<6Q.=6UE<FEC+"!S<6Q296%L+`T*"7-Q;%-M86QL26YT+"!S<6Q4:6UE
M+"!S<6Q4:6UE4W1A;7`L('-Q;%1I;GE);G0L('-Q;%9A<D)I;F%R>2P@<W%L
M5F%R0VAA<BP-"@E3<6Q087)A;51Y<&4L#0H)<W%L4&%R86U);G!U="P@<W%L
M4&%R86U/=71P=70L('-Q;%!A<F%M26YP=71/=71P=70-"BD@=VAE<F4-"@T*
M:6UP;W)T(%-T9$1)4PT*:6UP;W)T(%=O<F0H(%=O<F0S,B`I#0H-"G1Y<&4@
M2$5.5B`](%=O<F0S,@T*='EP92!(1$)#(#T@5V]R9#,R#0IT>7!E($A35$U4
M(#T@5V]R9#,R#0IT>7!E(%-Q;$5R<F]R<R`]($EN=`T*='EP92!3<6Q#5'EP
M92`]($EN=`T*='EP92!3<6Q4>7!E(#T@26YT#0IT>7!E(%-Q;%!A<F%M5'EP
M92`]($EN=`T*#0H-"@T*<W%L4W5C8V5S<R`Z.B!3<6Q%<G)O<G,-"G-Q;%-U
M8V-E<W,@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@
M>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7U-50T-%4U,[#0H)"2`@("`@
M#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H
M,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q
M*2DI#0IS<6Q3=6-C97-S5VET:$EN9F\@.CH@4W%L17)R;W)S#0IS<6Q3=6-C
M97-S5VET:$EN9F\@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?
M(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7U-50T-%4U-?5TE4
M2%])3D9/.PT*"0D@("`@(`T*"0D@("`@("5R(#T@*&EN="DH<F5S,2D[?2!W
M:&EL92@P*3M]('=H:6QE*#`I.R<G#0H@("`@/CX](%P@(')E<S$@("T^#0H@
M("`@*')E='5R;B`H<F5S,2DI*0T*<W%L17)R;W(@.CH@4W%L17)R;W)S#0IS
M<6Q%<G)O<B`]#0H@('5N<V%F95!E<F9O<FU)3R@-"B`@("!?8V%S;5\@8&!D
M;R![:6YT(')E<S$[#0H)"2!D;R![<F5S,3U344Q?15)23U([#0H)"2`@("`@
M#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H
M,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q
M*2DI#0IS<6Q.965D1&%T82`Z.B!3<6Q%<G)O<G,-"G-Q;$YE961$871A(#T-
M"B`@=6YS869E4&5R9F]R;4E/*`T*("`@(%]C87-M7R!@8&1O('MI;G0@<F5S
M,3L-"@D)(&1O('MR97,Q/5-13%].145$7T1!5$$[#0H)"2`@("`@#0H)"2`@
M("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-
M"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS
M<6Q3=&EL;$5X96-U=&EN9R`Z.B!3<6Q%<G)O<G,-"G-Q;%-T:6QL17AE8W5T
M:6YG(#T-"B`@=6YS869E4&5R9F]R;4E/*`T*("`@(%]C87-M7R!@8&1O('MI
M;G0@<F5S,3L-"@D)(&1O('MR97,Q/5-13%]35$E,3%]%6$5#551)3D<[#0H)
M"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@
M=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N
M("AR97,Q*2DI#0IS<6Q.;T1A=&[email protected]@4W%L17)R;W)S#0IS<6Q.;T1A=&$@
M/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R
M97,Q.PT*"0D@9&\@>W)E<S$]4U%,7TY/7T1!5$$[#0H)"2`@("`@#0H)"2`@
M("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-
M"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS
M<6Q);G9A;&ED2&%N9&QE(#HZ(%-Q;$5R<F]R<PT*<W%L26YV86QI9$AA;F1L
M92`]#0H@('5N<V%F95!E<F9O<FU)3R@-"B`@("!?8V%S;5\@8&!D;R"2`@
M("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI
M;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR
M97,Q*2DI#0H-"G-Q;$-":6YA<[email protected]@4W%L0U1Y<&4-"G-Q;$-":6YA<GD@
M/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R
M97,Q.PT*"0D@9&\@>W)E<S$]4U%,7T-?0DE.05)9.PT*"0D@("`@(`T*"0D@
M("`@("5R(#T@*&EN="DH<F5S,2D[?2!W:&EL92@P*3M]('=H:6QE*#`I.R<G
M#0H@("`@/CX](%P@(')E<S$@("T^#0H@("`@*')E='5R;B`H<F5S,2DI*0T*
M<W%L0T)I="`Z.B!3<6Q#5'EP90T*<W%L0T)I="`]#0H@('5N<V%F95!E<F9O
M<FU)3R@-"B`@("!?8V%S;5\@8&!D;R![:6YT(')E<S$[#0H)"2!D;R![<F5S
M,3U344Q?0U]"250[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q
M*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@
M+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q#0F]O:VUA<[email protected]@4W%L
M0U1Y<&4-"G-Q;$-";V]K;6%R:R`]#0H@('5N<V%F95!E<F9O<FU)3R@-"B`@
M("!?8V%S;5\@8&!D;R![:6YT(')E<S$[#0H)"2!D;R![<F5S,3U344Q?0U]"
M3T]+34%22SL-"@D)("`@("`-"@D)("`@("`E<B`]("AI;G0I*')E<S$I.WT@
M=VAI;&4H,"D[?2!W:&EL92@P*3LG)PT*("`@(#X^/2!<("!R97,Q("`M/@T*
M("`@("AR971U<FX@*')E<S$I*2D-"G-Q;$-#:&%R(#HZ(%-Q;$-4>7!E#0IS
M<6Q#0VAA<B`]#0H@('5N<V%F95!E<F9O<FU)3R@-"B`@("!?8V%S;5\@8&!D
M;R![:6YT(')E<S$[#0H)"2!D;R![<F5S,3U344Q?0U]#2$%2.PT*"0D@("`@
M(`T*"0D@("`@("5R(#T@*&EN="DH<F5S,2D[?2!W:&EL92@P*3M]('=H:6QE
M*#`I.R<G#0H@("`@/CX](%P@(')E<S$@("T^#0H@("`@*')E='5R;B`H<F5S
M,2DI*0T*<W%L0T1A=&[email protected]@4W%L0U1Y<&4-"G-Q;$-$871E(#T-"B`@=6YS
M869E4&5R9F]R;4E/*`T*("`@(%]C87-M7R!@8&1O('MI;G0@<F5S,3L-"@D)
M(&1O('MR97,Q/5-13%]#7T1!5$4[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H
M:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@
M7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q#1&5F875L
M="`Z.B!3<6Q#5'EP90T*<W%L0T1E9F%U;'0@/0T*("!U;G-A9F5097)F;W)M
M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]
M4U%,7T-?1$5&055,5#L-"@D)("`@("`-"@D)("`@("`E<B`]("AI;G0I*')E
M<S$I.WT@=VAI;&4H,"D[?2!W:&EL92@P*3LG)PT*("`@(#X^/2!<("!R97,Q
M("`M/@T*("`@("AR971U<FX@*')E<S$I*2D-"G-Q;$-$;W5B;&[email protected]@4W%L
M0U1Y<&4-"G-Q;$-$;W5B;&4@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@
M7V-A<VU?(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7T-?1$]5
M0DQ%.PT*"0D@("`@(`T*"0D@("`@("5R(#T@*&EN="DH<F5S,2D[?2!W:&EL
M92@P*3M]('=H:6QE*#`I.R<G#0H@("`@/CX](%P@(')E<S$@("T^#0H@("`@
M*')E='5R;B`H<F5S,2DI*0T*<W%L0T9L;V%T(#HZ(%-Q;$-4>7!E#0IS<6Q#
M1FQO870@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@
M>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7T-?1DQ/050[#0H)"2`@("`@
M#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H
M,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q
M*2DI#0IS<6Q#4TQO;F<@.CH@4W%L0U1Y<&4-"G-Q;$-33&]N9R`]#0H@('5N
M<V%F95!E<F9O<FU)3R@-"B`@("!?8V%S;5\@8&!D;R![:6YT(')E<S$[#0H)
M"2!D;R![<F5S,3U344Q?0U]33$].1SL-"@D)("`@("`-"@D)("`@("`E<B`]
M("AI;G0I*')E<S$I.WT@=VAI;&4H,"D[?2!W:&EL92@P*3LG)PT*("`@(#X^
M/2!<("!R97,Q("`M/@T*("`@("AR971U<FX@*')E<S$I*2D-"G-Q;$-34VAO
M<[email protected]@4W%L0U1Y<&4-"G-Q;$-34VAO<G0@/0T*("!U;G-A9F5097)F;W)M
M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]
M4U%,7T-?4U-(3U)4.PT*"0D@("`@(`T*"0D@("`@("5R(#T@*&EN="DH<F5S
M,2D[?2!W:&EL92@P*3M]('=H:6QE*#`I.R<G#0H@("`@/CX](%P@(')E<S$@
M("T^#0H@("`@*')E='5R;B`H<F5S,2DI*0T*<W%L0U-4:6YY26YT(#HZ(%-Q
M;$-4>7!E#0IS<6Q#4U1I;GE);G0@/0T*("!U;G-A9F5097)F;W)M24\H#0H@
M("`@7V-A<VU?(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7T-?
M4U1)3EE)3E0[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]
M('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-
M"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q#5&EM92`Z.B!3<6Q#5'EP90T*
M<W%L0U1I;64@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@
M9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7T-?5$E-13L-"@D)("`@
M("`-"@D)("`@("`E<B`]("AI;G0I*')E<S$I.WT@=VAI;&4H,"D[?2!W:&EL
M92@P*3LG)PT*("`@(#X^/2!<("!R97,Q("`M/@T*("`@("AR971U<FX@*')E
M<S$I*2D-"G-Q;$-4:6UE4W1A;7`@.CH@4W%L0U1Y<&4-"G-Q;$-4:6UE4W1A
M;7`@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN
M="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7T-?5$E-15-404U0.PT*"0D@("`@
M(`T*"0D@("`@("5R(#T@*&EN="DH<F5S,2D[?2!W:&EL92@P*3M]('=H:6QE
M*#`I.R<G#0H@("`@/CX](%P@(')E<S$@("T^#0H@("`@*')E='5R;B`H<F5S
M,2DI*0T*<W%L0U5,;VYG(#HZ(%-Q;$-4>7!E#0IS<6Q#54QO;F<@/0T*("!U
M;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R97,Q.PT*
M"0D@9&\@>W)E<S$]4U%,7T-?54Q/3D<[#0H)"2`@("`@#0H)"2`@("`@)7(@
M/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^
M/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q#55-H
M;W)T(#HZ(%-Q;$-4>7!E#0IS<6Q#55-H;W)T(#T-"B`@=6YS869E4&5R9F]R
M;4E/*`T*("`@(%]C87-M7R!@8&1O('MI;G0@<F5S,3L-"@D)(&1O('MR97,Q
M/5-13%]#7U532$]25#L-"@D)("`@("`-"@D)("`@("`E<B`]("AI;G0I*')E
M<S$I.WT@=VAI;&4H,"D[?2!W:&EL92@P*3LG)PT*("`@(#X^/2!<("!R97,Q
M("`M/@T*("`@("AR971U<FX@*')E<S$I*2D-"G-Q;$-55&EN>4EN="`Z.B!3
M<6Q#5'EP90T*<W%L0U54:6YY26YT(#T-"B`@=6YS869E4&5R9F]R;4E/*`T*
M("`@(%]C87-M7R!@8&1O('MI;G0@<F5S,3L-"@D)(&1O('MR97,Q/5-13%]#
M7U5424Y924Y4.PT*"0D@("`@(`T*"0D@("`@("5R(#T@*&EN="DH<F5S,2D[
M?2!W:&EL92@P*3M]('=H:6QE*#`I.R<G#0H@("`@/CX](%P@(')E<S$@("T^
M#0H@("`@*')E='5R;B`H<F5S,2DI*0T*#0IS<6Q":6=);[email protected]@4W%L5'EP
M90T*<W%L0FEG26YT(#T-"B`@=6YS869E4&5R9F]R;4E/*`T*("`@(%]C87-M
M7R!@8&1O('MI;G0@<F5S,3L-"@D)(&1O('MR97,Q/5-13%]"24=)3E0[#0H)
M"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@
M=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N
M("AR97,Q*2DI#0IS<6Q":6YA<[email protected]@4W%L5'EP90T*<W%L0FEN87)Y(#T-
M"B`@=6YS869E4&5R9F]R;4E/*`T*("`@(%]C87-M7R!@8&1O('MI;G0@<F5S
M,3L-"@D)(&1O('MR97,Q/5-13%]"24Y!4ED[#0H)"2`@("`@#0H)"2`@("`@
M)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@
M("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q"
M:[email protected]@4W%L5'EP90T*<W%L0FET(#T-"B`@=6YS869E4&5R9F]R;4E/*`T*
M("`@(%]C87-M7R!@8&1O('MI;G0@<F5S,3L-"@D)(&1O('MR97,Q/5-13%]"
M250[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE
M*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H
M<F5T=7)N("AR97,Q*2DI#0IS<6Q#:&%R(#HZ(%-Q;%1Y<&4-"G-Q;$-H87(@
M/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R
M97,Q.PT*"0D@9&\@>W)E<S$]4U%,7T-(05([#0H)"2`@("`@#0H)"2`@("`@
M)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@
M("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q$
M871E(#HZ(%-Q;%1Y<&4-"G-Q;$1A=&4@/0T*("!U;G-A9F5097)F;W)M24\H
M#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,
M7T1!5$4[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H
M:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@
M("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q$96-I;6%L(#HZ(%-Q;%1Y<&4-"G-Q
M;$1E8VEM86P@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@
M9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7T1%0TE-04P[#0H)"2`@
M("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI
M;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR
M97,Q*2DI#0IS<6Q$;W5B;&[email protected]@4W%L5'EP90T*<W%L1&]U8FQE(#T-"B`@
M=6YS869E4&5R9F]R;4E/*`T*("`@(%]C87-M7R!@8&1O('MI;G0@<F5S,3L-
M"@D)(&1O('MR97,Q/5-13%]$3U5"3$4[#0H)"2`@("`@#0H)"2`@("`@)7(@
M/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^
M/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q&;&]A
M="`Z.B!3<6Q4>7!E#0IS<6Q&;&]A="`]#0H@('5N<V%F95!E<F9O<FU)3R@-
M"B`@("!?8V%S;5\@8&!D;R![:6YT(')E<S$[#0H)"2!D;R![<F5S,3U344Q?
M1DQ/050[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H
M:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@
M("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q);G1E9V5R(#HZ(%-Q;%1Y<&4-"G-Q
M;$EN=&5G97(@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@
M9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7TE.5$5'15([#0H)"2`@
M("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI
M;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR
M97,Q*2DI#0IS<6Q,;VYG5F%R0FEN87)Y(#HZ(%-Q;%1Y<&4-"G-Q;$QO;F=6
M87)":6YA<GD@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@
M9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7TQ/3D=605)"24Y!4ED[
M#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I
M.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T
M=7)N("AR97,Q*2DI#0IS<6Q,;VYG5F%R0VAA<B`Z.B!3<6Q4>7!E#0IS<6Q,
M;VYG5F%R0VAA<B`]#0H@('5N<V%F95!E<F9O<FU)3R@-"B`@("!?8V%S;5\@
M8&!D;R![:6YT(')E<S$[#0H)"2!D;R![<F5S,3U344Q?3$].1U9!4D-(05([
M#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I
M.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T
M=7)N("AR97,Q*2DI#0IS<6Q.=6UE<FEC(#HZ(%-Q;%1Y<&4-"G-Q;$YU;65R
M:6,@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN
M="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7TY5345224,[#0H)"2`@("`@#0H)
M"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[
M)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI
M#0IS<6Q296%L(#HZ(%-Q;%1Y<&4-"G-Q;%)E86P@/0T*("!U;G-A9F5097)F
M;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E
M<S$]4U%,7U)%04P[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q
M*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@
M+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q3;6%L;$EN="`Z.B!3<6Q4
M>7!E#0IS<6Q3;6%L;$EN="`]#0H@('5N<V%F95!E<F9O<FU)3R@-"B`@("!?
M8V%S;5\@8&!D;R![:6YT(')E<S$[#0H)"2!D;R![<F5S,3U344Q?4TU!3$Q)
M3E0[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE
M*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H
M<F5T=7)N("AR97,Q*2DI#0IS<6Q4:6UE(#HZ(%-Q;%1Y<&4-"G-Q;%1I;64@
M/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R
M97,Q.PT*"0D@9&\@>W)E<S$]4U%,7U1)344[#0H)"2`@("`@#0H)"2`@("`@
M)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@
M("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q4
M:6UE4W1A;7`@.CH@4W%L5'EP90T*<W%L5&EM95-T86UP(#T-"B`@=6YS869E
M4&5R9F]R;4E/*`T*("`@(%]C87-M7R!@8&1O('MI;G0@<F5S,3L-"@D)(&1O
M('MR97,Q/5-13%]424U%4U1!35`[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H
M:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@
M7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q4:6YY26YT
M(#HZ(%-Q;%1Y<&4-"G-Q;%1I;GE);G0@/0T*("!U;G-A9F5097)F;W)M24\H
M#0H@("`@7V-A<VU?(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,
M7U1)3EE)3E0[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]
M('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-
M"B`@("`H<F5T=7)N("AR97,Q*2DI#0IS<6Q687)":6YA<[email protected]@4W%L5'EP
M90T*<W%L5F%R0FEN87)Y(#T-"B`@=6YS869E4&5R9F]R;4E/*`T*("`@(%]C
M87-M7R!@8&1O('MI;G0@<F5S,3L-"@D)(&1O('MR97,Q/5-13%]605)"24Y!
M4ED[#0H)"2`@("`@#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE
M*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H
M<F5T=7)N("AR97,Q*2DI#0IS<6Q687)#:&%R(#HZ(%-Q;%1Y<&4-"G-Q;%9A
M<D-H87(@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?(&!@9&\@
M>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7U9!4D-(05([#0H)"2`@("`@
M#0H)"2`@("`@)7(@/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H
M,"D[)R<-"B`@("`^/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q
M*2DI#0H-"G-Q;%!A<F%[email protected]@4W%L4&%R86U4>7!E#0IS<6Q087)A
M;4EN<'5T(#T-"B`@=6YS869E4&5R9F]R;4E/*`T*("`@(%]C87-M7R!@8&1O
M('MI;G0@<F5S,3L-"@D)(&1O('MR97,Q/5-13%]005)!35])3E!55#L-"@D)
M("`@("`-"@D)("`@("`E<B`]("AI;G0I*')E<S$I.WT@=VAI;&4H,"D[?2!W
M:&EL92@P*3LG)PT*("`@(#X^/2!<("!R97,Q("`M/@T*("`@("AR971U<FX@
M*')E<S$I*2D-"G-Q;%!A<F%M3W5T<'5T(#HZ(%-Q;%!A<F%M5'EP90T*<W%L
M4&%R86U/=71P=70@/0T*("!U;G-A9F5097)F;W)M24\H#0H@("`@7V-A<VU?
M(&!@9&\@>VEN="!R97,Q.PT*"0D@9&\@>W)E<S$]4U%,7U!!4D%-7T]55%!5
M5#L-"@D)("`@("`-"@D)("`@("`E<B`]("AI;G0I*')E<S$I.WT@=VAI;&4H
M,"D[?2!W:&EL92@P*3LG)PT*("`@(#X^/2!<("!R97,Q("`M/@T*("`@("AR
M971U<FX@*')E<S$I*2D-"G-Q;%!A<F%M26YP=71/[email protected]@4W%L4&%R
M86U4>7!E#0IS<6Q087)A;4EN<'5T3W5T<'5T(#T-"B`@=6YS869E4&5R9F]R
M;4E/*`T*("`@(%]C87-M7R!@8&1O('MI;G0@<F5S,3L-"@D)(&1O('MR97,Q
M/5-13%]005)!35])3E!55%]/5510550[#0H)"2`@("`@#0H)"2`@("`@)7(@
M/2`H:6YT*2AR97,Q*3M]('=H:6QE*#`I.WT@=VAI;&4H,"D[)R<-"B`@("`^
H/CT@7"`@<F5S,2`@+3X-"B`@("`H<F5T=7)N("AR97,Q*2DI#0H-"@==
`
end
begin 600 HASQLTP.GC
M;6]D=6QE($AA4U%,='`H#0H)2$5.5BP-"@E(1$)#+`T*"4A35$U4+`T*"5-Q
M;$5R<F]R<RP-"B`)<W%L4W5C8V5S<RP@<W%L4W5C8V5S<U=I=&A);F9O+"!S
M<6Q%<G)O<BP@<W%L3F5E9$1A=&$L#0H)<W%L4W1I;&Q%>&5C=71I;F<L('-Q
M;$YO1&%T82P@<W%L26YV86QI9$AA;F1L92P-"@E3<6Q#5'EP92P-"@ES<6Q#
M0FEN87)Y+"!S<6Q#0FET+"!S<6Q#0F]O:VUA<FLL('-Q;$-#:&%R+"!S<6Q#
M1&%T92P@<W%L0T1E9F%U;'0L#0H)<W%L0T1O=6)L92P@<W%L0T9L;V%T+"!S
M<6Q#4TQO;F<L('-Q;$-34VAO<G0L('-Q;$-35&EN>4EN="P@<W%L0U1I;64L
M#0H)<W%L0U1I;653=&%M<"P@<W%L0U5,;VYG+"!S<6Q#55-H;W)T+"!S<6Q#
M551I;GE);G0L#0H)4W%L5'EP92P-"@ES<6Q":6=);G0L('-Q;$)I;F%R>2P@
M<W%L0FET+"!S<6Q#:&%R+"!S<6Q$871E+"!S<6Q$96-I;6%L+"!S<6Q$;W5B
M;&4L#0H)<W%L1FQO870L('-Q;$EN=&5G97(L('-Q;$QO;F=687)":6YA<GDL
M('-Q;$QO;F=687)#:&%R+"!S<6Q.=6UE<FEC+"!S<6Q296%L+`T*"7-Q;%-M
M86QL26YT+"!S<6Q4:6UE+"!S<6Q4:6UE4W1A;7`L('-Q;%1I;GE);G0L('-Q
M;%9A<D)I;F%R>2P@<W%L5F%R0VAA<BP-"@E3<6Q087)A;51Y<&4L#0H)<W%L
M4&%R86U);G!U="P@<W%L4&%R86U/=71P=70L('-Q;%!A<F%M26YP=71/=71P
M=70-"BD@=VAE<F4-"@T*:6UP;W)T(%-T9$1)4PT*:6UP;W)T(%=O<F0H(%=O
M<F0S,B`I#0H-"G1Y<&4@2$5.5B`](%=O<F0S,@T*='EP92!(1$)#(#T@5V]R
M9#,R#0IT>7!E($A35$U4(#T@5V]R9#,R#0IT>7!E(%-Q;$5R<F]R<R`]($EN
M=`T*='EP92!3<6Q#5'EP92`]($EN=`T*='EP92!3<6Q4>7!E(#T@26YT#0IT
M>7!E(%-Q;%!A<F%M5'EP92`]($EN=`T*#0HE(VEN8VQU9&4@/'-Q;"YH/@T*
M)2-I;F-L=61E(#QS<6QE>'0N:#X-"@T*)61I<R!H14Y6(&5N=B`]("AW;W)D
M,S(@96YV*0T*)61I<R!H1$)#(&1B8R`]("AW;W)D,S(@9&)C*0T*)61I<R!H
M4U1-5"!S=&UT(#T@*'=O<F0S,B!S=&UT*0T*)61I<R!S<6Q%<G)O<G,@97)R
M(#T@*&EN="!E<G(I#0HE9&ES('-Q;$-4>7!E(&-O;G9E<G-I;VX@/2`H:6YT
M(&-O;G9E<G-I;VXI#0HE9&ES('-Q;%1Y<&4@<W%L7W1Y<&4@/2`H:6YT('-Q
M;%]T>7!E*0T*)61I<R!S<6Q087)A;51Y<&4@<&%R86U?='EP92`]("AI;G0@
M<&%R86U?='EP92D-"@T*)6-O;G-T(%-Q;$5R<F]R<R!;#0HE"7-Q;%-U8V-E
M<W,@/2![4U%,7U-50T-%4U-]+`T*)0ES<6Q3=6-C97-S5VET:$EN9F\@/2![
M4U%,7U-50T-%4U-?5TE42%])3D9/?2P-"B4)<W%L17)R;W(@/2![4U%,7T52
M4D]2?2P-"B4)<W%L3F5E9$1A=&$@/2![4U%,7TY%141?1$%407TL#0HE"7-Q
M;%-T:6QL17AE8W5T:6YG(#T@>U-13%]35$E,3%]%6$5#551)3D=]+`T*)0ES
M<6Q.;T1A=&$@/2![4U%,7TY/7T1!5$%]+`T*)0ES<6Q);G9A;&ED2&%N9&QE
M(#T@>U-13%])3E9!3$E$7TA!3D1,17T-"B4)70T*#0HE8V]N<W0@4W%L0U1Y
M<&4@6PT*)0ES<6Q#0FEN87)Y"3T@>U-13%]#7T))3D%267TL#0HE"7-Q;$-"
M:70)"3T@>U-13%]#7T))5'TL#0HE"7-Q;$-";V]K;6%R:ST@>U-13%]#7T)/
M3TM-05)+?2P-"B4)<W%L0T-H87()/2![4U%,7T-?0TA!4GTL#0HE"7-Q;$-$
M871E"3T@>U-13%]#7T1!5$5]+`T*)0ES<6Q#1&5F875L="`]('M344Q?0U]$
M149!54Q4?2P-"B4)<W%L0T1O=6)L90D]('M344Q?0U]$3U5"3$5]+`T*)0ES
M<6Q#1FQO870)/2![4U%,7T-?1DQ/051]+`T*)0ES<6Q#4TQO;F<)/2![4U%,
M7T-?4TQ/3D=]+`T*)0ES<6Q#4U-H;W)T"3T@>U-13%]#7U-32$]25'TL#0HE
M"7-Q;$-35&EN>4EN=#T@>U-13%]#7U-424Y924Y4?2P-"B4)<W%L0U1I;64)
M/2![4U%,7T-?5$E-17TL#0HE"7-Q;$-4:6UE4W1A;7`]>U-13%]#7U1)3453
M5$%-4'TL#0HE"7-Q;$-53&]N9PD]('M344Q?0U]53$].1WTL#0HE"7-Q;$-5
M4VAO<G0)/2![4U%,7T-?55-(3U)4?2P-"B4)<W%L0U54:6YY26YT/2![4U%,
M7T-?551)3EE)3E1]#0HE"5T-"@T*)6-O;G-T(%-Q;%1Y<&4@6PT*)0ES<6Q"
M:6=);G0)/29?2P-"B4)<W%L0FET"0D]('M344Q?0DE4?2P-"B4)<W%L0VAA<@D)/2![
M4U%,7T-(05)]+`T*)0ES<6Q$871E"0D]('M344Q?1$%417TL#0HE"7-Q;$1E
M8VEM86P)/2![4U%,7T1%0TE-04Q]+`T*)0ES<6Q$;W5B;&4)/2![4U%,7T1/
M54),17TL#0HE"7-Q;$9L;V%T"3T@>U-13%]&3$]!5'TL#0HE"7-Q;$EN=&5G
M97()/2![4U%,7TE.5$5'15)]+`T*)0ES<6Q,;VYG5F%R0FEN87)Y(#T@>U-1
M3%],3TY'5D%20DE.05)9?2P-"B4)<W%L3&]N9U9A<D-H87(@/2)0WTL#0HE
M"7-Q;%)E86P)"3T@>U-13%]214%,?2P-"B4)<W%L4VUA;&Q);G0)/2![4U%,
M7U--04Q,24Y4?2P-"B4)<W%L5&EM90D)/2![4U%,7U1)345]+`T*)0ES<6Q4
M:6UE4W1A;7`@/2![4U%,7U1)34535$%-4'TL#0HE"7-Q;%1I;GE);G0)/2![
M4U%,7U1)3EE)3E1]+`T*)0ES<6Q687)":6YA<GD@/2![4U%,7U9!4D))3D%2
M67TL#0HE"7-Q;%9A<D-H87()/2![4U%,7U9!4D-(05)]#0HE"5T-"@T*)6-O
M;G-T(%-Q;%!A<F%M5'EP92!;#0HE"7-Q;%!A<F%M26YP=70)/2![4U%,7U!!
M4D%-7TE.4%54?2P-"B4)<W%L4&%R86U/=71P=70)/2![4U%,7U!!4D%-7T]5
M5%!55'TL#0HE"7-Q;%!A<F%M26YP=71/=71P=70@/2![4U%,7U!!4D%-7TE.
44%547T]55%!55'T-"B4)70T*#0H=
`
end
