|
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 00f8 | | .CONST 0x00f8 ; 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 0019 | | .CONST 0x0019 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000f | | .CONST 0x000f ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4807 |H | Short_Literal 0x7
000d 029f 0023 | #| Declare_Subprogram INIT_0020,For_Call
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
0012 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated
0014 00bf | | Action Accept_Activation
0015 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0016 00c7 | | Action Elaborate_Subprogram
0017 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0018 00c7 | | Action Elaborate_Subprogram
0019 BODY_0008:
0019 00bc | | Action Signal_Activated
001a 00bb | | Action Signal_Completion
001b 0000 0000 | | .BLANK 0000[0x5]
0020 ; --------------------------------------------------------------------------------------
0020 ; SUBPROGRAM
0020 ; --------------------------------------------------------------------------------------
0020 0023 | # | .CONST 0x0023 ; Address of begin
0021 0004 | | .CONST 0x0004 ; Address of exception handler
0022 0001 | | .CONST 0x0001 ; Number of locals
0023 BODY_0020:
0023 INIT_0020:
0023 4607 |F | Jump_Case 0x8
0024 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0025 7807 |x | Jump 0x2d ; case 0x1
0026 780a |x | Jump 0x31 ; case 0x2
0027 780e |x | Jump 0x36 ; case 0x3
0028 7811 |x | Jump 0x3a ; case 0x4
0029 7812 |x | Jump 0x3c ; case 0x5
002a 7813 |x | Jump 0x3e ; case 0x6
002b 7816 |x | Jump 0x42 ; case 0x7
002c 4302 |C | .XXX[0x1]
002d 00da | | Load_Top At_Offset_2
002e 0091 0095 | | Action Push_String_Extended_Indexed,0x95 ; "MAINTAINANCE_MODE"
0030 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0031 00db | | Load_Top At_Offset_3
0032 00db | | Load_Top At_Offset_3
0033 00e0 | | Load_Encached Standard_Cache
0034 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0035 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0036 00da | | Load_Top At_Offset_2
0037 00e0 | | Load_Encached Standard_Cache
0038 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0039 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
003a 00db | | Load_Top At_Offset_3
003b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
003c 00db | | Load_Top At_Offset_3
003d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
003e e20d | | Load 0x1,0xd
003f 00dc | | Load_Top At_Offset_4
0040 0267 | g | Execute Discrete,Predecessor
0041 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0042 e20d | | Load 0x1,0xd
0043 00dc | | Load_Top At_Offset_4
0044 0268 | h | Execute Discrete,Successor
0045 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0046 0000 0000 | | .XXX[0x2]
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b e5ff | | Load 0x2,-0x1
004c 4607 |F | Jump_Case 0x8
004d 780b |x | Jump 0x59 ; case 0x0
004e 780e |x | Jump 0x5d ; case 0x1
004f 7811 |x | Jump 0x61 ; case 0x2
0050 7814 |x | Jump 0x65 ; case 0x3
0051 7817 |x | Jump 0x69 ; case 0x4
0052 781a |x | Jump 0x6d ; case 0x5
0053 781d |x | Jump 0x71 ; case 0x6
0054 7800 |x | Jump 0x55 ; case 0x7
0055 480f |H | Short_Literal 0xf
0056 e002 | | Load 0x0,0x2
0057 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0058 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0059 4808 |H | Short_Literal 0x8
005a e002 | | Load 0x0,0x2
005b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
005c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
005d 4809 |H | Short_Literal 0x9
005e e002 | | Load 0x0,0x2
005f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0060 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0061 480a |H | Short_Literal 0xa
0062 e002 | | Load 0x0,0x2
0063 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0064 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0065 480b |H | Short_Literal 0xb
0066 e002 | | Load 0x0,0x2
0067 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0068 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0069 480c |H | Short_Literal 0xc
006a e002 | | Load 0x0,0x2
006b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
006c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
006d 480d |H | Short_Literal 0xd
006e e002 | | Load 0x0,0x2
006f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0070 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0071 480e |H | Short_Literal 0xe
0072 e002 | | Load 0x0,0x2
0073 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0074 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0075 0000 0000 | | .XXX[0x3]
0077 0000 | |
0078 ; --------------------------------------------------------------------------------------
0078 ; SUBPROGRAM
0078 ; --------------------------------------------------------------------------------------
0078 007b | { | .CONST 0x007b ; Address of begin
0079 0004 | | .CONST 0x0004 ; Address of exception handler
007a 0001 | | .CONST 0x0001 ; Number of locals
007b BODY_0078:
007b INIT_0078:
007b 00cf | | Action Mark_Auxiliary
007c e20d | | Load 0x1,0xd
007d 0265 | e | Execute Discrete,Reverse_Bounds
007e 0007 | | Action Break_Optional
007f 00d8 | | Load_Top At_Offset_0
0080 e20d | | Load 0x1,0xd
0081 011c | | Execute Any,Convert_Unchecked
0082 1c01 | | Execute_Immediate Run_Utility,0x1
0083 e003 | | Load 0x0,0x3
0084 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0085 0092 009d | | Action Push_String_Extended,0x9d ; " => "
0087 01cc | | Execute Vector,Catenate
0088 e404 | | Load 0x2,0x4
0089 820e | | Call 0x1,0xe
008a 00e1 | | Load_Encached Boolean_Cache
008b 011c | | Execute Any,Convert_Unchecked
008c 1c01 | | Execute_Immediate Run_Utility,0x1
008d e003 | | Load 0x0,0x3
008e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
008f 01cc | | Execute Vector,Catenate
0090 e004 | | Load 0x0,0x4
0091 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0092 00c8 | | Action Pop_Auxiliary_Range
0093 3feb |? | Loop_Increasing 0x7f
0094 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0095 ; --------------------------------------------------------------------------------------
0095 ; STRING TABLE
0095 ; --------------------------------------------------------------------------------------
0095 0014 | | .STRTAB 0x0014->0x009f ; "MAINTAINANCE_MODE"
0096 0023 | # | .STRTAB 0x0023->0x00a7 ; "KERNEL_DEBUGGER_AUTO_BOOT"
0097 003a | : | .STRTAB 0x003a->0x00b4 ; "KERNEL_DEBUGGER_WAIT_ON_CRASH"
0098 0055 | U | .STRTAB 0x0055->0x00c2 ; "KERNEL_DEBUGGER_DIALOUT_ON_CRASH"
0099 0073 | s | .STRTAB 0x0073->0x00d2 ; "MODEM_CAN_DIALOUT"
009a 0082 | | .STRTAB 0x0082->0x00db ; "MODEM_CAN_ANSWER"
009b 0090 | | .STRTAB 0x0090->0x00e3 ; "EEDB_AUTO_BOOT"
009c 009c | | .STRTAB 0x009c->0x00ea ; "KERNEL_AUTO_BOOT"
009d 00aa | | .STRTAB 0x00aa->0x00f2 ; " => "
009e 00ac | | .STREND 0x00ac->0x00f4
009f 4d41 494e |MAIN| .STRTAB_STRINGS
00f4 0000 0000 | | .BLANK 0000[0x4]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; Debug Table
00f8 ; --------------------------------------------------------------------------------------
00f8 0004 0011 | | .DEBUG4 0x0004,0x0011,0x238e,0x0000,0x0001,0x0000
00fe c9ea 08aa | | .XXX[0x3f]
0100 482a 8929 |H* )|
0102 e9ca 65ca | e |
0104 6a8a 48a8 |j H |
0106 29ab e928 |) (|
0108 800f d204 | |
010a 6000 8888 |` |
010c 2a88 22e0 |* " |
010e 01ea 6a88 | j |
0110 29c8 882a |) *|
0112 4885 ca6a |H j|
0114 8a49 29c8 | I) |
0116 e000 0000 | |
0118 0000 0000 | |
011a 000c 0000 | |
011c 0000 4000 | @ |
011e 001a 0006 | |
0120 5253 9511 |RS |
0122 5490 d210 |T |
0124 5391 d14b |S K|
0126 94d2 13d4 | |
0128 9517 d390 | |
012a 5515 5490 |U T |
012c 530f 1985 |S |
012e c006 5253 | RS|
0130 9511 5490 | T |
0132 d210 5391 | S |
0134 d14b 94d2 | K |
0136 13d4 9517 | |
0138 d253 9511 | S |
013a 51d1 5498 |Q T |
013c 4200 |B |
013d 0000 0000 | | .BLANK 0000[0x4]
0141 0385 c006 | | .XXX[0x75]
0143 5253 9511 |RS |
0145 5490 d210 |T |
0147 5391 d14b |S K|
0149 94d2 13d4 | |
014b 9517 d253 | S|
014d 9511 51d1 | Q |
014f 5485 c001 |T |
0151 1310 54d5 | T |
0153 0000 0000 | |
0155 0000 0003 | |
0157 0000 0000 | |
0159 8000 0048 | H|
015b 0011 a4a7 | |
015d 2a22 a921 |*" !|
015f a420 a723 | #|
0161 a297 27a8 | ' |
0163 22a9 20aa |" |
0165 24a7 a729 |$ )|
0167 9722 24a9 | "$ |
0169 a1a9 22aa | " |
016b 2297 23a2 |" # |
016d aa1e bdca | |
016f 3f48 1180 |?H |
0171 0223 2927 | #)'|
0173 a68b 8010 | |
0175 24a7 2a22 |$ *"|
0177 a921 a420 | ! |
0179 a723 a297 | # |
017b 27a8 22a9 |' " |
017d 20aa 24a7 | $ |
017f a729 9729 | ) )|
0181 aa29 22a0 | )" |
0183 a6af a4a2 | |
0185 003e c812 | > |
0187 8002 2220 | " |
0189 aa20 8b80 | |
018b 16a4 a72a | *|
018d 22a9 21a4 |" ! |
018f 20a7 23a2 | # |
0191 9727 a822 | ' "|
0193 a920 aa24 | $|
0195 a7a7 2997 | ) |
0197 2224 a9a1 |"$ |
0199 a922 aa22 | " "|
019b 9722 24a9 | "$ |
019d a1a9 22aa | " |
019f 22af aa2c |" ,|
01a1 a822 8000 | " |
01a3 0000 0000 | |
01a5 0000 0036 | 6|
01a7 0000 0001 | |
01a9 0000 003c | <|
01ab 0011 494e | IN|
01ad 5445 5243 |TERC|
01af 4841 4e47 |HANG|
01b1 452e 464c |E.FL|
01b3 4f41 543b |OAT;|
01b5 996d | m |
01b6 0000 0000 | | .BLANK 0000[0x4]
01ba 6617 0016 |f | .XXX[0xd]
01bc 494e 5445 |INTE|
01be 5243 4841 |RCHA|
01c0 4e47 455f |NGE_|
01c2 4445 4653 |DEFS|
01c4 2e46 4c4f |.FLO|
01c6 4154 |AT |
01c7 0000 0000 | | .BLANK 0000[0x5]
01cc 001c 0000 | | .XXX[0x34]
01ce 0002 0000 | |
01d0 0212 002c | ,|
01d2 929c a88a | |
01d4 a486 9082 | |
01d6 9c8e 8a5c | \|
01d8 9ea0 8aa4 | |
01da 82a8 929e | |
01dc 9ca6 831e | |
01de 7656 0012 |vV |
01e0 a6a8 a48a | |
01e2 829a be92 | |
01e4 8932 e080 | 2 |
01e6 2e00 10be |. |
01e8 869e 9a9a | |
01ea 8a9c a926 | &|
01ec 7a58 0006 |zX |
01ee a0aa a800 | |
01f0 f728 fd20 | ( |
01f2 4600 0892 |F |
01f4 9ca8 9e2e | .|
01f6 0040 929c | @ |
01f8 a88a a486 | |
01fa 9082 9c8e | |
01fc 8a5c 9ea0 | \ |
01fe 8aa4 82a8 | |