|
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_03b8fe
└─⟦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 0120 | | .CONST 0x0120 ; 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 001b | | .CONST 0x001b ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0001 | | .CONST 0x0001 ; Number of locals 001b BODY_0018: 001b INIT_0018: 001b 00ea | | Load_Encached Null_String_Cache 001c 4801 |H | Short_Literal 0x1 001d 4805 |H | Short_Literal 0x5 001e e001 | | Load 0x0,0x1 001f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0020 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0021 035b | [ | Declare_Type Array,Constrained 0022 0337 | 7 | Declare_Variable Array 0023 0092 0092 | | Action Push_String_Extended,0x92 ; "NATIVE_WORKING" 0025 0092 0093 | | Action Push_String_Extended,0x93 ; "NATIVE11_0_SPEC" 0027 0092 0094 | | Action Push_String_Extended,0x94 ; "TARGET" 0029 0092 0095 | | Action Push_String_Extended,0x95 ; "!DEB" 002b e001 | | Load 0x0,0x1 002c 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002d 180f | | Execute Package,Field_Execute,Field_Number 0xf 002e e001 | | Load 0x0,0x1 002f 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0030 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0031 0119 | | Execute Any,Check_In_Formal_Type 0032 4801 |H | Short_Literal 0x1 0033 00da | | Load_Top At_Offset_2 0034 01d6 | | Execute Vector,Field_Write 0035 0092 0092 | | Action Push_String_Extended,0x92 ; "NATIVE_WORKING" 0037 0092 0096 | | Action Push_String_Extended,0x96 ; "NATIVE10_1_SPEC" 0039 0092 0097 | | Action Push_String_Extended,0x97 ; "HOST" 003b 0092 0095 | | Action Push_String_Extended,0x95 ; "!DEB" 003d e001 | | Load 0x0,0x1 003e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 003f 180f | | Execute Package,Field_Execute,Field_Number 0xf 0040 e001 | | Load 0x0,0x1 0041 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0042 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0043 0119 | | Execute Any,Check_In_Formal_Type 0044 4802 |H | Short_Literal 0x2 0045 00da | | Load_Top At_Offset_2 0046 01d6 | | Execute Vector,Field_Write 0047 0092 0092 | | Action Push_String_Extended,0x92 ; "NATIVE_WORKING" 0049 0092 0093 | | Action Push_String_Extended,0x93 ; "NATIVE11_0_SPEC" 004b 0092 0098 | | Action Push_String_Extended,0x98 ; "DEBUG_SUPPORT" 004d 0092 0095 | | Action Push_String_Extended,0x95 ; "!DEB" 004f e001 | | Load 0x0,0x1 0050 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0051 180f | | Execute Package,Field_Execute,Field_Number 0xf 0052 e001 | | Load 0x0,0x1 0053 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0054 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0055 0119 | | Execute Any,Check_In_Formal_Type 0056 4803 |H | Short_Literal 0x3 0057 00da | | Load_Top At_Offset_2 0058 01d6 | | Execute Vector,Field_Write 0059 0092 0099 | | Action Push_String_Extended,0x99 ; "REV2_0" 005b 0092 009a | | Action Push_String_Extended,0x9a ; "REV2_SPEC" 005d 0092 009b | | Action Push_String_Extended,0x9b ; "VERSION" 005f 0092 009c | | Action Push_String_Extended,0x9c ; "!CC" 0061 e001 | | Load 0x0,0x1 0062 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0063 180f | | Execute Package,Field_Execute,Field_Number 0xf 0064 e001 | | Load 0x0,0x1 0065 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0066 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0067 0119 | | Execute Any,Check_In_Formal_Type 0068 4804 |H | Short_Literal 0x4 0069 00da | | Load_Top At_Offset_2 006a 01d6 | | Execute Vector,Field_Write 006b 0092 009d | | Action Push_String_Extended,0x9d ; "NATIVE10_RELEASE" 006d 0092 009e | | Action Push_String_Extended,0x9e ; "NATIVE10_SPEC" 006f 0092 009f | | Action Push_String_Extended,0x9f ; "TEST_SUPPORT" 0071 0092 0095 | | Action Push_String_Extended,0x95 ; "!DEB" 0073 e001 | | Load 0x0,0x1 0074 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0075 180f | | Execute Package,Field_Execute,Field_Number 0xf 0076 e001 | | Load 0x0,0x1 0077 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0078 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0079 0119 | | Execute Any,Check_In_Formal_Type 007a 4805 |H | Short_Literal 0x5 007b 00da | | Load_Top At_Offset_2 007c 01d6 | | Execute Vector,Field_Write 007d 0092 00a0 | | Action Push_String_Extended,0xa0 ; "!DEB.CLI.R1000_ACTIVITY" 007f 0092 00a1 | | Action Push_String_Extended,0xa1 ; "11.1.6.3" 0081 0092 00a2 | | Action Push_String_Extended,0xa2 ; "June 3, 1991" 0083 0092 00a3 | | Action Push_String_Extended,0xa3 ; "10:10:25 AM" 0085 0092 00a4 | | Action Push_String_Extended,0xa4 ; "S_1" 0087 0092 00a5 | | Action Push_String_Extended,0xa5 ; "PEG" 0089 0092 00a6 | | Action Push_String_Extended,0xa6 ; "468255" 008b 0092 00a7 | | Action Push_String_Extended,0xa7 ; "ARIADNE - Debugger Development" 008d e001 | | Load 0x0,0x1 008e 1b0e | | Execute Package,Field_Read,Field_Number 0xe 008f 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0090 8002 | | Call 0x0,0x2 0091 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0092 ; -------------------------------------------------------------------------------------- 0092 ; STRING TABLE 0092 ; -------------------------------------------------------------------------------------- 0092 002e | . | .STRTAB 0x002e->0x00a9 ; "NATIVE_WORKING" 0093 003a | : | .STRTAB 0x003a->0x00b0 ; "NATIVE11_0_SPEC" 0094 0047 | G | .STRTAB 0x0047->0x00b7 ; "TARGET" 0095 004b | K | .STRTAB 0x004b->0x00ba ; "!DEB" 0096 004d | M | .STRTAB 0x004d->0x00bc ; "NATIVE10_1_SPEC" 0097 005a | Z | .STRTAB 0x005a->0x00c4 ; "HOST" 0098 005c | \ | .STRTAB 0x005c->0x00c6 ; "DEBUG_SUPPORT" 0099 0067 | g | .STRTAB 0x0067->0x00cc ; "REV2_0" 009a 006b | k | .STRTAB 0x006b->0x00cf ; "REV2_SPEC" 009b 0072 | r | .STRTAB 0x0072->0x00d4 ; "VERSION" 009c 0077 | w | .STRTAB 0x0077->0x00d7 ; "!CC" 009d 0078 | x | .STRTAB 0x0078->0x00d9 ; "NATIVE10_RELEASE" 009e 0086 | | .STRTAB 0x0086->0x00e1 ; "NATIVE10_SPEC" 009f 0091 | | .STRTAB 0x0091->0x00e7 ; "TEST_SUPPORT" 00a0 009b | | .STRTAB 0x009b->0x00ed ; "!DEB.CLI.R1000_ACTIVITY" 00a1 00b0 | | .STRTAB 0x00b0->0x00f9 ; "11.1.6.3" 00a2 00b6 | | .STRTAB 0x00b6->0x00fd ; "June 3, 1991" 00a3 00c0 | | .STRTAB 0x00c0->0x0103 ; "10:10:25 AM" 00a4 00c9 | | .STRTAB 0x00c9->0x0108 ; "S_1" 00a5 00ca | | .STRTAB 0x00ca->0x010a ; "PEG" 00a6 00cb | | .STRTAB 0x00cb->0x010b ; "468255" 00a7 00cf | | .STRTAB 0x00cf->0x010e ; "ARIADNE - Debugger Development" 00a8 00eb | | .STREND 0x00eb->0x011d 00a9 4e41 5449 |NATI| .STRTAB_STRINGS 011e 0000 0000 | | .XXX[0x2] 0120 ; -------------------------------------------------------------------------------------- 0120 ; Debug Table 0120 ; -------------------------------------------------------------------------------------- 0120 0004 000d | | .DEBUG4 0x0004,0x000d,0x9c36,0x0000,0x0001,0x0000 0126 e8d4 c5f1 | | .XXX[0xda] 0128 4d5d 2551 |M]%Q| 012a 0d21 f1f0 | ! | 012c cdf0 2905 | ) | 012e 3915 515d |9 Q]| 0130 3d49 2d7d |=I-}| 0132 4155 0931 |AU 1| 0134 250c f4f9 |% | 0136 495d f029 |I] )| 0138 48c4 c0c0 |H | 013a c17d 0d9c | } | 013c b915 b185 | | 013e 897d 3dc9 | }= | 0140 9195 c97d | }| 0142 31a5 cdd1 |1 | 0144 a5b9 9c29 | )| 0146 1905 314d | 1M| 0148 1429 48c4 | )H | 014a c0c0 c17d | }| 014c 0d9c b94d | M| 014e 959d 7d31 | }1| 0150 a5cd d1a5 | | 0152 b99c 2919 | ) | 0154 0531 4d14 | 1M | 0156 2948 c4c0 |)H | 0158 c0c1 7d0d | } | 015a 9cb9 05cd | | 015c b57d 31a5 | }1 | 015e cdd1 a5b9 | | 0160 9c29 1905 | ) | 0162 314d 1429 |1M )| 0164 4d95 b585 |M | 0166 b9d1 a58d | | 0168 ccb9 4dd5 | M | 016a 89cd e5cd | | 016c d195 b57d | }| 016e 25b9 d195 |% | 0170 c999 858d | | 0172 9429 1905 | ) | 0174 314d 1429 |1M )| 0176 4185 c9cd |A | 0178 95c8 b90d | | 017a bdb9 99a5 | | 017c 9dd5 c985 | | 017e d1a5 bdb8 | | 0180 28a1 48c5 |( H | 0182 10b0 8148 | H| 0184 c4c0 c0c0 | | 0186 a429 4d95 | )M | 0188 b585 b9d1 | | 018a a58d ccb9 | | 018c 19b1 859d | | 018e 7d25 b995 |}% | 0190 d9a5 d185 | | 0192 89b1 957d | }| 0194 15e1 8d95 | | 0196 c1d1 a5bd | | 0198 b9cc 2919 | ) | 019a 0531 4d14 | 1M | 019c 2911 95cd |) | 019e a59d b8b9 | | 01a0 41a1 85cd |A | 01a2 9428 f139 | ( 9| 01a4 bdb9 94f8 | | 01a6 294d 95b5 |)M | 01a8 85b9 d1a5 | | 01aa 8dcc b949 | I| 01ac 95a9 958d | | 01ae d17d 25b9 | }% | 01b0 95d9 a5d1 | | 01b2 8589 b195 | | 01b4 7d15 e18d |} | 01b6 95c1 d1a5 | | 01b8 bdb9 cc29 | )| 01ba 1905 314d | 1M| 01bc 1429 19bd | ) | 01be c9b5 85d0 | | 01c0 b905 b1a5 | | 01c2 9db9 b595 | | 01c4 b9d1 7d51 | }Q| 01c6 a1c9 95cd | | 01c8 a1bd b190 | | 01ca 2880 d0c0 |( | 01cc 2948 c4c0 |)H | 01ce c0c1 7d0d | } | 01d0 9cb9 0da1 | | 01d2 958d ad7d | }| 01d4 0dbd b5c1 | | 01d6 85d1 a589 | | 01d8 a5b1 a5d1 | | 01da e429 5149 | )QI| 01dc 5514 2948 |U )H| 01de c4c0 c0c1 | | 01e0 7d0d 9cb9 |} | 01e2 4185 9d95 |A | 01e4 7d31 a5b5 |}1 | 01e6 a5d0 2880 | ( | 01e8 e0c0 c0c0 | | 01ea 294d 95b5 |)M | 01ec 85b9 d1a5 | | 01ee 8dcc b925 | %| 01f0 9db9 bdc9 | | 01f2 957d 55b9 | }U | 01f4 cdd5 c1c1 | | 01f6 bdc9 d195 | | 01f8 917d 4995 | }I | 01fa c17d 4dc1 | }M | 01fc 958d cc29 | )| 01fe 1905 314d | 1M|