|
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_0cc8f6
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0190 | | .CONST 0x0190 ; 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 0014 | | .CONST 0x0014 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000e | | .CONST 0x000e ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated
000d 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
000f 00bf | | Action Accept_Activation
0010 1d0d | | Execute_Immediate Reference_Lex_1,0xd
0011 00c7 | | Action Elaborate_Subprogram
0012 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0013 00c7 | | Action Elaborate_Subprogram
0014 BODY_0008:
0014 00bc | | Action Signal_Activated
0015 00bb | | Action Signal_Completion
0016 0000 0000 | | .XXX[0x2]
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 4801 |H | Short_Literal 0x1
001c 4809 |H | Short_Literal 0x9
001d e003 | | Load 0x0,0x3
001e 035b | [ | Declare_Type Array,Constrained
001f 0337 | 7 | Declare_Variable Array
0020 e004 | | Load 0x0,0x4
0021 0337 | 7 | Declare_Variable Array
0022 e005 | | Load 0x0,0x5
0023 8006 | | Call 0x0,0x6
0024 4800 |H | Short_Literal 0x0
0025 00da | | Load_Top At_Offset_2
0026 01d6 | | Execute Vector,Field_Write
0027 e004 | | Load 0x0,0x4
0028 01c3 | | Execute Vector,Check_In_Type
0029 8007 | | Call 0x0,0x7
002a 4801 |H | Short_Literal 0x1
002b 00da | | Load_Top At_Offset_2
002c 01d6 | | Execute Vector,Field_Write
002d e008 | | Load 0x0,0x8
002e 0337 | 7 | Declare_Variable Array
002f e009 | | Load 0x0,0x9
0030 800a | | Call 0x0,0xa
0031 4800 |H | Short_Literal 0x0
0032 00da | | Load_Top At_Offset_2
0033 01d6 | | Execute Vector,Field_Write
0034 e008 | | Load 0x0,0x8
0035 01c3 | | Execute Vector,Check_In_Type
0036 800b | | Call 0x0,0xb
0037 4802 |H | Short_Literal 0x2
0038 00da | | Load_Top At_Offset_2
0039 01d6 | | Execute Vector,Field_Write
003a e00c | | Load 0x0,0xc
003b 0337 | 7 | Declare_Variable Array
003c e00d | | Load 0x0,0xd
003d 800e | | Call 0x0,0xe
003e e00f | | Load 0x0,0xf
003f 8010 | | Call 0x0,0x10
0040 8011 | | Call 0x0,0x11
0041 4800 |H | Short_Literal 0x0
0042 00da | | Load_Top At_Offset_2
0043 01d6 | | Execute Vector,Field_Write
0044 e00c | | Load 0x0,0xc
0045 01c3 | | Execute Vector,Check_In_Type
0046 8012 | | Call 0x0,0x12
0047 4803 |H | Short_Literal 0x3
0048 00da | | Load_Top At_Offset_2
0049 01d6 | | Execute Vector,Field_Write
004a e013 | | Load 0x0,0x13
004b 0337 | 7 | Declare_Variable Array
004c 8014 | | Call 0x0,0x14
004d 4800 |H | Short_Literal 0x0
004e 00da | | Load_Top At_Offset_2
004f 01d6 | | Execute Vector,Field_Write
0050 e013 | | Load 0x0,0x13
0051 01c3 | | Execute Vector,Check_In_Type
0052 8015 | | Call 0x0,0x15
0053 4804 |H | Short_Literal 0x4
0054 00da | | Load_Top At_Offset_2
0055 01d6 | | Execute Vector,Field_Write
0056 e016 | | Load 0x0,0x16
0057 0337 | 7 | Declare_Variable Array
0058 8014 | | Call 0x0,0x14
0059 4800 |H | Short_Literal 0x0
005a 00da | | Load_Top At_Offset_2
005b 01d6 | | Execute Vector,Field_Write
005c e016 | | Load 0x0,0x16
005d 01c3 | | Execute Vector,Check_In_Type
005e 8017 | | Call 0x0,0x17
005f 4805 |H | Short_Literal 0x5
0060 00da | | Load_Top At_Offset_2
0061 01d6 | | Execute Vector,Field_Write
0062 e018 | | Load 0x0,0x18
0063 0337 | 7 | Declare_Variable Array
0064 8014 | | Call 0x0,0x14
0065 4800 |H | Short_Literal 0x0
0066 00da | | Load_Top At_Offset_2
0067 01d6 | | Execute Vector,Field_Write
0068 e018 | | Load 0x0,0x18
0069 01c3 | | Execute Vector,Check_In_Type
006a 8019 | | Call 0x0,0x19
006b 4806 |H | Short_Literal 0x6
006c 00da | | Load_Top At_Offset_2
006d 01d6 | | Execute Vector,Field_Write
006e e01a | | Load 0x0,0x1a
006f 0337 | 7 | Declare_Variable Array
0070 8014 | | Call 0x0,0x14
0071 4800 |H | Short_Literal 0x0
0072 00da | | Load_Top At_Offset_2
0073 01d6 | | Execute Vector,Field_Write
0074 e01a | | Load 0x0,0x1a
0075 01c3 | | Execute Vector,Check_In_Type
0076 801b | | Call 0x0,0x1b
0077 4807 |H | Short_Literal 0x7
0078 00da | | Load_Top At_Offset_2
0079 01d6 | | Execute Vector,Field_Write
007a e01c | | Load 0x0,0x1c
007b 0337 | 7 | Declare_Variable Array
007c 8014 | | Call 0x0,0x14
007d 4800 |H | Short_Literal 0x0
007e 00da | | Load_Top At_Offset_2
007f 01d6 | | Execute Vector,Field_Write
0080 e01c | | Load 0x0,0x1c
0081 01c3 | | Execute Vector,Check_In_Type
0082 801d | | Call 0x0,0x1d
0083 4808 |H | Short_Literal 0x8
0084 00da | | Load_Top At_Offset_2
0085 01d6 | | Execute Vector,Field_Write
0086 e01e | | Load 0x0,0x1e
0087 0337 | 7 | Declare_Variable Array
0088 8014 | | Call 0x0,0x14
0089 4800 |H | Short_Literal 0x0
008a 00da | | Load_Top At_Offset_2
008b 01d6 | | Execute Vector,Field_Write
008c e01e | | Load 0x0,0x1e
008d 01c3 | | Execute Vector,Check_In_Type
008e 801f | | Call 0x0,0x1f
008f 4809 |H | Short_Literal 0x9
0090 00da | | Load_Top At_Offset_2
0091 01d6 | | Execute Vector,Field_Write
0092 e003 | | Load 0x0,0x3
0093 01c6 | | Execute Vector,Convert_To_Formal
0094 00ca | | Action Exit_Nullary_Function
0095 0000 0000 | | .XXX[0x3]
0097 0000 | |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 0109 | | .CONST 0x0109 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0019 | | .CONST 0x0019 ; Number of locals
009b INIT_0098:
009b 4801 |H | Short_Literal 0x1
009c 00db | | Load_Top At_Offset_3
009d 01d5 | | Execute Vector,Field_Reference
009e 0007 | | Action Break_Optional
009f 4802 |H | Short_Literal 0x2
00a0 e5ff | | Load 0x2,-0x1
00a1 01d5 | | Execute Vector,Field_Reference
00a2 0007 | | Action Break_Optional
00a3 4803 |H | Short_Literal 0x3
00a4 e5ff | | Load 0x2,-0x1
00a5 01d5 | | Execute Vector,Field_Reference
00a6 0007 | | Action Break_Optional
00a7 4804 |H | Short_Literal 0x4
00a8 e5ff | | Load 0x2,-0x1
00a9 01d5 | | Execute Vector,Field_Reference
00aa 0007 | | Action Break_Optional
00ab 4805 |H | Short_Literal 0x5
00ac e5ff | | Load 0x2,-0x1
00ad 01d5 | | Execute Vector,Field_Reference
00ae 0007 | | Action Break_Optional
00af 4806 |H | Short_Literal 0x6
00b0 e5ff | | Load 0x2,-0x1
00b1 01d5 | | Execute Vector,Field_Reference
00b2 0007 | | Action Break_Optional
00b3 4807 |H | Short_Literal 0x7
00b4 e5ff | | Load 0x2,-0x1
00b5 01d5 | | Execute Vector,Field_Reference
00b6 0007 | | Action Break_Optional
00b7 4808 |H | Short_Literal 0x8
00b8 e5ff | | Load 0x2,-0x1
00b9 01d5 | | Execute Vector,Field_Reference
00ba 0007 | | Action Break_Optional
00bb 4809 |H | Short_Literal 0x9
00bc e5ff | | Load 0x2,-0x1
00bd 01d5 | | Execute Vector,Field_Reference
00be 0007 | | Action Break_Optional
00bf e020 | | Load 0x0,0x20
00c0 02ff | | Declare_Variable Variant_Record
00c1 4800 |H | Short_Literal 0x0
00c2 e407 | | Load 0x2,0x7
00c3 8021 | ! | Call 0x0,0x21
00c4 00d9 | | Load_Top At_Offset_1
00c5 016d | m | Execute Variant_Record,Structure_Write
00c6 e020 | | Load 0x0,0x20
00c7 02ff | | Declare_Variable Variant_Record
00c8 4800 |H | Short_Literal 0x0
00c9 e404 | | Load 0x2,0x4
00ca 8022 | " | Call 0x0,0x22
00cb 00d9 | | Load_Top At_Offset_1
00cc 016d | m | Execute Variant_Record,Structure_Write
00cd e020 | | Load 0x0,0x20
00ce 02ff | | Declare_Variable Variant_Record
00cf 4800 |H | Short_Literal 0x0
00d0 e40a | | Load 0x2,0xa
00d1 8023 | # | Call 0x0,0x23
00d2 00d9 | | Load_Top At_Offset_1
00d3 016d | m | Execute Variant_Record,Structure_Write
00d4 e020 | | Load 0x0,0x20
00d5 02ff | | Declare_Variable Variant_Record
00d6 4800 |H | Short_Literal 0x0
00d7 e403 | | Load 0x2,0x3
00d8 8024 | $ | Call 0x0,0x24
00d9 00d9 | | Load_Top At_Offset_1
00da 016d | m | Execute Variant_Record,Structure_Write
00db e020 | | Load 0x0,0x20
00dc 02ff | | Declare_Variable Variant_Record
00dd 4800 |H | Short_Literal 0x0
00de e405 | | Load 0x2,0x5
00df 8025 | % | Call 0x0,0x25
00e0 00d9 | | Load_Top At_Offset_1
00e1 016d | m | Execute Variant_Record,Structure_Write
00e2 e020 | | Load 0x0,0x20
00e3 02ff | | Declare_Variable Variant_Record
00e4 4800 |H | Short_Literal 0x0
00e5 e406 | | Load 0x2,0x6
00e6 8026 | & | Call 0x0,0x26
00e7 00d9 | | Load_Top At_Offset_1
00e8 016d | m | Execute Variant_Record,Structure_Write
00e9 e020 | | Load 0x0,0x20
00ea 02ff | | Declare_Variable Variant_Record
00eb 4800 |H | Short_Literal 0x0
00ec e408 | | Load 0x2,0x8
00ed 8027 | ' | Call 0x0,0x27
00ee 00d9 | | Load_Top At_Offset_1
00ef 016d | m | Execute Variant_Record,Structure_Write
00f0 e020 | | Load 0x0,0x20
00f1 02ff | | Declare_Variable Variant_Record
00f2 00d8 | | Load_Top At_Offset_0
00f3 1c00 | | Execute_Immediate Run_Utility,0x0
00f4 e020 | | Load 0x0,0x20
00f5 02ff | | Declare_Variable Variant_Record
00f6 00d8 | | Load_Top At_Offset_0
00f7 1c00 | | Execute_Immediate Run_Utility,0x0
00f8 e020 | | Load 0x0,0x20
00f9 02ff | | Declare_Variable Variant_Record
00fa 00d8 | | Load_Top At_Offset_0
00fb 1c00 | | Execute_Immediate Run_Utility,0x0
00fc e020 | | Load 0x0,0x20
00fd 02ff | | Declare_Variable Variant_Record
00fe 00d8 | | Load_Top At_Offset_0
00ff 1c00 | | Execute_Immediate Run_Utility,0x0
0100 e020 | | Load 0x0,0x20
0101 02ff | | Declare_Variable Variant_Record
0102 00d8 | | Load_Top At_Offset_0
0103 1c00 | | Execute_Immediate Run_Utility,0x0
0104 00e2 | | Load_Encached Integer_Cache
0105 e028 | ( | Load 0x0,0x28
0106 1b24 | $ | Execute Package,Field_Read,Field_Number 0x24
0107 0322 | " | Declare_Variable Record
0108 00e2 | | Load_Encached Integer_Cache
0109 BODY_0098:
0109 e029 | ) | Load 0x0,0x29
010a 4800 |H | Short_Literal 0x0
010b e402 | | Load 0x2,0x2
010c 802a | * | Call 0x0,0x2a
010d e02b | + | Load 0x0,0x2b
010e 802c | , | Call 0x0,0x2c
010f e414 | | Load 0x2,0x14
0110 016d | m | Execute Variant_Record,Structure_Write
0111 e414 | | Load 0x2,0x14
0112 4800 |H | Short_Literal 0x0
0113 e407 | | Load 0x2,0x7
0114 802d | - | Call 0x0,0x2d
0115 e411 | | Load 0x2,0x11
0116 e02b | + | Load 0x0,0x2b
0117 802e | . | Call 0x0,0x2e
0118 e02f | / | Load 0x0,0x2f
0119 802c | , | Call 0x0,0x2c
011a e413 | | Load 0x2,0x13
011b 016d | m | Execute Variant_Record,Structure_Write
011c e413 | | Load 0x2,0x13
011d e414 | | Load 0x2,0x14
011e 8030 | 0 | Call 0x0,0x30
011f e412 | | Load 0x2,0x12
0120 016d | m | Execute Variant_Record,Structure_Write
0121 e412 | | Load 0x2,0x12
0122 4800 |H | Short_Literal 0x0
0123 e404 | | Load 0x2,0x4
0124 8031 | 1 | Call 0x0,0x31
0125 e40d | | Load 0x2,0xd
0126 e414 | | Load 0x2,0x14
0127 8030 | 0 | Call 0x0,0x30
0128 e415 | | Load 0x2,0x15
0129 016d | m | Execute Variant_Record,Structure_Write
012a e415 | | Load 0x2,0x15
012b 4800 |H | Short_Literal 0x0
012c e403 | | Load 0x2,0x3
012d 8032 | 2 | Call 0x0,0x32
012e e40e | | Load 0x2,0xe
012f e415 | | Load 0x2,0x15
0130 8030 | 0 | Call 0x0,0x30
0131 e416 | | Load 0x2,0x16
0132 016d | m | Execute Variant_Record,Structure_Write
0133 00db | | Load_Top At_Offset_3
0134 4800 |H | Short_Literal 0x0
0135 e405 | | Load 0x2,0x5
0136 8033 | 3 | Call 0x0,0x33
0137 e40f | | Load 0x2,0xf
0138 e416 | | Load 0x2,0x16
0139 8030 | 0 | Call 0x0,0x30
013a 4800 |H | Short_Literal 0x0
013b e406 | | Load 0x2,0x6
013c 8034 | 4 | Call 0x0,0x34
013d e035 | 5 | Load 0x0,0x35
013e 4800 |H | Short_Literal 0x0
013f e409 | | Load 0x2,0x9
0140 8036 | 6 | Call 0x0,0x36
0141 e411 | | Load 0x2,0x11
0142 8037 | 7 | Call 0x0,0x37
0143 09ff | | Execute_Immediate Binary_Scale,-0x1
0144 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0145 00d8 | | Load_Top At_Offset_0
0146 8038 | 8 | Call 0x0,0x38
0147 4800 |H | Short_Literal 0x0
0148 e408 | | Load 0x2,0x8
0149 8039 | 9 | Call 0x0,0x39
014a e03a | : | Load 0x0,0x3a
014b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
014c e03a | : | Load 0x0,0x3a
014d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
014e e028 | ( | Load 0x0,0x28
014f 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0150 00da | | Load_Top At_Offset_2
0151 017d | } | Execute Record,Structure_Write
0152 00d9 | | Load_Top At_Offset_1
0153 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0154 602f |`/ | Indirect_Literal Discrete,0x184,{0x00000000, 0x0000ea60}
0155 0271 | q | Execute Discrete,Times
0156 005b | [ | Store_Top Discrete,At_Offset_3
0157 00da | | Load_Top At_Offset_2
0158 00da | | Load_Top At_Offset_2
0159 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
015a 4be8 |K | Short_Literal 0x3e8
015b 0271 | q | Execute Discrete,Times
015c 0273 | s | Execute Discrete,Plus
015d 005b | [ | Store_Top Discrete,At_Offset_3
015e 00da | | Load_Top At_Offset_2
015f 00da | | Load_Top At_Offset_2
0160 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0161 0273 | s | Execute Discrete,Plus
0162 005b | [ | Store_Top Discrete,At_Offset_3
0163 e03b | ; | Load 0x0,0x3b
0164 00db | | Load_Top At_Offset_3
0165 00e0 | | Load_Encached Standard_Cache
0166 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0167 0092 0188 | | Action Push_String_Extended,0x188 ; " "
0169 01cc | | Execute Vector,Catenate
016a e414 | | Load 0x2,0x14
016b 8037 | 7 | Call 0x0,0x37
016c 00e0 | | Load_Encached Standard_Cache
016d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
016e 01cc | | Execute Vector,Catenate
016f 0092 0188 | | Action Push_String_Extended,0x188 ; " "
0171 01cc | | Execute Vector,Catenate
0172 e411 | | Load 0x2,0x11
0173 8037 | 7 | Call 0x0,0x37
0174 00e0 | | Load_Encached Standard_Cache
0175 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0176 01cc | | Execute Vector,Catenate
0177 0092 0188 | | Action Push_String_Extended,0x188 ; " "
0179 01cc | | Execute Vector,Catenate
017a e412 | | Load 0x2,0x12
017b 8037 | 7 | Call 0x0,0x37
017c 00e0 | | Load_Encached Standard_Cache
017d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
017e 01cc | | Execute Vector,Catenate
017f 803c | < | Call 0x0,0x3c
0180 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0181 0000 0000 | | .XXX[0x3]
0183 0000 | |
0184 0000 0000 | | .LITERAL {0x00000000, 0x0000ea60}
0188 ; --------------------------------------------------------------------------------------
0188 ; STRING TABLE
0188 ; --------------------------------------------------------------------------------------
0188 0004 | | .STRTAB 0x0004->0x018a ; " "
0189 0003 | | .STREND 0x0003->0x018a
018a 2000 | | .STRTAB_STRINGS
018b 0000 0000 | | .BLANK 0000[0x5]
0190 ; --------------------------------------------------------------------------------------
0190 ; Debug Table
0190 ; --------------------------------------------------------------------------------------
0190 0004 0009 | | .DEBUG4 0x0004,0x0009,0x5290,0x0000,0x0001,0x0004
0196 000b 01a6 | | .DBG4T 0x000b,0x01a6,0x0000,0x0000
019a 0010 01aa | | .DBG4T 0x0010,0x01aa,0x0000,0x0000
019e 001b 01ae | | .DBG4T 0x001b,0x01ae,0x0002,0x0000
01a2 009b 01b1 | | .DBG4T 0x009b,0x01b1,0x0001,0x0000
01a6 ; --------------------------------------------------------------------------------------
01a6 ; Debug chain
01a6 ; --------------------------------------------------------------------------------------
01a6 0002 0000 | | .DBGLEN 0x0002,0x0000
01a8 000b 000d | | .DBGLNO 0x000b,0x000d
01aa ; --------------------------------------------------------------------------------------
01aa ; Debug chain
01aa ; --------------------------------------------------------------------------------------
01aa 0002 0000 | | .DBGLEN 0x0002,0x0000
01ac 0010 0012 | | .DBGLNO 0x0010,0x0012
01ae ; --------------------------------------------------------------------------------------
01ae ; Debug chain
01ae ; --------------------------------------------------------------------------------------
01ae 0000 0001 | | .DBGLEN 0x0000,0x0001
01b0 001b | | .DBGLNO 0x001b
01b1 ; --------------------------------------------------------------------------------------
01b1 ; Debug chain
01b1 ; --------------------------------------------------------------------------------------
01b1 0018 0014 | | .DBGLEN 0x0018,0x0014
01b3 009b 009f | | .DBGLNO 0x009b,0x009f,0x00a3,0x00a7,0x00ab,0x00af,0x00b3,0x00b7,0x00bb,0x00bf,0x00c6,0x00cd,0x00d4,0x00db,0x00e2,0x00e9,0x00f0,0x00f4,0x00f8,0x00fc,0x0100,0x0104,0x0105,0x0108,0x0109,0x010d,0x0111,0x0115,0x0118,0x011c,0x0121,0x0125,0x012a,0x012e,0x0133,0x0137,0x013d,0x0141,0x0145,0x014a,0x0152,0x0157,0x015e,0x0163
01df 0000 0000 | | .BLANK 0000[0x21]