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

⟦b6245f702⟧ TextFile

    Length: 768 (0x300)
    Types: TextFile
    Names: »pxposedi«

Derivation

└─⟦a41ae585a⟧ Bits:30001842 SW-save af projekt 1000, Alarm-system
    └─⟦72244f0ef⟧ 
        └─⟦this⟧ »pxposedi« 

TextFile

job oer 8 200 time 11 0 area 10 size 100000
source=edit pxposjob
m e
l./job/
d./finis/,d
l./"vers/
r/4./5./
l./testbufpool/,d
l./insert auto/,l1
i/
init_modul(1);
init_modul(2);
init_modul(4);
init_modul(6);
/
l./"a": (* alloc *)/
d./end (* alloc*);/
l./"c": (* create *)/
d./end create/
l./"h": (* help *)/
d./end;/
l./"p": (* partial words *)/
d./end (* partial *);/
f
paposlst=set 1 disc1
paposlst= indent source mark lc
listc=cross paposlst
o paposerr
head 1
pascal80 spacing.3000 codesize.3000 xtenv,
evaenv xncpenv xpoolenv xrouenv routenv testenv source
o c
lookup pass6code
if ok.yes
(paposbin=set 1 disc1
paposbin=move pass6code
scope user paposbin
)
paposlst=copy listc paposerr
scope user paposlst
scope user paposerr
finis output.no
▶EOF◀