PDP-10 Archive: emacs/xbasic.elib from mit_emacs_170_teco_1220 (original) (raw)

Trailing-Edge-PDP-10 Archives-mit_emacs_170_teco_1220- emacs/xbasic.elib

There are no other files named xbasic.elib in the archive.

(W [0+8+FQ(+4)[1 0FO10F"G+Q1' +FQ()+4U1 FQ1"L0' ,Q1:M(Q1+4(]1]0)) 

J:U\d
Yn+zL
_
S
P
!V
,<
9Y
H\
S& Do Replacements& Get Args& Get Values& Make T Variable& Print Symbol TablePre-CompileDIRECTORYDOC & Do ReplacementsDOC & Get ArgsDOC & Get ValuesDOC & Make T VariableDOC & Print Symbol TableDOC Pre-Compile

INVERTZ[0[1 U0 @:FOT0U1 QT[..O Q15J Q1"L10F(,0I)R' Q0,.FSWORD ,.+5FSWORD Q1h[10[2[3 <1D@:F,]FX1 .-Z"E:iBad Macro ArgumentFG' %2:\U3 :I3#3 Q3,Q1Mp 1A-]@;

1D B
[1[2 <@:F&%#{"L.-Z; 1A-{"E@:F}+1K!<!>' 1A-"!'!"E1C@:F"!'!+1L!<!>' 1A(FWFX1 )-#"E(1A-[)"EM(M.M& Get Args)'' 0@FOt1U2 Q2"E:I*Undefined Keyword, 1FG' "#G2FKC'

i   0[NA[C[V0[L[0[A <.-Z; 1A-{"E@:F}+1K!<!>' 1AF 

:"L1D!<!>' 1AF&%#U0 Q0:"L FWFXA1D Q0-0"E QL+110:\Uv ' Q0-1"E :Ivcn Qn-9"N%nW' "#0Un%cW' ' Q0-2"E 1:XV ' Qa,QvMp:"L :iKeyword Already Defined, aFG ' ' Q0"G 1K ' "# 4,%L*10\32I 1L '

B0[1[2 :<Q:T(%12-1)U2G2 11.I Q:T(Q12)U2G2 15.I12.I

W a
[A m.m& Make T Variable F[DFile G(HX*(F[BBind)) 5FSBCons 2U:t(0) JM(M.M& Get Values) JM(M.M& Do Replacements) Qbuffer filenamesF[DFILE et
BASeihpef HKM(M.M& Print Symbol Table) et
SYMeihpef 'C create a variable in the T bufferC C C C C g& Make T Variable & Get Args & Do Replacements & Get Values & Print Symbol Table Pre-Compile T+8+fq(+4)[20[3 <%3,-q2f2u3q3&1@;q3"l0'> f[BBindq3-15,q35g2q:..o(0)+q2