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

⟦2983ff7f9⟧ TextFile

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

Derivation

└─⟦01e83a425⟧ Bits:30008166 Bånd med SW8010 og SW8500 source code
    └─⟦75ff9bef3⟧ 
        └─⟦this⟧ »retalgp55tx «

TextFile

mode list.yes
algpass56tx=edit algpass53tx
; fejlrapport 21390 : pass 5 skal give variables alarm allerede når
;                     no of extern + no of globals >= 1951
;                     (2047-96)
;
l./page ...24/, r/rc 4.12.1970/ fgs 1990.11.16/
l./al. w1  f44./, d3, i/
     al. w1     f44.    ;
     sh  w2     1951    ;   if no of (ext+globals) > 1951 <*1951=2047-96 rs entries*> 
     sh  w0     -1      ;   or no of own cells < 0 then
     jl. w3     e5.     ;     alarm(<:variables:>);
/, p-4

l./page ...26/, l./m.jz/, r/83.03.30/90.11.16/
f

end










   

ci
▶EOF◀