|
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_779ce4
└─⟦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 00d8 | | .CONST 0x00d8 ; 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 0014 | | .CONST 0x0014 ; Address of begin 0009 0049 | I | .CONST 0x0049 ; Address of exception handler 000a 0006 | | .CONST 0x0006 ; Number of locals 000b INIT_0008: 000b e236 | 6 | Load 0x1,0x36 000c 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 000d e010 | | Load 0x0,0x10 000e 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 000f 00e1 | | Load_Encached Boolean_Cache 0010 029f 0053 | S| Declare_Subprogram INIT_0050,For_Call 0012 029f 009b | | Declare_Subprogram INIT_0098,For_Call 0014 BODY_0008: 0014 8238 | 8 | Call 0x1,0x38 0015 e5ff | | Load 0x2,-0x1 0016 e237 | 7 | Load 0x1,0x37 0017 180f | | Execute Package,Field_Execute,Field_Number 0xf 0018 a402 | | Store_Unchecked 0x2,0x2 0019 e402 | | Load 0x2,0x2 001a e236 | 6 | Load 0x1,0x36 001b 1842 | B | Execute Package,Field_Execute,Field_Number 0x42 001c 021f | | Execute Heap_Access,Equal 001d 700d |p | Jump_Nonzero 0x2b 001e 8405 | | Call 0x2,0x5 001f e010 | | Load 0x0,0x10 0020 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 0021 e5fe | | Load 0x2,-0x2 0022 805a | Z | Call 0x0,0x5a 0023 4800 |H | Short_Literal 0x0 0024 4801 |H | Short_Literal 0x1 0025 4800 |H | Short_Literal 0x0 0026 e402 | | Load 0x2,0x2 0027 e236 | 6 | Load 0x1,0x36 0028 1874 | t | Execute Package,Field_Execute,Field_Number 0x74 0029 c403 | | Store 0x2,0x3 002a 4505 |E | Exit_Suprogram New_Top_Offset 0x5 002b 8406 | | Call 0x2,0x6 002c e402 | | Load 0x2,0x2 002d e5ff | | Load 0x2,-0x1 002e 801e | | Call 0x0,0x1e 002f e236 | 6 | Load 0x1,0x36 0030 1876 | v | Execute Package,Field_Execute,Field_Number 0x76 0031 c402 | | Store 0x2,0x2 0032 e402 | | Load 0x2,0x2 0033 e5ff | | Load 0x2,-0x1 0034 e237 | 7 | Load 0x1,0x37 0035 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0036 e010 | | Load 0x0,0x10 0037 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 0038 e5fe | | Load 0x2,-0x2 0039 805a | Z | Call 0x0,0x5a 003a 4800 |H | Short_Literal 0x0 003b 4801 |H | Short_Literal 0x1 003c 4800 |H | Short_Literal 0x0 003d e402 | | Load 0x2,0x2 003e e236 | 6 | Load 0x1,0x36 003f 1874 | t | Execute Package,Field_Execute,Field_Number 0x74 0040 c403 | | Store 0x2,0x3 0041 e010 | | Load 0x0,0x10 0042 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 0043 e5ff | | Load 0x2,-0x1 0044 e402 | | Load 0x2,0x2 0045 e236 | 6 | Load 0x1,0x36 0046 1856 | V | Execute Package,Field_Execute,Field_Number 0x56 0047 c403 | | Store 0x2,0x3 0048 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0049 TRAP_0008: 0049 e040 | @ | Load 0x0,0x40 004a 010f | | Execute Exception,Equal 004b 6801 |h | Jump_Zero 0x4d 004c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 004d 0100 | | Execute Exception,Raise 004e 0000 0000 | | .XXX[0x2] 0050 ; -------------------------------------------------------------------------------------- 0050 ; SUBPROGRAM 0050 ; -------------------------------------------------------------------------------------- 0050 005a | Z | .CONST 0x005a ; Address of begin 0051 0004 | | .CONST 0x0004 ; Address of exception handler 0052 0003 | | .CONST 0x0003 ; Number of locals 0053 INIT_0050: 0053 e00b | | Load 0x0,0xb 0054 e402 | | Load 0x2,0x2 0055 e236 | 6 | Load 0x1,0x36 0056 1867 | g | Execute Package,Field_Execute,Field_Number 0x67 0057 0031 | 1 | Store_Top Heap_Access,At_Offset_1 0058 e010 | | Load 0x0,0x10 0059 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 005a BODY_0050: 005a 00d9 | | Load_Top At_Offset_1 005b 805b | [ | Call 0x0,0x5b 005c 7015 |p | Jump_Nonzero 0x72 005d e5ff | | Load 0x2,-0x1 005e 0217 | | Execute Heap_Access,All_Reference 005f 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 0060 00da | | Load_Top At_Offset_2 0061 0217 | | Execute Heap_Access,All_Reference 0062 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 0063 e05c | \ | Load 0x0,0x5c 0064 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0065 700c |p | Jump_Nonzero 0x72 0066 e5fe | | Load 0x2,-0x2 0067 805d | ] | Call 0x0,0x5d 0068 e5ff | | Load 0x2,-0x1 0069 0217 | | Execute Heap_Access,All_Reference 006a 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 006b 00db | | Load_Top At_Offset_3 006c 0217 | | Execute Heap_Access,All_Reference 006d 2c07 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x7 006e e05c | \ | Load 0x0,0x5c 006f 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0070 0279 | y | Execute Discrete,And 0071 6807 |h | Jump_Zero 0x79 0072 00e1 | | Load_Encached Boolean_Cache 0073 4801 |H | Short_Literal 0x1 0074 4800 |H | Short_Literal 0x0 0075 e5ff | | Load 0x2,-0x1 0076 8021 | ! | Call 0x0,0x21 0077 c404 | | Store 0x2,0x4 0078 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0079 00e1 | | Load_Encached Boolean_Cache 007a 4801 |H | Short_Literal 0x1 007b 4800 |H | Short_Literal 0x0 007c e602 | | Load 0x3,0x2 007d 8021 | ! | Call 0x0,0x21 007e c404 | | Store 0x2,0x4 007f e010 | | Load 0x0,0x10 0080 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 0081 e5ff | | Load 0x2,-0x1 0082 e402 | | Load 0x2,0x2 0083 e236 | 6 | Load 0x1,0x36 0084 1856 | V | Execute Package,Field_Execute,Field_Number 0x56 0085 0059 | Y | Store_Top Discrete,At_Offset_1 0086 e402 | | Load 0x2,0x2 0087 e5ff | | Load 0x2,-0x1 0088 801e | | Call 0x0,0x1e 0089 e236 | 6 | Load 0x1,0x36 008a 1876 | v | Execute Package,Field_Execute,Field_Number 0x76 008b c402 | | Store 0x2,0x2 008c e402 | | Load 0x2,0x2 008d e5ff | | Load 0x2,-0x1 008e e237 | 7 | Load 0x1,0x37 008f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0090 c402 | | Store 0x2,0x2 0091 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0092 0000 0000 | | .BLANK 0000[0x6] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 00a5 | | .CONST 0x00a5 ; Address of begin 0099 0004 | | .CONST 0x0004 ; Address of exception handler 009a 0004 | | .CONST 0x0004 ; Number of locals 009b INIT_0098: 009b e5ff | | Load 0x2,-0x1 009c 805e | ^ | Call 0x0,0x5e 009d e011 | | Load 0x0,0x11 009e 1b14 | | Execute Package,Field_Read,Field_Number 0x14 009f 02ff | | Declare_Variable Variant_Record 00a0 00d8 | | Load_Top At_Offset_0 00a1 1c00 | | Execute_Immediate Run_Utility,0x0 00a2 e011 | | Load 0x0,0x11 00a3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00a4 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00a5 BODY_0098: 00a5 00da | | Load_Top At_Offset_2 00a6 01db | | Execute Vector,Length 00a7 7005 |p | Jump_Nonzero 0xad 00a8 e011 | | Load 0x0,0x11 00a9 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00aa 00da | | Load_Top At_Offset_2 00ab 016d | m | Execute Variant_Record,Structure_Write 00ac 7813 |x | Jump 0xc0 00ad e011 | | Load 0x0,0x11 00ae 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00af 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00b0 00da | | Load_Top At_Offset_2 00b1 601e |` | Indirect_Literal Discrete,0xd0,{0x00000000, 0x00004000} 00b2 e05f | _ | Load 0x0,0x5f 00b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b4 4800 |H | Short_Literal 0x0 00b5 e060 | ` | Load 0x0,0x60 00b6 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00b7 e011 | | Load 0x0,0x11 00b8 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00b9 1816 | | Execute Package,Field_Execute,Field_Number 0x16 00ba e602 | | Load 0x3,0x2 00bb e011 | | Load 0x0,0x11 00bc 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35 00bd 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 00be 00d1 | | Pop_Control Pop_Count_1 00bf 0059 | Y | Store_Top Discrete,At_Offset_1 00c0 e010 | | Load 0x0,0x10 00c1 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f 00c2 e236 | 6 | Load 0x1,0x36 00c3 1b41 | A | Execute Package,Field_Read,Field_Number 0x41 00c4 4803 |H | Short_Literal 0x3 00c5 4802 |H | Short_Literal 0x2 00c6 e010 | | Load 0x0,0x10 00c7 180e | | Execute Package,Field_Execute,Field_Number 0xe 00c8 4802 |H | Short_Literal 0x2 00c9 e603 | | Load 0x3,0x3 00ca e5ff | | Load 0x2,-0x1 00cb e236 | 6 | Load 0x1,0x36 00cc 1848 | H | Execute Package,Field_Execute,Field_Number 0x48 00cd c402 | | Store 0x2,0x2 00ce c403 | | Store 0x2,0x3 00cf 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00d0 0000 0000 | | .LITERAL {0x00000000, 0x00004000} 00d4 0000 0000 | | .BLANK 0000[0x4] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; Debug Table 00d8 ; -------------------------------------------------------------------------------------- 00d8 0004 000a | | .DEBUG4 0x0004,0x000a,0x7665,0x0000,0x0001,0x0000 00de 0000 0000 | | .BLANK 0000[0x122]