( [0+8+FQ(+4)[1 0FO10F"G+Q1' +FQ()+4U1 FQ1"L0' ,Q1:M(Q1+4(]1]0)) sf&hy/H3C1b{zJ)\f m& Flash Matching Backquote& Setup BACKQ Library^R Backquoted ,^R Backquoted @^R Show Matching Backquote~DIRECTORY~~DOC~ & Flash Matching Backquote~DOC~ & Setup BACKQ Library~DOC~ ^R Backquoted ,~DOC~ ^R Backquoted @~DOC~ ^R Show Matching Backquote~DOC~ ~Filename~~Filename~~INVERT~@:i*|@ft(Not in backquote or too many commas)0fsechoactive |m.vBackquote: Too Many Commas :i*fgfo..qAnnounce Backquote Errorm.vAnnounce Backquote Error :i* :i*fo..QLisp Mode Hook[0 @:i*|0wm.m^R Backquoted ,m.q, m.m^R Show Matching Backquotem.q..` m.m^R Backquoted @f(m.q@w)m.q.w|m.vLisp Mode Hook.[0fnq0j[0 1:<-@fl(>"n.,b'"#)'::fb,"e :<-:@fl::fb,:;-ful>"l @ft(Not in comma context)0fsechoactivew0'' qBackquote: Too Many Commas[Announce Backquote Error qDisplay Matching Paren0:"g q0"e2'"#-q0'[Display Matching Paren' :m(m.m& Flash Matching Backquote)f@m(q )f :"g0' .[0fnq0j[0  ,-1a[0q0*5+1:g..D[1 q1-A"eq0-."n0'' q1-/"e0' r :m(m.m& Flash Matching Backquote)'f@m(qA)f :"g0' .[0fnq0j[0 0,-1a-,"e 2r:m(m.m& Flash Matching Backquote)' 0[0[1 qDisplay Matching Parenu1 0u0 :f"nb,.'"#)'::fb`,; 1a-`"eq0"ef;Done'%0' "#q0-1u0'> -ful>"l qAnnounce Backquote Errorf"n[0m0w]0' 0' q1"e0' q1"l.-(fswindow)"l0'' 0@v30*(q1): 0BACKQBackquote hacksS Set up , and ,@ and ,. to workr^R Show the ` corresponding to innermost , It is an error to invoke this command when not in a comma context.^R Flash backquote matching this ,-like charr^R Flash backquote matching this @-like char. Will work fairly well for ,. also by just putting this on dot S Internal entry to flashing `, pairs u& Setup BACKQ Library ^R Show Matching Backquote ^R Backquoted , ^R Backquoted @ & Flash Matching Backquote +8+fq(+4)[20[3 <%3,-q2f2u3q3&1@;q3"l0'> f[BBindq3-1*5,q3*5g2q:..o(0)+q2