🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: comp.sys.atari.st
Article #26893

Shareware C Compiler (part six)

#26893
From: Joe Portman
Date: Mon, 18 May 1987 21:11
153 lines
9993 bytes
begin part f
MX 9:\72R1IH@4 1/8 2\QV[)58)^Y0.EF16*=CN2R6>1YE1+I0*2"8]RI1 S
M(P=@<G)Y*4.ML9>!.7W&!YCEQ$!F@B8=1U0"H0![:9@483Y%,1HF00=#]8'[
M])?GPY'>&5T-*7)!8YD@H 89*)",<19+,S9H031O=XTH ")'0(V5EG*&>7=P
MQDKU 5@R4#3CZ1'G4S0"Z@:)!E;UB ('RIV)]E1P0%8B\ .A<7>:R6D5&'/G
M"9ZYQE9)]'BB6$"J%VD?N@6JEYL#\*#3%T*(MP+CZ'9R!2: A9QR):)NU9F!
M-5BBR9JFB2TOR!'T*5C"^7QZQ5<D-J3?16,[]F$#4(*>)QDMT )$-@!2!E\Y
MYBM+!J52>FZ6*!E\=J59FES?52S'DBQ=*CQ?V@-S%AEERJ95>E_@P01K6AYM
M"EAA&J?EX09SRF-PI@:1=G+M":9%HP8-^F$$\*($M 5J0':,6D"(BE97ND'U
M.:919F3>M5QQ,@1W.@#$23-@PI.4EJG59:;+-2F?&FA9D15XA60J\JFT>6Y:
MH15\P >RQE5U&ADG1@!\.@"!&FE]4ZA<1:AJ4*6YN:BQYZB0NJS'2JD\QJ K
M<*61JJ)\1G:^":66*EB8"J5Q6H9@19M%6@8Y. """E@H '@8F@8M$ ,@T%BJ
MR&--J)\V@4,KH 9@.  Z>E6">F>6V*LNZJS7FJ\/6JN?1X;S&B+U>A8KX'EX
M*5?5Z@9DQZ%X%Q&B>E5@@J&1^JZ2UI/[QR6_!XOI>(%6%;+$%1NA-R-@]DQK
ME$@,X4WWTXZP]'M!MJ1J-@=)BA4VZY#?U6(@$*XQ9VE#M4A_.IM!NTEW-H/E
M.H-%*SSL*$7=2CAD&*<OYALQ!K1]A;0[YQOM.K0?%+5,=;0T!U@YM[2+%+7E
M\;1E +93JZE-2BMK&K9]54=#54=-*[<DIG1Z0;=JIH-V:Z4\IK9L"U94NUQ;
M^J2$0YMZ:VC*T;4H44=@J[BB9IL_R 9+"[G3&K@G"+69FUQM>ZK@.G#*:1#[
MH7 C15P=MUZ\I6;6*3@X>54DX9D189@BH+K;)P*91(RB298EJ)%1F15Y< +E
MVH0R0 /\R6/4$UOQZKDT*H\&05 U,P=W$V)R$"3\)+UH49WB.1 6-564N4<8
M&2,:^53[NH>LND\'U3:1H9J$=IO"ZZ#I*P=1&[M"\P8-U38P=U6* 0?T^19+
M.J3EN[_]VP80>KWJRZ(:R9N A;[]%+75EI2UD\ MM\ &++^=JSOT2[&A:ISU
M>[_^E)Q9AA(N01.!B1N!Y#R@ 4L<.!!ML 8M@P)%$09*XX5D@'-'DS2.!9].
MHV9[4Q<=^+I[6(3-<VWT$1ENVK&$F&L)NY]JB%>]* (NU$QS>)1XM<%@8@+V
M%@8/FP 0G !D^8<Y<;<6A6V !0=,J<4.RI3[!EATX,1G'&EHG%QF[ -B$&EB
MX,8^P*K92CASW!" Y31@9<43\;#.:U![QW O,U%IZ3DTT1#,) ;6&[^1$1AO
ML!7<@P<)\1C2.TYM8SPJ?(L#<;T@Q[KBZ;IRQ8%XP)%FD#IW,6(IP)%T$ 8W
MY'QX$'BL+!3.1[_=>W>US,:RS 8HD,H% 98@W'\^=A+7&U L\1 G<0=T^ ;V
M2U$Q\@;A<A&M;#,RM,)Q\\O!S!+4'!FHG)X5&#0,N52M^U0<N!((><NN3+YH
M,)AO-:0E& )I&6F9#)K?7!XD59Q@@@=X%22@QL[.=SK"VCT#380R!:&0L55?
MR&, +33<K,X:^7F]# (M_,+4S!+"G ?=)\3CV[Q<(LCE=,]C<1:.H8]U,15&
M!";4#'"MW''WC +??+,Y>U4S39;[=3 W=ED/TUB"W&H)9C$[G14=X],6R\$%
MFF I8]3\# (S\*K%@2*QNL\72[%65LBB')BK+#-_9#_; [V:?#>?S#C7N=6M
M[+T\6\I5M9[P.1]TA'(WK!^4X7RHS)%YD+\H0,^Z;- IH,^!?-2CNFU+A;,S
MH:3GN] \^U\8YF&$4]$7?3@H,)7NDHI,0-F?1[]XX)4N8,HP^&H;FGM+QRY.
M!W4*K< %4<$3*J:R*3Q5#-@@X,_F_%\]#585;=:X_'F"_-C=@@(@H]&676G_
MM6%Q*\BB['RPJF18"VN4NWFI"77MFQ5Z(+Q].P /G6F]"0+%Q]Q76M'S <=W
MD0:CMP)]I[E-K=O W*O^<QAK0&(7F&F1@:$9LB$<VV^^#0(</65@!<&2$;1;
M59KY-=JRQ@.E66'E6M%R[0:CEZ^Y[<*0+2_T4@3UO;Q2F]]BZ<7RBI_TVL0\
M]L1BP!!ZP<["2(PL0<Q0*LBDBM]R==5<DEL,YX_-]#TMTW&YY8]Q!I]X8,/9
MZ\]JMI!X+<2,YFAIU6[TD9;R=X1)Z&N !=NB&\+85@>KIA@N,SLG'5I^A!CZ
M(5+/I-+U\1>! 3H=YVZ*V<.G+<YY5=@Z.\=#PZ3+-3!$,-0+(P1#+3%VBA++
ME3%6X.95T 2?"N9,*0;)MUP@L^=#/L=AP'YRA>90"5@#@BX4^L9Z2L00\51C
MC#]ES&T0 8C=6LC,B7!MU47/R7 ]XN629#0>_CUBMA!D!A%WV";:A=;FK-9 
M3+_9N1V^J%V":1;;MT5=M+M@I5US0%8D'KJ%;.NFGLD, 8"J?NL^S.IB]>MS
MB8*0*;Y=1.8%>9".6<[C+!%[?,Z#W39CP%FZKD,9B()X#9 N&2X(WD62)P='
M*<]1-=#E6YBTGI45'&F1RNM0NM>]XWSE0=A[I;.'7:[[U6%W2@#Z+EWH;73#
MC-U9P7E$1@"6YMV $=[CK:CBJM[LG4CA6(TG5@ SWB+U96ET%$TV<5 @!X:^
MJJGEL5^W5? E>/"$U;<%P*IR#=[!#@D%\/(%O>\<_V$&H))D5_,)?H4Z_^@\
MGYL&0&QT\&R )?0WG_,>NO.\A?0UZ6Q(/LP/+X8I#[IC"%9DJ+;N"%OY!UA 
M;:9HL 8J^'F?=!_P!Y"&SL453I9/3.>H63_H'AKC+D6?MY?.I^*C>Q#T%9BG
M?NQE5C]@PNE)!$M$%'<O:(&7*5?5WI@)^>H9J>X@V(PCJ*$QY^FR2P>TN_A'
MU%:YWNDH.*0O\^UV%>Y2E/?D.FQ"'!3H_NRK'QIW0,7M)FZQ9F=;*W0MD:C"
MLX."%N!X=F@HX?O80YM&#N1+")!IY'A9*0* 17G7!P+#>)K;=V(&, ;(> (L
M<8'8'XO.^./&1HTH3X; OYG"S[B45ORKC:<Q!_2CB6Q4$FP@<*L_2Q"0P %*
M_VRLF6Q44/^XRF,@@#U5S__R7R7KD:S,WWB'*7G,,_W3/_V49_TLT?$_!?0V
M,A3%]FA$V2/?9/4S^F>=\09MKY8@_??C%9@*\1?1!3XCA?C+OAKCY>IRQ>V0
MSY@(B>T/V=XLT3:)M%<D+UF)) :C!,1Z'6FSWGPB,%X.>'';EQ!CU-<#0-7&
MV7/>SED),48CKOE7%0(M:W\;Z71MDT@FL%<D[W2>E4@F( 9T&QE6C->R/KNT
M+@);I$12M'VDBN_/Y^V<!47B?A!J__HMC> ;2?NV_V>XS\:;5&>S!EB>A7N]
MCVL.J8.OQJI[!80!#EABT(/&3P TGI4_)?Z/1K 3!)JFB9I H99>WVZ=\09M
MKY8@_??;>3[2')@Q[NFC'K+V-++UZTS,%..P1%RN+E?6B>UX*\2SWGPB@+HC
MU3+;1ZKXGK@QMT_]W?#-?=JS5IK1+? *OT\,K]T\%O%-_]UI*=[Y2IM:BWPB
M_&F;R6.TN4F4:W.^X;4Z9W-<6_9L&K1ZBWR/*VK@YJ5!JVF4J_YU*VJ I?[M
M6JEGG_8H+NS]<_9I3YEB&TA)NTGV'_&4FW/USP<: 0D,$([G)GCUCZOAV-^5
M.Z0SV)N[UVX*'XZM_7'Z!])_#Q)C$I@I$21>C1+\N!K:G!)Y@ =I.>(7*!]-
M<X%D4&)Z\SQC_KUL]OB%<XO"K )W#<0ZB<218>*"+5?^KJ2('BYJGEALCN=P
M3N>))>=#;>=XKN<\QMW4G =XD)9G/.(7*!]-<X%D,&0.W9O4G =XD)9]/N(7
M*!]-<X%D,&3D?;'FG99J##;U?=_P%=]V&KCV_,;%-P<QTG(%5ZGVW.<,+Q_#
M1P9[G+:N;=XH@-X/,0;KW=[OG2_RW5CT?8A]>(%\F(A#!E;'_:D+_L*('BXL
M ;!GW)5TW)5YW)4^4,.$S"7;>3[27!7,#&:5G!)!<A<L,>J^!"8I$20S49W4
M/(&DG)&<S8%S( =[[/A>V#:)M%<D+UF)) :C!,1Z'6FSWGPB8!@^DD/BY ;;
M1ZI]/0#W3SA6C-<AT++VMY%.US:)9 )[1?).YUF)9 )B0+>\FEQ6W'-RH,?0
MN$C2B'5^%V>1UC:X5X. Y5FXU_NX=OM$QZI[!80!#EABT(/&/P ?KX4U[H4I
MD0=X,'IR\%,B_[@DWQ)+<Y?M)_9"7/:%_%R@PY>;]$<P'DW!U''/!3JKF]89
MR=E%WZ.>3^LB\%R@(QB;]$=TNWVDBN^)&W.^>\0G(*0\]ER+--#ZW;NQ6YJ9
MQ:+/54<#W<56W-H?IW\@+4//M4BNGNTM\?B%<XO8SCZX#U@VQ[4%:FZ4:VEU
MAJRY=O[EYH/J'X33[>/4G =X\(S=@H1 WOWP*;\QL#3Y^O%:&&?B#9]JZ?4T
MRCZOQJKEYH/J'X1@]?%:F/%W )^D2F_\]UQUY.K9WA*/7SBWB.WL\VJLJOXM
M4*"YBFD]B*PABGJUI/UHE9*H5TLW^6<OJ?UHY9)#46PWF5Q5WVOB3795#Y.W
M3W3C5FZZ;W-ZUONXYI#EX>/4G =X\(S=@H1 WOWPV=[BG:\?KX4U7OPQ,) H
M'KJZAGJU%(YD!VQ*,G3&%(YDY_\QV2/?9/5L!VU5LAY^%V>Y?VXVIV>]O]JG
M$Q$TWMZ@A,3T5LBF%1%U\3V;]$<P'DW!U'&F%1&CG-89R=E%WZ.>3^LB8%H1
MX5:;]$=TNWVDBN^)&W.^>\0G(*0\9EJ+--#ZW;NQ6YJ9Q:*F54<#W<56W-H?
MIW\@+4.FM4BNGNTM\?B%<XO8SCZXCVF[5X.[WP(%VONX]L6OQJKEYH/J'X33
M[>/4G =X\(S=@H3B#>3=+][PV=[Y^O%:6.->J)9>#](R9%IUY.K9WA*/7SBW
MB.WL\VIZW(/GIOXM4*#L#\"H5TM7KY+BW79_]I)7O__:#ZW)5?5,WYX]\DU6
M+]YM]V>X'_RZ;W-ZUONXYI#EX>/4G =X\(S=@H2.)MZKUQ)+(][=OS3Y^O%:
M6.->J)9>#])_'V*B/L2!!-:_?C>4#(O\N!HA!CH[2_DQXE RT'8=VE?QGQ4=
MYI/0YSO@=X&_6(Q(6>$:V39'2H3Q&VFSWGPB$&*@LWTO@^_/%Q$T+O*/2_*&
M#']W^=>KI'\@_?=(Y"W/Y)PGY.5Z%8#/A )U<Y:><>4U#$TB2 <&V$O[2-9M
M8IT:A/E2A9C?#LZW.)D.J0(;"VYR!8 ?A =IN31JV7ZN':D?^_<RU4=I8$0'
MX>1_$5TM-$$-HD+@G_DRWH9XD)9+$^;/,^;?:_<9B.U$6OD>N8)7I9-('!E6
MW',U+=-"C.CA\H+?U6]Q"WV^,WIM6'VAT6^VGUR%FUB+7@2-!5;0YSNCUX;5
M%QJ+7@2VGUR%FUB2?02-!5;0YSNCUX;5%QHG,(S;MX=_,U$JD (NZ)6?5[B)
M%=]S#E;0YSNCUX;5%QK23P;;-WH>%%V1D99]/GS,_<JPZT'1%1F$;F+)5;B)
MY>#UTEA@!7V^,WIM6'VA,8R5Z)%I><8L(0-W2;ANN^8$@^=P3N>))>=#;>=X
MKN=@%4'VG-#?C%<E&$'G]NTL>OKZ0:+4%WFAX8N7W89XD)9GG(%J"5;0YSLD
M2GV1%QK#2'G;%ZE=Z0-I;G9MB =IV><9J);)'4'G]NTL>OKZ0:+4%WD9:OO)
MI9%M6$%'F@"%FUB!?O_/Y^WZ0:+4%WFAT0*VOWAMB =I><9+HY;W+SH ^$$5
M=*0)$*?'';?0YSNCUX;5%QK]=GW;A^CA\GEQ6FVGKQ\D2GV1MT(@-(H?^_< 
MEUCVE$<*&..P]%ANL-XOR.T="KN1-NO-)P*/Y09KX$ROV#*WF[OMGFN]&[NE
M&;SE^O%:F/%W,/)LP!*DFJ]-^(3<.(7?V&MLEZ]7J8E%H9+3" *MMQY&>; @
M_?>P98^_A/ET8("]A(!YI( Q#DNPM;IIG9&<3;_@/X*/$XV]-HT:WJ%75>^=
M3[NP10?;!QFF'Q$T+O*/2_*&#']W^=>KI'\@_??;>3[2/,2!!$S3),U$H7$-
ML:TK6SXR'A%*[^IRQ>W97A6-V/PD2GV1%QK7E^LO&8XSVJ&P&VFSWGPBL!=]
MD2:'D1ALL'WW#L 2;_-J_Y+A2'8H$$A<11@82AB-=0>X+?9"7/:A>SJ]&*F1
MN'TJR7::#[N1-NO-)P+ -$VZI!;;=^\ +/$V_WDJR79Z&$AW1A@82AB-=0>X
MO;FGUE5;#'V^0Z+4%WFA07G;5_6]QG::#[N1-NO-)P)U6#\Q(A-G@ 824?7;
M=^_R''.^>\324O^XZKM'? )".MU5WVML%VD?7>*;>VI=A>+"3G 0UX#?TV2K
M)D6_'@9&"DM-]F2%=?\)L,3'2Q 3T?R^&./4FP>-M6]< /V7G!!<( +*$R-<
M( )9$@;TQP4BD*%P@S<)L,3B?;R'WOPHH!&AT1$?(4EST%B/Y09KL%E!8EH1
M41>P)1%*'UAO,%+/!3H28>OC911((1&@;_MRQ??T5LAGZ1E7'I@Q3KU! DLA
M.1!G"<QA_CQC_KT2L=%PG;TRG,,'X;^:?U4ZB<21(<@P4*IRY>]*BNCA\H+?
MM>A%X.;L095#W6_#[=HP4*IR]5T.7B_#[=J$#MR)%=]V2MOV?,;_;,]]WMI-
M?9; _#AX0#EY,*-R]5TF,]RN/0?^2^A=2<>?5[B)Q>9Q^SUF:9*$_GEU;)8F
M.<=^WMI-'08K<,>QG5AO'K??8Y8F2>B?5\=F:9)S[.>MW=1AT )W'-N))>=Q
M^SUF:9*$_GEU;)8F.<=^WMI-S5/ F0(O\"C G5AV'K??8Y8F2>B?5\=F:9)S
M[.>MW=0\I0*/D@(O<,>QG5B!#E;?8Y8F2>BX[=HM$,?"OAHA.1!SX+].UOUA
M_CP%X60<*0>3Z9 AV3QK34$7* 8_!3HD^5/M+>F;5JH=>HB('BZ_&]], .!R
M@.CA\KOQG<1DZ5GV3NAX)0:LZF1]CE=>CFJ$CE>'X8YS?,>W3W3CYEEU-FMF
MZ4^]W_[ ^FJL*@9.%>!FZ53LGZQ@@G;<8Y+B_VAO+\@:N.3]E]7?T[*!I"9<
M1ADDZ0)GX *A$08PX )ZD ,Y( (=U[+VMY%"<X%[M1,7* 8E%NU8#S1WV#:P
M_%/ >8' Z51JI@)[%6F^F]T._YMM(_$V+]YW5[Z^JYH2'/]9X0+OFUQX/=&Y
M!IR'S?#:#5; .6Y.+]YOW\5D"9SGNU=X!9SCI@+X2Z,5V]3I/0;KK0)M \LE
M!N#I/0;K#9P7")Q#5LRM<1'U*3;JO7#?LTFC#DS3I+T8W]Z%1=4<'".4"P, 
MKOLVYQL 7IMS!N ^J/Y/PR4AJ'=\F<C9.U+;T^6");YMXO3AF9&"\[T209=[
M7/0[.6F1(<@4"V<VBO[(4QIGP*,2W%L^::/-4Q"".'Q^E=WY16JNK8%+WG\A
MJ'=\F<C9.U+?(P)[T1<-P>4Y(0+-\Q9Q\7<N4 8N$!IX,@,N0 ,U<)0=%Y(#
M<> )'NU8_[W:;G)PG;T:6*.;5JH="KN_2ZJ1(<@P4*IR!6<VBO[(4QIGP*,2
MW%L^::/-4Q"".'RPEMWYI?E]];LGX +2?=A16WNQ!GAW5J"J/:0VVCP%(8AX
M):5S4!IG\+_3;:/-,WRPEMWYE:^'/;@IWGZNK8%+WG_I/09KP'!#8X"]A(#_
MP\KOUW'(4QIGL+-4S<&UZ=_-'> #?@)/LQH"'!+^6V*4R=_+S7D _MPG$-V1
M\=-X79NE&03-'>"EJ072_=-X'6BEZ0+2_=.DYMK(4QIGL*0?^_<AJ'?V&/I]
MT1!<'C1N 1=>WN%CL ;U*_@2E;WYM+T*$)<?29=F8)=&D[W#ZI"5F8%E< 9X
MC1M(HZ?GAGQ@9:/8K8$5R&HV@'++6J4G"FYRQ486GES56J4GJJ?4+XC#=P+Y
MA5<VVCP@8(C!@5=YVE4S@'/+6J4G6IHN< )35A7O/**6Z,[P#'A<%0-PQ;LQ
M9WMD/P,XMZQ5>J*EZ0(G@%?Z7:U5>J+^?0);7()FT))'C'SW3SC5BB<3&Y9*
M&7-FT))'#%>]OJPQ0 ,3B]>X<08XMZQ5>J*E^3"DYMHF4*VJ][%_3X\3)/@2
ME;WV4W7-4[^(W,D8H1>K!DMLB9ANV9Y<>1 $R9@(.9GG_+T2@:-X*Y._*P7G
M-Z2U%VMSH*))%:,L.FRO!@*@K4NQR:+U")JU"A1J2:/LX]FQ!GAWAI*J.;ZJ
M[9/U")H2#!1J"<0R^;NMMQY#"F<@ -JZ%)LL6H^@6:M H98@_?=B0B;3^4! 
M4X]A\DY?HCP35(\O$(N(M!BPQ/<O&)(H46F1YCU/%@,L<0.:WU=.1VYX8 1&
MP*O))<BCYT'1E0).!0+:(Q]I '@TQ,I>CH?Z7;%-/7H>%%TIH-Q<A0-KZ$[Y
M 28=D<*SP7]-Z(U\^S,/VJF]5;!9(+P*.D%Q]K4&JZ 31&+':+!/LQH !W^%
M-1$3A *=VEL%6P3"^S3]XY^T7E@3,4$HT*F]5;!+(+Q/TS\I1W^[6%@3,4$H
MT*F]5;!*(+Q/LU0#X7Y[)]-A^C,/VJF]]:#CA*$G$%X<>P+IU5O\]Z EEC?>
M\V0QP!(RL#2]Q7\5FN#1CO5Y4[X3/1$35-I]]C0# 1H &@ :&AH:&AH@(" @
M(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
M(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @(" @
((" @(" @(" @
 
end
Technical Details
Message-ID: <328@transys.UUCP>
Path: arc1-ca.pugleaf.net!utzoo!mnetor!seismo!mcnc!gatech!hao!oddjob!uwvax!rutgers!mit-eddie!uw-beaver!tikal!transys!baron

Show Full Headers
Complete Article Headers
Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP
Path: arc1-ca.pugleaf.net!utzoo!mnetor!seismo!mcnc!gatech!hao!oddjob!uwvax!rutgers!mit-eddie!uw-beaver!tikal!transys!baron
From: baron@transys.UUCP (Joe Portman)
Newsgroups: comp.sys.atari.st
Subject: Shareware C Compiler (part six)
Message-ID: <328@transys.UUCP>
Date: Mon, 18-May-87 17:11:51 EDT
Article-I.D.: transys.328
Posted: Mon May 18 17:11:51 1987
Date-Received: Wed, 20-May-87 03:16:05 EDT
Reply-To: baron@transys.UUCP (Joe Portman)
Distribution: world
Organization: TransSystems Inc. Bellevue, WA
Lines: 153