|
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]