Google
 
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\dYn+zL_	SP!V,<9YH\S& Do Replacements& Get Args& Get Values& Make T Variable& Print Symbol TablePre-Compile~DIRECTORY~~DOC~ & Do Replacements~DOC~ & Get Args~DOC~ & Get Values~DOC~ & Make T Variable~DOC~ & Print Symbol Table~DOC~ Pre-Compile

~INVERT~Z[0[1
U0
@:FOT0U1
QT[..O
Q1*5J
Q1"L10F(,0I)R'
Q0,.FSWORD
,.+5FSWORD
Q1h[10[2[3
<1D@:F,]FX1
.-Z"E:i*Bad 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+1*10:\Uv
'
Q0-1"E
:Ivcn
Qn-9"N%nW'
"#0Un%cW'
'
Q0-2"E
1:XV
'
Qa,QvMp:"L
:i*Keyword Already Defined, aFG
'
'
Q0"G
1K
'
"#
4,%L*10\32I
1L
'
>
B0[1[2
:<Q:T(%1*2-1)U2G2
11.I
Q:T(Q1*2)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
etBASeihpef
HKM(M.M& Print Symbol Table)
etSYMeihpef
'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-1*5,q3*5g2q:..o(0)+q2