|
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 00a0 | | .CONST 0x00a0 ; 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 001d | | .CONST 0x001d ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0004 | | .CONST 0x0004 ; Number of locals
000b INIT_0008:
000b 00da | | Load_Top At_Offset_2
000c 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
000d 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
000e e211 | | Load 0x1,0x11
000f 8024 | $ | Call 0x0,0x24
0010 801f | | Call 0x0,0x1f
0011 00db | | Load_Top At_Offset_3
0012 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0013 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
0014 e211 | | Load 0x1,0x11
0015 8024 | $ | Call 0x0,0x24
0016 801f | | Call 0x0,0x1f
0017 e5ff | | Load 0x2,-0x1
0018 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0019 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
001a e211 | | Load 0x1,0x11
001b 8024 | $ | Call 0x0,0x24
001c 801f | | Call 0x0,0x1f
001d BODY_0008:
001d 0092 006d | m| Action Push_String_Extended,0x6d ; " owner="
001f e010 | | Load 0x0,0x10
0020 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0021 e5ff | | Load 0x2,-0x1
0022 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0023 3404 |4 | Execute Record,Field_Reference,Field_Number 0x4
0024 822b | + | Call 0x1,0x2b
0025 0092 006e | n| Action Push_String_Extended,0x6e ; ", requestor="
0027 e010 | | Load 0x0,0x10
0028 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0029 e5ff | | Load 0x2,-0x1
002a 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
002b 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5
002c 822b | + | Call 0x1,0x2b
002d 0092 006f | o| Action Push_String_Extended,0x6f ; ", selection="
002f e010 | | Load 0x0,0x10
0030 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0031 e5ff | | Load 0x2,-0x1
0032 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0033 3406 |4 | Execute Record,Field_Reference,Field_Number 0x6
0034 8215 | | Call 0x1,0x15
0035 0092 0070 | p| Action Push_String_Extended,0x70 ; " ("
0037 e010 | | Load 0x0,0x10
0038 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0039 00da | | Load_Top At_Offset_2
003a e010 | | Load 0x0,0x10
003b 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
003c 0092 0071 | q| Action Push_String_Extended,0x71 ; "),"
003e e010 | | Load 0x0,0x10
003f 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0040 4801 |H | Short_Literal 0x1
0041 e010 | | Load 0x0,0x10
0042 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0043 0092 0072 | r| Action Push_String_Extended,0x72 ; " target="
0045 e010 | | Load 0x0,0x10
0046 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0047 e5ff | | Load 0x2,-0x1
0048 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0049 3407 |4 | Execute Record,Field_Reference,Field_Number 0x7
004a 8215 | | Call 0x1,0x15
004b 0092 0070 | p| Action Push_String_Extended,0x70 ; " ("
004d e010 | | Load 0x0,0x10
004e 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
004f 00d9 | | Load_Top At_Offset_1
0050 e010 | | Load 0x0,0x10
0051 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0052 0092 0073 | s| Action Push_String_Extended,0x73 ; "), property="
0054 e010 | | Load 0x0,0x10
0055 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0056 e5ff | | Load 0x2,-0x1
0057 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0058 3408 |4 | Execute Record,Field_Reference,Field_Number 0x8
0059 8215 | | Call 0x1,0x15
005a 0092 0070 | p| Action Push_String_Extended,0x70 ; " ("
005c e010 | | Load 0x0,0x10
005d 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
005e 00d8 | | Load_Top At_Offset_0
005f e010 | | Load 0x0,0x10
0060 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0061 0092 0074 | t| Action Push_String_Extended,0x74 ; "), time="
0063 e010 | | Load 0x0,0x10
0064 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0065 e5ff | | Load 0x2,-0x1
0066 261f |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x1f
0067 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0068 822a | * | Call 0x1,0x2a
0069 4801 |H | Short_Literal 0x1
006a e010 | | Load 0x0,0x10
006b 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
006c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
006d ; --------------------------------------------------------------------------------------
006d ; STRING TABLE
006d ; --------------------------------------------------------------------------------------
006d 0012 | | .STRTAB 0x0012->0x0076 ; " owner="
006e 001a | | .STRTAB 0x001a->0x007b ; ", requestor="
006f 0024 | $ | .STRTAB 0x0024->0x0081 ; ", selection="
0070 002e | . | .STRTAB 0x002e->0x0087 ; " ("
0071 002e | . | .STRTAB 0x002e->0x0088 ; "),"
0072 002e | . | .STRTAB 0x002e->0x0089 ; " target="
0073 0037 | 7 | .STRTAB 0x0037->0x008e ; "), property="
0074 0041 | A | .STRTAB 0x0041->0x0094 ; "), time="
0075 0047 | G | .STREND 0x0047->0x0098
0076 2020 2020 | | .STRTAB_STRINGS
0099 0000 0000 | | .BLANK 0000[0x7]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; Debug Table
00a0 ; --------------------------------------------------------------------------------------
00a0 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6882,0x0000,0x0001,0x0001
00a6 000b 00aa | | .DBG4T 0x000b,0x00aa,0x0001,0x0000
00aa ; --------------------------------------------------------------------------------------
00aa ; Debug chain
00aa ; --------------------------------------------------------------------------------------
00aa 0003 0015 | | .DBGLEN 0x0003,0x0015
00ac 000b 0011 | | .DBGLNO 0x000b,0x0011,0x0017,0x001d,0x0021,0x0025,0x0029,0x002d,0x0031,0x0035,0x0039,0x003c,0x0040,0x0043,0x0047,0x004b,0x004f,0x0052,0x0056,0x005a,0x005e,0x0061,0x0065,0x0069
00c4 0000 0000 | | .BLANK 0000[0x13c]