~Etruecell-;>A-;> A-; >?-;>A~=True-;=>D~>falsecell-;>A-;> A-;>A~=False-;=>D~>breakcell-;>A-;>A-;>A~=jbreak-;=>D~>contcell-;>A-;>A-;>A~=jcont-;=>D~> nextcell-; >A-; >A-; >A~= jnext-; => D~> nextfilecell-; >A-; >A-; >A~= jnextfile-; => D~> exitcell-; >A-; >A-; >A~=jexit-;=> D~>retcell-;>A-;>A-;>A~=jret-;=>D~>tempcell-;>A-;>A~>.string-;>>D-;>A~>Berror>A~@bpp@ p S~=Bbuffered=&AX<& AO<<-;> out of -;> memory ip>DpSp S~= FATAL =pAp@p Op@p@ p O& AOJ n %sill-;> egal stap>DpS =p'? p Q p .=p  A p Sp Q p Sp p)?pO @A&AO<&*=AO tementi-;(> llegal b-;0> reak, co-;8> ntinue, -;@> next or -;H> nextfile-;P> from BEp>'DpS =p)? sP&AX GINille- ;`> gal brea- ;h> k, conti- ;p> nue, nex- ;x> t or nex- ;> tfile frp >\Dp S  =p )? s P& AX +newcopycell$13-";>A-";>A-";> om END-";>>D-";>A~= call! =Ap)@ p)P p) S)$=~? fcnp)T ?p*T ?p*O~? sp*P ?p+T ?p+O + A&+AX+B<-,;> calling -,;> undefine-,;> d functip,>Dp,Sp,P ?p,S, =~= frame&- =AX-S<~= nframe .dA =p. = p. Sp.A p. S~=calloc.=p. =~=fpp.=&/ =AX/S<-0;> on %sou-0;> t of spa-0;> ce for s-0;> tack fra-0;> mes callp0>Dp0Sp0P ?p0S0 =p2A p2@p2Op2 W2\.string-5;> ing %sc-5;> alling %-5;> s, %d ar-5;> gs (%d i-5;> n defn),-5;> fp=%d p5>Dp5Sp5P ?p5S~?ncallp5 ?p5 Sp5?p5 Sp5=5 =5Ap5S~=print5=p5? &6 ?S6<-8;> function-8;> %s call-8;> ed with -8;> %d args,-8; > uses onp8>Dp8Sp8P ?p8Sp8 ?p8 Sp8?p8 S~=WARNING8=p8? p9 p9 ? 9?&92AS9<-:;(> ly %dfu-:;0> nction %-:;8> s has %d-:;@> argumen-:;H> ts, limip:>.Dp:Sp:P ?p:Sp:  :?p:Sp:2Ap: S: =p;A ~?ip; ?p;@p;O W; t %deva-<;X> luate ar-<;`> gs[%d], -<;h> fp=%d: p<>UDp<Sp< Sp<=< =<Ap<S<=p<)? p= S=$=p=? p= ~?oargsp> `?&@=AO@<-@;p> args[%d]-@;x> : %s %f -@;> <%s>, t=-@;> %o (arrp@>pDp@Sp@ Sp@Qp@S@ Q@ Sp@Q @A &@ AO@DW@ ay)can'-B;> t use fu-B;> nction %-B;> s as arg-B;> ument inpB>DpBSpB \?pBQpBSpBP ?pBSB =pB? pB\? pCQ CA&CAOC<~?argspD  (?WDpKA !KKyKWK< MA=pN = NA pN = aN Q&N=MN %sout -S;> of space-S;> for sta-S;> ck frame-S;> s in %spS>DpSSpSP ?pSSS =pS = pTL? TA aT RpT=pV=pVT ? pV OpW=aW(? pW OpX=pX? pX OY=pY= pY Q&[=AO[3<-[;> start ex-[;> ec of %s-[;> , fp=%d p[>Dp[Sp[P ?p[Sp[ [ =[Ap[S[=p\T ? p\P p\ S\$=p\\?&]=AO]C<-];> finishe-];> d exec o-];> f %s, fpp]>Dp]Sp]P ?p]Sp]=] =]Ap]S]=p_A W_H =%d %s -x;> returns -x; > %g |%s| ~? zpx X ?px S~=!getfvalx!=x@?pxX ? px S~="getsvalx"=px<?px>DpxSpxP ?pxSx@?xSpx<?pxSpxX ?pxOpxSx=pxX ? yA=pz zz~=A=~@#xp#@ p oAOp?pR p OpR & AO %o arg(-;0> %d), fp--;8> >nargs=%p>,DpS~@'np '@p SpQpS=p'@ p= p CpQ & S<-;@> d argum-;H> ent #%d -;P> of funct-;X> ion %s w-;`> as not s-;h> uppliedp>CDpSp p '@CpSpQpOpS~=(FATAL(=p'@ p= pQa OpO~=)jump)= Ap'@ p@ Ww bad type-;x> variablp>pDpSp ?pQpS(=p?sO&AXg e %dill-;> egal jum-;> p type %p>DpSp S(=W<& 1AQ dout of-;> memory -;> in getlip>DpS(=~=stdoutp=pS~= Bflush ==~@ ap @ ~? rp ?pQ&AO".string-;"> neout o-;"> f memory-;"> in arrap>"DpS(=p  @ p P p  S *=p  ?p ?o AOp  @p O W M yout of-;"> memory -;"> for %s[%p>"DpSp ?pOpSp?pS(=p?pSp&?pS~=(strcat(=p#?pO&AO s...]ma-;"> king %s -;"> into an p>"DpSp ?pOpS~=*print*=p ?pO A&AX array p? p Sp>"D p S9SpA p Sp ? pP p S~=,setsymtab,=p ? oAO~?-zp -?o AOs!Q&!AX! out of m-9;"> emory in-9;"> adeletep9>"Dp9S~=FATAL9=p:?o:AOp; @p;O W;&?p>S> =p>?p>? p> S> =p>!? >  >?C>p>?a>? p> Sa>? p> Sp>? p> Sp>= p>  Sp>ASp>AS>'=&>AX>+<-?;"> out of -?; "> memory d-?;("> eleting -?;0"> %s[%s...p?>"Dp?Sp? ?p?Op?Sp??p?S?=p@?p@Sp@&?p@S@(=pA#?pAO&AAOA: ]making-W;@"> %s into-W;H"> an arrapW>:"DpWSpWPpWSW*=pW? pXP XA&XAXXy y out o-_;X"> f memory-_;`"> in intep_>S"Dp_S_=pa?oaAOpb @pbO Wb stout o-f;p"> f memory-f;x"> deletin-f;"> g %s[%s.pf>k"DpfSpf ?pfOpfSpf?pfSf=pg?pgSpg&?pgSg(=pg ? shP&hAXh ..]unkn-;"> own bool-;"> ean oper-;"> ator %dp>"DpSp @pS=Wv unknown -;"> relation-;"> al operap>"DpSp @pS=W  tor %df-;"> reeing %-;"> s %s %o p>"DpSpQpSpQpSpQp S*=p @ pQ&AO~ tempcel-;"> l list i-;"> s curdlep>"DpS=p @ p!= p Qp !==Ap!=&AX#.string-;#> dout of-;#> space f-;#> or tempop>#DpS=p!=pAW$tempcella$>pA !yp ~=%indirect%= Ap @ pP p S/=p?pS~=&getfval&=p? (?qA?$??$?p? ~?'mp '?&'?AX rariesi-;#> llegal f-;#> ield $(%-; #> s), namep>#DpSp)?pSpQpS=p? s Q& AX .#Dp#S~=0setsval#0=p$?$p& S&&=p&-? p&? (&?q&A?$&?&?$&?p&? &' AQ'C "%s"s-5;0#> ubstr: m-5;8#> =%d, n=%-5;@#> d, s=%s p5>/#Dp5Sp5 Sp5 Sp5)?p5 S~=print5=6=p6-?W8?p>? o> Os?Q&?AX? out of -m;P#> memory i-m;X#> n formatpm>I#DpmS~=FATALm=pm@ W, ()formaao?poSao?poSpo?po? o  o3ApoSpo =po Sao?poSpo>c#DpoS~=adjbufo=po@ rpQ&p%AOpK tformata}?p}Sa}?p}Sp}? } ~?fmtwdp} ?p}? } C}p}Sp} =p} Sa}?p}Sp}>j#Dp}S}=p}@ p~?~?tp~?W~t format -;x#> item %.3-;#> 0s... ra-;#> n format-;#> () out o-;#> f memoryp>q#DpSp?pS=p@ sQ ~=_ctypes = A&AO #DpSp?pS~=sprint=p? & AP < -;#> %dforma?pSa?pSp?  p ?p?  CpSp =p Sa?pSp>#DpS=p? p S/=p? p@ p?  p ?sR&AX atformaa?pSa?pSp? ?p?  CpSp =p Sa?pSp>#DpS=p@ W& tweird -;#> printf c-;#> onversiop>#DpSp?pS~="WARNING"=pA!?W n %snot-;#> enough -;#> args in -;#> print(%sp>#DpSp?pS=p @ p S=p? p?p @pOp @p2A &  S[ )formata?pSa?pSp?  p?  CpSp =p Sa?pSp>#DpS=p? W7 #DpSp?pS=p? p S(=p?p? p S/=p? & p1?S %sformp? p S/=p? p1?    p p?  Cp?a?pSa?pSp?pSp =p Sa?pSp>#DpS=p? p S/= ?p?pSp>#DpSp?pS=p? Wn at%shu-;#> ge strin-;#> g/format-;#> (%d cha-;#> rs) in p-; #> rintf %.-;(#> 30s... r-;0#> an forma-;8#> t() out -;@#> of memorp>#DpSp1?pSp?pS=p?pSp?pSp?pS=p? Wn &.string-;H&> yout of-;P&> memory -;X&> in awkspp>J&DpS=p@pOpOp-?p@ pP p S=p?pS(=p?a? p Sa%? p Sp? p Sp-? p  S =&AX <-;`&> rintfsp-;h&> rintf st-;p&> ring %.3-;x&> 0s... to-;&> o long. -;&> can't hp>f&DpSp?pS=p?sO&AX appen.o- ;&> ut of me- ;&> mory in - ;&> awkprintp >&Dp S =p @p Op Op -?p @ p P p  S =p ?p S~=)getsval )=p ?a ? p  Sa %? p  Sp ? p  Sp -? p   S  =~?*lenp *?& AX  <- ;&> fprintf- ;&> string - ;&> %.30s...- ;&> too lon- ;&> g. can'- ;&> t happenp >&Dp Sp ?p S =p ?s O& AX  .write - ;&> error on- ;&> stdoutp >&Dp S =W  write er- ;&> ror on %p /? p  S~=1filename 1=p ?p >&Dp Sp ?p S =p ?p S #=~=Truep =  ~=arith =DA9 ~?j ?p @ p P p  S =p ?p S~=getfval =p ? ~?i ?s P& AX  sdivisi-0 ;&> on by zep0 > &Dp0 S0 =1 ?!1 ?1 ?W2 1 <94 4 ?4 *4 4 X4 T <-5 ;&> rodivis-5 ; &> ion by z-5 ;(&> ero in mp5 >&Dp5 S5 =6 ?6 ?6 S~? va6  ?p6 S~= modf6  =6 7 ? 7  ?7 ?7 ?W8 1 <9: : ?: ?W; 1 <9= = ?= *= = R= t <= ?= Sa=  ?p= S=  == = *= = O= u ?> S> ?(> ?q> A?$> ?> ?$> ?p> ? p>  S~= ipow>  => ?W>  <@ ?@ S@ ?@ S~= pow@  =@ ?@ ?@ Sp@ >3&Dp@ S~= errcheck@  =@ ?WA 1 <-C ;0&> odpowi-C ;8&> llegal a-C ;@&> rithmeti-C ;H&> c operatpC >7&DpC SpC  SC =WC 1 <&C 3AOC 2 <&C 4AOC 6 <&C 5AOC : or %dre- ;X&> ad valuep  Sp >V&Dp S~=funnyvar =p ? s Q& AX _ ofdivi- ;h&> sion by - ;p&> zero in p >d&Dp S~=FATAL = ?! ? ?W k <9 ? *  X  <- ;x&> /=divis- ;&> ion by z- ;&> ero in %p >{&Dp S = ? ? Sa  ?p S  =  ?   ? ? ?W k <9 ? *  R  < ? Sa  ?p S  =  *  O  &Dp S  = ?W k <- ;&> %=powi- ;&> llegal a- ;&> ssignmen- ;&> t operatp >&Dp Sp  S =W k AO  <& ?AO  or %dou- ;&> t of spa- ;&> ce conca- ;&> tenating- ;&> %.15s..- ;&> . and %.p >&Dp Sp ?p Op Sp ?p Op S =p ? p  Sp ?p Op S~=strcpy =p ? p ? a  Qp Sp ?p Op S =p ? s P& AX ,,.string- ;,> 15s...(- ;,> regexpr)p >,D W <- ;,> illegal- ;,> type ofp >,Dp S =p (? p  (?r P~?-sepp -?p !@ p P p  S =~?.app .?p S~=/freesymtab /=p .? ~=0dbg& 0=AO <- ;,> splits- ;,> plit: s=- ;,> |%s|, a=- ;,> %s, sep=p >,Dp Sp ?p Sp Pp Sp (?p  S~=1print 1=p .?  AP APp 2A p  S~=makesymtab =p ? p .? p P~?np A?r Q& AO  |%s| %d~?numa ?p Sp >&,Dp Sp ?p S~=sprint =~= patbegp  = r P~? tempo  ?o APp ? p  S~= is_number  =p ? & AO $),Dp Sp ?p S =a ?p Sp >,,Dp S9  Sp Ap Sp .?p Op S =W | %d%da$ ?p$ Sp$ >-,Dp$ Sp$ ?p$ S$ =p% ? p%  S%  =p% ? &% AO% q0,Dp8 Sp8 ?p8 S8 =p9 ? p9  S9  =p9 ? &9 AO9  Q&> AO> 3,DpE SpE ?pE SE =pF ?rF O~?bufoF ?oG A?sH ? ~=_ctypesH  = H A&H AOH  %d%d%daU ?pU SpU >6,DpU SpU ?pU SU =pV ? pV  SV  =pV ? &V AOV [-.stringp >9-Dp S~=.errcheck .= *?W  logexpp  S +=  ?  ? S~=0exp 0=  ?  ? Sp >=-Dp S .= *?W A-Dp S .= *?W  sqrtat- ;H-> an2 requ- ;P-> ires two- ;X-> argumen- ;`-> ts; retu- ;h-> rning 1.p >F-Dp S~=WARNING =3  *?W | 0illega-; ;x-> l functi-; ;-> on type p; >r-Dp; Sp;  S~=FATAL; =W<  ?s> O&> AX> T ?p> S> $=? =p@ ?p@ S@ *?@ S~=setfval@ =@ &A '?AOA l<-B ;-> %dwarni-B ;-> ng: func-B ;-> tion has-B ;-> too man-B ;-> y argumepB >-DpB SB =pB '? WD f#Berror^ #>&^ AO^ <-_ ;-> ntswrit-_ ;-> e error p_ ? p_  S~=$filename_ $=p_ ?p_ >-Dp_ Sp_ ?p_ S_ =~=%Truep` %=` ` ~=&nullprocd &=A~@'npe '@~@(apf (@pg Ag g l =A~@)bpq )@ pq  Sq =pr ?pr Sr =ps (@ ps  S~?*fnameps *?ps Ss =ps ?&t ?AXt <-u ;-> on %sca-u ;-> n't open-u ;-> file %spu >-Dpu Spu *?pu Su =pv ?sv O&v AXv  /dev/st~=,files- ;,=>-D- ;,=A- ;-> din/dev- ;-> /stdout- ;,=>-D- ;,=A- ;-> /dev/std- ;,=>-D- ; ,=A~=-stdinit -= Ap ASp AS~=.fd2buf .=p ,=p A p  Sp A p  S .=p  ,=p A p  Sp A p  S .=p ,= =8Ap (@ ~@/usp /@~?0sp 0?p A?p 0?r O& AX #<~>1.string- ;1> errnull- ;1> file na- ;1> me in pr- ;1> int or gp >1Dp S =p (@ ~=dbg& =AO 0<- ;1> etlineo- ; 1> penfile(- ;(1> %s, "%s"p  S~=tokname =p ?p >1Dp Sp ?p Sp 0?p S~=print =p (@ p A W 5 ) %s ma- ;81> kes too - ;@1> many ope- ;H1> n filesp >31Dp Sp 0?p S =~=stdoutp =p S~=Bflush =p 0? p (@ ~?mp  ?&  AX P1D p  S~= popen  =p  W <&  AX R1D p  S  =p  W <&  AX T1D p  S =& AX <~= stdinp  =W  wr-il- ;X1> legal re- ;`1> directiop >V1Dp Sp  S =p ? &  Ap  ?O  n %d???p >m1D ~=closefile =Ap '@p (@ p P p  S =p ?p S~=getsval =p A W p ? & AO 6<- ;p1> i/o err- ;x1> or occur- ;1> red on %p >q1Dp Sa  R A p  ,=p S~=WARNING =p ? a  R A& ,=|AO ? si/o er- ;1> ror occu- ;1> rred clo- ;1> sing %sp >1Dp Sa  R A p  ,=p S =p ? &  AS gp ? & AO <- ;1> i/o erro- ;1> r occurr- ;1> ed on %sp >1Dp Sa  R A p  ,=p S =p ? a  R A& ,=|AO  i/o err- ;1> or occur- ;1> red whil- ;1> e closinp >1Dp Sa  R A p  ,=p S =p ? W {< ~=sub =LA~=recsizep =~?bufszp ?p ? p  S~=malloc =~?bufp ?& AX <- ;1> g %sout- ;1> of memo- ;1> ry in sup >1Dp S~=FATAL =p (@ p  P p  S~=execute =~?xp ?p S =p (@ ~?tp ?p Q& AX 1Dp S~=)adjbuf )=p (= p ?~?*pbp *?W   bsubsua ?p Sa ?p Sp *?p ?     Ap Sp =p  Sa *?p Sp >1Dp S )=p '?r O& \AX ; 1Dp S )=p (= W U bsubsu-' ; 1> b result-' ; 1> 1 %.30s -' ; 1> too big;-' ; 1> can't hp' > 1Dp' Sp' ?p' S' =p( (= p( ,= a(  Qp( '?&) ,=AX)  appensup* '? p*  S~=-strlen* -=p* *? *  p*  p* ? *  C* p* "?a* ?p* Sa* ?p* Sp* "?p* Sp* A Sa* *?p* Sp* >. 1Dp* S* )=W,  bsub re-/ ;8 1> sult2 %.-/ ;@ 1> 30s too -/ ;H 1> big; can-/ ;P 1> 't happep/ >2 1Dp/ Sp/ ?p/ S/ =p0 ?p0 Sp0 ?p0 S~=.setsval0 .=~=/Truep1 /=p1 %?p3 ?s3 O&3 AX3 .string-C ;X > nout of-C ;` > memory -C ;h > in gsubpC >Z DpC SC =~?mflagpD A?~?numpE A?~@apF @ pF  P pF  SF =pG ?pG SG =pG @ pG ?~?cpG ?pH Q&H AXH p DpY SY )=pZ '?rZ O&Z \AXZ M gsubgsua_ ?p_ Sa_ ?p_ Sp_ *? _ ,=p_ ? _  C_ p_ Sp_ =p_  Sa_ *?p_ Sp_ >u Dp_ S_ )=p_ ,=p_ (= p`   W` iz Dph Sh )=ph ? pi *?Ci *?pi   Ci  pi  ?ri P oi  Opj ? pj ? aj  Q&j *?Tj <-k ;x > bgsubg-k ; > sub resu-k ; > lt0 %.30-k ; > s too bi-k ; > g; can't-k ; > happenpk > Dpk Spk ?pk Sk =pk ? pl A?Wl 4 Dpq Sq )=pq (= Ws  gsubgsuav ?pv Sav ?pv Spv *?pv ? v   v Apv Spv =pv  Sav *?pv Spv > Dpv Sv )=pv (= pw '?rw O&w \AXw  Dp| S| )=p| (= p}   W}   bgsubg- ; > sub resu- ; > lt1 %.30- ; > s too bi- ; > g; can't- ; > happenp > Dp Sp ?p S =p ? p A?W  Dp S )=W P gsubgsu- ; > b result- ; > 2 %.30s - ; > too big;- ; > can't hp > Dp Sp ?p S =p *?o AOp ?p Sp ?p S .=p ?s O& AX s appen~> exitcell5  >A~= jbreak5  =A~= files5  =A~= jret5  =A~>retcell5 >A~>tempcell5 >A~=env5 =A~=frame5 =A~=jcont5 =A~>nextcell5 >A~=fp5 =A~=nframe5 =A~=tmps5 =A5 $=A~=jexit5 =A~=curnode5 =A5 > A~>truecell5 >A~>nextfilecell5 >A~=jnext5 =A5 /=A~>contcell5 >A~=jnextfile5 =A~>breakcell5 >A~>falsecell5 >A~= winner5  =A~>!newcopycell$135 !>AI