(W [0+8+FQ(+4)[1 0FO10F"G+Q1' +FQ()+4U1 FQ1"L0' ,Q1:M(Q1+4(]1]0)) y| _%p% 5. 5 @= TCMrX J_ i $w   ( 6* A5 F> AK 'Y kc gj & Find DEF& Find Method Def& Kill MINI Library& Setup MINI Library& Show Arglist& Show DocMini-Arglist Mini-Doc^R Mini-Find Tag^R Mini-Visit Tag~DIRECTORY~~DOC~ & Find DEF~DOC~ & Find Method Def~DOC~ & Kill MINI Library~DOC~ & Setup MINI Library~DOC~ & Show Arglist~DOC~ & Show Doc~DOC~ Mini-Arglist~DOC~ Mini-Doc~DOC~ ^R Mini-Find Tag~DOC~ ^R Mini-Visit Tag~DOC~ ~Filename~~Filename~ ~INVERT~km.m^R Mini-Find Tagu.., m.m^R Mini-Visit Tagu..., m.m^R Mini-Arglistu.a m.m^R Mini-Docu.d 1,m.m^R Mini-Find Tag-q..,"e0u..,' 1,m.m^R Mini-Visit Tag-q...,"e0u...,' 1,m.m^R Mini-Arglist-q.a"e0u.a' 1,m.m^R Mini-Doc-q.d"e0u.d' "1,(f):m(m.m^R Mini-Find Tag) [0[1[2[3[4[5[6[7[8[9[B qModeu0 :i*fo..QLast 0 Mini-Tagu1 1: :i*USM Unsupported Mode: 0fserr !Schlap! !Midas!> :i3  :i4: oDo-It !Teco!> :i3   ! :i4:! oDo-It !Scheme! !Lisp!> :i3 (DEF (SET :i4 oDo-It !Do-It! qBuffer NameuB .u7.u9 fnqBm(m.mSelect Buffer)q7j ff&1"n q1u2 :i*No more such tagsu8 oArg-Given' "#j :i*No such tagu8' ff&2"e 1,f Find 0 Def (1): u2' "# 1,f Visit 0 Def (1): u2' fq2"l0' fq2"eq1u2' "#q2m.vLast 0 Mini-Tag' !Arg-Given! <:s3"e q7j:i*8: 2fserr' fq4"eoInside' :fb4"l!Inside! 0l:fb2"lfkc fq4@; :fb4:;''> 0lq7:w.u7 ff&2"n [Last 0 Mini-Tag [Editor Type qEditor Type[0 fq0"g:i0, 0' :iEditor Type20 1fsmodech q9u7' 0,:i*<:@fll1a-;:@;l> .[0[10[2[30[4fnq0j 1:<-fulcmN @flx1q1u3 f~1LEXPR-SEND"eover' f~1SEND"e!ver!1u4@fllmN @flf~SELF"nouch' @fllmN !"!1a-'"ec' "#1a-:"nouch'' @flx1 <-ful10f~(defmethod@;>10c mN1a-("nouch'cmN @flx2 1f+0u3 q3"nok'"#ouch'' js(defun 1 >"n!uch!fg0' !k! :i*Cfsechodisplay q4"n@ft(:METHOD ' q3:fcu3@ft3:  mNm()(0fsechoactivew)+[1[2 :i*1 2)[3 j:s(defmethod (3"lq3f;Meth' 1:< s(defflavor 1 mN@fllmN1a-("n0' c.[4 >w09@flx*[1 1a-("n0:g1-|"nq1:fcu1' @ft1f~1NIL"n @ft ;lexpr'0' f[bbindwg1-djd :<:@flk1a-;"ek'"#i  1a-|"n@fl@fc'@fll'> zj1:<-@:flk>"ej@:flk'"#hk'hx1 f]bbind@ft(1)0].[1[2 1:)m.m& Show Arglist,m(m.m& Find DEF)%m.m& Show Doc,m(m.m& Find DEF)MINI:Pseduo Tags Hack for people who don't like tags tables(& Set things up for our neat library& Kill our library 3^R Get recursive edit on tag in current buffer. ^R Search for tag in current buffer. Defaults are kept per-mode. The following modes are permitted: Lisp, Scheme, Teco, Midas, Schlap 9S Finds function whose is at car of list cursor is in S ...S Shows arglist after fnS Shows doc for fn S ... S ...'& Setup MINI Library & Kill MINI Library ^R Mini-Visit Tag ^R Mini-Find Tag & Find DEF & Find Method Def & Show Arglist & Show Doc Mini-Arglist Mini-Doc T+8+fq(+4)[20[3 <%3,-q2f2u3q3&1@;q3"l0'> f[BBindq3-1*5,q3*5g2q:..o(0)+q2