Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!mnetor!uunet!husc6!think!ames!sri-spam!rutgers!iuvax!pur-ee!j.cc.purdue.edu!ain From: ain@j.cc.purdue.edu (Patrick White) Newsgroups: comp.sources.amiga Subject: web (part 2 of 2) (and stuff I forgot to mention the first time) Message-ID: <5898@j.cc.purdue.edu> Date: Fri, 4-Dec-87 10:20:04 EST Article-I.D.: j.5898 Posted: Fri Dec 4 10:20:04 1987 Date-Received: Wed, 9-Dec-87 06:44:33 EST Organization: PUCC Land, USA Lines: 930 Keywords: web, tested, source Approved: ain@j.cc.purdue.edu (Pat White) Program Name: web (sources -- part 2 of 2) Submitted By: lee@uhccux.uhcc.hawaii.edu (Greg Lee) Summary: web is an assembly preprocessor that implements higher level constructs than the standard assembler Poster Boy: Pat White (ain@j.cc.purdue.edu) Tested, but not compiled. NOTES: forgot to mention: web.w is uuencoded in two parts -- need to concatenate them with an editor bedfore uudecoding them. Also, one needs the web binary in order to make this source as web is written in web. (I guess we are back to the age old question of which came first: the chicken or the egg :-) -- Pat White (co-moderator comp.sources/binaries.amiga) UUCP: k.cc.purdue.edu!ain BITNET: PATWHITE@PURCCVM PHONE: (317) 743-8421 U.S. Mail: 320 Brown St. apt. 406, West Lafayette, IN 47906 ---------------------------------------- # This is a shell archive. # Remove everything above and including the cut line. # Then run the rest of the file through sh. #----cut here-----cut here-----cut here-----cut here----# #!/bin/sh # shar: Shell Archiver # Run the following text with /bin/sh to create: # web.w.uu.2 # web.doc.uu # This archive created: Fri Dec 4 09:53:01 1987 # By: Patrick White (PUCC Land, USA) cat << \SHAR_EOF > web.w.uu.2 M"0EC:'(@(#\))RPG.PEB97$)IPH)"6-H6UB;VP@NPH)("!IB<*"2 @8FAI"2!L;V]K+F9O6UB;VP*"2 @+3X@("!]"@H*-RXQ+C0N,2 @1V\@=&AR;W5G:"!T86)L92!A M;F0@=')Y('1O(&UA=&-H(&5A8V@@2!T;R!F:6YD('-Y;6)O;"!I;B!T86)L M90HH=&%R9V5T7W,@<&]I;G1S('1O('1H92!C86YD:61A=&4@2YN97AT+F5N=')Y"@E["71S="YL"2 H=%]E;G1R>2D*"0EB M97$)(*<@(" @(+<@2DK"@D)9# N=R @/2 @*'1?96YT6UB;VP_"@D) M(3T@6PEC:'(@(#\@("AA,RDK"@D)"6)E<0E]"@D)+3X)=')Y+FYE>'0N96YT MB<*"6)H:0FV"B @("T^(" @('T)(" @MR!T0H*MR!P;VEN="!S;W5R8V5?2!S<&%C97,*"@E["2AS;W5R M8V5?6UB;VP*<&]I;G1E9"!T;R!B>2!T M87)G971?'0L(&%N9"!L7VQE;F=T:"!IR!D,2 @*ST),0H)(" H83,I*RYB M(" _("!N97=?;&EN90H)("!B;F4@("!]"K<@5VAA="!I'0_"@ED,B @(" ](" M,0H)83$N;" @/2 @=&%R9V5T7W,*"7L@ M9#(@(" K/2 @,0H)("!C:'(@(#T)*&$Q*2L*"2 @27,@:70@86X@86QP:&%B M971I8S\)(+<@-RXQ+C0N,BXQ"@D@(&)E<2 @('T*MR!(;W<@;75C:"!L;VYG M97(@:7,@=&AE(&YE=R!T97AT/PH)9# N;" @/2 @9#$*"60P+FP@+3T@(&0R M"B A/7L*"2L@>PH)(""W($ET(&ES(&QO;F=E6]N9"!E;F0*"2 @83,N;" @/2 @83$*"2 @83,N;" K/2 @9# @(" @MR Q M('!A'0*"6$Q(" @+3T@(#$)MR!B86-K('1O(#%S="!C:&%R(&%F=&5R(&]L9"!T M97AT"@EA,RYL(" ]("!A,0H)83,N;" K/2!D," @(""W(#%S="!P;W-I=&EO M;B!A9G1ER H83,I*RYB(" ](" H83$I*PH)(" M,2AA M,2DN8B @/R @;F5W7VQI;F4*"2 @8FYE(" @?0H@?0ID;VYE+FQE;F=T:"YA M9&IUPH)("![("AA,2DK+F(@(#T@("AS;W5R8V5?6UB;VQS"B!D969I;F4@8G)?;&5N($0R"@EA,B @/2 @7F)R86YC:"YT M86)L90H)8G)A(" @(" @;F5X="YB2X@4&]I;G1E2!W87,@;&5F="!I;B!!,B!B>2!S96%R8V@*;V)U M9@H)83 N;" @*ST);%]L96YG=&@@(""W(&]N92!B97EO;F0@96YD(&]F(&QI M;F4*"6Q?;&5N9W1H("L](&0P"@EA,RYL(" @/0EA, H)83,N;" @*ST)9# ) M(+<@;F5W(&5N9"!O9B!L:6YE"@E[(" M*&$S*2YB(" ](" M*&$P*0H)(" @ M83 N; D@(#\@('1M<%]L;@H)(" @8FYE(" @?0H)*'1M<%]L;BDK+F(@(#T@ M(#,H03(I"@DH=&UP7VQN*2LN8B @/2 @-"A!,BD*"2AT;7!?;&XI*RYB(" ] M(" U*$$R*0H)*'1M<%]L;BDK+F(@(#T@("<@)PH*"CR @8VAR(" ](" H=&UP7VQN*2L*"2 @(&ES+FET M"2 @)R D)";<@-RXQ+C4N,2XR"@DH=&UP7VQN M*2LN8B @/2 @)R G"@EC;'(N8B @(" H=&%R9V5T7W,I*PH)+2U&:6YD('-T M87)T(&]F('-E8V]N9"!O<&5R86YD"0FW(#:6)U9@H)>R H=&UP7VQN*2LN8B @/0DH;6YE;2YM;W9E(""W(&EN:71I86P@87-S=6UP=&EO;@H),2AT M87)G971?;6YE;2YL96$[("T^(*<@(+L*"2AT M87)G971?2!A;F0@9&EV:61E/R I"@EI;6YE M;2YS=6([("T^(&-H:RYL;VYG+F%S(+L*"2T^(*<*8VAK+FQO;F H)+3(H=&%R9V5T7W,I+F(@(#\@ M("7-I)R"["@D](""K(" @=&%R9V5T7W,@*ST@,2 @NPH*-RXQ+C4N,2XT("!$ M96-I9&4@=VAE=&AER!C:'(@(#T@+30H=&%R9V5T7W,I"@D)(" @(&0R+F(@/2 M-2AT87)G971? MR!)R @8VAR(#T@*'-O=7)C M95]S*2L*"2 @($ES(&ET(&$@9&EG:70_"@D@("!B97$@("!]"@EC:'(@(#\@ M("PED,BYB"3\@("<@)PH)"0D]('L)9#(N8@D]"3D*"0D)"5L@("AS M;W5R8V5?PEC M:'(@(#T@("AS;W5R8V5?R![('1S="YL M(" @("AT7V5N=')Y*0H)(" @(&)E<0D@("!N>'0N8G,*"2 @("!S;W5R8V5? M;V)U9@H)83,N; D]("!T M87)G971?R @8VAR(" @/2 @*'-O=7)C95]S*2L*"2 @("AT87)G971? M0H)<'5S: D@(" ](&0R"@E0=70@;&EN92!T;R!O=71P=70@ M9FEL90D@MR S-0H)9#(N; D@(" ]('!O< H)=%]E;G1R>0D@(" ]('!O< H) M+3X@("!]"FYX="YB71E(" @("!B=69C:&-O=6YT"@H):6YP=71?;&EN92 @/2 @8G5F M<'1R"@EP=7-H"2 ]("!I;G!U=%]L:6YE"@EL7VQE;F=T:" ](" P"2 @(" @ M(""W(&YO(&-H87)S(&EN(&QI;F4@>65T"K<@8F%C:R!T;R!H97)E('=H96X@ M=V%S(&YE8V5S2!T;R!R96%D(&UO;V)U9@H)*&$P M*2LN8B @/2 @.0H)*&$P*2LN8B @/2 @)V(G"@DH83 I*RYB(" ](" G"!S=')I;F<)(+<@,S,*"6$P(" @(" @(#T@(%YO;&5N M"@E0=70@;&EN92!T;R!O=71P=70@9FEL90D@MR S-0H*"60P+FP)/0ES879E MPEP=7-H"3T)9# *"0EF<')I;G0);6]V96UI;G-T"@D)9G!R M:6YT"7!O<'!R969I> H)"7!?8G5F9F5R(" ]"7!O< H)"4UO=F4@;&EN92!A M="!P7V)U9F9EPEA," @ M*ST),0H)"0EL7VQE;F=T:" @+3T@(#$*"0E]"@D)87)G8&$)/0EO:&%N9&QE M"@D)87)G8&()/0EA, H)"6-A;&P)5W)I=&4*"7T*"@ED,"YW(" @(" ]("!T M>7!E;V9S96-T"@ED,"YW(" _("!C2!T;R!H97@@;VQE;@H)4'5T(&QI;F4@=&\@;W5T M<'5T(&9I;&4)(+<@,S4*"C(X+B!!="!L969T(&)R86-E("AI;G!U="!P:&%S M92D@;W(@8F5G:6YN:6YG(&]F('-E8W1I;VX@*&]U='!U="!P:&%S92D*8G5M M<"!A;F0@<'5S:"!T:&4@8W5R"!S=')I;F<)(+<@,S,*"71S="YB("!B2!T;R!H97@@2 G<')I;G0G(&UA M8W)O70H*1&ES<&QA>2!S=')I;F<*"6%R9V!A"2 @/2 @8VAA;F1L90H)8VQR M+FP@(" @;%]L96YG=&@*"6Q?;&5N9W1H+F(@(#T@("AA,"DK"@EA&-E<'0@ M;W5T<'5T(&=O97,@=&\@;W5T<'5T(&9I;&4N"@I0=70@;&EN92!T;R!O=71P M=70@9FEL90H)87)G8&$)(" ]("!O:&%N9&QE"@EC;'(N;" @("!L7VQE;F=T M: H);%]L96YG=&@N8B @/2 @*&$P*2L*"6%R9V!B"2 @/2 @83 *"6-A;&P@ M(" @(%=R:71E"@HS-BX@06UI9V%$3U,@F4@ M" @($]P96Y,:6)R87)Y"@EA-BYL(" ]("!D M, JW(&]B=&%I;B!F:6QE(&AA;F1L97,@9F]R(&]U='!U="!A;F0@:6YP=70@ M;W!E;F5D(&)Y($-,20H)8V%L;" @(" @3W5T<'5T"@EO:&%N9&QE(" ]("!D M, H)8VAA;F1L92 @/2 @9# *"6-A;&P@(" @($EN<'5T"@EI:&%N9&QE(" ] M("!D, H*"C,W+B!)9&5N=&EF>2!T:&4@;F%M92!O9B!A(&UA8W)O(&]R('!R M;V-E9'5R92!C86QL('=H:6-H('=APEL7VQE;F=T:" @*ST@(#$*"0DH=&UP7VQN M*2LN8B @/R @,3 *"0EB;F4)?0H)87)G8&$)(" ]("!C:&%N9&QE"@EA7!E(&]F('1H92!D969I;FET:6]N M+B @26X@=&AE"B @8V%S92!O9B G9&5F:6YE)R!E;G1R:65S(&%N9"!D871A M(&1E8VQA7,*("!I="=S(&$@)V1E9FEN M9271E(&ES(# @9F]R(')E9W5L87(*("!D969I M;F5S+"!B=70@,2P@,BP@;W(@-"!F;W(@)V)Y=&4G+" G=V]R9"2X@*0IS96-T;&ES M= D@(&1S+F();6%X&9S:7IE"@H*"7-E8W1I;VX@='=O M+&1A=&$*"FQI8FYA;64@(&1C+F(@("=D;W,N;&EB2'1A8B @(&1C+F(@(" ED8RYB"38L)RAS M<"DK+"<*8V]M;6%C:&%R"61C+F(),2PG+"<*;F5W;&EN96-H87()9&,N8@DQ M+#$P"@IK97DN9&5F:6YE("!D8RYB(" G9&5F:6YE("2YL;VYG(" @(&1C+F(@("=L;VYG("F4@6UB;VQS(&UU7-"87-E"2 @97%U M"2 @(" T"FEB=69,96X)("!E<74)(" @,3 P"FUA>&9S:7IE"2 @97%U"3@P M,# P"FUA>'-E8W1S"2 @97%U"2 @-# P"FUA>&)R86-E;F5S=" @(&5Q=0D@ M-3 **"!#:&%R86-T97(@=7-E9"!F;W(@96YD+6QI;F4@8V]M;65N=',N("D* M8G5L;&5T+F-H87()("!E<74),3@S"B@@0VAA2PX. H*"6QR968@(" @($]U M='!U="PV"@EL web.doc.uu begin 644 web.doc M"@D)"2 @(%=E8@H*"0D)"0D)"2!'2!$;VYA;&0@2VYU M=&@G7-T96T@;V8@=&AE('-A;64@;F%M92 H"!O M9B!T:&4@;&%N9W5A9V4*:70@:6YT97)P2!T;R!B"D*(" @(" @;&5N9W1H('1Y<&EN9PDH87-S;V-I871E(&)Y=&4O M=V]R9"]L;VYG('=I=&@@=F%R:6%B;&5S*0H@(" @("!D871A(&1E8VQA2!W87D@;V8@ M97AA;7!L92!A;F0@<')O=FED:6YG(&1E=&%I;',@;V8@=&AE"FEM<&QE;65N M=&%T:6]N+B @5&AE('-O=7)C92!I"P@87,@>6]U(&-H;V]S92X@(%1H92!O=71P=70@9FEL92!W M:&EC:"!I2!P2!F:6QE(&-R96%T960@:7,@)W=E8BYA)RX*"B @(%1H92!L87)G97-T M(&9I;&4@=&AA="!W96(@8V%N('!R;V-EF4@;V8*86X@:6YT97)N86P@8G5F9F5R('=H:6-H(&ES(&YO=R!S970@870@ M.# L,# P(&)Y=&5S+B @5&AE('-O=7)C92!F:6QE"F-A;B!T>7!I8V%L;'D@ M8F4@='=I8V4@=&AI2!C:&%N9V4*=&AE2!P87)T(&]F('=E8B=S(&5X=&5N9&5D('-Y;G1A M>"!I2!C:&%N9V5S(&EN('1H92!R97-U;'1I;F<@;V)J96-T"F-O9&4N(%-O+"!I M9B!T:&5R92!A6YT87@@>6]U(&1O M;B=T(&QI:V4L('EO=2!D;VXG= IN965D('1O('5S92!T:&4@2!C;W)R96-T M(&%S2!W96(*=VET:&]U="!P71E)RP@)W=OB!S96-T:6]N(&-H87)A M8W1E2!O9B!G:79I;F<@8V]M;65N=',@ M:7,@=&\@<&QA8V4@=&AE;2!I;B!P87)E;G1H97-E0IO8V-U6YT86-T:6,@86YA;'ES:7,N("!)="!D969I;FET96QY"G=I;&P@:6YT97)F M97)E(&%F=&5R(&%N(&EN9FEX('-T871E;65N=" H2!O;F4@;W(@;6]R92!B;&%N:W,@*'!O2!PF5D(&QI M7!H96YS(&ES('1R96%T960@87,@=&AE(&YA;64@ M;V8@82!C;V1E('-E8W1I;VXL(&%N9"!T:&4@'0@<')O8V5D M=7)E(&YA;64@;W(@;F%M960*8V]D92!S96-T:6]N(&]R(&5N9"!O9B!F:6QE M+B @5&\@:6YV;VME('1H92!C;V1E+"!J=7-T(&=I=F4@:71S(&YA;64**&EN M8VQU9&EN9R!T:&4@:'EP:&5N&-E960@=&AE(&-A<&%C M:71Y(&]F(&UO2!L;VYG+@H*(" @4&%R86UE=&5R'0*)R,Q,"<@=V]U;&0@8F4@6UB;VP@0IA(&-O;&]N(&]R('=H:6-H('-T M86YD(&%L;VYE(&]N(&$@;&EN92X*"@I,:6YE(%-E<&%R871E6]U+B @02!U;FEQ=64@;&%B96P@:7,@6T@9F]R("<[?22P@=&AE(&9O;&QO=VEN9R!A;'1E6UB;VQS M(&%R92!P&%M<&QE(&-O=6QD(&%LV)R!R969E2!B&%M<&QE71E+6QE;F=T:"!O<&5R871I M;VYS.@H*(" @=7-E(" @9# N8B @/2!D,B @(" @(&9O2P@=V]R9"!A;F0@;&]N9R!W;W)D(&]P97)A=&EO M;G,@8V%N(&)E(&5X<')E&5S+B G*CTG+" G+STG+" G)CTG+" G?#TG+" G/#P])RP@)SX^/2<@9V5N M97)A=&4@)SH*"B @('5S92 @(&$P(#T@)F)U9F9E2!P2 G+2<@8G5T(&YO="!F;VQL;W=E9"!B>2 G*"B<@(" @(&9O2 G*"6UB;VQS(&ES(&1O M;F4@8F5F;W)E('1H92!C;VYV97)S:6]N(&]F"FEN9FEX('-T871E;65N=',L M('-O(&EN('1H92!A8F]V92!C87-E7IE(&%S6UB;VQS('-H;W5L9"!N;W0@8F4@=7-E M9"!F;W(@;W!E&5S(&EN(&EN9FEX('-T871E;65N=',@87,@9&ES8W5S2!W:6QL(&)E(&UA9&4@=7-E(&]F(&EN('1R86YS;&%T:6YG(&EN9FEX M"G-T871E;65N=',L(&)U="!D96QE=&5D(&5V97)Y=VAE2!A2X@($YO=R!I;B!C;VYJ=6YC=&EO;B!W:71H"G1H92!D969I M;F4@9F5A='5R92P@;&5N9W1H(&EN9F]R;6%T:6]N(&-A;B!B92!M861E(&EM M<&QI8VET+"!I9B!O;F4*=VES:&5S+B @06-C;VUP86YI960@8GDZ"@H)(&1E M9FEN92 @&EB:6QI='D@:6X@9F]L;&]W:6YG('-U8V@@82!P;VQI8WD@ M;V8@=F%R:6%B;&4*=7-A9V4L('-I;F-E(&EM<&QI8VET(&QE;F=T:',@8V%N M(&%L=V%Y'!L:6-I=&QY(&]V97)R:61D96XN"E=H:6QE('1H92!A M8F]V92 G2!V87)I86)L97,N("!4:&4@:V5Y=V]R9',*)VQO;F71E(" @(&UE;79A<@H)(&)Y=&4@(" @=F5R9@H*86YD(')E=FES M92!T:&4@8V]D92!T;R!R96%D.@H*"2!C;&EP2!C2!L86YG=6%G92!B>2!T:&4@'0*=')A;G-F;W)M M871I;VYS(&1I2P@:6X@=W)I M=&EN9R!C;V1E(&9O<@IW96(@;VYE(&UU