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

⟦56d7c11e1⟧ TextFile

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

Derivation

└─⟦2c55ea56f⟧ Bits:30001844 SW-save af projekt 1000, Alarm-system
    └─⟦6b41451d2⟧ 
        └─⟦this⟧ »eminiexcept« 

TextFile

job jaba 8 600 time 11 0 perm disc 4 1
(ntexcept = set 1
ntexcept = edit texcept
if ok.no
finis
)

g 11/bprintexcep/bminiexcept/,
l./function asgnptradr(/, d./external;/,
l./function ult/, d./external/,
d./external/, ; getoflowmask
d./external/, ; setoflowmask

l./function usub/, 
d./end; (*printtext24/,

l./procedure print_called_from/,
l./const/, d./line, line/,
l./', line#/, d./until found;/,

l./printhex(excode/,
l./if cause_text='except/, d./end;(*case excode of../,


f

i ntexcept
▶EOF◀