|
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: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦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 0258 | X | .CONST 0x0258 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0012 | | .CONST 0x0012 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0004 | | .CONST 0x0004 ; Number of locals 000b INIT_0008: 000b e03b | ; | Load 0x0,0x3b 000c 3405 |4 | Execute Record,Field_Reference,Field_Number 0x5 000d 0007 | | Action Break_Optional 000e e011 | | Load 0x0,0x11 000f 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0010 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 0012 BODY_0008: 0012 e03b | ; | Load 0x0,0x3b 0013 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 0014 7005 |p | Jump_Nonzero 0x1a 0015 0092 020f | | Action Push_String_Extended,0x20f ; "Ignoring Column_Entry not bracketed by Begin(Table) and End(Table)" 0017 e01c | | Load 0x0,0x1c 0018 180e | | Execute Package,Field_Execute,Field_Number 0xe 0019 4502 |E | Exit_Suprogram New_Top_Offset 0x2 001a e03b | ; | Load 0x0,0x3b 001b 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 001c 7001 |p | Jump_Nonzero 0x1e 001d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 001e e03b | ; | Load 0x0,0x3b 001f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 0020 68bf |h | Jump_Zero 0xe0 0021 4800 |H | Short_Literal 0x0 0022 e03b | ; | Load 0x0,0x3b 0023 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 0024 4801 |H | Short_Literal 0x1 0025 4800 |H | Short_Literal 0x0 0026 4800 |H | Short_Literal 0x0 0027 e01e | | Load 0x0,0x1e 0028 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0029 e01d | | Load 0x0,0x1d 002a 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 002b e01d | | Load 0x0,0x1d 002c 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 002d 0272 | r | Execute Discrete,Minus 002e e03b | ; | Load 0x0,0x3b 002f 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 0030 0272 | r | Execute Discrete,Minus 0031 e03b | ; | Load 0x0,0x3b 0032 3818 |8 | Execute Record,Field_Write,Field_Number 0x18 0033 e03b | ; | Load 0x0,0x3b 0034 3c18 |< | Execute Record,Field_Read,Field_Number 0x18 0035 0d00 | | Execute_Immediate Less,0x0 0036 6808 |h | Jump_Zero 0x3f 0037 0092 0210 | | Action Push_String_Extended,0x210 ; "Table wider than margins" 0039 e01c | | Load 0x0,0x1c 003a 180f | | Execute Package,Field_Execute,Field_Number 0xf 003b 4800 |H | Short_Literal 0x0 003c e03b | ; | Load 0x0,0x3b 003d 3818 |8 | Execute Record,Field_Write,Field_Number 0x18 003e 7806 |x | Jump 0x45 003f e017 | | Load 0x0,0x17 0040 3c33 |<3 | Execute Record,Field_Read,Field_Number 0x33 0041 7003 |p | Jump_Nonzero 0x45 0042 4800 |H | Short_Literal 0x0 0043 e03b | ; | Load 0x0,0x3b 0044 3818 |8 | Execute Record,Field_Write,Field_Number 0x18 0045 e03b | ; | Load 0x0,0x3b 0046 3c18 |< | Execute Record,Field_Read,Field_Number 0x18 0047 09ff | | Execute_Immediate Binary_Scale,-0x1 0048 e020 | | Load 0x0,0x20 0049 1b12 | | Execute Package,Field_Read,Field_Number 0x12 004a e021 | ! | Load 0x0,0x21 004b 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 004c 00d8 | | Load_Top At_Offset_0 004d e021 | ! | Load 0x0,0x21 004e 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 004f 7003 |p | Jump_Nonzero 0x53 0050 e022 | " | Load 0x0,0x22 0051 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 0052 0257 | W | Execute Discrete,Raise 0053 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0054 e01d | | Load 0x0,0x1d 0055 3c16 |< | Execute Record,Field_Read,Field_Number 0x16 0056 0273 | s | Execute Discrete,Plus 0057 e03b | ; | Load 0x0,0x3b 0058 3818 |8 | Execute Record,Field_Write,Field_Number 0x18 0059 608a |` | Indirect_Literal Discrete,0xe4,{0x00000000, 0x0015f900} 005a e01d | | Load 0x0,0x1d 005b 3817 |8 | Execute Record,Field_Write,Field_Number 0x17 005c e02c | , | Load 0x0,0x2c 005d 1b12 | | Execute Package,Field_Read,Field_Number 0x12 005e e03b | ; | Load 0x0,0x3b 005f 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a 0060 e01d | | Load 0x0,0x1d 0061 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0062 0273 | s | Execute Discrete,Plus 0063 027f | | Execute Discrete,Equal 0064 0f00 | | Execute_Immediate Equal,0x0 0065 e03b | ; | Load 0x0,0x3b 0066 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 0067 0e05 | | Execute_Immediate Not_Equal,0x5 0068 0279 | y | Execute Discrete,And 0069 6824 |h$ | Jump_Zero 0x8e 006a 4801 |H | Short_Literal 0x1 006b 4800 |H | Short_Literal 0x0 006c e017 | | Load 0x0,0x17 006d 3c3d |<= | Execute Record,Field_Read,Field_Number 0x3d 006e e01e | | Load 0x0,0x1e 006f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0070 e02c | , | Load 0x0,0x2c 0071 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0072 a403 | | Store_Unchecked 0x2,0x3 0073 4800 |H | Short_Literal 0x0 0074 e03b | ; | Load 0x0,0x3b 0075 3c18 |< | Execute Record,Field_Read,Field_Number 0x18 0076 e02c | , | Load 0x0,0x2c 0077 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0078 e03b | ; | Load 0x0,0x3b 0079 3c1a |< | Execute Record,Field_Read,Field_Number 0x1a 007a e403 | | Load 0x2,0x3 007b 0272 | r | Execute Discrete,Minus 007c e011 | | Load 0x0,0x11 007d 1b10 | | Execute Package,Field_Read,Field_Number 0x10 007e 00d9 | | Load_Top At_Offset_1 007f 00d0 | | Action Swap_Control 0080 0260 | ` | Execute Discrete,In_Type 0081 7001 |p | Jump_Nonzero 0x83 0082 0801 | | Execute_Immediate Raise,0x1 0083 e03b | ; | Load 0x0,0x3b 0084 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 0085 e02c | , | Load 0x0,0x2c 0086 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0087 e02c | , | Load 0x0,0x2c 0088 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0089 e03b | ; | Load 0x0,0x3b 008a 381a |8 | Execute Record,Field_Write,Field_Number 0x1a 008b 4801 |H | Short_Literal 0x1 008c e03b | ; | Load 0x0,0x3b 008d 380e |8 | Execute Record,Field_Write,Field_Number 0xe 008e 00cf | | Action Mark_Auxiliary 008f e03b | ; | Load 0x0,0x3b 0090 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0091 4801 |H | Short_Literal 0x1 0092 0263 | c | Execute Discrete,Above_Bound 0093 702b |p+ | Jump_Nonzero 0xbf 0094 00d8 | | Load_Top At_Offset_0 0095 e03b | ; | Load 0x0,0x3b 0096 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0097 01d5 | | Execute Vector,Field_Reference 0098 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 0099 e011 | | Load 0x0,0x11 009a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 009b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 009c 6820 |h | Jump_Zero 0xbd 009d 00cf | | Action Mark_Auxiliary 009e e03b | ; | Load 0x0,0x3b 009f 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 00a0 4801 |H | Short_Literal 0x1 00a1 0263 | c | Execute Discrete,Above_Bound 00a2 7015 |p | Jump_Nonzero 0xb8 00a3 4801 |H | Short_Literal 0x1 00a4 e40a | | Load 0x2,0xa 00a5 e03b | ; | Load 0x0,0x3b 00a6 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 00a7 01d5 | | Execute Vector,Field_Reference 00a8 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 00a9 8404 | | Call 0x2,0x4 00aa 00d8 | | Load_Top At_Offset_0 00ab e03b | ; | Load 0x0,0x3b 00ac 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 00ad 01d5 | | Execute Vector,Field_Reference 00ae 00d8 | | Load_Top At_Offset_0 00af 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 00b0 e011 | | Load 0x0,0x11 00b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00b2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 00b3 e40b | | Load 0x2,0xb 00b4 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 00b5 00d1 | | Pop_Control Pop_Count_1 00b6 00c8 | | Action Pop_Auxiliary_Range 00b7 3feb |? | Loop_Increasing 0xa3 00b8 00ce | | Action Pop_Auxiliary 00b9 4800 |H | Short_Literal 0x0 00ba 8072 | r | Call 0x0,0x72 00bb 00d2 | | Pop_Control Pop_Count_2 00bc 7802 |x | Jump 0xbf 00bd 00c8 | | Action Pop_Auxiliary_Range 00be 3fd5 |? | Loop_Increasing 0x94 00bf 00ce | | Action Pop_Auxiliary 00c0 4801 |H | Short_Literal 0x1 00c1 4801 |H | Short_Literal 0x1 00c2 4800 |H | Short_Literal 0x0 00c3 e01e | | Load 0x0,0x1e 00c4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00c5 e017 | | Load 0x0,0x17 00c6 3c1f |< | Execute Record,Field_Read,Field_Number 0x1f 00c7 e017 | | Load 0x0,0x17 00c8 3c1e |< | Execute Record,Field_Read,Field_Number 0x1e 00c9 0273 | s | Execute Discrete,Plus 00ca e02c | , | Load 0x0,0x2c 00cb 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00cc 0273 | s | Execute Discrete,Plus 00cd e017 | | Load 0x0,0x17 00ce 3c12 |< | Execute Record,Field_Read,Field_Number 0x12 00cf 027b | { | Execute Discrete,Greater_Equal 00d0 6807 |h | Jump_Zero 0xd8 00d1 0092 0211 | | Action Push_String_Extended,0x211 ; "Table column headings exceed page size" 00d3 e01c | | Load 0x0,0x1c 00d4 180e | | Execute Package,Field_Execute,Field_Number 0xe 00d5 e011 | | Load 0x0,0x11 00d6 1b28 | ( | Execute Package,Field_Read,Field_Number 0x28 00d7 0257 | W | Execute Discrete,Raise 00d8 e02c | , | Load 0x0,0x2c 00d9 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00da e03b | ; | Load 0x0,0x3b 00db 380d |8 | Execute Record,Field_Write,Field_Number 0xd 00dc e03b | ; | Load 0x0,0x3b 00dd 3c0d |< | Execute Record,Field_Read,Field_Number 0xd 00de e02c | , | Load 0x0,0x2c 00df 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00e0 4800 |H | Short_Literal 0x0 00e1 e5ff | | Load 0x2,-0x1 00e2 8404 | | Call 0x2,0x4 00e3 4502 |E | Exit_Suprogram New_Top_Offset 0x2 00e4 0000 0000 | | .LITERAL {0x00000000, 0x0015f900} 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb e402 | | Load 0x2,0x2 00ec 701b |p | Jump_Nonzero 0x108 00ed 4800 |H | Short_Literal 0x0 00ee e02c | , | Load 0x0,0x2c 00ef 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 00f0 4801 |H | Short_Literal 0x1 00f1 4800 |H | Short_Literal 0x0 00f2 4800 |H | Short_Literal 0x0 00f3 e01e | | Load 0x0,0x1e 00f4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 00f5 4801 |H | Short_Literal 0x1 00f6 e02c | , | Load 0x0,0x2c 00f7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 00f8 e02c | , | Load 0x0,0x2c 00f9 1b12 | | Execute Package,Field_Read,Field_Number 0x12 00fa e03b | ; | Load 0x0,0x3b 00fb 381a |8 | Execute Record,Field_Write,Field_Number 0x1a 00fc e017 | | Load 0x0,0x17 00fd 3c3d |<= | Execute Record,Field_Read,Field_Number 0x3d 00fe 4800 |H | Short_Literal 0x0 00ff e02c | , | Load 0x0,0x2c 0100 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0101 e02c | , | Load 0x0,0x2c 0102 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0103 e03b | ; | Load 0x0,0x3b 0104 381b |8 | Execute Record,Field_Write,Field_Number 0x1b 0105 4fff |O | Short_Literal -0x1 0106 e03b | ; | Load 0x0,0x3b 0107 381c |8 | Execute Record,Field_Write,Field_Number 0x1c 0108 e7ff | | Load 0x3,-0x1 0109 e011 | | Load 0x0,0x11 010a 1b0d | | Execute Package,Field_Read,Field_Number 0xd 010b 1813 | | Execute Package,Field_Execute,Field_Number 0x13 010c 0c01 | | Execute_Immediate Greater_Equal,0x1 010d e03b | ; | Load 0x0,0x3b 010e 3c1c |< | Execute Record,Field_Read,Field_Number 0x1c 010f 0d00 | | Execute_Immediate Less,0x0 0110 0279 | y | Execute Discrete,And 0111 6816 |h | Jump_Zero 0x128 0112 e01d | | Load 0x0,0x1d 0113 3c08 |< | Execute Record,Field_Read,Field_Number 0x8 0114 e017 | | Load 0x0,0x17 0115 3c3d |<= | Execute Record,Field_Read,Field_Number 0x3d 0116 0272 | r | Execute Discrete,Minus 0117 e011 | | Load 0x0,0x11 0118 1b10 | | Execute Package,Field_Read,Field_Number 0x10 0119 00d9 | | Load_Top At_Offset_1 011a 00d0 | | Action Swap_Control 011b 0260 | ` | Execute Discrete,In_Type 011c 7001 |p | Jump_Nonzero 0x11e 011d 0801 | | Execute_Immediate Raise,0x1 011e 4800 |H | Short_Literal 0x0 011f e02c | , | Load 0x0,0x2c 0120 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0121 e02c | , | Load 0x0,0x2c 0122 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0123 e03b | ; | Load 0x0,0x3b 0124 381b |8 | Execute Record,Field_Write,Field_Number 0x1b 0125 4800 |H | Short_Literal 0x0 0126 e03b | ; | Load 0x0,0x3b 0127 381c |8 | Execute Record,Field_Write,Field_Number 0x1c 0128 e03b | ; | Load 0x0,0x3b 0129 3c18 |< | Execute Record,Field_Read,Field_Number 0x18 012a e017 | | Load 0x0,0x17 012b 3c34 |<4 | Execute Record,Field_Read,Field_Number 0x34 012c 0273 | s | Execute Discrete,Plus 012d c403 | | Store 0x2,0x3 012e 00cf | | Action Mark_Auxiliary 012f e402 | | Load 0x2,0x2 0130 4801 |H | Short_Literal 0x1 0131 0263 | c | Execute Discrete,Above_Bound 0132 700e |p | Jump_Nonzero 0x141 0133 e403 | | Load 0x2,0x3 0134 e604 | | Load 0x3,0x4 0135 e03b | ; | Load 0x0,0x3b 0136 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0137 01d5 | | Execute Vector,Field_Reference 0138 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0139 0273 | s | Execute Discrete,Plus 013a e017 | | Load 0x0,0x17 013b 3c34 |<4 | Execute Record,Field_Read,Field_Number 0x34 013c 0901 | | Execute_Immediate Binary_Scale,0x1 013d 0273 | s | Execute Discrete,Plus 013e c403 | | Store 0x2,0x3 013f 00c8 | | Action Pop_Auxiliary_Range 0140 3ff2 |? | Loop_Increasing 0x133 0141 00ce | | Action Pop_Auxiliary 0142 e402 | | Load 0x2,0x2 0143 0a01 | | Execute_Immediate Plus,0x1 0144 c402 | | Store 0x2,0x2 0145 480d |H | Short_Literal 0xd 0146 801f | | Call 0x0,0x1f 0147 e403 | | Load 0x2,0x3 0148 e01d | | Load 0x0,0x1d 0149 3816 |8 | Execute Record,Field_Write,Field_Number 0x16 014a e403 | | Load 0x2,0x3 014b e402 | | Load 0x2,0x2 014c e03b | ; | Load 0x0,0x3b 014d 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 014e 01d5 | | Execute Vector,Field_Reference 014f 3c03 |< | Execute Record,Field_Read,Field_Number 0x3 0150 0273 | s | Execute Discrete,Plus 0151 e01d | | Load 0x0,0x1d 0152 3817 |8 | Execute Record,Field_Write,Field_Number 0x17 0153 e7fe | | Load 0x3,-0x2 0154 681b |h | Jump_Zero 0x170 0155 e402 | | Load 0x2,0x2 0156 e03b | ; | Load 0x0,0x3b 0157 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0158 01d5 | | Execute Vector,Field_Reference 0159 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 015a 4604 |F | Jump_Case 0x5 015b 7810 |x | Jump 0x16c ; case 0x0 015c 7803 |x | Jump 0x160 ; case 0x1 015d 7806 |x | Jump 0x164 ; case 0x2 015e 7809 |x | Jump 0x168 ; case 0x3 015f 785e |x^ | Jump 0x1be ; case 0x4 0160 4800 |H | Short_Literal 0x0 0161 e01d | | Load 0x0,0x1d 0162 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0163 785a |xZ | Jump 0x1be 0164 4802 |H | Short_Literal 0x2 0165 e01d | | Load 0x0,0x1d 0166 380a |8 | Execute Record,Field_Write,Field_Number 0xa 0167 7856 |xV | Jump 0x1be 0168 4803 |H | Short_Literal 0x3 0169 e01d | | Load 0x0,0x1d 016a 380a |8 | Execute Record,Field_Write,Field_Number 0xa 016b 7852 |xR | Jump 0x1be 016c 4801 |H | Short_Literal 0x1 016d e01d | | Load 0x0,0x1d 016e 380a |8 | Execute Record,Field_Write,Field_Number 0xa 016f 784e |xN | Jump 0x1be 0170 e402 | | Load 0x2,0x2 0171 e03b | ; | Load 0x0,0x3b 0172 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 0173 01d5 | | Execute Vector,Field_Reference 0174 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 0175 4604 |F | Jump_Case 0x5 0176 7838 |x8 | Jump 0x1af ; case 0x0 0177 783b |x; | Jump 0x1b3 ; case 0x1 0178 783e |x> | Jump 0x1b7 ; case 0x2 0179 7841 |xA | Jump 0x1bb ; case 0x3 017a 7800 |x | Jump 0x17b ; case 0x4 017b 4801 |H | Short_Literal 0x1 017c e01d | | Load 0x0,0x1d 017d 380a |8 | Execute Record,Field_Write,Field_Number 0xa 017e 4801 |H | Short_Literal 0x1 017f e01d | | Load 0x0,0x1d 0180 3815 |8 | Execute Record,Field_Write,Field_Number 0x15 0181 4801 |H | Short_Literal 0x1 0182 4801 |H | Short_Literal 0x1 0183 e01d | | Load 0x0,0x1d 0184 3413 |4 | Execute Record,Field_Reference,Field_Number 0x13 0185 01d6 | | Execute Vector,Field_Write 0186 e01d | | Load 0x0,0x1d 0187 3c17 |< | Execute Record,Field_Read,Field_Number 0x17 0188 e402 | | Load 0x2,0x2 0189 e03b | ; | Load 0x0,0x3b 018a 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 018b 01d5 | | Execute Vector,Field_Reference 018c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 018d 4830 |H0 | Short_Literal 0x30 018e e020 | | Load 0x0,0x20 018f 1b12 | | Execute Package,Field_Read,Field_Number 0x12 0190 e021 | ! | Load 0x0,0x21 0191 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 0192 00d8 | | Load_Top At_Offset_0 0193 e021 | ! | Load 0x0,0x21 0194 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0195 7003 |p | Jump_Nonzero 0x199 0196 e022 | " | Load 0x0,0x22 0197 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 0198 0257 | W | Execute Discrete,Raise 0199 181f | | Execute Package,Field_Execute,Field_Number 0x1f 019a 0271 | q | Execute Discrete,Times 019b 482e |H. | Short_Literal 0x2e 019c e020 | | Load 0x0,0x20 019d 1b12 | | Execute Package,Field_Read,Field_Number 0x12 019e e021 | ! | Load 0x0,0x21 019f 183e | > | Execute Package,Field_Execute,Field_Number 0x3e 01a0 00d8 | | Load_Top At_Offset_0 01a1 e021 | ! | Load 0x0,0x21 01a2 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 01a3 7003 |p | Jump_Nonzero 0x1a7 01a4 e022 | " | Load 0x0,0x22 01a5 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 01a6 0257 | W | Execute Discrete,Raise 01a7 181f | | Execute Package,Field_Execute,Field_Number 0x1f 01a8 0273 | s | Execute Discrete,Plus 01a9 0272 | r | Execute Discrete,Minus 01aa 4801 |H | Short_Literal 0x1 01ab e01d | | Load 0x0,0x1d 01ac 3412 |4 | Execute Record,Field_Reference,Field_Number 0x12 01ad 01d6 | | Execute Vector,Field_Write 01ae 780f |x | Jump 0x1be 01af 4801 |H | Short_Literal 0x1 01b0 e01d | | Load 0x0,0x1d 01b1 380a |8 | Execute Record,Field_Write,Field_Number 0xa 01b2 780b |x | Jump 0x1be 01b3 4800 |H | Short_Literal 0x0 01b4 e01d | | Load 0x0,0x1d 01b5 380a |8 | Execute Record,Field_Write,Field_Number 0xa 01b6 7807 |x | Jump 0x1be 01b7 4802 |H | Short_Literal 0x2 01b8 e01d | | Load 0x0,0x1d 01b9 380a |8 | Execute Record,Field_Write,Field_Number 0xa 01ba 7803 |x | Jump 0x1be 01bb 4803 |H | Short_Literal 0x3 01bc e01d | | Load 0x0,0x1d 01bd 380a |8 | Execute Record,Field_Write,Field_Number 0xa 01be e02c | , | Load 0x0,0x2c 01bf 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01c0 a403 | | Store_Unchecked 0x2,0x3 01c1 e03b | ; | Load 0x0,0x3b 01c2 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b 01c3 e403 | | Load 0x2,0x3 01c4 027c | | | Execute Discrete,Less 01c5 6812 |h | Jump_Zero 0x1d8 01c6 e403 | | Load 0x2,0x3 01c7 e03b | ; | Load 0x0,0x3b 01c8 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b 01c9 0272 | r | Execute Discrete,Minus 01ca c403 | | Store 0x2,0x3 01cb e403 | | Load 0x2,0x3 01cc 0275 | u | Execute Discrete,Unary_Minus 01cd 4800 |H | Short_Literal 0x0 01ce e02c | , | Load 0x0,0x2c 01cf 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 01d0 e03b | ; | Load 0x0,0x3b 01d1 3c1c |< | Execute Record,Field_Read,Field_Number 0x1c 01d2 e403 | | Load 0x2,0x3 01d3 027c | | | Execute Discrete,Less 01d4 6803 |h | Jump_Zero 0x1d8 01d5 e403 | | Load 0x2,0x3 01d6 e03b | ; | Load 0x0,0x3b 01d7 381c |8 | Execute Record,Field_Write,Field_Number 0x1c 01d8 4801 |H | Short_Literal 0x1 01d9 e015 | | Load 0x0,0x15 01da 1816 | | Execute Package,Field_Execute,Field_Number 0x16 01db e402 | | Load 0x2,0x2 01dc e03b | ; | Load 0x0,0x3b 01dd 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 01de 01d5 | | Execute Vector,Field_Reference 01df 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01e0 0f04 | | Execute_Immediate Equal,0x4 01e1 6803 |h | Jump_Zero 0x1e5 01e2 4940 |I@ | Short_Literal 0x140 01e3 e015 | | Load 0x0,0x15 01e4 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01e5 e7ff | | Load 0x3,-0x1 01e6 e015 | | Load 0x0,0x15 01e7 180f | | Execute Package,Field_Execute,Field_Number 0xf 01e8 4801 |H | Short_Literal 0x1 01e9 e015 | | Load 0x0,0x15 01ea 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01eb 4801 |H | Short_Literal 0x1 01ec 4800 |H | Short_Literal 0x0 01ed 4800 |H | Short_Literal 0x0 01ee e01e | | Load 0x0,0x1e 01ef 1818 | | Execute Package,Field_Execute,Field_Number 0x18 01f0 480d |H | Short_Literal 0xd 01f1 8023 | # | Call 0x0,0x23 01f2 e402 | | Load 0x2,0x2 01f3 e03b | ; | Load 0x0,0x3b 01f4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4 01f5 027f | | Execute Discrete,Equal 01f6 6817 |h | Jump_Zero 0x20e 01f7 e03b | ; | Load 0x0,0x3b 01f8 3c1c |< | Execute Record,Field_Read,Field_Number 0x1c 01f9 e02c | , | Load 0x0,0x2c 01fa 1b12 | | Execute Package,Field_Read,Field_Number 0x12 01fb e03b | ; | Load 0x0,0x3b 01fc 3c1b |< | Execute Record,Field_Read,Field_Number 0x1b 01fd 0272 | r | Execute Discrete,Minus 01fe 0272 | r | Execute Discrete,Minus 01ff e03b | ; | Load 0x0,0x3b 0200 381c |8 | Execute Record,Field_Write,Field_Number 0x1c 0201 e03b | ; | Load 0x0,0x3b 0202 3c1c |< | Execute Record,Field_Read,Field_Number 0x1c 0203 0c01 | | Execute_Immediate Greater_Equal,0x1 0204 6805 |h | Jump_Zero 0x20a 0205 e03b | ; | Load 0x0,0x3b 0206 3c1c |< | Execute Record,Field_Read,Field_Number 0x1c 0207 4800 |H | Short_Literal 0x0 0208 e02c | , | Load 0x0,0x2c 0209 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 020a 4801 |H | Short_Literal 0x1 020b 8072 | r | Call 0x0,0x72 020c 4800 |H | Short_Literal 0x0 020d a402 | | Store_Unchecked 0x2,0x2 020e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 020f ; -------------------------------------------------------------------------------------- 020f ; STRING TABLE 020f ; -------------------------------------------------------------------------------------- 020f 0008 | | .STRTAB 0x0008->0x0213 ; "Ignoring Column_Entry not bracketed by Begin(Table) and End(Table)" 0210 0048 | H | .STRTAB 0x0048->0x0234 ; "Table wider than margins" 0211 005e | ^ | .STRTAB 0x005e->0x0240 ; "Table column headings exceed page size" 0212 0082 | | .STREND 0x0082->0x0253 0213 4967 6e6f |Igno| .STRTAB_STRINGS 0253 0000 0000 | | .BLANK 0000[0x5] 0258 ; -------------------------------------------------------------------------------------- 0258 ; Debug Table 0258 ; -------------------------------------------------------------------------------------- 0258 0004 000f | | .DEBUG4 0x0004,0x000f,0x47fe,0x0000,0x0001,0x0000 025e 0002 0000 | | .XXX[0x3] 0260 0014 | | 0261 0000 0000 | | .BLANK 0000[0x2e] 028f 0801 4000 | @ | .XXX[0xc] 0291 0000 0000 | | 0293 0010 0000 | | 0295 0088 0000 | | 0297 0000 4000 | @ | 0299 0002 8000 | | 029b 0000 0000 | | .BLANK 0000[0x2d] 02c8 0100 2800 | ( | .XXX[0xc] 02ca 0000 0000 | | 02cc 0002 0000 | | 02ce 0011 0000 | | 02d0 0000 0800 | | 02d2 0000 5000 | P | 02d4 0000 0000 | | .BLANK 0000[0x2d] 0301 0020 0500 | | .XXX[0xc] 0303 0000 0000 | | 0305 0000 4000 | @ | 0307 0002 2000 | | 0309 0000 0100 | | 030b 0000 0a00 | | 030d 0000 0000 | | .BLANK 0000[0x2d] 033a 0004 00a0 | | .XXX[0xc] 033c 0000 0000 | | 033e 0000 0800 | | 0340 0000 4400 | D | 0342 0000 0020 | | 0344 0000 0140 | @| 0346 0000 0000 | | .BLANK 0000[0x2e] 0374 8014 0000 | | .XXX[0xb] 0376 0000 0000 | | 0378 0100 0000 | | 037a 0880 0000 | | 037c 0004 0000 | | 037e 0028 | ( | 037f 0000 0000 | | .BLANK 0000[0x2e] 03ad 1002 8000 | | .XXX[0xb] 03af 0000 0000 | | 03b1 0020 0000 | | 03b3 0110 0000 | | 03b5 0000 8000 | | 03b7 0005 | | 03b8 0000 0000 | | .BLANK 0000[0x48]