³ò bì©Ic@sèddklZlZlZdefd„ƒYZdefd„ƒYZdefd„ƒYZdefd „ƒYZd efd „ƒYZ ee ƒƒZ ee ƒƒZ d „Z d „Z d„Zd„Zedjo eƒndS(iÿÿÿÿ(tAbstractFeedertAbstractFiltertAbstractConsumert SExprReadercBsŒeZdZdZdZdZdZdZdZdZ eeeeeee d„Z d „Z d „Z d „Z d „Zd „Zd„ZRS(saUsage: reader = SExprReader(consumer) reader.feed("(this is (sexpr))") reader.close() t;s s t(t)t"s\c Cszti||ƒ||_||_||_||_||_||_||_|||||||_ |i ƒdS(N( Rt__init__t comment_begint comment_endt separatort paren_begint paren_endtquotetescapetspecialtreset( tselft next_filterR R R R R RR((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyRs        cCs d|GHdS(NsIgnore a close parenthesis: %d((Rti((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pytillegal_close_paren9s cCsd||fGHdS(Ns1Premature end of file: %d parens left, partial=%s((RRtx((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyt premature_eof=scCs:t|_t|_t|_d|_d|_g|_|S(Nt(tFalset incommenttinquotetinescapetsymtNonetbuildt build_stack(R((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyRBs      cCs!xt|ƒD] \}}|io||ij|_q |ip||ijo|i|7_t|_q ||ijo t|_q |i o#||i jo|i|7_q |ioD|i djo|i |iƒn|i i|iƒd|_n||ijo t|_q ||i jo|i |_ q ||ijoS|ii|i ƒg}|i djo ||_ q|i i|ƒ||_ q ||ijoa|i djo|i|ƒqt|iƒdjo|i |i ƒn|iiƒ|_ q q W|S(NRi(t enumerateRR RRRRRtTrueRRRRt feed_nexttappendR R R R Rtlentpop(RttokensRtctempty((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pytfeedMsD         cCsÄ|idjo‰|io |ii|iƒd|_nt|iƒdjo |i}n|id}d|_g|_|it|iƒ|ƒn|io|i|iƒnd|_|S(NRi(RRRR$R%R RR#(RR((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyt terminate‚s        cCsti|ƒ|iƒdS(N(RtcloseR+(R((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyR,—s  (t__name__t __module__t__doc__t COMMENT_BEGINt COMMENT_ENDt SEPARATORt PAREN_BEGINt PAREN_ENDtQUOTEtESCAPERRRRR*R+R,(((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyRs*    5 tSExprIllegalClosingParenErrorcBseZdZRS(s4It throws an exception with an ill-structured input.(R-R.R/(((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyR7ŸstSExprPrematureEOFErrorcBseZRS((R-R.(((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyR8¢stStrictSExprReadercBseZd„Zd„ZRS(cCst|ƒ‚dS(N(R7(RR((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyR¥scCst||ƒ‚dS(N(R8(RRR((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyR§s(R-R.RR(((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyR9¤s t_SExprStrConvertercBseZgZd„ZRS(cCstii|ƒdS(N(R:tresultsR$(Rts((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyR*¯s(R-R.R;R*(((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyR:­scCs)gt_tiƒi|ƒiƒtiS(sparse a string as a sexpr.(R:R;t_str_converterRR*R+(R<((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyt str2sexprµs cCs)gt_tiƒi|ƒiƒtiS(sparse a string as a sexpr.(R:R;t_str_converter_strictRR*R+(R<((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pytstr2sexpr_strictºs cCs6t|tƒp|Sndditt|ƒƒdS(s.convert a sexpr into Lisp-like representation.Rt R(t isinstancetlisttjointmapt sexpr2str(te((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyRFÃscCsxtdƒdddddgdggdggggjpt‚td ƒd d d d ggjpt‚tdƒdS(Ns5(this ;comment is (a test (sentences) (des()) (yo)))tthististattestt sentencestdestyosu(paren\(\)theses_in\#symbol "space in symbol" this\ way\ also. "escape is \"better than\" quote")sparen()theses_in#symbolsspace in symbolsthis way also.sescape is "better than" quotes(this (is (a (parial (sentence(R>tAssertionError(((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pyRKËs 8  t__main__N(t abstfilterRRRRt ValueErrorR7R8R9R:R=R?R>R@RFRKR-(((s@/afs/athena.mit.edu/user/g/e/geofft/snippets/barn-growl/sexpr.pys s