|
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_6148f2
└─⟦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 0130 | 0 | .CONST 0x0130 ; 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 010f | | .CONST 0x010f ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000d | | .CONST 0x000d ; Number of locals 000b INIT_0008: 000b 0007 | | Action Break_Optional 000c e002 | | Load 0x0,0x2 000d 0322 | " | Declare_Variable Record 000e 0092 0120 | | Action Push_String_Extended,0x120 ; "tetrahedron" 0010 e003 | | Load 0x0,0x3 0011 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0012 00d9 | | Load_Top At_Offset_1 0013 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0014 0092 0121 | !| Action Push_String_Extended,0x121 ; "tetra" 0016 e003 | | Load 0x0,0x3 0017 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0018 00d9 | | Load_Top At_Offset_1 0019 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 001a 0092 0122 | "| Action Push_String_Extended,0x122 ; "cube" 001c e003 | | Load 0x0,0x3 001d 03b6 | | Declare_Variable Access,By_Allocation,With_Value 001e 00d9 | | Load_Top At_Offset_1 001f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0020 4806 |H | Short_Literal 0x6 0021 00d9 | | Load_Top At_Offset_1 0022 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 0023 480c |H | Short_Literal 0xc 0024 00d9 | | Load_Top At_Offset_1 0025 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0026 4808 |H | Short_Literal 0x8 0027 00d9 | | Load_Top At_Offset_1 0028 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0029 4800 |H | Short_Literal 0x0 002a 4805 |H | Short_Literal 0x5 002b e004 | | Load 0x0,0x4 002c 0334 | 4 | Declare_Variable Array,With_Constraint 002d e005 | | Load 0x0,0x5 002e 0322 | " | Declare_Variable Record 002f 58ec |X | Indirect_Literal Float,0x11c,1.0 0030 00d9 | | Load_Top At_Offset_1 0031 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0032 58e5 |X | Indirect_Literal Float,0x118,0.0 0033 00d9 | | Load_Top At_Offset_1 0034 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0035 58e2 |X | Indirect_Literal Float,0x118,0.0 0036 00d9 | | Load_Top At_Offset_1 0037 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0038 4800 |H | Short_Literal 0x0 0039 00da | | Load_Top At_Offset_2 003a 01d6 | | Execute Vector,Field_Write 003b e005 | | Load 0x0,0x5 003c 0322 | " | Declare_Variable Record 003d 58d6 |X | Indirect_Literal Float,0x114,-1.0 003e 00d9 | | Load_Top At_Offset_1 003f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0040 58d7 |X | Indirect_Literal Float,0x118,0.0 0041 00d9 | | Load_Top At_Offset_1 0042 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0043 58d4 |X | Indirect_Literal Float,0x118,0.0 0044 00d9 | | Load_Top At_Offset_1 0045 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0046 4801 |H | Short_Literal 0x1 0047 00da | | Load_Top At_Offset_2 0048 01d6 | | Execute Vector,Field_Write 0049 e005 | | Load 0x0,0x5 004a 0322 | " | Declare_Variable Record 004b 58cc |X | Indirect_Literal Float,0x118,0.0 004c 00d9 | | Load_Top At_Offset_1 004d 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 004e 58cd |X | Indirect_Literal Float,0x11c,1.0 004f 00d9 | | Load_Top At_Offset_1 0050 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0051 58c6 |X | Indirect_Literal Float,0x118,0.0 0052 00d9 | | Load_Top At_Offset_1 0053 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0054 4802 |H | Short_Literal 0x2 0055 00da | | Load_Top At_Offset_2 0056 01d6 | | Execute Vector,Field_Write 0057 e005 | | Load 0x0,0x5 0058 0322 | " | Declare_Variable Record 0059 58be |X | Indirect_Literal Float,0x118,0.0 005a 00d9 | | Load_Top At_Offset_1 005b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 005c 58b7 |X | Indirect_Literal Float,0x114,-1.0 005d 00d9 | | Load_Top At_Offset_1 005e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 005f 58b8 |X | Indirect_Literal Float,0x118,0.0 0060 00d9 | | Load_Top At_Offset_1 0061 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0062 4803 |H | Short_Literal 0x3 0063 00da | | Load_Top At_Offset_2 0064 01d6 | | Execute Vector,Field_Write 0065 e005 | | Load 0x0,0x5 0066 0322 | " | Declare_Variable Record 0067 58b0 |X | Indirect_Literal Float,0x118,0.0 0068 00d9 | | Load_Top At_Offset_1 0069 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 006a 58ad |X | Indirect_Literal Float,0x118,0.0 006b 00d9 | | Load_Top At_Offset_1 006c 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 006d 58ae |X | Indirect_Literal Float,0x11c,1.0 006e 00d9 | | Load_Top At_Offset_1 006f 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 0070 4804 |H | Short_Literal 0x4 0071 00da | | Load_Top At_Offset_2 0072 01d6 | | Execute Vector,Field_Write 0073 e005 | | Load 0x0,0x5 0074 0322 | " | Declare_Variable Record 0075 58a2 |X | Indirect_Literal Float,0x118,0.0 0076 00d9 | | Load_Top At_Offset_1 0077 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 0078 589f |X | Indirect_Literal Float,0x118,0.0 0079 00d9 | | Load_Top At_Offset_1 007a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 007b 5898 |X | Indirect_Literal Float,0x114,-1.0 007c 00d9 | | Load_Top At_Offset_1 007d 3802 |8 | Execute Record,Field_Write,Field_Number 0x2 007e 4805 |H | Short_Literal 0x5 007f 00da | | Load_Top At_Offset_2 0080 01d6 | | Execute Vector,Field_Write 0081 e006 | | Load 0x0,0x6 0082 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0083 00d9 | | Load_Top At_Offset_1 0084 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 0085 4800 |H | Short_Literal 0x0 0086 481f |H | Short_Literal 0x1f 0087 e007 | | Load 0x0,0x7 0088 0334 | 4 | Declare_Variable Array,With_Constraint 0089 4803 |H | Short_Literal 0x3 008a 4800 |H | Short_Literal 0x0 008b 00da | | Load_Top At_Offset_2 008c 01d6 | | Execute Vector,Field_Write 008d 4800 |H | Short_Literal 0x0 008e 4801 |H | Short_Literal 0x1 008f 00da | | Load_Top At_Offset_2 0090 01d6 | | Execute Vector,Field_Write 0091 4804 |H | Short_Literal 0x4 0092 4802 |H | Short_Literal 0x2 0093 00da | | Load_Top At_Offset_2 0094 01d6 | | Execute Vector,Field_Write 0095 4802 |H | Short_Literal 0x2 0096 4803 |H | Short_Literal 0x3 0097 00da | | Load_Top At_Offset_2 0098 01d6 | | Execute Vector,Field_Write 0099 4803 |H | Short_Literal 0x3 009a 4804 |H | Short_Literal 0x4 009b 00da | | Load_Top At_Offset_2 009c 01d6 | | Execute Vector,Field_Write 009d 4800 |H | Short_Literal 0x0 009e 4805 |H | Short_Literal 0x5 009f 00da | | Load_Top At_Offset_2 00a0 01d6 | | Execute Vector,Field_Write 00a1 4802 |H | Short_Literal 0x2 00a2 4806 |H | Short_Literal 0x6 00a3 00da | | Load_Top At_Offset_2 00a4 01d6 | | Execute Vector,Field_Write 00a5 4805 |H | Short_Literal 0x5 00a6 4807 |H | Short_Literal 0x7 00a7 00da | | Load_Top At_Offset_2 00a8 01d6 | | Execute Vector,Field_Write 00a9 4803 |H | Short_Literal 0x3 00aa 4808 |H | Short_Literal 0x8 00ab 00da | | Load_Top At_Offset_2 00ac 01d6 | | Execute Vector,Field_Write 00ad 4800 |H | Short_Literal 0x0 00ae 4809 |H | Short_Literal 0x9 00af 00da | | Load_Top At_Offset_2 00b0 01d6 | | Execute Vector,Field_Write 00b1 4805 |H | Short_Literal 0x5 00b2 480a |H | Short_Literal 0xa 00b3 00da | | Load_Top At_Offset_2 00b4 01d6 | | Execute Vector,Field_Write 00b5 4803 |H | Short_Literal 0x3 00b6 480b |H | Short_Literal 0xb 00b7 00da | | Load_Top At_Offset_2 00b8 01d6 | | Execute Vector,Field_Write 00b9 4803 |H | Short_Literal 0x3 00ba 480c |H | Short_Literal 0xc 00bb 00da | | Load_Top At_Offset_2 00bc 01d6 | | Execute Vector,Field_Write 00bd 4800 |H | Short_Literal 0x0 00be 480d |H | Short_Literal 0xd 00bf 00da | | Load_Top At_Offset_2 00c0 01d6 | | Execute Vector,Field_Write 00c1 4803 |H | Short_Literal 0x3 00c2 480e |H | Short_Literal 0xe 00c3 00da | | Load_Top At_Offset_2 00c4 01d6 | | Execute Vector,Field_Write 00c5 4804 |H | Short_Literal 0x4 00c6 480f |H | Short_Literal 0xf 00c7 00da | | Load_Top At_Offset_2 00c8 01d6 | | Execute Vector,Field_Write 00c9 4803 |H | Short_Literal 0x3 00ca 4810 |H | Short_Literal 0x10 00cb 00da | | Load_Top At_Offset_2 00cc 01d6 | | Execute Vector,Field_Write 00cd 4801 |H | Short_Literal 0x1 00ce 4811 |H | Short_Literal 0x11 00cf 00da | | Load_Top At_Offset_2 00d0 01d6 | | Execute Vector,Field_Write 00d1 4802 |H | Short_Literal 0x2 00d2 4812 |H | Short_Literal 0x12 00d3 00da | | Load_Top At_Offset_2 00d4 01d6 | | Execute Vector,Field_Write 00d5 4804 |H | Short_Literal 0x4 00d6 4813 |H | Short_Literal 0x13 00d7 00da | | Load_Top At_Offset_2 00d8 01d6 | | Execute Vector,Field_Write 00d9 4803 |H | Short_Literal 0x3 00da 4814 |H | Short_Literal 0x14 00db 00da | | Load_Top At_Offset_2 00dc 01d6 | | Execute Vector,Field_Write 00dd 4801 |H | Short_Literal 0x1 00de 4815 |H | Short_Literal 0x15 00df 00da | | Load_Top At_Offset_2 00e0 01d6 | | Execute Vector,Field_Write 00e1 4805 |H | Short_Literal 0x5 00e2 4816 |H | Short_Literal 0x16 00e3 00da | | Load_Top At_Offset_2 00e4 01d6 | | Execute Vector,Field_Write 00e5 4802 |H | Short_Literal 0x2 00e6 4817 |H | Short_Literal 0x17 00e7 00da | | Load_Top At_Offset_2 00e8 01d6 | | Execute Vector,Field_Write 00e9 4803 |H | Short_Literal 0x3 00ea 4818 |H | Short_Literal 0x18 00eb 00da | | Load_Top At_Offset_2 00ec 01d6 | | Execute Vector,Field_Write 00ed 4801 |H | Short_Literal 0x1 00ee 4819 |H | Short_Literal 0x19 00ef 00da | | Load_Top At_Offset_2 00f0 01d6 | | Execute Vector,Field_Write 00f1 4803 |H | Short_Literal 0x3 00f2 481a |H | Short_Literal 0x1a 00f3 00da | | Load_Top At_Offset_2 00f4 01d6 | | Execute Vector,Field_Write 00f5 4805 |H | Short_Literal 0x5 00f6 481b |H | Short_Literal 0x1b 00f7 00da | | Load_Top At_Offset_2 00f8 01d6 | | Execute Vector,Field_Write 00f9 4803 |H | Short_Literal 0x3 00fa 481c |H | Short_Literal 0x1c 00fb 00da | | Load_Top At_Offset_2 00fc 01d6 | | Execute Vector,Field_Write 00fd 4801 |H | Short_Literal 0x1 00fe 481d |H | Short_Literal 0x1d 00ff 00da | | Load_Top At_Offset_2 0100 01d6 | | Execute Vector,Field_Write 0101 4804 |H | Short_Literal 0x4 0102 481e |H | Short_Literal 0x1e 0103 00da | | Load_Top At_Offset_2 0104 01d6 | | Execute Vector,Field_Write 0105 4803 |H | Short_Literal 0x3 0106 481f |H | Short_Literal 0x1f 0107 00da | | Load_Top At_Offset_2 0108 01d6 | | Execute Vector,Field_Write 0109 e008 | | Load 0x0,0x8 010a 03b6 | | Declare_Variable Access,By_Allocation,With_Value 010b 00d9 | | Load_Top At_Offset_1 010c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7 010d 0129 | ) | Execute Any,Make_Visible 010e 00bf | | Action Accept_Activation 010f BODY_0008: 010f 00bc | | Action Signal_Activated 0110 00bb | | Action Signal_Completion 0111 0000 0000 | | .XXX[0x3] 0113 0000 | | 0114 bff0 0000 | | .DBL -1.0 0116 0000 0000 | | 0118 0000 0000 | | .DBL 0.0 011a 0000 0000 | | 011c 3ff0 0000 |? | .DBL 1.0 011e 0000 0000 | | 0120 ; -------------------------------------------------------------------------------------- 0120 ; STRING TABLE 0120 ; -------------------------------------------------------------------------------------- 0120 0008 | | .STRTAB 0x0008->0x0124 ; "tetrahedron" 0121 0011 | | .STRTAB 0x0011->0x0129 ; "tetra" 0122 0014 | | .STRTAB 0x0014->0x012c ; "cube" 0123 0016 | | .STREND 0x0016->0x012e 0124 7465 7472 |tetr| .STRTAB_STRINGS 012e 0000 0000 | | .XXX[0x2] 0130 ; -------------------------------------------------------------------------------------- 0130 ; Debug Table 0130 ; -------------------------------------------------------------------------------------- 0130 0004 0000 | | .DEBUG4 0x0004,0x0000,0x6827,0x0000,0x0001,0x0001 0136 000b 013a | :| .DBG4T 0x000b,0x013a,0x8000,0x0000 013a ; -------------------------------------------------------------------------------------- 013a ; Debug chain 013a ; -------------------------------------------------------------------------------------- 013a 0002 0000 | | .DBGLEN 0x0002,0x0000 013c 000b 000c | | .DBGLNO 0x000b,0x000c 013e 0000 0000 | | .BLANK 0000[0xc2]