|
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: 3072 (0xc00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe, seg_03c0fe
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 04a0 | | .CONST 0x04a0 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 002e | . | .CONST 0x002e ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0014 | | .CONST 0x0014 ; Number of locals 000b INIT_0008: 000b 4800 |H | Short_Literal 0x0 000c 487f |H | Short_Literal 0x7f 000d 029f 0033 | 3| Declare_Subprogram INIT_0030,For_Call 000f 03fe | | Declare_Type Discrete,Defined,Visible 0010 4818 |H | Short_Literal 0x18 0011 483f |H? | Short_Literal 0x3f 0012 00da | | Load_Top At_Offset_2 0013 03f9 | | Declare_Type Discrete,Constrained,Visible 0014 4800 |H | Short_Literal 0x0 0015 4817 |H | Short_Literal 0x17 0016 00db | | Load_Top At_Offset_3 0017 03f9 | | Declare_Type Discrete,Constrained,Visible 0018 4840 |H@ | Short_Literal 0x40 0019 4857 |HW | Short_Literal 0x57 001a e20d | | Load 0x1,0xd 001b 03f9 | | Declare_Type Discrete,Constrained,Visible 001c 4858 |HX | Short_Literal 0x58 001d 485f |H_ | Short_Literal 0x5f 001e e20d | | Load 0x1,0xd 001f 03f9 | | Declare_Type Discrete,Constrained,Visible 0020 4860 |H` | Short_Literal 0x60 0021 486f |Ho | Short_Literal 0x6f 0022 e20d | | Load 0x1,0xd 0023 03f9 | | Declare_Type Discrete,Constrained,Visible 0024 4870 |Hp | Short_Literal 0x70 0025 487f |H | Short_Literal 0x7f 0026 e20d | | Load 0x1,0xd 0027 03f9 | | Declare_Type Discrete,Constrained,Visible 0028 4800 |H | Short_Literal 0x0 0029 4802 |H | Short_Literal 0x2 002a 029f 005b | [| Declare_Subprogram INIT_0058,For_Call 002c 03fe | | Declare_Type Discrete,Defined,Visible 002d 00bf | | Action Accept_Activation 002e BODY_0008: 002e 00bc | | Action Signal_Activated 002f 00bb | | Action Signal_Completion 0030 ; -------------------------------------------------------------------------------------- 0030 ; SUBPROGRAM 0030 ; -------------------------------------------------------------------------------------- 0030 0033 | 3 | .CONST 0x0033 ; Address of begin 0031 0004 | | .CONST 0x0004 ; Address of exception handler 0032 0001 | | .CONST 0x0001 ; Number of locals 0033 BODY_0030: 0033 INIT_0030: 0033 4607 |F | Jump_Case 0x8 0034 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0035 7807 |x | Jump 0x3d ; case 0x1 0036 780a |x | Jump 0x41 ; case 0x2 0037 780e |x | Jump 0x46 ; case 0x3 0038 7811 |x | Jump 0x4a ; case 0x4 0039 7812 |x | Jump 0x4c ; case 0x5 003a 7813 |x | Jump 0x4e ; case 0x6 003b 7816 |x | Jump 0x52 ; case 0x7 003c 4302 |C | .XXX[0x1] 003d 00da | | Load_Top At_Offset_2 003e 0091 007e | ~| Action Push_String_Extended_Indexed,0x7e ; "VAL_ALU_ZERO" 0040 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0041 00db | | Load_Top At_Offset_3 0042 00db | | Load_Top At_Offset_3 0043 00e0 | | Load_Encached Standard_Cache 0044 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0045 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0046 00da | | Load_Top At_Offset_2 0047 00e0 | | Load_Encached Standard_Cache 0048 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0049 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 004a 00db | | Load_Top At_Offset_3 004b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 004c 00db | | Load_Top At_Offset_3 004d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 004e e20d | | Load 0x1,0xd 004f 00dc | | Load_Top At_Offset_4 0050 0267 | g | Execute Discrete,Predecessor 0051 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0052 e20d | | Load 0x1,0xd 0053 00dc | | Load_Top At_Offset_4 0054 0268 | h | Execute Discrete,Successor 0055 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0056 0000 0000 | | .XXX[0x2] 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 00fe | | Action Push_String_Extended_Indexed,0xfe ; "EARLY" 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 e214 | | Load 0x1,0x14 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 e214 | | Load 0x1,0x14 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 0108 | | .STRTAB 0x0108->0x0102 ; "VAL_ALU_ZERO" 007f 0112 | | .STRTAB 0x0112->0x0108 ; "VAL_ALU_NONZERO" 0080 011f | | .STRTAB 0x011f->0x010f ; "VAL_ALU_A_LT_B" 0081 012b | + | .STRTAB 0x012b->0x0116 ; "VAL_SPARE1" 0082 0133 | 3 | .STRTAB 0x0133->0x011b ; "VAL_CNTR_ZERO" 0083 013e | > | .STRTAB 0x013e->0x0122 ; "VAL_SPARE2" 0084 0146 | F | .STRTAB 0x0146->0x0127 ; "VAL_ALU_NE_ZERO" 0085 0153 | S | .STRTAB 0x0153->0x012e ; "VAL_NOT_ALU_CARRY_32" 0086 0165 | e | .STRTAB 0x0165->0x0138 ; "VAL_ALU_CARRY" 0087 0170 | p | .STRTAB 0x0170->0x013f ; "VAL_ALU_OVERFLOW" 0088 017e | ~ | .STRTAB 0x017e->0x0147 ; "VAL_ALU_LT_ZERO" 0089 018b | | .STRTAB 0x018b->0x014e ; "VAL_ALU_GT_ZERO" 008a 0198 | | .STRTAB 0x0198->0x0156 ; "VAL_EQUAL_SIGN" 008b 01a4 | | .STRTAB 0x01a4->0x015d ; "VAL_SPARE3" 008c 01ac | | .STRTAB 0x01ac->0x0162 ; "VAL_SPARE4" 008d 01b4 | | .STRTAB 0x01b4->0x0167 ; "VAL_PREVIOUS" 008e 01be | | .STRTAB 0x01be->0x016d ; "ALU_32_ZERO" 008f 01c7 | | .STRTAB 0x01c7->0x0172 ; "ALU_48_ZERO" 0090 01d0 | | .STRTAB 0x01d0->0x0178 ; "ALU_MIDDLE_ZERO" 0091 01dd | | .STRTAB 0x01dd->0x017f ; "Q_BIT" 0092 01e0 | | .STRTAB 0x01e0->0x0182 ; "VAL_SNEAK_TRUE" 0093 01ec | | .STRTAB 0x01ec->0x0189 ; "M_BIT" 0094 01ef | | .STRTAB 0x01ef->0x018b ; "VAL_TRUE" 0095 01f5 | | .STRTAB 0x01f5->0x018f ; "VAL_FALSE" 0096 01fc | | .STRTAB 0x01fc->0x0194 ; "TYP_ALU_ZERO" 0097 0206 | | .STRTAB 0x0206->0x019a ; "TYP_ALU_NONZERO" 0098 0213 | | .STRTAB 0x0213->0x01a1 ; "TYP_ALU_A_GT_B" 0099 021f | | .STRTAB 0x021f->0x01a8 ; "TYP_SPARE1" 009a 0227 | ' | .STRTAB 0x0227->0x01ad ; "TYP_CNTR_ZERO" 009b 0232 | 2 | .STRTAB 0x0232->0x01b4 ; "TYP_SPARE2" 009c 023a | : | .STRTAB 0x023a->0x01b9 ; "TYP_ALU_EQ_ZERO" 009d 0247 | G | .STRTAB 0x0247->0x01c0 ; "TYP_NOT_ALU_CARRY_32" 009e 0259 | Y | .STRTAB 0x0259->0x01ca ; "TYP_ALU_CARRY" 009f 0264 | d | .STRTAB 0x0264->0x01d1 ; "TYP_ALU_OVERFLOW" 00a0 0272 | r | .STRTAB 0x0272->0x01d9 ; "TYP_ALU_LT_ZERO" 00a1 027f | | .STRTAB 0x027f->0x01e0 ; "TYP_ALU_GT_ZERO" 00a2 028c | | .STRTAB 0x028c->0x01e8 ; "TYP_EQUAL_SIGN" 00a3 0298 | | .STRTAB 0x0298->0x01ef ; "TYP_FALSE" 00a4 029f | | .STRTAB 0x029f->0x01f3 ; "TYP_TRUE" 00a5 02a5 | | .STRTAB 0x02a5->0x01f7 ; "TYP_PREVIOUS" 00a6 02af | | .STRTAB 0x02af->0x01fd ; "NOT_IN_OF_KIND_SET" 00a7 02bf | | .STRTAB 0x02bf->0x0206 ; "CLASS_A_EQ_LIT" 00a8 02cb | | .STRTAB 0x02cb->0x020d ; "CLASS_B_EQ_LIT" 00a9 02d7 | | .STRTAB 0x02d7->0x0214 ; "CLASS_A_EQ_B" 00aa 02e1 | | .STRTAB 0x02e1->0x021a ; "NOT_CLASS_A_B_LIT_EQ" 00ab 02f3 | | .STRTAB 0x02f3->0x0224 ; "PASSES_PRIVACY_A" 00ac 0301 | | .STRTAB 0x0301->0x022c ; "PASSES_PRIVACY_B" 00ad 030f | | .STRTAB 0x030f->0x0234 ; "PASSES_PRIVACY_FOR_LIMITED_OP" 00ae 032a | * | .STRTAB 0x032a->0x0243 ; "PASSES_PRIVACY_A_B" 00af 033a | : | .STRTAB 0x033a->0x024c ; "STACK_NAMES_NOT_EQ" 00b0 034a | J | .STRTAB 0x034a->0x0255 ; "PATHS_EQ" 00b1 0350 | P | .STRTAB 0x0350->0x0259 ; "FAILS_PRIVACY_FOR_STRUCTURE_OP" 00b2 036c | l | .STRTAB 0x036c->0x0268 ; "PASS_PRIVACY_BIT" 00b3 037a | z | .STRTAB 0x037a->0x0270 ; "B_BUS_32" 00b4 0380 | | .STRTAB 0x0380->0x0274 ; "B_BUS_33" 00b5 0386 | | .STRTAB 0x0386->0x0278 ; "B_BUS_34" 00b6 038c | | .STRTAB 0x038c->0x027c ; "B_BUS_35" 00b7 0392 | | .STRTAB 0x0392->0x0280 ; "B_BUS_36" 00b8 0398 | | .STRTAB 0x0398->0x0284 ; "NOT_B_BUS_33_34_OR_36" 00b9 03ab | | .STRTAB 0x03ab->0x028e ; "TYP_SPARE3" 00ba 03b3 | | .STRTAB 0x03b3->0x0293 ; "TYP_SPARE4" 00bb 03bb | | .STRTAB 0x03bb->0x0298 ; "TYP_SPARE5" 00bc 03c3 | | .STRTAB 0x03c3->0x029d ; "TYP_SPARE6" 00bd 03cb | | .STRTAB 0x03cb->0x02a2 ; "B_BUS_21" 00be 03d1 | | .STRTAB 0x03d1->0x02a6 ; "RESTARTABLE_AT_PC" 00bf 03e0 | | .STRTAB 0x03e0->0x02af ; "RESTARTABLE_AT_DEC" 00c0 03f0 | | .STRTAB 0x03f0->0x02b8 ; "LEX_IS_IMPORT" 00c1 03fb | | .STRTAB 0x03fb->0x02be ; "NOT_LEX_VALID" 00c2 0406 | | .STRTAB 0x0406->0x02c5 ; "NOT_TOS_LATCH_VALID" 00c3 0417 | | .STRTAB 0x0417->0x02ce ; "SAVED_LATCHED" 00c4 0422 | " | .STRTAB 0x0422->0x02d5 ; "PREVIOUSLY_LATCHED" 00c5 0432 | 2 | .STRTAB 0x0432->0x02de ; "MICRO_STACK_EMPTY" 00c6 0441 | A | .STRTAB 0x0441->0x02e6 ; "NO_CSA_UNDERFLOW" 00c7 044f | O | .STRTAB 0x044f->0x02ee ; "NO_CSA_OVERFLOW" 00c8 045c | \ | .STRTAB 0x045c->0x02f6 ; "NO_RESOLVE_MISS" 00c9 0469 | i | .STRTAB 0x0469->0x02fd ; "NO_TOS_OPTIMIZATION" 00ca 047a | z | .STRTAB 0x047a->0x0307 ; "NO_BREAK_CLASS" 00cb 0486 | | .STRTAB 0x0486->0x030e ; "NO_I_BUFFER_EMPTY" 00cc 0495 | | .STRTAB 0x0495->0x0316 ; "SEQ_SPARE1" 00cd 049d | | .STRTAB 0x049d->0x031b ; "DISPATCHING_READS_CONTROL_PRED" 00ce 04b9 | | .STRTAB 0x04b9->0x032a ; "REFRESH_MEMORY" 00cf 04c5 | | .STRTAB 0x04c5->0x0331 ; "SYSBUS_STATUS" 00d0 04d0 | | .STRTAB 0x04d0->0x0338 ; "SYSBUS_PACKET" 00d1 04db | | .STRTAB 0x04db->0x033e ; "SLICE_TIMER" 00d2 04e4 | | .STRTAB 0x04e4->0x0344 ; "GP_TIMER" 00d3 04ea | | .STRTAB 0x04ea->0x0348 ; "NOT_ANY_EARLY_MACRO" 00d4 04fb | | .STRTAB 0x04fb->0x0351 ; "NOT_PREVIOUSLY_LATCHED" 00d5 050f | | .STRTAB 0x050f->0x035c ; "NOT_FIELD_CHECK" 00d6 051c | | .STRTAB 0x051c->0x0364 ; "TYP_NZ_OR_VAL_NZ" 00d7 052a | * | .STRTAB 0x052a->0x036c ; "TYP_Z_OR_VAL_Z" 00d8 0536 | 6 | .STRTAB 0x0536->0x0373 ; "TYP_LE_OR_VAL_GE" 00d9 0544 | D | .STRTAB 0x0544->0x037b ; "COMBO_SPARE1" 00da 054e | N | .STRTAB 0x054e->0x0381 ; "TYP_OR_VAL_CNTR_NZ" 00db 055e | ^ | .STRTAB 0x055e->0x038a ; "COMBO_SPARE2" 00dc 0568 | h | .STRTAB 0x0568->0x0390 ; "TYP_NZ_OR_VAL_Z" 00dd 0575 | u | .STRTAB 0x0575->0x0397 ; "TYP_CARRY32_OR_VAL_CARRY32" 00de 058d | | .STRTAB 0x058d->0x03a4 ; "NOT_MEMORY_EXCEPTION" 00df 059f | | .STRTAB 0x059f->0x03ae ; "NOT_PHYSICAL_LAST" 00e0 05ae | | .STRTAB 0x05ae->0x03b7 ; "WRITE_LAST" 00e1 05b6 | | .STRTAB 0x05b6->0x03bc ; "CSA_HIT" 00e2 05bb | | .STRTAB 0x05bb->0x03bf ; "NOT_OFFSET_REG_BIT_0" 00e3 05cd | | .STRTAB 0x05cd->0x03c9 ; "NOT_CROSSWORD_FIELD" 00e4 05de | | .STRTAB 0x05de->0x03d3 ; "MAR_NEAR_TOP" 00e5 05e8 | | .STRTAB 0x05e8->0x03d9 ; "REFRESH_PENDING" 00e6 05f5 | | .STRTAB 0x05f5->0x03e0 ; "NOT_CSA_OUT_OF_RANGE" 00e7 0607 | | .STRTAB 0x0607->0x03ea ; "NOT_SCAVENGER_TRAP" 00e8 0617 | | .STRTAB 0x0617->0x03f3 ; "NOT_PAGE_CROSSING" 00e9 0626 | & | .STRTAB 0x0626->0x03fc ; "NOT_CACHE_MISS" 00ea 0632 | 2 | .STRTAB 0x0632->0x0403 ; "CYCLE_INCOMPLETE" 00eb 0640 | @ | .STRTAB 0x0640->0x040b ; "MAR_MODIFIED" 00ec 064a | J | .STRTAB 0x064a->0x0411 ; "CYCLE_INCOMPLETE_CLEAR_PAGE_CROSSING" 00ed 066c | l | .STRTAB 0x066c->0x0423 ; "MAR_WORD_NE_ZERO" 00ee 067a | z | .STRTAB 0x067a->0x042b ; "MULTIBIT_ERROR" 00ef 0686 | | .STRTAB 0x0686->0x0432 ; "CLEAR_NEW_PACKET" 00f0 0694 | | .STRTAB 0x0694->0x043a ; "STATUS_PENDING" 00f1 06a0 | | .STRTAB 0x06a0->0x0441 ; "CLEAR_NEW_STATUS" 00f2 06ae | | .STRTAB 0x06ae->0x0449 ; "SYS_SPARE1" 00f3 06b6 | | .STRTAB 0x06b6->0x044e ; "TRANSFER_COMPLETE" 00f4 06c5 | | .STRTAB 0x06c5->0x0456 ; "SYS_SPARE2" 00f5 06cd | | .STRTAB 0x06cd->0x045b ; "SYS_SPARE3" 00f6 06d5 | | .STRTAB 0x06d5->0x0460 ; "NOT_CHECKBIT_ERROR" 00f7 06e5 | | .STRTAB 0x06e5->0x0469 ; "SYS_SPARE4" 00f8 06ed | | .STRTAB 0x06ed->0x046e ; "NOT_TRANSMIT_ACTIVE" 00f9 06fe | | .STRTAB 0x06fe->0x0478 ; "SYS_SPARE5" 00fa 0706 | | .STRTAB 0x0706->0x047d ; "NOT_STATUS_OVERFLOW" 00fb 0717 | | .STRTAB 0x0717->0x0486 ; "SYS_SPARE6" 00fc 071f | | .STRTAB 0x071f->0x048b ; "SYS_SPARE7" 00fd 0727 | ' | .STRTAB 0x0727->0x0490 ; "SYS_SPARE8" 00fe 072f | / | .STRTAB 0x072f->0x0495 ; "EARLY" 00ff 0732 | 2 | .STRTAB 0x0732->0x0498 ; "LATE" 0100 0734 | 4 | .STRTAB 0x0734->0x049a ; "MEDIUM_LATE" 0101 073d | = | .STREND 0x073d->0x049f 0102 5641 4c5f |VAL_| .STRTAB_STRINGS 04a0 ; -------------------------------------------------------------------------------------- 04a0 ; Debug Table 04a0 ; -------------------------------------------------------------------------------------- 04a0 0004 0011 | | .DEBUG4 0x0004,0x0011,0x3493,0x0000,0x0001,0x0000 04a6 0000 0000 | | .BLANK 0000[0x15a]