|
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_ccb0b3
└─⟦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 0100 | | .CONST 0x0100 ; 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 00b3 | | .CONST 0x00b3 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000b | | .CONST 0x000b ; Number of locals 000b INIT_0008: 000b e210 | | Load 0x1,0x10 000c 60cf |` | Indirect_Literal Discrete,0xdc,{0x00000000, 0x00007fff} 000d e011 | | Load 0x0,0x11 000e 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 000f 60c8 |` | Indirect_Literal Discrete,0xd8,{0xffffffff, 0xffff8000} 0010 e011 | | Load 0x0,0x11 0011 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33 0012 4810 |H | Short_Literal 0x10 0013 0092 00e0 | | Action Push_String_Extended,0xe0 ; "SHORT_INTEGER" 0015 e010 | | Load 0x0,0x10 0016 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0017 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0018 e010 | | Load 0x0,0x10 0019 1b13 | | Execute Package,Field_Read,Field_Number 0x13 001a 1b0e | | Execute Package,Field_Read,Field_Number 0xe 001b 011e | | Execute Any,Convert 001c e210 | | Load 0x1,0x10 001d 60b6 |` | Indirect_Literal Discrete,0xd4,{0x00000000, 0x7fffffff} 001e e011 | | Load 0x0,0x11 001f 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0020 60af |` | Indirect_Literal Discrete,0xd0,{0xffffffff, 0x80000000} 0021 e011 | | Load 0x0,0x11 0022 1845 | E | Execute Package,Field_Execute,Field_Number 0x45 0023 4820 |H | Short_Literal 0x20 0024 0092 00e1 | | Action Push_String_Extended,0xe1 ; "INTEGER" 0026 e010 | | Load 0x0,0x10 0027 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0028 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0029 e010 | | Load 0x0,0x10 002a 1b13 | | Execute Package,Field_Read,Field_Number 0x13 002b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 002c 011e | | Execute Any,Convert 002d 4801 |H | Short_Literal 0x1 002e 4802 |H | Short_Literal 0x2 002f e010 | | Load 0x0,0x10 0030 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0031 1b15 | | Execute Package,Field_Read,Field_Number 0x15 0032 035b | [ | Declare_Type Array,Constrained 0033 0337 | 7 | Declare_Variable Array 0034 00da | | Load_Top At_Offset_2 0035 e010 | | Load 0x0,0x10 0036 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0037 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0038 0119 | | Execute Any,Check_In_Formal_Type 0039 4801 |H | Short_Literal 0x1 003a 00da | | Load_Top At_Offset_2 003b 01d6 | | Execute Vector,Field_Write 003c 00d9 | | Load_Top At_Offset_1 003d e010 | | Load 0x0,0x10 003e 1b13 | | Execute Package,Field_Read,Field_Number 0x13 003f 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0040 0119 | | Execute Any,Check_In_Formal_Type 0041 4802 |H | Short_Literal 0x2 0042 00da | | Load_Top At_Offset_2 0043 01d6 | | Execute Vector,Field_Write 0044 5887 |X | Indirect_Literal Float,0xcc,3.4028199999999998e+38 0045 e011 | | Load 0x0,0x11 0046 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 0047 e011 | | Load 0x0,0x11 0048 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 0049 011e | | Execute Any,Convert 004a 587d |X} | Indirect_Literal Float,0xc8,1.79769313486231e+308 004b e011 | | Load 0x0,0x11 004c 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 004d e011 | | Load 0x0,0x11 004e 1b49 | I | Execute Package,Field_Read,Field_Number 0x49 004f 011e | | Execute Any,Convert 0050 e210 | | Load 0x1,0x10 0051 4801 |H | Short_Literal 0x1 0052 4801 |H | Short_Literal 0x1 0053 4815 |H | Short_Literal 0x15 0054 4802 |H | Short_Literal 0x2 0055 4f83 |O | Short_Literal -0x7d 0056 4880 |H | Short_Literal 0x80 0057 487d |H} | Short_Literal 0x7d 0058 e405 | | Load 0x2,0x5 0059 00d8 | | Load_Top At_Offset_0 005a e011 | | Load 0x0,0x11 005b 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 005c 4820 |H | Short_Literal 0x20 005d 4806 |H | Short_Literal 0x6 005e 0092 00e2 | | Action Push_String_Extended,0xe2 ; "FLOAT" 0060 e010 | | Load 0x0,0x10 0061 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0062 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0063 e010 | | Load 0x0,0x10 0064 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0065 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0066 011e | | Execute Any,Convert 0067 e210 | | Load 0x1,0x10 0068 4801 |H | Short_Literal 0x1 0069 4801 |H | Short_Literal 0x1 006a 4835 |H5 | Short_Literal 0x35 006b 4802 |H | Short_Literal 0x2 006c 4c03 |L | Short_Literal -0x3fd 006d 6056 |`V | Indirect_Literal Discrete,0xc4,{0x00000000, 0x00000400} 006e 4bfc |K | Short_Literal 0x3fc 006f e406 | | Load 0x2,0x6 0070 00d8 | | Load_Top At_Offset_0 0071 e011 | | Load 0x0,0x11 0072 1851 | Q | Execute Package,Field_Execute,Field_Number 0x51 0073 4840 |H@ | Short_Literal 0x40 0074 480f |H | Short_Literal 0xf 0075 0092 00e3 | | Action Push_String_Extended,0xe3 ; "LONG_FLOAT" 0077 e010 | | Load 0x0,0x10 0078 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0079 1818 | | Execute Package,Field_Execute,Field_Number 0x18 007a e010 | | Load 0x0,0x10 007b 1b13 | | Execute Package,Field_Read,Field_Number 0x13 007c 1b16 | | Execute Package,Field_Read,Field_Number 0x16 007d 011e | | Execute Any,Convert 007e 4801 |H | Short_Literal 0x1 007f 4802 |H | Short_Literal 0x2 0080 e010 | | Load 0x0,0x10 0081 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0082 1b25 | % | Execute Package,Field_Read,Field_Number 0x25 0083 035b | [ | Declare_Type Array,Constrained 0084 0337 | 7 | Declare_Variable Array 0085 00da | | Load_Top At_Offset_2 0086 e010 | | Load 0x0,0x10 0087 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0088 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0089 0119 | | Execute Any,Check_In_Formal_Type 008a 4801 |H | Short_Literal 0x1 008b 00da | | Load_Top At_Offset_2 008c 01d6 | | Execute Vector,Field_Write 008d 00d9 | | Load_Top At_Offset_1 008e e010 | | Load 0x0,0x10 008f 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0090 1b16 | | Execute Package,Field_Read,Field_Number 0x16 0091 0119 | | Execute Any,Check_In_Formal_Type 0092 4802 |H | Short_Literal 0x2 0093 00da | | Load_Top At_Offset_2 0094 01d6 | | Execute Vector,Field_Write 0095 e210 | | Load 0x1,0x10 0096 5829 |X) | Indirect_Literal Float,0xc0,86400.0 0097 e011 | | Load 0x0,0x11 0098 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 0099 5822 |X" | Indirect_Literal Float,0xbc,-86400.0 009a e011 | | Load 0x0,0x11 009b 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e 009c 4ff2 |O | Short_Literal -0xe 009d 4820 |H | Short_Literal 0x20 009e 0092 00e4 | | Action Push_String_Extended,0xe4 ; "DURATION" 00a0 e010 | | Load 0x0,0x10 00a1 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00a2 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28 00a3 e010 | | Load 0x0,0x10 00a4 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00a5 1b26 | & | Execute Package,Field_Read,Field_Number 0x26 00a6 011e | | Execute Any,Convert 00a7 e210 | | Load 0x1,0x10 00a8 00d9 | | Load_Top At_Offset_1 00a9 00db | | Load_Top At_Offset_3 00aa e404 | | Load 0x2,0x4 00ab 4801 |H | Short_Literal 0x1 00ac e010 | | Load 0x0,0x10 00ad 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00ae 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34 00af e010 | | Load 0x0,0x10 00b0 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00b1 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 00b2 011e | | Execute Any,Convert 00b3 BODY_0008: 00b3 00d8 | | Load_Top At_Offset_0 00b4 e010 | | Load 0x0,0x10 00b5 1b13 | | Execute Package,Field_Read,Field_Number 0x13 00b6 1b31 | 1 | Execute Package,Field_Read,Field_Number 0x31 00b7 011d | | Execute Any,Convert_To_Formal 00b8 00ca | | Action Exit_Nullary_Function 00b9 0000 0000 | | .XXX[0x3] 00bb 0000 | | 00bc c0f5 1800 | | .DBL -86400.0 00be 0000 0000 | | 00c0 40f5 1800 |@ | .DBL 86400.0 00c2 0000 0000 | | 00c4 0000 0000 | | .LITERAL {0x00000000, 0x00000400} 00c8 7fef ffff | | .DBL 1.79769313486231e+308 00ca ffff ffe2 | | 00cc 47ef fffd |G | .DBL 3.4028199999999998e+38 00ce bd19 d02b | +| 00d0 ffff ffff | | .LITERAL {0xffffffff, 0x80000000} 00d4 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff} 00d8 ffff ffff | | .LITERAL {0xffffffff, 0xffff8000} 00dc 0000 0000 | | .LITERAL {0x00000000, 0x00007fff} 00e0 ; -------------------------------------------------------------------------------------- 00e0 ; STRING TABLE 00e0 ; -------------------------------------------------------------------------------------- 00e0 000c | | .STRTAB 0x000c->0x00e6 ; "SHORT_INTEGER" 00e1 0017 | | .STRTAB 0x0017->0x00ec ; "INTEGER" 00e2 001c | | .STRTAB 0x001c->0x00f0 ; "FLOAT" 00e3 001f | | .STRTAB 0x001f->0x00f2 ; "LONG_FLOAT" 00e4 0027 | ' | .STRTAB 0x0027->0x00f7 ; "DURATION" 00e5 002d | - | .STREND 0x002d->0x00fb 00e6 5348 4f52 |SHOR| .STRTAB_STRINGS 00fc 0000 0000 | | .BLANK 0000[0x4] 0100 ; -------------------------------------------------------------------------------------- 0100 ; Debug Table 0100 ; -------------------------------------------------------------------------------------- 0100 0004 0003 | | .DEBUG4 0x0004,0x0003,0x2f9e,0x0000,0x0001,0x0001 0106 000b 010a | | .DBG4T 0x000b,0x010a,0x0002,0x0000 010a ; -------------------------------------------------------------------------------------- 010a ; Debug chain 010a ; -------------------------------------------------------------------------------------- 010a 000a 0001 | | .DBGLEN 0x000a,0x0001 010c 000b 001c | | .DBGLNO 0x000b,0x001c,0x002d,0x0044,0x004a,0x0050,0x0067,0x007e,0x0095,0x00a7,0x00b3 0117 0000 0000 | | .BLANK 0000[0xe9]