|
|
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: 1536 (0x600)
Types: TextFile
Names: »kkqt«
└─⟦667bb35d6⟧ Bits:30007480 RC8000 Dump tape fra HCØ.
└─⟦4334b4c0b⟧
└─⟦this⟧ »kkqt«
(kkq=slang list.no xref.no
)
s. a400,b20
p. <:fpnames:>
k=h55
a16=18 ; next proc
a301=30 ; prio
a35=52 ;quantum
a36=54 ; run time
a38=58 ; starttime
a39=62 ; start wait
a186=-6 ; cpu mask
a0: 0
a3: 0
al. w0 a5. ;
jl. w3 h31.-2 ; head
b0: rl w2 68 ;first proc
al. w3 a2. ; buffer addr
b1:
al w0 x2 ; proc addr
rs w0 x3
al w3 x3+2
rl w0 x2-a16+a35; quantum
rs w0 x3
al w3 x3+2
rl w0 x2-a16+a36+2; run time
ls w0 -8
rs w0 x3
al w3 x3+2
rl w0 x2-a16+a186; cpu mask
rs w0 x3
al w3 x3+2
dl w1 x2-a16+4
ds w1 x3+2
dl w1 x2-a16+8
ds w1 x3+6
al w3 x3+8 ;
rl w2 x2 ; next proc
se w2 68 ;
jl. b1. ;
al w3 x3-1
rs. w3 a0. ;
al. w2 a2. ;
b2: rl w0 x2
jl. w3 h32.-2
1<23+32<12+10
al w2 x2+2
rl w0 x2
jl. w3 h32.-2
1<23+32<12+10
al w2 x2+2
rl w0 x2
jl. w3 h32.-2
1<23+32<12+10
al w2 x2+2
rl w0 x2
jl. w3 h32.-2
1<23+32<12+10
al. w0 a1.
jl. w3 h31.-2
al w0 x2+2
jl. w3 h31.-2
al w0 x2+10
al w2 10
jl. w3 h26.-2
rl w2 0
sh. w2 (a0.)
jl. b2.
al w2 0
jl. h7. ; stop
a1: <: :>,0
a5: <:<10> addr quantum run time cpu mask name<10><0><0>:>
a2: 0,r.500
e.
e.
▶EOF◀