|
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, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_040cf4
└─⟦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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 00d0 | | .CONST 0x00d0 ; 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 0064 | d | .CONST 0x0064 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0011 | | .CONST 0x0011 ; Number of locals 000b INIT_0008: 000b 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x00fa,0x8000,0x0000,0x0035,0x19b4,0x0000,0x0005 ; Debug Table 0x0.0x0 = 0xb,0xffff 000d 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe 000f 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd 0011 00bf | | Action Accept_Activation 0012 4800 |H | Short_Literal 0x0 ; Debug Table 0x1 = .DEBUG 0x0012,0x0102,0x8000,0x0000,0x0035,0x19c4,0x0000,0x0005 ; Debug Table 0x1.0x0 = 0x12,0xffff 0013 480f |H | Short_Literal 0xf 0014 00e8 | | Load_Encached Character_Cache 0015 02a0 | | Declare_Subprogram Null_Subprogram 0016 4801 |H | Short_Literal 0x1 0017 035d | ] | Declare_Type Array,Defined 0018 00d8 | | Load_Top At_Offset_0 0019 0337 | 7 | Declare_Variable Array 001a 00d8 | | Load_Top At_Offset_0 001b 0337 | 7 | Declare_Variable Array 001c 4830 |H0 | Short_Literal 0x30 001d 4800 |H | Short_Literal 0x0 001e 00da | | Load_Top At_Offset_2 001f 01d6 | | Execute Vector,Field_Write 0020 4831 |H1 | Short_Literal 0x31 0021 4801 |H | Short_Literal 0x1 0022 00da | | Load_Top At_Offset_2 0023 01d6 | | Execute Vector,Field_Write 0024 4832 |H2 | Short_Literal 0x32 0025 4802 |H | Short_Literal 0x2 0026 00da | | Load_Top At_Offset_2 0027 01d6 | | Execute Vector,Field_Write 0028 4833 |H3 | Short_Literal 0x33 0029 4803 |H | Short_Literal 0x3 002a 00da | | Load_Top At_Offset_2 002b 01d6 | | Execute Vector,Field_Write 002c 4834 |H4 | Short_Literal 0x34 002d 4804 |H | Short_Literal 0x4 002e 00da | | Load_Top At_Offset_2 002f 01d6 | | Execute Vector,Field_Write 0030 4835 |H5 | Short_Literal 0x35 0031 4805 |H | Short_Literal 0x5 0032 00da | | Load_Top At_Offset_2 0033 01d6 | | Execute Vector,Field_Write 0034 4836 |H6 | Short_Literal 0x36 0035 4806 |H | Short_Literal 0x6 0036 00da | | Load_Top At_Offset_2 0037 01d6 | | Execute Vector,Field_Write 0038 4837 |H7 | Short_Literal 0x37 0039 4807 |H | Short_Literal 0x7 003a 00da | | Load_Top At_Offset_2 003b 01d6 | | Execute Vector,Field_Write 003c 4838 |H8 | Short_Literal 0x38 003d 4808 |H | Short_Literal 0x8 003e 00da | | Load_Top At_Offset_2 003f 01d6 | | Execute Vector,Field_Write 0040 4839 |H9 | Short_Literal 0x39 0041 4809 |H | Short_Literal 0x9 0042 00da | | Load_Top At_Offset_2 0043 01d6 | | Execute Vector,Field_Write 0044 4841 |HA | Short_Literal 0x41 0045 480a |H | Short_Literal 0xa 0046 00da | | Load_Top At_Offset_2 0047 01d6 | | Execute Vector,Field_Write 0048 4842 |HB | Short_Literal 0x42 0049 480b |H | Short_Literal 0xb 004a 00da | | Load_Top At_Offset_2 004b 01d6 | | Execute Vector,Field_Write 004c 4843 |HC | Short_Literal 0x43 004d 480c |H | Short_Literal 0xc 004e 00da | | Load_Top At_Offset_2 004f 01d6 | | Execute Vector,Field_Write 0050 4844 |HD | Short_Literal 0x44 0051 480d |H | Short_Literal 0xd 0052 00da | | Load_Top At_Offset_2 0053 01d6 | | Execute Vector,Field_Write 0054 4845 |HE | Short_Literal 0x45 0055 480e |H | Short_Literal 0xe 0056 00da | | Load_Top At_Offset_2 0057 01d6 | | Execute Vector,Field_Write 0058 4846 |HF | Short_Literal 0x46 0059 480f |H | Short_Literal 0xf 005a 00da | | Load_Top At_Offset_2 005b 01d6 | | Execute Vector,Field_Write 005c 00d9 | | Load_Top At_Offset_1 005d 01d4 | | Execute Vector,Structure_Write 005e 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x1 = 0x5e,0xfffe 005f 00c7 | | Action Elaborate_Subprogram 0060 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x2 = 0x60,0xfffd 0061 00c7 | | Action Elaborate_Subprogram 0062 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x3 = 0x62,0xfffc 0063 00c7 | | Action Elaborate_Subprogram 0064 BODY_0008: 0064 00bc | | Action Signal_Activated 0065 00bb | | Action Signal_Completion 0066 0000 0000 | | .XXX[0x2] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 007f | | .CONST 0x007f ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0002 | | .CONST 0x0002 ; Number of locals 006b INIT_0068: 006b 4801 |H | Short_Literal 0x1 ; Debug Table 0x2 = .DEBUG 0x006b,0x010c,0x0002,0x0000,0x0035,0x19b4,0x0000,0x0006 ; Debug Table 0x2.0x0 = 0x6b,0xffff 006c e5fe | | Load 0x2,-0x2 006d 00e9 | | Load_Encached String_Cache 006e 0334 | 4 | Declare_Variable Array,With_Constraint 006f 00d8 | | Load_Top At_Offset_0 0070 01da | | Execute Vector,Bounds 0071 00e9 | | Load_Encached String_Cache 0072 035b | [ | Declare_Type Array,Constrained 0073 0337 | 7 | Declare_Variable Array 0074 00d8 | | Load_Top At_Offset_0 0075 01d9 | | Execute Vector,Reverse_Bounds 0076 0263 | c | Execute Discrete,Above_Bound 0077 7005 |p | Jump_Nonzero 0x7d 0078 4820 |H | Short_Literal 0x20 0079 00d9 | | Load_Top At_Offset_1 007a e403 | | Load 0x2,0x3 007b 01d6 | | Execute Vector,Field_Write 007c 3ffb |? | Loop_Increasing 0x78 007d 00d9 | | Load_Top At_Offset_1 007e 01d4 | | Execute Vector,Structure_Write 007f BODY_0068: 007f 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x1 = 0x7f,0x1 0080 01db | | Execute Vector,Length 0081 e5fe | | Load 0x2,-0x2 0082 027b | { | Execute Discrete,Greater_Equal 0083 680c |h | Jump_Zero 0x90 0084 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x2 = 0x84,0x2 0085 01dd | | Execute Vector,First 0086 e5ff | | Load 0x2,-0x1 0087 01dd | | Execute Vector,First 0088 e5fe | | Load 0x2,-0x2 0089 0273 | s | Execute Discrete,Plus 008a 0aff | | Execute_Immediate Plus,-0x1 008b 0248 | H | Execute Discrete,Check_In_Integer 008c e5ff | | Load 0x2,-0x1 008d 01cf | | Execute Vector,Slice_Read 008e 0335 | 5 | Declare_Variable Array,Duplicate 008f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0090 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x3 = 0x90,0x3 0091 e5fe | | Load 0x2,-0x2 0092 e5ff | | Load 0x2,-0x1 0093 01db | | Execute Vector,Length 0094 0272 | r | Execute Discrete,Minus 0095 0248 | H | Execute Discrete,Check_In_Integer 0096 00da | | Load_Top At_Offset_2 0097 01cf | | Execute Vector,Slice_Read 0098 e5ff | | Load 0x2,-0x1 0099 01cc | | Execute Vector,Catenate 009a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 009b 0000 0000 | | .BLANK 0000[0x5] 00a0 ; -------------------------------------------------------------------------------------- 00a0 ; SUBPROGRAM 00a0 ; -------------------------------------------------------------------------------------- 00a0 00a3 | | .CONST 0x00a3 ; Address of begin 00a1 0004 | | .CONST 0x0004 ; Address of exception handler 00a2 0001 | | .CONST 0x0001 ; Number of locals 00a3 BODY_00a0: 00a3 INIT_00a0: 00a3 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x00a3,0x0116,0x0002,0x0000,0x0035,0x19b4,0x0000,0x0013 ; Debug Table 0x3.0x0 = 0xa3,0x1 00a4 09fc | | Execute_Immediate Binary_Scale,-0x4 00a5 e211 | | Load 0x1,0x11 00a6 01d7 | | Execute Vector,Field_Read 00a7 00db | | Load_Top At_Offset_3 00a8 480f |H | Short_Literal 0xf 00a9 0279 | y | Execute Discrete,And 00aa e211 | | Load 0x1,0x11 00ab 01d7 | | Execute Vector,Field_Read 00ac 4801 |H | Short_Literal 0x1 00ad 4802 |H | Short_Literal 0x2 00ae 00e9 | | Load_Encached String_Cache 00af 0334 | 4 | Declare_Variable Array,With_Constraint 00b0 00da | | Load_Top At_Offset_2 00b1 4801 |H | Short_Literal 0x1 00b2 00da | | Load_Top At_Offset_2 00b3 01d6 | | Execute Vector,Field_Write 00b4 00d9 | | Load_Top At_Offset_1 00b5 4802 |H | Short_Literal 0x2 00b6 00da | | Load_Top At_Offset_2 00b7 01d6 | | Execute Vector,Field_Write 00b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00b9 0000 0000 | | .BLANK 0000[0x7] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00c3 | | .CONST 0x00c3 ; Address of begin 00c1 0004 | | .CONST 0x0004 ; Address of exception handler 00c2 0001 | | .CONST 0x0001 ; Number of locals 00c3 BODY_00c0: 00c3 INIT_00c0: 00c3 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x00c3,0x011a,0x0002,0x0000,0x0035,0x19b4,0x0000,0x001e ; Debug Table 0x4.0x0 = 0xc3,0x1 00c4 e001 | | Load 0x0,0x1 00c5 1b11 | | Execute Package,Field_Read,Field_Number 0x11 00c6 025b | [ | Execute Discrete,Check_In_Type 00c7 820e | | Call 0x1,0xe 00c8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00c9 0000 0000 | | .BLANK 0000[0x7] 00d0 ; -------------------------------------------------------------------------------------- 00d0 ; Debug Table 00d0 ; -------------------------------------------------------------------------------------- 00d0 0003 0005 | | .CONST 0x0003,0x0005 00d2 000b 00fa | | .DEBUG 0x000b,0x00fa,0x8000,0x0000,0x0035,0x19b4,0x0000,0x0005 00da 0012 0102 | | .DEBUG 0x0012,0x0102,0x8000,0x0000,0x0035,0x19c4,0x0000,0x0005 00e2 006b 010c | k | .DEBUG 0x006b,0x010c,0x0002,0x0000,0x0035,0x19b4,0x0000,0x0006 00ea 00a3 0116 | | .DEBUG 0x00a3,0x0116,0x0002,0x0000,0x0035,0x19b4,0x0000,0x0013 00f2 00c3 011a | | .DEBUG 0x00c3,0x011a,0x0002,0x0000,0x0035,0x19b4,0x0000,0x001e 00fa ; -------------------------------------------------------------------------------------- 00fa ; Debug3 Subtable 0x0 00fa ; -------------------------------------------------------------------------------------- 00fa 0003 0000 | | .DBG3TAB 0x0003,0x0000 00fc 000b ffff | | .CONST 0x000b,0xffff 00fe 000d fffe | | .CONST 0x000d,0xfffe 0100 000f fffd | | .CONST 0x000f,0xfffd 0102 ; -------------------------------------------------------------------------------------- 0102 ; Debug3 Subtable 0x1 0102 ; -------------------------------------------------------------------------------------- 0102 0004 0000 | | .DBG3TAB 0x0004,0x0000 0104 0012 ffff | | .CONST 0x0012,0xffff 0106 005e fffe | ^ | .CONST 0x005e,0xfffe 0108 0060 fffd | ` | .CONST 0x0060,0xfffd 010a 0062 fffc | b | .CONST 0x0062,0xfffc 010c ; -------------------------------------------------------------------------------------- 010c ; Debug3 Subtable 0x2 010c ; -------------------------------------------------------------------------------------- 010c 0001 0003 | | .DBG3TAB 0x0001,0x0003 010e 006b ffff | k | .CONST 0x006b,0xffff 0110 007f 0001 | | .CONST 0x007f,0x0001 0112 0084 0002 | | .CONST 0x0084,0x0002 0114 0090 0003 | | .CONST 0x0090,0x0003 0116 ; -------------------------------------------------------------------------------------- 0116 ; Debug3 Subtable 0x3 0116 ; -------------------------------------------------------------------------------------- 0116 0000 0001 | | .DBG3TAB 0x0000,0x0001 0118 00a3 0001 | | .CONST 0x00a3,0x0001 011a ; -------------------------------------------------------------------------------------- 011a ; Debug3 Subtable 0x4 011a ; -------------------------------------------------------------------------------------- 011a 0000 0001 | | .DBG3TAB 0x0000,0x0001 011c 00c3 0001 | | .CONST 0x00c3,0x0001 011e 0000 0000 | | .BLANK 0000[0xe2]