|
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, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1880e4
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 01c0 | | .CONST 0x01c0 ; 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 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 003f | ? | .CONST 0x003f ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0006 | | .CONST 0x0006 ; Number of locals
001b INIT_0018:
001b 0093 0000 | | push_full_address 0x0
001d 6036 |`6 | Indirect_Literal Discrete,0x54,{0x80000000, 0x00020000}
001e 0273 | s | Execute Discrete,Plus
001f e002 | | Load 0x0,0x2
0020 0273 | s | Execute Discrete,Plus
0021 e003 | | Load 0x0,0x3
0022 0273 | s | Execute Discrete,Plus
0023 00e8 | | Load_Encached Character_Cache
0024 00d8 | | Load_Top At_Offset_0
0025 012c | , | Execute Any,Size
0026 00d9 | | Load_Top At_Offset_1
0027 0266 | f | Execute Discrete,Bounds
0028 029f 005b | [| Declare_Subprogram INIT_0058,For_Call
002a 03fa | | Declare_Type Discrete,Defined,With_Size
002b 00cd | | Action Spare6_Action
002c 481e |H | Short_Literal 0x1e
002d e004 | | Load 0x0,0x4
002e 0387 | | Declare_Variable Package
002f 00d8 | | Load_Top At_Offset_0
0030 020f | | Execute Module,Activate
0031 e005 | | Load 0x0,0x5
0032 e006 | | Load 0x0,0x6
0033 00e8 | | Load_Encached Character_Cache
0034 e007 | | Load 0x0,0x7
0035 0387 | | Declare_Variable Package
0036 00d8 | | Load_Top At_Offset_0
0037 020f | | Execute Module,Activate
0038 00d8 | | Load_Top At_Offset_0
0039 1b10 | | Execute Package,Field_Read,Field_Number 0x10
003a 02c7 | | Declare_Variable Any
003b 00d8 | | Load_Top At_Offset_0
003c 1c00 | | Execute_Immediate Run_Utility,0x0
003d 00e8 | | Load_Encached Character_Cache
003e 00e1 | | Load_Encached Boolean_Cache
003f BODY_0018:
003f e008 | | Load 0x0,0x8
0040 e402 | | Load 0x2,0x2
0041 0096 | | Execute Package,Entry
0042 4861 |Ha | Short_Literal 0x61
0043 e009 | | Load 0x0,0x9
0044 e402 | | Load 0x2,0x2
0045 0096 | | Execute Package,Entry
0046 4861 |Ha | Short_Literal 0x61
0047 e009 | | Load 0x0,0x9
0048 e402 | | Load 0x2,0x2
0049 0096 | | Execute Package,Entry
004a 4862 |Hb | Short_Literal 0x62
004b e009 | | Load 0x0,0x9
004c e402 | | Load 0x2,0x2
004d 0096 | | Execute Package,Entry
004e e00a | | Load 0x0,0xa
004f e402 | | Load 0x2,0x2
0050 0096 | | Execute Package,Entry
0051 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0052 0000 0000 | | .XXX[0x2]
0054 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
0058 ; --------------------------------------------------------------------------------------
0058 ; SUBPROGRAM
0058 ; --------------------------------------------------------------------------------------
0058 005b | [ | .CONST 0x005b ; Address of begin
0059 0004 | | .CONST 0x0004 ; Address of exception handler
005a 0001 | | .CONST 0x0001 ; Number of locals
005b BODY_0058:
005b INIT_0058:
005b 4607 |F | Jump_Case 0x8
005c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
005d 7807 |x | Jump 0x65 ; case 0x1
005e 780a |x | Jump 0x69 ; case 0x2
005f 780e |x | Jump 0x6e ; case 0x3
0060 7811 |x | Jump 0x72 ; case 0x4
0061 7812 |x | Jump 0x74 ; case 0x5
0062 7813 |x | Jump 0x76 ; case 0x6
0063 7816 |x | Jump 0x7a ; case 0x7
0064 4302 |C | .XXX[0x1]
0065 00da | | Load_Top At_Offset_2
0066 0091 007e | ~| Action Push_String_Extended_Indexed,0x7e ; "NUL"
0068 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0069 00db | | Load_Top At_Offset_3
006a 00db | | Load_Top At_Offset_3
006b 00e0 | | Load_Encached Standard_Cache
006c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
006d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
006e 00da | | Load_Top At_Offset_2
006f 00e0 | | Load_Encached Standard_Cache
0070 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0071 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
0072 00db | | Load_Top At_Offset_3
0073 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0074 00db | | Load_Top At_Offset_3
0075 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0076 00e8 | | Load_Encached Character_Cache
0077 00dc | | Load_Top At_Offset_4
0078 0267 | g | Execute Discrete,Predecessor
0079 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
007a 00e8 | | Load_Encached Character_Cache
007b 00dc | | Load_Top At_Offset_4
007c 0268 | h | Execute Discrete,Successor
007d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
007e ; --------------------------------------------------------------------------------------
007e ; STRING TABLE
007e ; --------------------------------------------------------------------------------------
007e 0102 | | .STRTAB 0x0102->0x00ff ; "NUL"
007f 0103 | | .STRTAB 0x0103->0x0100 ; "SOH"
0080 0104 | | .STRTAB 0x0104->0x0102 ; "STX"
0081 0105 | | .STRTAB 0x0105->0x0103 ; "ETX"
0082 0106 | | .STRTAB 0x0106->0x0105 ; "EOT"
0083 0107 | | .STRTAB 0x0107->0x0106 ; "ENQ"
0084 0108 | | .STRTAB 0x0108->0x0108 ; "ACK"
0085 0109 | | .STRTAB 0x0109->0x0109 ; "BEL"
0086 010a | | .STRTAB 0x010a->0x010b ; "BS"
0087 010a | | .STRTAB 0x010a->0x010c ; "HT"
0088 010a | | .STRTAB 0x010a->0x010d ; "LF"
0089 010a | | .STRTAB 0x010a->0x010e ; "VT"
008a 010a | | .STRTAB 0x010a->0x010f ; "FF"
008b 010a | | .STRTAB 0x010a->0x0110 ; "CR"
008c 010a | | .STRTAB 0x010a->0x0111 ; "SO"
008d 010a | | .STRTAB 0x010a->0x0112 ; "SI"
008e 010a | | .STRTAB 0x010a->0x0113 ; "DLE"
008f 010b | | .STRTAB 0x010b->0x0114 ; "DC1"
0090 010c | | .STRTAB 0x010c->0x0116 ; "DC2"
0091 010d | | .STRTAB 0x010d->0x0117 ; "DC3"
0092 010e | | .STRTAB 0x010e->0x0119 ; "DC4"
0093 010f | | .STRTAB 0x010f->0x011a ; "NAK"
0094 0110 | | .STRTAB 0x0110->0x011c ; "SYN"
0095 0111 | | .STRTAB 0x0111->0x011d ; "ETB"
0096 0112 | | .STRTAB 0x0112->0x011f ; "CAN"
0097 0113 | | .STRTAB 0x0113->0x0120 ; "EM"
0098 0113 | | .STRTAB 0x0113->0x0121 ; "SUB"
0099 0114 | | .STRTAB 0x0114->0x0123 ; "ESC"
009a 0115 | | .STRTAB 0x0115->0x0124 ; "FS"
009b 0115 | | .STRTAB 0x0115->0x0125 ; "GS"
009c 0115 | | .STRTAB 0x0115->0x0126 ; "RS"
009d 0115 | | .STRTAB 0x0115->0x0127 ; "US"
009e 0115 | | .STRTAB 0x0115->0x0128 ; "' '"
009f 0116 | | .STRTAB 0x0116->0x012a ; "'!'"
00a0 0117 | | .STRTAB 0x0117->0x012b ; "'\x22'"
00a1 0118 | | .STRTAB 0x0118->0x012d ; "'#'"
00a2 0119 | | .STRTAB 0x0119->0x012e ; "'$'"
00a3 011a | | .STRTAB 0x011a->0x0130 ; "'%'"
00a4 011b | | .STRTAB 0x011b->0x0131 ; "'&'"
00a5 011c | | .STRTAB 0x011c->0x0133 ; "'''"
00a6 011d | | .STRTAB 0x011d->0x0134 ; "'('"
00a7 011e | | .STRTAB 0x011e->0x0136 ; "')'"
00a8 011f | | .STRTAB 0x011f->0x0137 ; "'*'"
00a9 0120 | | .STRTAB 0x0120->0x0139 ; "'+'"
00aa 0121 | ! | .STRTAB 0x0121->0x013a ; "','"
00ab 0122 | " | .STRTAB 0x0122->0x013c ; "'-'"
00ac 0123 | # | .STRTAB 0x0123->0x013d ; "'.'"
00ad 0124 | $ | .STRTAB 0x0124->0x013f ; "'/'"
00ae 0125 | % | .STRTAB 0x0125->0x0140 ; "'0'"
00af 0126 | & | .STRTAB 0x0126->0x0142 ; "'1'"
00b0 0127 | ' | .STRTAB 0x0127->0x0143 ; "'2'"
00b1 0128 | ( | .STRTAB 0x0128->0x0145 ; "'3'"
00b2 0129 | ) | .STRTAB 0x0129->0x0146 ; "'4'"
00b3 012a | * | .STRTAB 0x012a->0x0148 ; "'5'"
00b4 012b | + | .STRTAB 0x012b->0x0149 ; "'6'"
00b5 012c | , | .STRTAB 0x012c->0x014b ; "'7'"
00b6 012d | - | .STRTAB 0x012d->0x014c ; "'8'"
00b7 012e | . | .STRTAB 0x012e->0x014e ; "'9'"
00b8 012f | / | .STRTAB 0x012f->0x014f ; "':'"
00b9 0130 | 0 | .STRTAB 0x0130->0x0151 ; "';'"
00ba 0131 | 1 | .STRTAB 0x0131->0x0152 ; "'<'"
00bb 0132 | 2 | .STRTAB 0x0132->0x0154 ; "'='"
00bc 0133 | 3 | .STRTAB 0x0133->0x0155 ; "'>'"
00bd 0134 | 4 | .STRTAB 0x0134->0x0157 ; "'?'"
00be 0135 | 5 | .STRTAB 0x0135->0x0158 ; "'@'"
00bf 0136 | 6 | .STRTAB 0x0136->0x015a ; "'A'"
00c0 0137 | 7 | .STRTAB 0x0137->0x015b ; "'B'"
00c1 0138 | 8 | .STRTAB 0x0138->0x015d ; "'C'"
00c2 0139 | 9 | .STRTAB 0x0139->0x015e ; "'D'"
00c3 013a | : | .STRTAB 0x013a->0x0160 ; "'E'"
00c4 013b | ; | .STRTAB 0x013b->0x0161 ; "'F'"
00c5 013c | < | .STRTAB 0x013c->0x0163 ; "'G'"
00c6 013d | = | .STRTAB 0x013d->0x0164 ; "'H'"
00c7 013e | > | .STRTAB 0x013e->0x0166 ; "'I'"
00c8 013f | ? | .STRTAB 0x013f->0x0167 ; "'J'"
00c9 0140 | @ | .STRTAB 0x0140->0x0169 ; "'K'"
00ca 0141 | A | .STRTAB 0x0141->0x016a ; "'L'"
00cb 0142 | B | .STRTAB 0x0142->0x016c ; "'M'"
00cc 0143 | C | .STRTAB 0x0143->0x016d ; "'N'"
00cd 0144 | D | .STRTAB 0x0144->0x016f ; "'O'"
00ce 0145 | E | .STRTAB 0x0145->0x0170 ; "'P'"
00cf 0146 | F | .STRTAB 0x0146->0x0172 ; "'Q'"
00d0 0147 | G | .STRTAB 0x0147->0x0173 ; "'R'"
00d1 0148 | H | .STRTAB 0x0148->0x0175 ; "'S'"
00d2 0149 | I | .STRTAB 0x0149->0x0176 ; "'T'"
00d3 014a | J | .STRTAB 0x014a->0x0178 ; "'U'"
00d4 014b | K | .STRTAB 0x014b->0x0179 ; "'V'"
00d5 014c | L | .STRTAB 0x014c->0x017b ; "'W'"
00d6 014d | M | .STRTAB 0x014d->0x017c ; "'X'"
00d7 014e | N | .STRTAB 0x014e->0x017e ; "'Y'"
00d8 014f | O | .STRTAB 0x014f->0x017f ; "'Z'"
00d9 0150 | P | .STRTAB 0x0150->0x0181 ; "'['"
00da 0151 | Q | .STRTAB 0x0151->0x0182 ; "'\x5c'"
00db 0152 | R | .STRTAB 0x0152->0x0184 ; "']'"
00dc 0153 | S | .STRTAB 0x0153->0x0185 ; "'^'"
00dd 0154 | T | .STRTAB 0x0154->0x0187 ; "'_'"
00de 0155 | U | .STRTAB 0x0155->0x0188 ; "'`'"
00df 0156 | V | .STRTAB 0x0156->0x018a ; "'a'"
00e0 0157 | W | .STRTAB 0x0157->0x018b ; "'b'"
00e1 0158 | X | .STRTAB 0x0158->0x018d ; "'c'"
00e2 0159 | Y | .STRTAB 0x0159->0x018e ; "'d'"
00e3 015a | Z | .STRTAB 0x015a->0x0190 ; "'e'"
00e4 015b | [ | .STRTAB 0x015b->0x0191 ; "'f'"
00e5 015c | \ | .STRTAB 0x015c->0x0193 ; "'g'"
00e6 015d | ] | .STRTAB 0x015d->0x0194 ; "'h'"
00e7 015e | ^ | .STRTAB 0x015e->0x0196 ; "'i'"
00e8 015f | _ | .STRTAB 0x015f->0x0197 ; "'j'"
00e9 0160 | ` | .STRTAB 0x0160->0x0199 ; "'k'"
00ea 0161 | a | .STRTAB 0x0161->0x019a ; "'l'"
00eb 0162 | b | .STRTAB 0x0162->0x019c ; "'m'"
00ec 0163 | c | .STRTAB 0x0163->0x019d ; "'n'"
00ed 0164 | d | .STRTAB 0x0164->0x019f ; "'o'"
00ee 0165 | e | .STRTAB 0x0165->0x01a0 ; "'p'"
00ef 0166 | f | .STRTAB 0x0166->0x01a2 ; "'q'"
00f0 0167 | g | .STRTAB 0x0167->0x01a3 ; "'r'"
00f1 0168 | h | .STRTAB 0x0168->0x01a5 ; "'s'"
00f2 0169 | i | .STRTAB 0x0169->0x01a6 ; "'t'"
00f3 016a | j | .STRTAB 0x016a->0x01a8 ; "'u'"
00f4 016b | k | .STRTAB 0x016b->0x01a9 ; "'v'"
00f5 016c | l | .STRTAB 0x016c->0x01ab ; "'w'"
00f6 016d | m | .STRTAB 0x016d->0x01ac ; "'x'"
00f7 016e | n | .STRTAB 0x016e->0x01ae ; "'y'"
00f8 016f | o | .STRTAB 0x016f->0x01af ; "'z'"
00f9 0170 | p | .STRTAB 0x0170->0x01b1 ; "'{'"
00fa 0171 | q | .STRTAB 0x0171->0x01b2 ; "'|'"
00fb 0172 | r | .STRTAB 0x0172->0x01b4 ; "'}'"
00fc 0173 | s | .STRTAB 0x0173->0x01b5 ; "'~'"
00fd 0174 | t | .STRTAB 0x0174->0x01b7 ; "DEL"
00fe 0175 | u | .STREND 0x0175->0x01b8
00ff 4e55 4c53 |NULS| .STRTAB_STRINGS
01b9 0000 0000 | | .BLANK 0000[0x7]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; Debug Table
01c0 ; --------------------------------------------------------------------------------------
01c0 0004 0004 | | .DEBUG4 0x0004,0x0004,0xa132,0x0000,0x0001,0x0003
01c6 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
01ca 001b 01d2 | | .DBG4T 0x001b,0x01d2,0x8001,0x0000
01ce 005b 0000 | [ | .DBG4T 0x005b,0x0000,0x0005,0x0000
01d2 ; --------------------------------------------------------------------------------------
01d2 ; Debug chain
01d2 ; --------------------------------------------------------------------------------------
01d2 0005 0005 | | .DBGLEN 0x0005,0x0005
01d4 001b 0031 | 1| .DBGLNO 0x001b,0x0031,0x0038,0x003d,0x003e,0x003f,0x0042,0x0046,0x004a,0x004e
01de 0000 0000 | | .BLANK 0000[0x22]