|
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: 3072 (0xc00) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_137ccd
└─⟦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 03c0 | | .CONST 0x03c0 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0041 | A | .CONST 0x0041 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 001c | | .CONST 0x001c ; Number of locals 000b INIT_0008: 000b 00e9 | | Load_Encached String_Cache 000c 02a0 | | Declare_Subprogram Null_Subprogram 000d 4818 |H | Short_Literal 0x18 000e 03d4 | | Declare_Type Access,Defined,Visible,Accesses_Protected 000f 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated 0011 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated 0013 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated 0015 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 0017 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated 0019 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 001b 00bf | | Action Accept_Activation 001c e002 | | Load 0x0,0x2 001d 1b0d | | Execute Package,Field_Read,Field_Number 0xd 001e 02c7 | | Declare_Variable Any 001f 00d8 | | Load_Top At_Offset_0 0020 1c00 | | Execute_Immediate Run_Utility,0x0 0021 00e1 | | Load_Encached Boolean_Cache 0022 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0023 e003 | | Load 0x0,0x3 0024 0007 | | Action Break_Optional 0025 e004 | | Load 0x0,0x4 0026 0322 | " | Declare_Variable Record 0027 00d8 | | Load_Top At_Offset_0 0028 1c00 | | Execute_Immediate Run_Utility,0x0 0029 00e8 | | Load_Encached Character_Cache 002a 4800 |H | Short_Literal 0x0 002b 480b |H | Short_Literal 0xb 002c 029f 0293 | | Declare_Subprogram INIT_0290,For_Call 002e 03fd | | Declare_Type Discrete,Defined 002f 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0030 00c7 | | Action Elaborate_Subprogram 0031 029d 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call 0033 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0034 00c7 | | Action Elaborate_Subprogram 0035 029d 0353 | S| Declare_Subprogram INIT_0350,For_Outer_Call 0037 029d 0373 | s| Declare_Subprogram INIT_0370,For_Outer_Call 0039 1d10 | | Execute_Immediate Reference_Lex_1,0x10 003a 00c7 | | Action Elaborate_Subprogram 003b 1d11 | | Execute_Immediate Reference_Lex_1,0x11 003c 00c7 | | Action Elaborate_Subprogram 003d 1d12 | | Execute_Immediate Reference_Lex_1,0x12 003e 00c7 | | Action Elaborate_Subprogram 003f 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0040 00c7 | | Action Elaborate_Subprogram 0041 BODY_0008: 0041 00be | | Action Activate_Tasks 0042 00bc | | Action Signal_Activated 0043 00bb | | Action Signal_Completion 0044 0000 0000 | | .BLANK 0000[0x4] 0048 ; -------------------------------------------------------------------------------------- 0048 ; SUBPROGRAM 0048 ; -------------------------------------------------------------------------------------- 0048 004e | N | .CONST 0x004e ; Address of begin 0049 0004 | | .CONST 0x0004 ; Address of exception handler 004a 0002 | | .CONST 0x0002 ; Number of locals 004b INIT_0048: 004b e002 | | Load 0x0,0x2 004c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 004d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 004e BODY_0048: 004e e214 | | Load 0x1,0x14 004f 00ea | | Load_Encached Null_String_Cache 0050 e5ff | | Load 0x2,-0x1 0051 00db | | Load_Top At_Offset_3 0052 e002 | | Load 0x0,0x2 0053 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0054 c214 | | Store 0x1,0x14 0055 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0056 0000 0000 | | .XXX[0x2] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b e214 | | Load 0x1,0x14 005c e002 | | Load 0x0,0x2 005d 1816 | | Execute Package,Field_Execute,Field_Number 0x16 005e c214 | | Store 0x1,0x14 005f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0066 | f | .CONST 0x0066 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0003 | | .CONST 0x0003 ; Number of locals 0063 INIT_0060: 0063 00e8 | | Load_Encached Character_Cache 0064 e219 | | Load 0x1,0x19 0065 0007 | | Action Break_Optional 0066 BODY_0060: 0066 e214 | | Load 0x1,0x14 0067 e002 | | Load 0x0,0x2 0068 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0069 71fa |q | Jump_Nonzero 0x264 006a e217 | | Load 0x1,0x17 006b 8005 | | Call 0x0,0x5 006c 00d1 | | Pop_Control Pop_Count_1 006d 4800 |H | Short_Literal 0x0 006e 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 006f 00cf | | Action Mark_Auxiliary 0070 79ee |y | Jump 0x25f 0071 e214 | | Load 0x1,0x14 0072 e002 | | Load 0x0,0x2 0073 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 0074 7004 |p | Jump_Nonzero 0x79 0075 821b | | Call 0x1,0x1b 0076 8006 | | Call 0x0,0x6 0077 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 0078 7802 |x | Jump 0x7b 0079 4804 |H | Short_Literal 0x4 007a 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3 007b 00d9 | | Load_Top At_Offset_1 007c 460b |F | Jump_Case 0xc 007d 78f8 |x | Jump 0x176 ; case 0x0 007e 7811 |x | Jump 0x90 ; case 0x1 007f 7826 |x& | Jump 0xa6 ; case 0x2 0080 7833 |x3 | Jump 0xb4 ; case 0x3 0081 7891 |x | Jump 0x113 ; case 0x4 0082 787e |x~ | Jump 0x101 ; case 0x5 0083 78c5 |x | Jump 0x149 ; case 0x6 0084 78b2 |x | Jump 0x137 ; case 0x7 0085 78dd |x | Jump 0x163 ; case 0x8 0086 7847 |xG | Jump 0xce ; case 0x9 0087 7802 |x | Jump 0x8a ; case 0xa 0088 79d5 |y | Jump 0x25e ; case 0xb 0089 79d4 |y | .XXX[0x1] 008a 00da | | Load_Top At_Offset_2 008b 0f7d | } | Execute_Immediate Equal,0x7d 008c 69d1 |i | Jump_Zero 0x25e 008d 4800 |H | Short_Literal 0x0 008e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 008f 79ce |y | Jump 0x25e 0090 00da | | Load_Top At_Offset_2 0091 0b3d | = | Execute_Immediate Case_Compare,0x3d 0092 7008 |p | Jump_Nonzero 0x9b 0093 0f3e | > | Execute_Immediate Equal,0x3e 0094 700c |p | Jump_Nonzero 0xa1 0095 480b |H | Short_Literal 0xb 0096 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0097 481e |H | Short_Literal 0x1e 0098 a216 | | Store_Unchecked 0x1,0x16 0099 821c | | Call 0x1,0x1c 009a 79c3 |y | Jump 0x25e 009b 00d1 | | Pop_Control Pop_Count_1 009c 480b |H | Short_Literal 0xb 009d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 009e 481f |H | Short_Literal 0x1f 009f a216 | | Store_Unchecked 0x1,0x16 00a0 79bd |y | Jump 0x25e 00a1 480b |H | Short_Literal 0xb 00a2 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00a3 481b |H | Short_Literal 0x1b 00a4 a216 | | Store_Unchecked 0x1,0x16 00a5 79b8 |y | Jump 0x25e 00a6 00da | | Load_Top At_Offset_2 00a7 0f3d | = | Execute_Immediate Equal,0x3d 00a8 6805 |h | Jump_Zero 0xae 00a9 480b |H | Short_Literal 0xb 00aa 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00ab 4829 |H) | Short_Literal 0x29 00ac a216 | | Store_Unchecked 0x1,0x16 00ad 79b0 |y | Jump 0x25e 00ae 480b |H | Short_Literal 0xb 00af 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00b0 4828 |H( | Short_Literal 0x28 00b1 a216 | | Store_Unchecked 0x1,0x16 00b2 821c | | Call 0x1,0x1c 00b3 79aa |y | Jump 0x25e 00b4 00da | | Load_Top At_Offset_2 00b5 4861 |Ha | Short_Literal 0x61 00b6 487a |Hz | Short_Literal 0x7a 00b7 0262 | b | Execute Discrete,In_Range 00b8 00db | | Load_Top At_Offset_3 00b9 4830 |H0 | Short_Literal 0x30 00ba 4839 |H9 | Short_Literal 0x39 00bb 0262 | b | Execute Discrete,In_Range 00bc 0278 | x | Execute Discrete,Or 00bd 00db | | Load_Top At_Offset_3 00be 0f5f | _ | Execute_Immediate Equal,0x5f 00bf 0278 | x | Execute Discrete,Or 00c0 6805 |h | Jump_Zero 0xc6 00c1 e217 | | Load 0x1,0x17 00c2 00db | | Load_Top At_Offset_3 00c3 8007 | | Call 0x0,0x7 00c4 00d1 | | Pop_Control Pop_Count_1 00c5 7998 |y | Jump 0x25e 00c6 480b |H | Short_Literal 0xb 00c7 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00c8 e217 | | Load 0x1,0x17 00c9 8008 | | Call 0x0,0x8 00ca 8009 | | Call 0x0,0x9 00cb a216 | | Store_Unchecked 0x1,0x16 00cc 821c | | Call 0x1,0x1c 00cd 7990 |y | Jump 0x25e 00ce 00da | | Load_Top At_Offset_2 00cf 4830 |H0 | Short_Literal 0x30 00d0 4839 |H9 | Short_Literal 0x39 00d1 0262 | b | Execute Discrete,In_Range 00d2 6805 |h | Jump_Zero 0xd8 00d3 e217 | | Load 0x1,0x17 00d4 00db | | Load_Top At_Offset_3 00d5 8007 | | Call 0x0,0x7 00d6 00d1 | | Pop_Control Pop_Count_1 00d7 7986 |y | Jump 0x25e 00d8 00da | | Load_Top At_Offset_2 00d9 00d8 | | Load_Top At_Offset_0 00da 0d68 | h | Execute_Immediate Less,0x68 00db 700e |p | Jump_Nonzero 0xea 00dc 00d8 | | Load_Top At_Offset_0 00dd 0c69 | i | Execute_Immediate Greater_Equal,0x69 00de 7008 |p | Jump_Nonzero 0xe7 00df 00d1 | | Pop_Control Pop_Count_1 00e0 4805 |H | Short_Literal 0x5 00e1 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00e2 e217 | | Load 0x1,0x17 00e3 00db | | Load_Top At_Offset_3 00e4 8007 | | Call 0x0,0x7 00e5 00d1 | | Pop_Control Pop_Count_1 00e6 7977 |yw | Jump 0x25e 00e7 0f6d | m | Execute_Immediate Equal,0x6d 00e8 7004 |p | Jump_Nonzero 0xed 00e9 7811 |x | Jump 0xfb 00ea 0f2e | . | Execute_Immediate Equal,0x2e 00eb 7008 |p | Jump_Nonzero 0xf4 00ec 780e |x | Jump 0xfb 00ed 4807 |H | Short_Literal 0x7 00ee 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00ef e217 | | Load 0x1,0x17 00f0 00db | | Load_Top At_Offset_3 00f1 8007 | | Call 0x0,0x7 00f2 00d1 | | Pop_Control Pop_Count_1 00f3 796a |yj | Jump 0x25e 00f4 4808 |H | Short_Literal 0x8 00f5 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00f6 e217 | | Load 0x1,0x17 00f7 00db | | Load_Top At_Offset_3 00f8 8007 | | Call 0x0,0x7 00f9 00d1 | | Pop_Control Pop_Count_1 00fa 7963 |yc | Jump 0x25e 00fb 480b |H | Short_Literal 0xb 00fc 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 00fd 4820 |H | Short_Literal 0x20 00fe a216 | | Store_Unchecked 0x1,0x16 00ff 821c | | Call 0x1,0x1c 0100 795d |y] | Jump 0x25e 0101 00da | | Load_Top At_Offset_2 0102 4830 |H0 | Short_Literal 0x30 0103 4839 |H9 | Short_Literal 0x39 0104 0262 | b | Execute Discrete,In_Range 0105 6807 |h | Jump_Zero 0x10d 0106 e217 | | Load 0x1,0x17 0107 00db | | Load_Top At_Offset_3 0108 8007 | | Call 0x0,0x7 0109 00d1 | | Pop_Control Pop_Count_1 010a 4804 |H | Short_Literal 0x4 010b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 010c 7951 |yQ | Jump 0x25e 010d 480b |H | Short_Literal 0xb 010e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 010f 482b |H+ | Short_Literal 0x2b 0110 a216 | | Store_Unchecked 0x1,0x16 0111 821c | | Call 0x1,0x1c 0112 794b |yK | Jump 0x25e 0113 00da | | Load_Top At_Offset_2 0114 4830 |H0 | Short_Literal 0x30 0115 4839 |H9 | Short_Literal 0x39 0116 0262 | b | Execute Discrete,In_Range 0117 6805 |h | Jump_Zero 0x11d 0118 e217 | | Load 0x1,0x17 0119 00db | | Load_Top At_Offset_3 011a 8007 | | Call 0x0,0x7 011b 00d1 | | Pop_Control Pop_Count_1 011c 7941 |yA | Jump 0x25e 011d 00da | | Load_Top At_Offset_2 011e 0b6d | m | Execute_Immediate Case_Compare,0x6d 011f 7008 |p | Jump_Nonzero 0x128 0120 0f2e | . | Execute_Immediate Equal,0x2e 0121 700e |p | Jump_Nonzero 0x130 0122 480b |H | Short_Literal 0xb 0123 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0124 482c |H, | Short_Literal 0x2c 0125 a216 | | Store_Unchecked 0x1,0x16 0126 821c | | Call 0x1,0x1c 0127 7936 |y6 | Jump 0x25e 0128 00d1 | | Pop_Control Pop_Count_1 0129 4807 |H | Short_Literal 0x7 012a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 012b e217 | | Load 0x1,0x17 012c 00db | | Load_Top At_Offset_3 012d 8007 | | Call 0x0,0x7 012e 00d1 | | Pop_Control Pop_Count_1 012f 792e |y. | Jump 0x25e 0130 4808 |H | Short_Literal 0x8 0131 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0132 e217 | | Load 0x1,0x17 0133 00db | | Load_Top At_Offset_3 0134 8007 | | Call 0x0,0x7 0135 00d1 | | Pop_Control Pop_Count_1 0136 7927 |y' | Jump 0x25e 0137 00da | | Load_Top At_Offset_2 0138 4830 |H0 | Short_Literal 0x30 0139 4839 |H9 | Short_Literal 0x39 013a 0262 | b | Execute Discrete,In_Range 013b 6807 |h | Jump_Zero 0x143 013c e217 | | Load 0x1,0x17 013d 00db | | Load_Top At_Offset_3 013e 8007 | | Call 0x0,0x7 013f 00d1 | | Pop_Control Pop_Count_1 0140 4806 |H | Short_Literal 0x6 0141 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0142 791b |y | Jump 0x25e 0143 480b |H | Short_Literal 0xb 0144 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0145 482b |H+ | Short_Literal 0x2b 0146 a216 | | Store_Unchecked 0x1,0x16 0147 821c | | Call 0x1,0x1c 0148 7915 |y | Jump 0x25e 0149 00da | | Load_Top At_Offset_2 014a 4830 |H0 | Short_Literal 0x30 014b 4839 |H9 | Short_Literal 0x39 014c 0262 | b | Execute Discrete,In_Range 014d 6805 |h | Jump_Zero 0x153 014e e217 | | Load 0x1,0x17 014f 00db | | Load_Top At_Offset_3 0150 8007 | | Call 0x0,0x7 0151 00d1 | | Pop_Control Pop_Count_1 0152 790b |y | Jump 0x25e 0153 00da | | Load_Top At_Offset_2 0154 0f2e | . | Execute_Immediate Equal,0x2e 0155 6807 |h | Jump_Zero 0x15d 0156 e217 | | Load 0x1,0x17 0157 00db | | Load_Top At_Offset_3 0158 8007 | | Call 0x0,0x7 0159 00d1 | | Pop_Control Pop_Count_1 015a 4808 |H | Short_Literal 0x8 015b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 015c 7901 |y | Jump 0x25e 015d 480b |H | Short_Literal 0xb 015e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 015f 482c |H, | Short_Literal 0x2c 0160 a216 | | Store_Unchecked 0x1,0x16 0161 821c | | Call 0x1,0x1c 0162 78fb |x | Jump 0x25e 0163 00da | | Load_Top At_Offset_2 0164 4830 |H0 | Short_Literal 0x30 0165 4839 |H9 | Short_Literal 0x39 0166 0262 | b | Execute Discrete,In_Range 0167 6809 |h | Jump_Zero 0x171 0168 e217 | | Load 0x1,0x17 0169 00db | | Load_Top At_Offset_3 016a 8007 | | Call 0x0,0x7 016b 00d1 | | Pop_Control Pop_Count_1 016c 480b |H | Short_Literal 0xb 016d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 016e 482b |H+ | Short_Literal 0x2b 016f a216 | | Store_Unchecked 0x1,0x16 0170 78ed |x | Jump 0x25e 0171 480b |H | Short_Literal 0xb 0172 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0173 482c |H, | Short_Literal 0x2c 0174 a216 | | Store_Unchecked 0x1,0x16 0175 78e8 |x | Jump 0x25e 0176 00da | | Load_Top At_Offset_2 0177 467f |F | Jump_Case 0x80 0178 787f |x | Jump 0x1f8 ; case 0x0 0179 787e |x~ | Jump 0x1f8 ; case 0x1 017a 787d |x} | Jump 0x1f8 ; case 0x2 017b 787c |x| | Jump 0x1f8 ; case 0x3 017c 7898 |x | Jump 0x215 ; case 0x4 017d 787a |xz | Jump 0x1f8 ; case 0x5 017e 7879 |xy | Jump 0x1f8 ; case 0x6 017f 7878 |xx | Jump 0x1f8 ; case 0x7 0180 7877 |xw | Jump 0x1f8 ; case 0x8 0181 7876 |xv | Jump 0x1f8 ; case 0x9 0182 7875 |xu | Jump 0x1f8 ; case 0xa 0183 7874 |xt | Jump 0x1f8 ; case 0xb 0184 7873 |xs | Jump 0x1f8 ; case 0xc 0185 78d8 |x | Jump 0x25e ; case 0xd 0186 7871 |xq | Jump 0x1f8 ; case 0xe 0187 7870 |xp | Jump 0x1f8 ; case 0xf 0188 786f |xo | Jump 0x1f8 ; case 0x10 0189 786e |xn | Jump 0x1f8 ; case 0x11 018a 786d |xm | Jump 0x1f8 ; case 0x12 018b 786c |xl | Jump 0x1f8 ; case 0x13 018c 786b |xk | Jump 0x1f8 ; case 0x14 018d 786a |xj | Jump 0x1f8 ; case 0x15 018e 7869 |xi | Jump 0x1f8 ; case 0x16 018f 7868 |xh | Jump 0x1f8 ; case 0x17 0190 7867 |xg | Jump 0x1f8 ; case 0x18 0191 7866 |xf | Jump 0x1f8 ; case 0x19 0192 7865 |xe | Jump 0x1f8 ; case 0x1a 0193 7864 |xd | Jump 0x1f8 ; case 0x1b 0194 7863 |xc | Jump 0x1f8 ; case 0x1c 0195 7862 |xb | Jump 0x1f8 ; case 0x1d 0196 7861 |xa | Jump 0x1f8 ; case 0x1e 0197 7860 |x` | Jump 0x1f8 ; case 0x1f 0198 78c5 |x | Jump 0x25e ; case 0x20 0199 785e |x^ | Jump 0x1f8 ; case 0x21 019a 785d |x] | Jump 0x1f8 ; case 0x22 019b 785c |x\ | Jump 0x1f8 ; case 0x23 019c 785b |x[ | Jump 0x1f8 ; case 0x24 019d 785a |xZ | Jump 0x1f8 ; case 0x25 019e 7859 |xY | Jump 0x1f8 ; case 0x26 019f 7858 |xX | Jump 0x1f8 ; case 0x27 01a0 7893 |x | Jump 0x234 ; case 0x28 01a1 7897 |x | Jump 0x239 ; case 0x29 01a2 78aa |x | Jump 0x24d ; case 0x2a 01a3 789a |x | Jump 0x23e ; case 0x2b 01a4 7885 |x | Jump 0x22a ; case 0x2c 01a5 789d |x | Jump 0x243 ; case 0x2d 01a6 7888 |x | Jump 0x22f ; case 0x2e 01a7 78a0 |x | Jump 0x248 ; case 0x2f 01a8 784f |xO | Jump 0x1f8 ; case 0x30 01a9 784e |xN | Jump 0x1f8 ; case 0x31 01aa 784d |xM | Jump 0x1f8 ; case 0x32 01ab 784c |xL | Jump 0x1f8 ; case 0x33 01ac 784b |xK | Jump 0x1f8 ; case 0x34 01ad 784a |xJ | Jump 0x1f8 ; case 0x35 01ae 7849 |xI | Jump 0x1f8 ; case 0x36 01af 7848 |xH | Jump 0x1f8 ; case 0x37 01b0 7847 |xG | Jump 0x1f8 ; case 0x38 01b1 7846 |xF | Jump 0x1f8 ; case 0x39 01b2 7872 |xr | Jump 0x225 ; case 0x3a 01b3 7844 |xD | Jump 0x1f8 ; case 0x3b 01b4 7865 |xe | Jump 0x21a ; case 0x3c 01b5 786a |xj | Jump 0x220 ; case 0x3d 01b6 7866 |xf | Jump 0x21d ; case 0x3e 01b7 7840 |x@ | Jump 0x1f8 ; case 0x3f 01b8 783f |x? | Jump 0x1f8 ; case 0x40 01b9 783e |x> | Jump 0x1f8 ; case 0x41 01ba 783d |x= | Jump 0x1f8 ; case 0x42 01bb 783c |x< | Jump 0x1f8 ; case 0x43 01bc 783b |x; | Jump 0x1f8 ; case 0x44 01bd 783a |x: | Jump 0x1f8 ; case 0x45 01be 7839 |x9 | Jump 0x1f8 ; case 0x46 01bf 7838 |x8 | Jump 0x1f8 ; case 0x47 01c0 7837 |x7 | Jump 0x1f8 ; case 0x48 01c1 7836 |x6 | Jump 0x1f8 ; case 0x49 01c2 7835 |x5 | Jump 0x1f8 ; case 0x4a 01c3 7834 |x4 | Jump 0x1f8 ; case 0x4b 01c4 7833 |x3 | Jump 0x1f8 ; case 0x4c 01c5 7832 |x2 | Jump 0x1f8 ; case 0x4d 01c6 7831 |x1 | Jump 0x1f8 ; case 0x4e 01c7 7830 |x0 | Jump 0x1f8 ; case 0x4f 01c8 782f |x/ | Jump 0x1f8 ; case 0x50 01c9 782e |x. | Jump 0x1f8 ; case 0x51 01ca 782d |x- | Jump 0x1f8 ; case 0x52 01cb 782c |x, | Jump 0x1f8 ; case 0x53 01cc 782b |x+ | Jump 0x1f8 ; case 0x54 01cd 782a |x* | Jump 0x1f8 ; case 0x55 01ce 7829 |x) | Jump 0x1f8 ; case 0x56 01cf 7828 |x( | Jump 0x1f8 ; case 0x57 01d0 7827 |x' | Jump 0x1f8 ; case 0x58 01d1 7826 |x& | Jump 0x1f8 ; case 0x59 01d2 7825 |x% | Jump 0x1f8 ; case 0x5a 01d3 787e |x~ | Jump 0x252 ; case 0x5b 01d4 7823 |x# | Jump 0x1f8 ; case 0x5c 01d5 7881 |x | Jump 0x257 ; case 0x5d 01d6 7821 |x! | Jump 0x1f8 ; case 0x5e 01d7 7820 |x | Jump 0x1f8 ; case 0x5f 01d8 781f |x | Jump 0x1f8 ; case 0x60 01d9 781e |x | Jump 0x1f8 ; case 0x61 01da 781d |x | Jump 0x1f8 ; case 0x62 01db 781c |x | Jump 0x1f8 ; case 0x63 01dc 781b |x | Jump 0x1f8 ; case 0x64 01dd 781a |x | Jump 0x1f8 ; case 0x65 01de 7819 |x | Jump 0x1f8 ; case 0x66 01df 7818 |x | Jump 0x1f8 ; case 0x67 01e0 7817 |x | Jump 0x1f8 ; case 0x68 01e1 7816 |x | Jump 0x1f8 ; case 0x69 01e2 7815 |x | Jump 0x1f8 ; case 0x6a 01e3 7814 |x | Jump 0x1f8 ; case 0x6b 01e4 7813 |x | Jump 0x1f8 ; case 0x6c 01e5 7812 |x | Jump 0x1f8 ; case 0x6d 01e6 7811 |x | Jump 0x1f8 ; case 0x6e 01e7 7810 |x | Jump 0x1f8 ; case 0x6f 01e8 780f |x | Jump 0x1f8 ; case 0x70 01e9 780e |x | Jump 0x1f8 ; case 0x71 01ea 780d |x | Jump 0x1f8 ; case 0x72 01eb 780c |x | Jump 0x1f8 ; case 0x73 01ec 780b |x | Jump 0x1f8 ; case 0x74 01ed 780a |x | Jump 0x1f8 ; case 0x75 01ee 7809 |x | Jump 0x1f8 ; case 0x76 01ef 7808 |x | Jump 0x1f8 ; case 0x77 01f0 7807 |x | Jump 0x1f8 ; case 0x78 01f1 7806 |x | Jump 0x1f8 ; case 0x79 01f2 7805 |x | Jump 0x1f8 ; case 0x7a 01f3 7868 |xh | Jump 0x25c ; case 0x7b 01f4 7803 |x | Jump 0x1f8 ; case 0x7c 01f5 7802 |x | Jump 0x1f8 ; case 0x7d 01f6 7801 |x | Jump 0x1f8 ; case 0x7e 01f7 7800 |x | Jump 0x1f8 ; case 0x7f 01f8 00da | | Load_Top At_Offset_2 01f9 4861 |Ha | Short_Literal 0x61 01fa 487a |Hz | Short_Literal 0x7a 01fb 0262 | b | Execute Discrete,In_Range 01fc 6807 |h | Jump_Zero 0x204 01fd e217 | | Load 0x1,0x17 01fe 00db | | Load_Top At_Offset_3 01ff 8007 | | Call 0x0,0x7 0200 00d1 | | Pop_Control Pop_Count_1 0201 4803 |H | Short_Literal 0x3 0202 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0203 785a |xZ | Jump 0x25e 0204 00da | | Load_Top At_Offset_2 0205 4830 |H0 | Short_Literal 0x30 0206 4839 |H9 | Short_Literal 0x39 0207 0262 | b | Execute Discrete,In_Range 0208 6807 |h | Jump_Zero 0x210 0209 e217 | | Load 0x1,0x17 020a 00db | | Load_Top At_Offset_3 020b 8007 | | Call 0x0,0x7 020c 00d1 | | Pop_Control Pop_Count_1 020d 4809 |H | Short_Literal 0x9 020e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 020f 784e |xN | Jump 0x25e 0210 480b |H | Short_Literal 0xb 0211 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0212 482c |H, | Short_Literal 0x2c 0213 a216 | | Store_Unchecked 0x1,0x16 0214 7849 |xI | Jump 0x25e 0215 480b |H | Short_Literal 0xb 0216 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0217 482d |H- | Short_Literal 0x2d 0218 a216 | | Store_Unchecked 0x1,0x16 0219 7844 |xD | Jump 0x25e 021a 4801 |H | Short_Literal 0x1 021b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 021c 7841 |xA | Jump 0x25e 021d 4802 |H | Short_Literal 0x2 021e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 021f 783e |x> | Jump 0x25e 0220 480b |H | Short_Literal 0xb 0221 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0222 481c |H | Short_Literal 0x1c 0223 a216 | | Store_Unchecked 0x1,0x16 0224 7839 |x9 | Jump 0x25e 0225 480b |H | Short_Literal 0xb 0226 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0227 481a |H | Short_Literal 0x1a 0228 a216 | | Store_Unchecked 0x1,0x16 0229 7834 |x4 | Jump 0x25e 022a 480b |H | Short_Literal 0xb 022b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 022c 4826 |H& | Short_Literal 0x26 022d a216 | | Store_Unchecked 0x1,0x16 022e 782f |x/ | Jump 0x25e 022f 480b |H | Short_Literal 0xb 0230 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0231 4825 |H% | Short_Literal 0x25 0232 a216 | | Store_Unchecked 0x1,0x16 0233 782a |x* | Jump 0x25e 0234 480b |H | Short_Literal 0xb 0235 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0236 4823 |H# | Short_Literal 0x23 0237 a216 | | Store_Unchecked 0x1,0x16 0238 7825 |x% | Jump 0x25e 0239 480b |H | Short_Literal 0xb 023a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 023b 4822 |H" | Short_Literal 0x22 023c a216 | | Store_Unchecked 0x1,0x16 023d 7820 |x | Jump 0x25e 023e 480b |H | Short_Literal 0xb 023f 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0240 4824 |H$ | Short_Literal 0x24 0241 a216 | | Store_Unchecked 0x1,0x16 0242 781b |x | Jump 0x25e 0243 480b |H | Short_Literal 0xb 0244 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0245 4821 |H! | Short_Literal 0x21 0246 a216 | | Store_Unchecked 0x1,0x16 0247 7816 |x | Jump 0x25e 0248 480b |H | Short_Literal 0xb 0249 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 024a 4827 |H' | Short_Literal 0x27 024b a216 | | Store_Unchecked 0x1,0x16 024c 7811 |x | Jump 0x25e 024d 480b |H | Short_Literal 0xb 024e 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 024f 482a |H* | Short_Literal 0x2a 0250 a216 | | Store_Unchecked 0x1,0x16 0251 780c |x | Jump 0x25e 0252 480b |H | Short_Literal 0xb 0253 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0254 4819 |H | Short_Literal 0x19 0255 a216 | | Store_Unchecked 0x1,0x16 0256 7807 |x | Jump 0x25e 0257 480b |H | Short_Literal 0xb 0258 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 0259 4818 |H | Short_Literal 0x18 025a a216 | | Store_Unchecked 0x1,0x16 025b 7802 |x | Jump 0x25e 025c 480a |H | Short_Literal 0xa 025d 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 025e 00c9 | | Action Pop_Auxiliary_Loop 025f 00d9 | | Load_Top At_Offset_1 0260 0e0b | | Execute_Immediate Not_Equal,0xb 0261 760f |v | Jump_Nonzero 0x71 0262 00ce | | Action Pop_Auxiliary 0263 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0264 482d |H- | Short_Literal 0x2d 0265 a216 | | Store_Unchecked 0x1,0x16 0266 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0267 0000 | | .XXX[0x1] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026b | k | .CONST 0x026b ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0001 | | .CONST 0x0001 ; Number of locals 026b BODY_0268: 026b INIT_0268: 026b e216 | | Load 0x1,0x16 026c 00ca | | Action Exit_Nullary_Function 026d 0000 0000 | | .XXX[0x3] 026f 0000 | | 0270 ; -------------------------------------------------------------------------------------- 0270 ; SUBPROGRAM 0270 ; -------------------------------------------------------------------------------------- 0270 0275 | u | .CONST 0x0275 ; Address of begin 0271 0004 | | .CONST 0x0004 ; Address of exception handler 0272 0002 | | .CONST 0x0002 ; Number of locals 0273 INIT_0270: 0273 e20d | | Load 0x1,0xd 0274 0007 | | Action Break_Optional 0275 BODY_0270: 0275 e216 | | Load 0x1,0x16 0276 0f2b | + | Execute_Immediate Equal,0x2b 0277 7006 |p | Jump_Nonzero 0x27e 0278 e217 | | Load 0x1,0x17 0279 8008 | | Call 0x0,0x8 027a e20d | | Load 0x1,0xd 027b 03b6 | | Declare_Variable Access,By_Allocation,With_Value 027c 0039 | 9 | Store_Top Access,At_Offset_1 027d 7806 |x | Jump 0x284 027e e217 | | Load 0x1,0x17 027f 8008 | | Call 0x0,0x8 0280 821a | | Call 0x1,0x1a 0281 e20d | | Load 0x1,0xd 0282 03b6 | | Declare_Variable Access,By_Allocation,With_Value 0283 0039 | 9 | Store_Top Access,At_Offset_1 0284 00d8 | | Load_Top At_Offset_0 0285 00ca | | Action Exit_Nullary_Function 0286 0000 0000 | | .XXX[0x2] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028b | | .CONST 0x028b ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0001 | | .CONST 0x0001 ; Number of locals 028b BODY_0288: 028b INIT_0288: 028b e214 | | Load 0x1,0x14 028c e002 | | Load 0x0,0x2 028d 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38 028e 00ca | | Action Exit_Nullary_Function 028f 0000 | | .XXX[0x1] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 4607 |F | Jump_Case 0x8 0294 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0295 7807 |x | Jump 0x29d ; case 0x1 0296 780a |x | Jump 0x2a1 ; case 0x2 0297 780e |x | Jump 0x2a6 ; case 0x3 0298 7811 |x | Jump 0x2aa ; case 0x4 0299 7812 |x | Jump 0x2ac ; case 0x5 029a 7813 |x | Jump 0x2ae ; case 0x6 029b 7816 |x | Jump 0x2b2 ; case 0x7 029c 4302 |C | .XXX[0x1] 029d 00da | | Load_Top At_Offset_2 029e 0091 0376 | v| Action Push_String_Extended_Indexed,0x376 ; "ST_NORMAL" 02a0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02a1 00db | | Load_Top At_Offset_3 02a2 00db | | Load_Top At_Offset_3 02a3 00e0 | | Load_Encached Standard_Cache 02a4 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02a6 00da | | Load_Top At_Offset_2 02a7 00e0 | | Load_Encached Standard_Cache 02a8 181c | | Execute Package,Field_Execute,Field_Number 0x1c 02a9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 02aa 00db | | Load_Top At_Offset_3 02ab 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ac 00db | | Load_Top At_Offset_3 02ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02ae e219 | | Load 0x1,0x19 02af 00dc | | Load_Top At_Offset_4 02b0 0267 | g | Execute Discrete,Predecessor 02b1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02b2 e219 | | Load 0x1,0x19 02b3 00dc | | Load_Top At_Offset_4 02b4 0268 | h | Execute Discrete,Successor 02b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 02b6 0000 0000 | | .XXX[0x2] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02bf | | .CONST 0x02bf ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0003 | | .CONST 0x0003 ; Number of locals 02bb INIT_02b8: 02bb 00e2 | | Load_Encached Integer_Cache 02bc 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 02bd 00e2 | | Load_Encached Integer_Cache 02be 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 02bf BODY_02b8: 02bf 00cf | | Action Mark_Auxiliary 02c0 e5ff | | Load 0x2,-0x1 02c1 01db | | Execute Vector,Length 02c2 00d8 | | Load_Top At_Offset_0 02c3 00e2 | | Load_Encached Integer_Cache 02c4 0260 | ` | Execute Discrete,In_Type 02c5 7001 |p | Jump_Nonzero 0x2c7 02c6 0801 | | Execute_Immediate Raise,0x1 02c7 4801 |H | Short_Literal 0x1 02c8 0263 | c | Execute Discrete,Above_Bound 02c9 7076 |pv | Jump_Nonzero 0x340 02ca 00d8 | | Load_Top At_Offset_0 02cb e5ff | | Load 0x2,-0x1 02cc 01d7 | | Execute Vector,Field_Read 02cd 4830 |H0 | Short_Literal 0x30 02ce 4839 |H9 | Short_Literal 0x39 02cf 0262 | b | Execute Discrete,In_Range 02d0 6801 |h | Jump_Zero 0x2d2 02d1 786c |xl | Jump 0x33e 02d2 00d8 | | Load_Top At_Offset_0 02d3 e5ff | | Load 0x2,-0x1 02d4 01d7 | | Execute Vector,Field_Read 02d5 00d8 | | Load_Top At_Offset_0 02d6 0d2f | / | Execute_Immediate Less,0x2f 02d7 700a |p | Jump_Nonzero 0x2e2 02d8 00d8 | | Load_Top At_Offset_0 02d9 0c68 | h | Execute_Immediate Greater_Equal,0x68 02da 7002 |p | Jump_Nonzero 0x2dd 02db 00d1 | | Pop_Control Pop_Count_1 02dc 7861 |xa | Jump 0x33e 02dd 0b68 | h | Execute_Immediate Case_Compare,0x68 02de 704e |pN | Jump_Nonzero 0x32d 02df 0f6d | m | Execute_Immediate Equal,0x6d 02e0 7006 |p | Jump_Nonzero 0x2e7 02e1 785c |x\ | Jump 0x33e 02e2 0b20 | | Execute_Immediate Case_Compare,0x20 02e3 7039 |p9 | Jump_Nonzero 0x31d 02e4 0f2e | . | Execute_Immediate Equal,0x2e 02e5 7012 |p | Jump_Nonzero 0x2f8 02e6 7857 |xW | Jump 0x33e 02e7 00db | | Load_Top At_Offset_3 02e8 e402 | | Load 0x2,0x2 02e9 00da | | Load_Top At_Offset_2 02ea 0aff | | Execute_Immediate Plus,-0x1 02eb e5ff | | Load 0x2,-0x1 02ec 01cf | | Execute Vector,Slice_Read 02ed 00e2 | | Load_Encached Integer_Cache 02ee 00e0 | | Load_Encached Standard_Cache 02ef 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02f0 4a58 |JX | Short_Literal 0x258 02f1 0271 | q | Execute Discrete,Times 02f2 0273 | s | Execute Discrete,Plus 02f3 c403 | | Store 0x2,0x3 02f4 00d8 | | Load_Top At_Offset_0 02f5 0a01 | | Execute_Immediate Plus,0x1 02f6 c402 | | Store 0x2,0x2 02f7 7846 |xF | Jump 0x33e 02f8 00db | | Load_Top At_Offset_3 02f9 e402 | | Load 0x2,0x2 02fa 00da | | Load_Top At_Offset_2 02fb 0aff | | Execute_Immediate Plus,-0x1 02fc e5ff | | Load 0x2,-0x1 02fd 01cf | | Execute Vector,Slice_Read 02fe 00e2 | | Load_Encached Integer_Cache 02ff 00e0 | | Load_Encached Standard_Cache 0300 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0301 480a |H | Short_Literal 0xa 0302 0271 | q | Execute Discrete,Times 0303 0273 | s | Execute Discrete,Plus 0304 c403 | | Store 0x2,0x3 0305 00d8 | | Load_Top At_Offset_0 0306 0a01 | | Execute_Immediate Plus,0x1 0307 c402 | | Store 0x2,0x2 0308 e402 | | Load 0x2,0x2 0309 e5ff | | Load 0x2,-0x1 030a 01d7 | | Execute Vector,Field_Read 030b 4830 |H0 | Short_Literal 0x30 030c 4839 |H9 | Short_Literal 0x39 030d 0262 | b | Execute Discrete,In_Range 030e 682f |h/ | Jump_Zero 0x33e 030f 00db | | Load_Top At_Offset_3 0310 e402 | | Load 0x2,0x2 0311 00d8 | | Load_Top At_Offset_0 0312 e5ff | | Load 0x2,-0x1 0313 01cf | | Execute Vector,Slice_Read 0314 00e2 | | Load_Encached Integer_Cache 0315 00e0 | | Load_Encached Standard_Cache 0316 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0317 0273 | s | Execute Discrete,Plus 0318 c403 | | Store 0x2,0x3 0319 e402 | | Load 0x2,0x2 031a 0a01 | | Execute_Immediate Plus,0x1 031b c402 | | Store 0x2,0x2 031c 7821 |x! | Jump 0x33e 031d 00d1 | | Pop_Control Pop_Count_1 031e 00db | | Load_Top At_Offset_3 031f e402 | | Load 0x2,0x2 0320 00da | | Load_Top At_Offset_2 0321 0aff | | Execute_Immediate Plus,-0x1 0322 e5ff | | Load 0x2,-0x1 0323 01cf | | Execute Vector,Slice_Read 0324 00e2 | | Load_Encached Integer_Cache 0325 00e0 | | Load_Encached Standard_Cache 0326 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0327 0273 | s | Execute Discrete,Plus 0328 c403 | | Store 0x2,0x3 0329 e402 | | Load 0x2,0x2 032a 0a01 | | Execute_Immediate Plus,0x1 032b c402 | | Store 0x2,0x2 032c 7811 |x | Jump 0x33e 032d 00d1 | | Pop_Control Pop_Count_1 032e 00db | | Load_Top At_Offset_3 032f e402 | | Load 0x2,0x2 0330 00da | | Load_Top At_Offset_2 0331 0aff | | Execute_Immediate Plus,-0x1 0332 e5ff | | Load 0x2,-0x1 0333 01cf | | Execute Vector,Slice_Read 0334 00e2 | | Load_Encached Integer_Cache 0335 00e0 | | Load_Encached Standard_Cache 0336 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0337 6010 |` | Indirect_Literal Discrete,0x348,{0x00000000, 0x00008ca0} 0338 0271 | q | Execute Discrete,Times 0339 0273 | s | Execute Discrete,Plus 033a c403 | | Store 0x2,0x3 033b 00d8 | | Load_Top At_Offset_0 033c 0a01 | | Execute_Immediate Plus,0x1 033d c402 | | Store 0x2,0x2 033e 00c8 | | Action Pop_Auxiliary_Range 033f 3f8a |? | Loop_Increasing 0x2ca 0340 00ce | | Action Pop_Auxiliary 0341 00d8 | | Load_Top At_Offset_0 0342 00e0 | | Load_Encached Standard_Cache 0343 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0344 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0345 0000 0000 | | .XXX[0x3] 0347 0000 | | 0348 0000 0000 | | .LITERAL {0x00000000, 0x00008ca0} 034c 0000 0000 | | .BLANK 0000[0x4] 0350 ; -------------------------------------------------------------------------------------- 0350 ; SUBPROGRAM 0350 ; -------------------------------------------------------------------------------------- 0350 0353 | S | .CONST 0x0353 ; Address of begin 0351 0004 | | .CONST 0x0004 ; Address of exception handler 0352 0001 | | .CONST 0x0001 ; Number of locals 0353 BODY_0350: 0353 INIT_0350: 0353 e215 | | Load 0x1,0x15 0354 6803 |h | Jump_Zero 0x358 0355 4800 |H | Short_Literal 0x0 0356 a215 | | Store_Unchecked 0x1,0x15 0357 7810 |x | Jump 0x368 0358 e214 | | Load 0x1,0x14 0359 e002 | | Load 0x0,0x2 035a 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30 035b 6807 |h | Jump_Zero 0x363 035c 4801 |H | Short_Literal 0x1 035d e214 | | Load 0x1,0x14 035e e002 | | Load 0x0,0x2 035f 182e | . | Execute Package,Field_Execute,Field_Number 0x2e 0360 480d |H | Short_Literal 0xd 0361 a218 | | Store_Unchecked 0x1,0x18 0362 7805 |x | Jump 0x368 0363 00e8 | | Load_Encached Character_Cache 0364 e214 | | Load 0x1,0x14 0365 e002 | | Load 0x0,0x2 0366 1844 | D | Execute Package,Field_Execute,Field_Number 0x44 0367 c218 | | Store 0x1,0x18 0368 e218 | | Load 0x1,0x18 0369 00ca | | Action Exit_Nullary_Function 036a 0000 0000 | | .BLANK 0000[0x6] 0370 ; -------------------------------------------------------------------------------------- 0370 ; SUBPROGRAM 0370 ; -------------------------------------------------------------------------------------- 0370 0373 | s | .CONST 0x0373 ; Address of begin 0371 0004 | | .CONST 0x0004 ; Address of exception handler 0372 0001 | | .CONST 0x0001 ; Number of locals 0373 BODY_0370: 0373 INIT_0370: 0373 4801 |H | Short_Literal 0x1 0374 a215 | | Store_Unchecked 0x1,0x15 0375 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0376 ; -------------------------------------------------------------------------------------- 0376 ; STRING TABLE 0376 ; -------------------------------------------------------------------------------------- 0376 001a | | .STRTAB 0x001a->0x0383 ; "ST_NORMAL" 0377 0021 | ! | .STRTAB 0x0021->0x0387 ; "ST_LESS" 0378 0026 | & | .STRTAB 0x0026->0x038b ; "ST_GREAT" 0379 002c | , | .STRTAB 0x002c->0x038f ; "ST_WORD" 037a 0031 | 1 | .STRTAB 0x0031->0x0392 ; "ST_HEURE" 037b 0037 | 7 | .STRTAB 0x0037->0x0396 ; "ST_HEURE_NUMBER" 037c 0044 | D | .STRTAB 0x0044->0x039e ; "ST_MIN" 037d 0048 | H | .STRTAB 0x0048->0x03a1 ; "ST_MIN_NUMBER" 037e 0053 | S | .STRTAB 0x0053->0x03a7 ; "ST_SEC" 037f 0057 | W | .STRTAB 0x0057->0x03aa ; "ST_NUMBER" 0380 005e | ^ | .STRTAB 0x005e->0x03af ; "ST_COMMENTAIRE" 0381 006a | j | .STRTAB 0x006a->0x03b6 ; "ST_FOUND" 0382 0070 | p | .STREND 0x0070->0x03ba 0383 5354 5f4e |ST_N| .STRTAB_STRINGS 03ba 0000 0000 | | .BLANK 0000[0x6] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; Debug Table 03c0 ; -------------------------------------------------------------------------------------- 03c0 0004 0005 | | .DEBUG4 0x0004,0x0005,0x2f56,0x0000,0x0001,0x000c 03c6 000b 03f6 | | .DBG4T 0x000b,0x03f6,0x8000,0x0000 03ca 001c 03ff | | .DBG4T 0x001c,0x03ff,0x8000,0x0000 03ce 004b 0410 | K | .DBG4T 0x004b,0x0410,0x0001,0x0000 03d2 005b 0414 | [ | .DBG4T 0x005b,0x0414,0x0001,0x0000 03d6 0063 0417 | c | .DBG4T 0x0063,0x0417,0x0001,0x4000 03da 026b 0503 | k | .DBG4T 0x026b,0x0503,0x0002,0x0000 03de 0273 0506 | s | .DBG4T 0x0273,0x0506,0x0002,0x4000 03e2 028b 0511 | | .DBG4T 0x028b,0x0511,0x0002,0x0000 03e6 0293 0000 | | .DBG4T 0x0293,0x0000,0x0005,0x0000 03ea 02bb 0514 | | .DBG4T 0x02bb,0x0514,0x0002,0x4000 03ee 0353 0538 | S 8| .DBG4T 0x0353,0x0538,0x0002,0x0000 03f2 0373 0541 | s A| .DBG4T 0x0373,0x0541,0x0001,0x0000 03f6 ; -------------------------------------------------------------------------------------- 03f6 ; Debug chain 03f6 ; -------------------------------------------------------------------------------------- 03f6 0007 0000 | | .DBGLEN 0x0007,0x0000 03f8 000b 000f | | .DBGLNO 0x000b,0x000f,0x0011,0x0013,0x0015,0x0017,0x0019 03ff ; -------------------------------------------------------------------------------------- 03ff ; Debug chain 03ff ; -------------------------------------------------------------------------------------- 03ff 000f 0000 | | .DBGLEN 0x000f,0x0000 0401 001c 0021 | !| .DBGLNO 0x001c,0x0021,0x0023,0x0025,0x0029,0x002a,0x002f,0x0031,0x0033,0x0035,0x0037,0x0039,0x003b,0x003d,0x003f 0410 ; -------------------------------------------------------------------------------------- 0410 ; Debug chain 0410 ; -------------------------------------------------------------------------------------- 0410 0001 0001 | | .DBGLEN 0x0001,0x0001 0412 004b 004e | K N| .DBGLNO 0x004b,0x004e 0414 ; -------------------------------------------------------------------------------------- 0414 ; Debug chain 0414 ; -------------------------------------------------------------------------------------- 0414 0000 0001 | | .DBGLEN 0x0000,0x0001 0416 005b | [ | .DBGLNO 0x005b 0417 ; -------------------------------------------------------------------------------------- 0417 ; Debug chain 0417 ; -------------------------------------------------------------------------------------- 0417 0002 0074 | t| .DBGLEN 0x0002,0x0074 0419 0063 0064 | c d| .DBGLNO 0x0063,0x0064,0x0066,0x006a,0x006d,0x0071,0x0075,0x0079,0x007b,0x008a,0x008d,0x0090,0x0095,0x0097,0x0099,0x009c,0x009e,0x00a1,0x00a3,0x00a6,0x00a9,0x00ab,0x00ae,0x00b0,0x00b2,0x00b4,0x00c1,0x00c6,0x00c8,0x00cc,0x00ce,0x00d3,0x00d8,0x00e0,0x00e2,0x00ed,0x00ef,0x00f4,0x00f6,0x00fb,0x00fd,0x00ff,0x0101,0x0106,0x010a,0x010d,0x010f,0x0111,0x0113,0x0118,0x011d,0x0122,0x0124,0x0126,0x0129,0x012b,0x0130,0x0132,0x0137,0x013c,0x0140,0x0143,0x0145,0x0147,0x0149,0x014e,0x0153,0x0156,0x015a,0x015d,0x015f,0x0161,0x0163,0x0168,0x016c,0x016e,0x0171,0x0173,0x0176,0x01f8,0x01fd,0x0201,0x0204,0x0209,0x020d,0x0210,0x0212,0x0215,0x0217,0x021a,0x021d,0x0220,0x0222,0x0225,0x0227,0x022a,0x022c,0x022f,0x0231,0x0234,0x0236,0x0239,0x023b,0x023e,0x0240,0x0243,0x0245,0x0248,0x024a,0x024d,0x024f,0x0252,0x0254,0x0257,0x0259,0x025c,0x025f,0x0264 048f 0001 0002 | | .XXX[0x74] 0491 0003 0005 | | 0493 0006 0007 | | 0495 0008 0030 | 0| 0497 0031 0032 | 1 2| 0499 0037 0038 | 7 8| 049b 0039 0033 | 9 3| 049d 0034 0035 | 4 5| 049f 0036 003a | 6 :| 04a1 003b 003c | ; <| 04a3 003d 003e | = >| 04a5 003f 0040 | ? @| 04a7 0041 0042 | A B| 04a9 0043 0044 | C D| 04ab 0045 0046 | E F| 04ad 0047 0048 | G H| 04af 0049 004a | I J| 04b1 004b 004c | K L| 04b3 004d 004e | M N| 04b5 004f 0050 | O P| 04b7 0051 0052 | Q R| 04b9 0053 0054 | S T| 04bb 0055 0056 | U V| 04bd 0057 0058 | W X| 04bf 0059 005e | Y ^| 04c1 005f 0060 | _ `| 04c3 005a 005b | Z [| 04c5 005c 005d | \ ]| 04c7 0061 0062 | a b| 04c9 0063 0064 | c d| 04cb 0065 0066 | e f| 04cd 0067 0068 | g h| 04cf 0069 006a | i j| 04d1 006b 006c | k l| 04d3 006d 006e | m n| 04d5 006f 0070 | o p| 04d7 0071 0072 | q r| 04d9 0073 0074 | s t| 04db 0009 0028 | (| 04dd 0029 002a | ) *| 04df 002b 002c | + ,| 04e1 002d 002e | - .| 04e3 002f 000b | / | 04e5 000c 000d | | 04e7 000e 000f | | 04e9 0010 0011 | | 04eb 0012 0013 | | 04ed 0014 0015 | | 04ef 0016 0017 | | 04f1 0018 0019 | | 04f3 001a 001b | | 04f5 001c 001d | | 04f7 001e 001f | | 04f9 0020 0021 | !| 04fb 0022 0023 | " #| 04fd 0024 0025 | $ %| 04ff 0026 0027 | & '| 0501 0004 0076 | v| 0503 ; -------------------------------------------------------------------------------------- 0503 ; Debug chain 0503 ; -------------------------------------------------------------------------------------- 0503 0000 0001 | | .DBGLEN 0x0000,0x0001 0505 026b | k | .DBGLNO 0x026b 0506 ; -------------------------------------------------------------------------------------- 0506 ; Debug chain 0506 ; -------------------------------------------------------------------------------------- 0506 0001 0004 | | .DBGLEN 0x0001,0x0004 0508 0273 0275 | s u| .DBGLNO 0x0273,0x0275,0x0278,0x027e,0x0284 050d 0001 0003 | | .XXX[0x4] 050f 0002 0004 | | 0511 ; -------------------------------------------------------------------------------------- 0511 ; Debug chain 0511 ; -------------------------------------------------------------------------------------- 0511 0000 0001 | | .DBGLEN 0x0000,0x0001 0513 028b | | .DBGLNO 0x028b 0514 ; -------------------------------------------------------------------------------------- 0514 ; Debug chain 0514 ; -------------------------------------------------------------------------------------- 0514 0002 0010 | | .DBGLEN 0x0002,0x0010 0516 02bb 02bd | | .DBGLNO 0x02bb,0x02bd,0x02c0,0x02ca,0x02d1,0x02d2,0x02e7,0x02f4,0x02f8,0x0305,0x0308,0x030f,0x0319,0x031e,0x0329,0x032e,0x033b,0x0341 0528 0001 0002 | | .XXX[0x10] 052a 0003 0004 | | 052c 0007 0008 | | 052e 0009 000a | | 0530 000b 000c | | 0532 000d 000e | | 0534 000f 0005 | | 0536 0006 0011 | | 0538 ; -------------------------------------------------------------------------------------- 0538 ; Debug chain 0538 ; -------------------------------------------------------------------------------------- 0538 0000 0007 | | .DBGLEN 0x0000,0x0007 053a 0353 0355 | S U| .DBGLNO 0x0353,0x0355,0x0358,0x035c,0x0360,0x0363,0x0368 0541 ; -------------------------------------------------------------------------------------- 0541 ; Debug chain 0541 ; -------------------------------------------------------------------------------------- 0541 0000 0001 | | .DBGLEN 0x0000,0x0001 0543 0373 | s | .DBGLNO 0x0373 0544 0000 0000 | | .BLANK 0000[0xbc]