home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
kermit.columbia.edu
/
kermit.columbia.edu.tar
/
kermit.columbia.edu
/
modcomp
/
cltoc.
< prev
next >
Wrap
Text File
|
1987-01-25
|
393b
|
28 lines
$PROD CLTOC KERMIT KER LMU NONE
$ASS USL %2 SI USL SO SO
$POS %1
$IF %4=NONE,P/$EXE FR5,,$23,$4E,NOLO,NOMAP
$IFN %4=NONE,P/$EXE FR5,,$23,$4E
$WEO SO
$REW SO
$ASS SI SO BI BI BO BO
$EXE M5A,,NOLO,NOSC
$WEO BO
$REW BO
$ASS BI BO
$IF %4=NONE,P/$EXE M4EDIT,,NOMAP;$EXE M4EDIT
ASS UL ULC
LIB UL
EDIT MAIN BI
EXIT
$WEO BO
$REW BO
$ASS BI BO
$EXE TOC
FIL %3
NOVERIFY
OVER %1
CAT
EXIT
$ENDDO