DataMuseum.dk

Presents historical artifacts from the history of:

RC4000/8000/9000

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about RC4000/8000/9000

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - metrics - download

⟦0f71d88b2⟧ TextFile

    Length: 1536 (0x600)
    Types: TextFile
    Names: »comalload«

Derivation

└─⟦621cfb9a2⟧ Bits:30002817 RC8000 Dump tape fra HCØ.  Detaljer om "HC8000" projekt.
    └─⟦0364f57e3⟧ 
        └─⟦this⟧ »comalload« 
└─⟦00964e8f7⟧ Bits:30007478 RC8000 Dump tape fra HCØ.
    └─⟦b2ec5d50f⟧ 
        └─⟦this⟧ »comalload« 

TextFile

;
; *** comalload: a file for loading the comal system ***
;

lookup comaldoc
if ok.no
comaldoc   =set 1

f=entry comalhelp comalhelp comalhelp 1
clear temp comalhelp

comalhelp  =entry 6 comaldoc
comalhelp  =copy f

nextfile f
tcomal     =entry 415 comaldoc
tcomal     =copy f

nextfile f
tcomalmove =entry 18 comaldoc
tcomalmove =copy f

nextfile f
tspoolfull =entry 5 comaldoc
tspoolfull =copy f

nextfile f
ttestbit   =entry 3 comaldoc
ttestbit   =copy f

nextfile f
twritedate =entry 16 comaldoc
twritedate =copy f

nextfile f
tdecomposef=entry 19 comaldoc
tdecomposef=copy f

nextfile f
tisotable  =entry 4 comaldoc
tisotable  =copy f

nextfile f
tchangeerr =entry 8 comaldoc
tchangeerr =copy f

nextfile f
comalsyntax=entry 30 comaldoc
comalsyntax=copy f

nextfile f
nametable  =entry 2 comaldoc
nametable  =copy f

nextfile f
tgenscan   =entry 5 comaldoc
tgenscan   =copy f

nextfile f
tgensyntax =entry 19 comaldoc
tgensyntax =copy f

nextfile f
basicerror =entry 14 comaldoc
basicerror =move f


nextfile f
load f.0
scope user,
          comalhelp   tcomal      tcomalmove  tspoolfull  ttestbit   ,
          twritedate  tdecomposef tisotable   tchangeerr  comalsyntax,
          nametable   tgenscan    tgensyntax  basicerror

c=message load completed
▶EOF◀