|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 1024 (0x400)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6148f2
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0050 | P | .CONST 0x0050 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0000 | | .CONST 0x0000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0011 | | .CONST 0x0011 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0002 | | .CONST 0x0002 ; Number of locals
000b INIT_0008:
000b 00da | | Load_Top At_Offset_2
000c 261c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1c
000d 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
000e e211 | | Load 0x1,0x11
000f 8024 | $ | Call 0x0,0x24
0010 801f | | Call 0x0,0x1f
0011 BODY_0008:
0011 0092 003b | ;| Action Push_String_Extended,0x3b ; " atom="
0013 e010 | | Load 0x0,0x10
0014 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0015 00db | | Load_Top At_Offset_3
0016 261c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1c
0017 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0018 8215 | | Call 0x1,0x15
0019 0092 003c | <| Action Push_String_Extended,0x3c ; " ("
001b e010 | | Load 0x0,0x10
001c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
001d 00d8 | | Load_Top At_Offset_0
001e e010 | | Load 0x0,0x10
001f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0020 0092 003d | =| Action Push_String_Extended,0x3d ; "), time="
0022 e010 | | Load 0x0,0x10
0023 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0024 00db | | Load_Top At_Offset_3
0025 261c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1c
0026 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0027 822a | * | Call 0x1,0x2a
0028 0092 003e | >| Action Push_String_Extended,0x3e ; ","
002a e010 | | Load 0x0,0x10
002b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
002c 4801 |H | Short_Literal 0x1
002d e010 | | Load 0x0,0x10
002e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
002f 0092 003f | ?| Action Push_String_Extended,0x3f ; " state="
0031 e010 | | Load 0x0,0x10
0032 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0033 00db | | Load_Top At_Offset_3
0034 261c |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1c
0035 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0036 8226 | & | Call 0x1,0x26
0037 4801 |H | Short_Literal 0x1
0038 e010 | | Load 0x0,0x10
0039 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
003a 4502 |E | Exit_Suprogram New_Top_Offset 0x2
003b ; --------------------------------------------------------------------------------------
003b ; STRING TABLE
003b ; --------------------------------------------------------------------------------------
003b 000c | | .STRTAB 0x000c->0x0041 ; " atom="
003c 0013 | | .STRTAB 0x0013->0x0045 ; " ("
003d 0013 | | .STRTAB 0x0013->0x0046 ; "), time="
003e 0019 | | .STRTAB 0x0019->0x004a ; ","
003f 0018 | | .STRTAB 0x0018->0x004b ; " state="
0040 0020 | | .STREND 0x0020->0x0050
0041 2020 2020 | | .STRTAB_STRINGS
0050 ; --------------------------------------------------------------------------------------
0050 ; Debug Table
0050 ; --------------------------------------------------------------------------------------
0050 0004 0000 | | .DEBUG4 0x0004,0x0000,0x687e,0x0000,0x0001,0x0001
0056 000b 005a | Z| .DBG4T 0x000b,0x005a,0x0001,0x0000
005a ; --------------------------------------------------------------------------------------
005a ; Debug chain
005a ; --------------------------------------------------------------------------------------
005a 0001 000b | | .DBGLEN 0x0001,0x000b
005c 000b 0011 | | .DBGLNO 0x000b,0x0011,0x0015,0x0019,0x001d,0x0020,0x0024,0x0028,0x002c,0x002f,0x0033,0x0037
0068 0000 0000 | | .BLANK 0000[0x198]