|
DataMuseum.dkPresents historical artifacts from the history of: RC4000/8000/9000 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about RC4000/8000/9000 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - metrics - download
Length: 2304 (0x900)
Types: TextFile
Names: »lambdaenv«
└─⟦2c55ea56f⟧ Bits:30001844 SW-save af projekt 1000, Alarm-system
└─⟦6b41451d2⟧
└─⟦this⟧ »lambdaenv«
; file: lambdaenv
; revision 5
; jaba 81.05.18
;
; definition of standard constants
;
;*************************************
b. level, chainhead, exmask, expoint, exic,
chain, mkind, msize, mstart, owner, answer, mmsgchain, u1, u2, u3, u4,
entrypoint, exitpoint,
semchain, refchain, shadowchain, msgchain,
osem, oref, oshadow, lastparam,
rsexcfirst, cpexcfirst, mpexcfirst,
exappetite, exitappetite,
maxstack,
bonappetite,
timeroffset,
plinetab.
; fields in incarnation descriptor
level = 4 ; byte: current level
chainhead=15; chainhead
exmask = 19 ; word: hex(13)
expoint= 21 ; exceptionpoint
exic = 25 ; address: hex(19-21)
entrypoint = 37;
maxstack = 43 ; word: last word addr in process
semchain = 49 ; chain of semaphores
refchain = 53 ; chain of references
shadowchain = 57 ; chain of shadows
msgchain = 61 ; chain of messages
exitpoint = 65;
timeroffset = 41 ; own.timer
plinetab = 89; link to line table
; fields in message header
chain = 0 ;
mkind = 4 ;
msize = 6 ;
mstart = 8 ;
owner = 12;
answer = 16;
mmsgchain=20;
u1 = 28;
u2 = 29;
u3 = 30;
u4 = 31;
; procedure frame offsets
lastparam = -2
;exception constants
mpexcfirst = 1;
rsexcfirst = mpexcfirst + 30;
cpexcfirst = rsexcfirst + 5;
exappetite = 48; appetite for exception routine
exitappetite = -72; appetite for exit routine
bonappetite = exitappetite - 48; exit and exception appetites
; offsets to fields in system types.
osem = 4 ; offset to chain_field in a semaphore
oref = 4 ; - - - - - - reference
oshadow = 8 ; - - - - - - shadow
▶EOF◀