|
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_03bcfe
└─⟦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 00c8 | | .CONST 0x00c8 ; 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 8000 | | .CONST 0x8000 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0041 | A | .CONST 0x0041 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0005 | | .CONST 0x0005 ; Number of locals
001b INIT_0018:
001b 0092 007c | || Action Push_String_Extended,0x7c ; "!Users."
001d e002 | | Load 0x0,0x2
001e 1819 | | Execute Package,Field_Execute,Field_Number 0x19
001f e002 | | Load 0x0,0x2
0020 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0021 01cc | | Execute Vector,Catenate
0022 0092 007d | }| Action Push_String_Extended,0x7d ; ".Last_Error_Summary_Time"
0024 01cc | | Execute Vector,Catenate
0025 0092 007e | ~| Action Push_String_Extended,0x7e ; "<DEFAULT>"
0027 e5ff | | Load 0x2,-0x1
0028 8003 | | Call 0x0,0x3
0029 604e |`N | Indirect_Literal Discrete,0x78,{0x00000004, 0x9d400000}
002a e004 | | Load 0x0,0x4
002b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
002c e004 | | Load 0x0,0x4
002d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
002e 8005 | | Call 0x0,0x5
002f 00ea | | Load_Encached Null_String_Cache
0030 e402 | | Load 0x2,0x2
0031 8006 | | Call 0x0,0x6
0032 8007 | | Call 0x0,0x7
0033 4802 |H | Short_Literal 0x2
0034 4801 |H | Short_Literal 0x1
0035 4802 |H | Short_Literal 0x2
0036 e004 | | Load 0x0,0x4
0037 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0038 8008 | | Call 0x0,0x8
0039 0092 007f | | Action Push_String_Extended,0x7f ; "!Machine.Temporary."
003b e002 | | Load 0x0,0x2
003c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
003d e002 | | Load 0x0,0x2
003e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
003f 01cc | | Execute Vector,Catenate
0040 0007 | | Action Break_Optional
0041 BODY_0018:
0041 00d8 | | Load_Top At_Offset_0
0042 e009 | | Load 0x0,0x9
0043 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0044 0092 0080 | | Action Push_String_Extended,0x80 ; "!Machine.Error_Logs"
0046 4800 |H | Short_Literal 0x0
0047 0092 0081 | | Action Push_String_Extended,0x81 ; "<CURRENT_OUTPUT>"
0049 e404 | | Load 0x2,0x4
004a e403 | | Load 0x2,0x3
004b 800a | | Call 0x0,0xa
004c 4802 |H | Short_Literal 0x2
004d e009 | | Load 0x0,0x9
004e 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
004f 0092 0080 | | Action Push_String_Extended,0x80 ; "!Machine.Error_Logs"
0051 e404 | | Load 0x2,0x4
0052 e403 | | Load 0x2,0x3
0053 6020 |` | Indirect_Literal Discrete,0x74,{0x00000000, 0x0000ea60}
0054 800b | | Call 0x0,0xb
0055 e009 | | Load 0x0,0x9
0056 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0057 00d8 | | Load_Top At_Offset_0
0058 800c | | Call 0x0,0xc
0059 4802 |H | Short_Literal 0x2
005a e009 | | Load 0x0,0x9
005b 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
005c 0092 0082 | | Action Push_String_Extended,0x82 ; "Last Error Summary => Date : "
005e e009 | | Load 0x0,0x9
005f 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0060 e402 | | Load 0x2,0x2
0061 800c | | Call 0x0,0xc
0062 e402 | | Load 0x2,0x2
0063 e009 | | Load 0x0,0x9
0064 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0065 4800 |H | Short_Literal 0x0
0066 4801 |H | Short_Literal 0x1
0067 4802 |H | Short_Literal 0x2
0068 e004 | | Load 0x0,0x4
0069 1812 | | Execute Package,Field_Execute,Field_Number 0x12
006a 8008 | | Call 0x0,0x8
006b e009 | | Load 0x0,0x9
006c 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
006d 00d8 | | Load_Top At_Offset_0
006e 800c | | Call 0x0,0xc
006f e009 | | Load 0x0,0x9
0070 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0071 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0072 0000 0000 | | .XXX[0x2]
0074 0000 0000 | | .LITERAL {0x00000000, 0x0000ea60}
0078 0000 0004 | | .LITERAL {0x00000004, 0x9d400000}
007c ; --------------------------------------------------------------------------------------
007c ; STRING TABLE
007c ; --------------------------------------------------------------------------------------
007c 0010 | | .STRTAB 0x0010->0x0084 ; "!Users."
007d 0015 | | .STRTAB 0x0015->0x0087 ; ".Last_Error_Summary_Time"
007e 002b | + | .STRTAB 0x002b->0x0093 ; "<DEFAULT>"
007f 0032 | 2 | .STRTAB 0x0032->0x0098 ; "!Machine.Temporary."
0080 0043 | C | .STRTAB 0x0043->0x00a1 ; "!Machine.Error_Logs"
0081 0054 | T | .STRTAB 0x0054->0x00ab ; "<CURRENT_OUTPUT>"
0082 0062 | b | .STRTAB 0x0062->0x00b3 ; "Last Error Summary => Date : "
0083 007d | } | .STREND 0x007d->0x00c1
0084 2155 7365 |!Use| .STRTAB_STRINGS
00c2 0000 0000 | | .BLANK 0000[0x6]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; Debug Table
00c8 ; --------------------------------------------------------------------------------------
00c8 0004 0011 | | .DEBUG4 0x0004,0x0011,0x238b,0x0000,0x0001,0x0000
00ce 2f28 0813 |/( | .XXX[0x15]
00d0 41f0 0813 |A |
00d2 1468 0814 | h |
00d4 076c 0409 | l |
00d6 b644 0000 | D |
00d8 9d72 2045 | r E|
00da e1e0 e000 | |
00dc 0000 0150 | P|
00de 32f1 396b |2 9k|
00e0 22a0 0000 |" |
00e2 a400 | |
00e3 0000 0000 | | .BLANK 0000[0x4]
00e7 5e36 8580 |^6 | .XXX[0x9]
00e9 0000 4000 | @ |
00eb 5e3a 8580 |^: |
00ed 0000 4000 | @ |
00ef 2600 |& |
00f0 0000 0000 | | .BLANK 0000[0x5]
00f5 178e a160 | `| .XXX[0x12]
00f7 0000 1008 | |
00f9 1178 7838 | xx8|
00fb 0000 0000 | |
00fd 5000 0000 |P |
00ff 9000 0599 | |
0101 e000 0000 | |
0103 2000 0000 | |
0105 c009 8000 | |
0107 0000 0000 | | .BLANK 0000[0x8]
010f 0206 5df7 | ] | .XXX[0x13]
0111 321e 9c00 |2 |
0113 0014 0000 | |
0115 0024 0001 | $ |
0117 6678 0000 |fx |
0119 0008 0000 | |
011b 0030 0000 | 0 |
011d 0018 0002 | |
011f 6e38 0813 |n8 |
0121 6a70 |jp |
0122 0000 0000 | | .BLANK 0000[0x4]
0126 0409 ca84 | | .XXX[0xe]
0128 0000 b00d | |
012a 2065 e177 | e w|
012c 99c3 4000 | @ |
012e 0150 32f0 | P2 |
0130 d222 4a20 | "J |
0132 0000 a000 | |
0134 0000 0000 | | .BLANK 0000[0x4]
0138 8046 8580 | F | .XXX[0x21]
013a 0000 4000 | @ |
013c 804a 8580 | J |
013e 0000 4000 | @ |
0140 0203 0802 | |
0142 2091 8000 | |
0144 0000 0000 | |
0146 2012 a160 | `|
0148 0000 1008 | |
014a 1978 5de9 | x] |
014c 2ee0 0000 |. |
014e 5000 0000 |P |
0150 9000 05fa | |
0152 e000 0000 | |
0154 2000 0000 | |
0156 4001 80c6 |@ |
0158 0088 | |
0159 0000 0000 | | .BLANK 0000[0x7]
0160 0206 5e17 | ^ | .XXX[0x25]
0162 7a4b b800 |zK |
0164 0014 0000 | |
0166 0024 0001 | $ |
0168 7eb8 0000 |~ |
016a 0008 0000 | |
016c 0010 0000 | |
016e 0018 0002 | |
0170 8dc0 0813 | |
0172 92f0 0813 | |
0174 8de8 0813 | |
0176 dee8 0409 | |
0178 dec4 0000 | |
017a b940 a036 | @ 6|
017c 5582 c000 |U |
017e 0000 0150 | P|
0180 1b2a c160 | * `|
0182 0000 0000 | |
0184 a000 | |
0185 0000 0000 | | .BLANK 0000[0x4]
0189 a078 8580 | x | .XXX[0x9]
018b 0000 4000 | @ |
018d a07a 8580 | z |
018f 0000 4000 | @ |
0191 2600 |& |
0192 0000 0000 | | .BLANK 0000[0x5]
0197 281e a160 |( `| .XXX[0x9]
0199 0000 1008 | |
019b 0d95 60b0 | ` |
019d 0000 0000 | |
019f 5000 |P |
01a0 0000 0000 | | .BLANK 0000[0x5]
01a5 2000 0000 | | .XXX[0x4]
01a7 0009 8000 | |
01a9 0000 0000 | | .BLANK 0000[0x8]
01b1 0206 5e30 | ^0| .XXX[0x5]
01b3 a5d5 4c00 | L |
01b5 0014 | |
01b6 0000 0000 | | .BLANK 0000[0x5]
01bb 0008 0000 | | .XXX[0x9]
01bd 0000 0000 | |
01bf 0018 0002 | |
01c1 ad48 0813 | H |
01c3 bb70 | p |
01c4 0000 0000 | | .BLANK 0000[0x4]
01c8 0409 f304 | | .XXX[0x31]
01ca 0002 e69d | |
01cc 207c d099 | | |
01ce b144 0000 | D |
01d0 0c90 4009 | @ |
01d2 b822 b920 | " |
01d4 0007 6400 | d |
01d6 0000 0000 | |
01d8 0000 0006 | |
01da 49fa 8500 |I |
01dc 0000 4006 | @ |
01de 49fc 8500 |I |
01e0 0000 4004 | @ |
01e2 c600 9800 | |
01e4 0000 0000 | |
01e6 0000 0001 | |
01e8 927f 2140 | !@|
01ea 0000 1008 | |
01ec 1ed7 d5b5 | |
01ee 51f0 0003 |Q |
01f0 2000 0000 | |
01f2 9000 0bca | |
01f4 8000 0000 | |
01f6 2000 0000 | |
01f8 2000 | |
01f9 0000 0000 | | .BLANK 0000[0x7]