|
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: 4096 (0x1000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0710 | | .CONST 0x0710 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00a8 | | .CONST 0x00a8 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 003c | < | .CONST 0x003c ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1
000c 0129 | ) | Execute Any,Make_Visible
000d e002 | | Load 0x0,0x2
000e 0129 | ) | Execute Any,Make_Visible
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b 00c4 | | Action Make_Default
001c 00c4 | | Action Make_Default
001d 00c4 | | Action Make_Default
001e 00c4 | | Action Make_Default
001f 00c4 | | Action Make_Default
0020 00c4 | | Action Make_Default
0021 00c4 | | Action Make_Default
0022 00c4 | | Action Make_Default
0023 00c4 | | Action Make_Default
0024 00c4 | | Action Make_Default
0025 00c4 | | Action Make_Default
0026 00c4 | | Action Make_Default
0027 00c4 | | Action Make_Default
0028 00c4 | | Action Make_Default
0029 00c4 | | Action Make_Default
002a 00c4 | | Action Make_Default
002b 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated
002d c220 | | Store 0x1,0x20
002e 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated
0030 c226 | & | Store 0x1,0x26
0031 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated
0033 c211 | | Store 0x1,0x11
0034 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
0036 c212 | | Store 0x1,0x12
0037 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated
0039 c213 | | Store 0x1,0x13
003a 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated
003c c214 | | Store 0x1,0x14
003d 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
003f c224 | $ | Store 0x1,0x24
0040 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated
0042 c225 | % | Store 0x1,0x25
0043 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
0045 c219 | | Store 0x1,0x19
0046 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated
0048 c21a | | Store 0x1,0x1a
0049 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated
004b c227 | ' | Store 0x1,0x27
004c 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated
004e c228 | ( | Store 0x1,0x28
004f 029a 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call,Visible,Unelaborated
0051 c229 | ) | Store 0x1,0x29
0052 029a 02db | | Declare_Subprogram INIT_02d8,For_Outer_Call,Visible,Unelaborated
0054 c22a | * | Store 0x1,0x2a
0055 00bf | | Action Accept_Activation
0056 00e9 | | Load_Encached String_Cache
0057 02a0 | | Declare_Subprogram Null_Subprogram
0058 03ad | | Declare_Type Heap_Access,Defined
0059 00d8 | | Load_Top At_Offset_0
005a 00d9 | | Load_Top At_Offset_1
005b 00da | | Load_Top At_Offset_2
005c 00db | | Load_Top At_Offset_3
005d e22b | + | Load 0x1,0x2b
005e 02a0 | | Declare_Subprogram Null_Subprogram
005f 4805 |H | Short_Literal 0x5
0060 032d | - | Declare_Type Record,Defined
0061 00d8 | | Load_Top At_Offset_0
0062 02a0 | | Declare_Subprogram Null_Subprogram
0063 03ad | | Declare_Type Heap_Access,Defined
0064 029d 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call
0066 029d 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call
0068 e003 | | Load 0x0,0x3
0069 e004 | | Load 0x0,0x4
006a e22d | - | Load 0x1,0x2d
006b 00d8 | | Load_Top At_Offset_0
006c 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
006d 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
006e 0092 06d8 | | Action Push_String_Extended,0x6d8 ; "RCI_Remote_Defaults"
0070 e005 | | Load 0x0,0x5
0071 0387 | | Declare_Variable Package
0072 00d8 | | Load_Top At_Offset_0
0073 020f | | Execute Module,Activate
0074 029d 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call
0076 029d 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call
0078 029d 0363 | c| Declare_Subprogram INIT_0360,For_Outer_Call
007a 029d 039b | | Declare_Subprogram INIT_0398,For_Outer_Call
007c 029d 03c3 | | Declare_Subprogram INIT_03c0,For_Outer_Call
007e 029d 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call
0080 029d 041b | | Declare_Subprogram INIT_0418,For_Outer_Call
0082 029d 0463 | c| Declare_Subprogram INIT_0460,For_Outer_Call
0084 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0085 00c7 | | Action Elaborate_Subprogram
0086 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
0087 00c7 | | Action Elaborate_Subprogram
0088 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0089 00c7 | | Action Elaborate_Subprogram
008a 1d12 | | Execute_Immediate Reference_Lex_1,0x12
008b 00c7 | | Action Elaborate_Subprogram
008c 1d13 | | Execute_Immediate Reference_Lex_1,0x13
008d 00c7 | | Action Elaborate_Subprogram
008e 1d14 | | Execute_Immediate Reference_Lex_1,0x14
008f 00c7 | | Action Elaborate_Subprogram
0090 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
0091 00c7 | | Action Elaborate_Subprogram
0092 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0093 00c7 | | Action Elaborate_Subprogram
0094 029d 0493 | | Declare_Subprogram INIT_0490,For_Outer_Call
0096 029d 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call
0098 029d 04c3 | | Declare_Subprogram INIT_04c0,For_Outer_Call
009a 029d 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call
009c 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
009d 00c7 | | Action Elaborate_Subprogram
009e 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
009f 00c7 | | Action Elaborate_Subprogram
00a0 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
00a1 00c7 | | Action Elaborate_Subprogram
00a2 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
00a3 00c7 | | Action Elaborate_Subprogram
00a4 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00a5 00c7 | | Action Elaborate_Subprogram
00a6 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00a7 00c7 | | Action Elaborate_Subprogram
00a8 BODY_0008:
00a8 00bc | | Action Signal_Activated
00a9 00bb | | Action Signal_Completion
00aa 0000 0000 | | .BLANK 0000[0x6]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 e006 | | Load 0x0,0x6
00b4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00b5 e230 | 0 | Load 0x1,0x30
00b6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00b7 680a |h | Jump_Zero 0xc2
00b8 e006 | | Load 0x0,0x6
00b9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00ba e230 | 0 | Load 0x1,0x30
00bb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00bc 0217 | | Execute Heap_Access,All_Reference
00bd 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00be 0217 | | Execute Heap_Access,All_Reference
00bf 0335 | 5 | Declare_Variable Array,Duplicate
00c0 00cd | | Action Spare6_Action
00c1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c2 00ea | | Load_Encached Null_String_Cache
00c3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c4 0000 0000 | | .BLANK 0000[0x4]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb e006 | | Load 0x0,0x6
00cc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00cd e230 | 0 | Load 0x1,0x30
00ce 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00cf 680a |h | Jump_Zero 0xda
00d0 e006 | | Load 0x0,0x6
00d1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d2 e230 | 0 | Load 0x1,0x30
00d3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00d4 0217 | | Execute Heap_Access,All_Reference
00d5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00d6 0217 | | Execute Heap_Access,All_Reference
00d7 0335 | 5 | Declare_Variable Array,Duplicate
00d8 00cd | | Action Spare6_Action
00d9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00da 00ea | | Load_Encached Null_String_Cache
00db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00dc 0000 0000 | | .BLANK 0000[0x4]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e5 | | .CONST 0x00e5 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0002 | | .CONST 0x0002 ; Number of locals
00e3 INIT_00e0:
00e3 029f 04f3 | | Declare_Subprogram INIT_04f0,For_Call
00e5 BODY_00e0:
00e5 e006 | | Load 0x0,0x6
00e6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00e7 e230 | 0 | Load 0x1,0x30
00e8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00e9 6813 |h | Jump_Zero 0xfd
00ea e006 | | Load 0x0,0x6
00eb 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00ec e230 | 0 | Load 0x1,0x30
00ed 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00ee 0217 | | Execute Heap_Access,All_Reference
00ef 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00f0 0217 | | Execute Heap_Access,All_Reference
00f1 01db | | Execute Vector,Length
00f2 680a |h | Jump_Zero 0xfd
00f3 e006 | | Load 0x0,0x6
00f4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00f5 e230 | 0 | Load 0x1,0x30
00f6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00f7 0217 | | Execute Heap_Access,All_Reference
00f8 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00f9 0217 | | Execute Heap_Access,All_Reference
00fa 0335 | 5 | Declare_Variable Array,Duplicate
00fb 00cd | | Action Spare6_Action
00fc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00fd 8402 | | Call 0x2,0x2
00fe 0831 | 1 | Execute_Immediate Raise,0x31
00ff 0000 | | .XXX[0x1]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0105 | | .CONST 0x0105 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0002 | | .CONST 0x0002 ; Number of locals
0103 INIT_0100:
0103 029f 050b | | Declare_Subprogram INIT_0508,For_Call
0105 BODY_0100:
0105 e006 | | Load 0x0,0x6
0106 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0107 e230 | 0 | Load 0x1,0x30
0108 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0109 6813 |h | Jump_Zero 0x11d
010a e006 | | Load 0x0,0x6
010b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
010c e230 | 0 | Load 0x1,0x30
010d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
010e 0217 | | Execute Heap_Access,All_Reference
010f 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0110 0217 | | Execute Heap_Access,All_Reference
0111 01db | | Execute Vector,Length
0112 680a |h | Jump_Zero 0x11d
0113 e006 | | Load 0x0,0x6
0114 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0115 e230 | 0 | Load 0x1,0x30
0116 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0117 0217 | | Execute Heap_Access,All_Reference
0118 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0119 0217 | | Execute Heap_Access,All_Reference
011a 0335 | 5 | Declare_Variable Array,Duplicate
011b 00cd | | Action Spare6_Action
011c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
011d 8402 | | Call 0x2,0x2
011e 0831 | 1 | Execute_Immediate Raise,0x31
011f 0000 | | .XXX[0x1]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0125 | % | .CONST 0x0125 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0002 | | .CONST 0x0002 ; Number of locals
0123 INIT_0120:
0123 029f 052b | +| Declare_Subprogram INIT_0528,For_Call
0125 BODY_0120:
0125 e006 | | Load 0x0,0x6
0126 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0127 e230 | 0 | Load 0x1,0x30
0128 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0129 6813 |h | Jump_Zero 0x13d
012a e006 | | Load 0x0,0x6
012b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
012c e230 | 0 | Load 0x1,0x30
012d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
012e 0217 | | Execute Heap_Access,All_Reference
012f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0130 0217 | | Execute Heap_Access,All_Reference
0131 01db | | Execute Vector,Length
0132 680a |h | Jump_Zero 0x13d
0133 e006 | | Load 0x0,0x6
0134 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0135 e230 | 0 | Load 0x1,0x30
0136 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0137 0217 | | Execute Heap_Access,All_Reference
0138 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0139 0217 | | Execute Heap_Access,All_Reference
013a 0335 | 5 | Declare_Variable Array,Duplicate
013b 00cd | | Action Spare6_Action
013c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
013d 8402 | | Call 0x2,0x2
013e 00ea | | Load_Encached Null_String_Cache
013f 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0145 | E | .CONST 0x0145 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0002 | | .CONST 0x0002 ; Number of locals
0143 INIT_0140:
0143 029f 0543 | C| Declare_Subprogram INIT_0540,For_Call
0145 BODY_0140:
0145 e006 | | Load 0x0,0x6
0146 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0147 e230 | 0 | Load 0x1,0x30
0148 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0149 6813 |h | Jump_Zero 0x15d
014a e006 | | Load 0x0,0x6
014b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
014c e230 | 0 | Load 0x1,0x30
014d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
014e 0217 | | Execute Heap_Access,All_Reference
014f 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0150 0217 | | Execute Heap_Access,All_Reference
0151 01db | | Execute Vector,Length
0152 680a |h | Jump_Zero 0x15d
0153 e006 | | Load 0x0,0x6
0154 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0155 e230 | 0 | Load 0x1,0x30
0156 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0157 0217 | | Execute Heap_Access,All_Reference
0158 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0159 0217 | | Execute Heap_Access,All_Reference
015a 0335 | 5 | Declare_Variable Array,Duplicate
015b 00cd | | Action Spare6_Action
015c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
015d 8402 | | Call 0x2,0x2
015e 0831 | 1 | Execute_Immediate Raise,0x31
015f 0000 | | .XXX[0x1]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 019a | | .CONST 0x019a ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0007 | | .CONST 0x0007 ; Number of locals
0163 INIT_0160:
0163 e007 | | Load 0x0,0x7
0164 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0165 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0166 02c7 | | Declare_Variable Any
0167 e5fd | | Load 0x2,-0x3
0168 8231 | 1 | Call 0x1,0x31
0169 a402 | | Store_Unchecked 0x2,0x2
016a e007 | | Load 0x0,0x7
016b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
016d 02c7 | | Declare_Variable Any
016e 00d8 | | Load_Top At_Offset_0
016f 1c00 | | Execute_Immediate Run_Utility,0x0
0170 0092 06d9 | | Action Push_String_Extended,0x6d9 ; "Rci."
0172 e5fe | | Load 0x2,-0x2
0173 e008 | | Load 0x0,0x8
0174 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0175 01cc | | Execute Vector,Catenate
0176 e009 | | Load 0x0,0x9
0177 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0178 01cc | | Execute Vector,Catenate
0179 0007 | | Action Break_Optional
017a 0092 06da | | Action Push_String_Extended,0x6da ; "Session_Rci."
017c e5fe | | Load 0x2,-0x2
017d e008 | | Load 0x0,0x8
017e 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
017f 01cc | | Execute Vector,Catenate
0180 e009 | | Load 0x0,0x9
0181 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0182 01cc | | Execute Vector,Catenate
0183 0007 | | Action Break_Optional
0184 00ea | | Load_Encached Null_String_Cache
0185 00da | | Load_Top At_Offset_2
0186 01cc | | Execute Vector,Catenate
0187 0092 06db | | Action Push_String_Extended,0x6db ; "\x22:="
0189 01cc | | Execute Vector,Catenate
018a e5ff | | Load 0x2,-0x1
018b 01cc | | Execute Vector,Catenate
018c 00ea | | Load_Encached Null_String_Cache
018d 01cc | | Execute Vector,Catenate
018e 0007 | | Action Break_Optional
018f 00ea | | Load_Encached Null_String_Cache
0190 00da | | Load_Top At_Offset_2
0191 01cc | | Execute Vector,Catenate
0192 0092 06db | | Action Push_String_Extended,0x6db ; "\x22:="
0194 01cc | | Execute Vector,Catenate
0195 e5ff | | Load 0x2,-0x1
0196 01cc | | Execute Vector,Catenate
0197 00ea | | Load_Encached Null_String_Cache
0198 01cc | | Execute Vector,Catenate
0199 0007 | | Action Break_Optional
019a BODY_0160:
019a e5fc | | Load 0x2,-0x4
019b 6825 |h% | Jump_Zero 0x1c1
019c e403 | | Load 0x2,0x3
019d 0120 | | Execute Any,Is_Value
019e 6804 |h | Jump_Zero 0x1a3
019f e007 | | Load 0x0,0x7
01a0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a2 7801 |x | Jump 0x1a4
01a3 e403 | | Load 0x2,0x3
01a4 e402 | | Load 0x2,0x2
01a5 e404 | | Load 0x2,0x4
01a6 8238 | 8 | Call 0x1,0x38
01a7 c403 | | Store 0x2,0x3
01a8 e403 | | Load 0x2,0x3
01a9 e007 | | Load 0x0,0x7
01aa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ab 180f | | Execute Package,Field_Execute,Field_Number 0xf
01ac 6809 |h | Jump_Zero 0x1b6
01ad e5fb | | Load 0x2,-0x5
01ae e00a | | Load 0x0,0xa
01af 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01b0 0092 06dc | | Action Push_String_Extended,0x6dc ; "<SESSION>"
01b2 00da | | Load_Top At_Offset_2
01b3 e00b | | Load 0x0,0xb
01b4 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01b5 4506 |E | Exit_Suprogram New_Top_Offset 0x6
01b6 e5fb | | Load 0x2,-0x5
01b7 e00a | | Load 0x0,0xa
01b8 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01b9 e403 | | Load 0x2,0x3
01ba e007 | | Load 0x0,0x7
01bb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01bc 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01bd 00db | | Load_Top At_Offset_3
01be e00b | | Load 0x0,0xb
01bf 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01c0 4506 |E | Exit_Suprogram New_Top_Offset 0x6
01c1 e5fb | | Load 0x2,-0x5
01c2 e00a | | Load 0x0,0xa
01c3 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
01c4 e402 | | Load 0x2,0x2
01c5 e007 | | Load 0x0,0x7
01c6 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01c7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01c8 e007 | | Load 0x0,0x7
01c9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ca 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01cb 00db | | Load_Top At_Offset_3
01cc e00b | | Load 0x0,0xb
01cd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01ce 4506 |E | Exit_Suprogram New_Top_Offset 0x6
01cf 0000 | | .XXX[0x1]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 020a | | .CONST 0x020a ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0007 | | .CONST 0x0007 ; Number of locals
01d3 INIT_01d0:
01d3 e007 | | Load 0x0,0x7
01d4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d6 02c7 | | Declare_Variable Any
01d7 e5fd | | Load 0x2,-0x3
01d8 8231 | 1 | Call 0x1,0x31
01d9 a402 | | Store_Unchecked 0x2,0x2
01da e007 | | Load 0x0,0x7
01db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01dd 02c7 | | Declare_Variable Any
01de 00d8 | | Load_Top At_Offset_0
01df 1c00 | | Execute_Immediate Run_Utility,0x0
01e0 0092 06d9 | | Action Push_String_Extended,0x6d9 ; "Rci."
01e2 e5fe | | Load 0x2,-0x2
01e3 e008 | | Load 0x0,0x8
01e4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
01e5 01cc | | Execute Vector,Catenate
01e6 e009 | | Load 0x0,0x9
01e7 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
01e8 01cc | | Execute Vector,Catenate
01e9 0007 | | Action Break_Optional
01ea 0092 06da | | Action Push_String_Extended,0x6da ; "Session_Rci."
01ec e5fe | | Load 0x2,-0x2
01ed e008 | | Load 0x0,0x8
01ee 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
01ef 01cc | | Execute Vector,Catenate
01f0 e009 | | Load 0x0,0x9
01f1 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
01f2 01cc | | Execute Vector,Catenate
01f3 0007 | | Action Break_Optional
01f4 00ea | | Load_Encached Null_String_Cache
01f5 00da | | Load_Top At_Offset_2
01f6 01cc | | Execute Vector,Catenate
01f7 0092 06db | | Action Push_String_Extended,0x6db ; "\x22:="
01f9 01cc | | Execute Vector,Catenate
01fa e5ff | | Load 0x2,-0x1
01fb 01cc | | Execute Vector,Catenate
01fc 00ea | | Load_Encached Null_String_Cache
01fd 01cc | | Execute Vector,Catenate
01fe 0007 | | Action Break_Optional
01ff 00ea | | Load_Encached Null_String_Cache
0200 00da | | Load_Top At_Offset_2
0201 01cc | | Execute Vector,Catenate
0202 0092 06db | | Action Push_String_Extended,0x6db ; "\x22:="
0204 01cc | | Execute Vector,Catenate
0205 e5ff | | Load 0x2,-0x1
0206 01cc | | Execute Vector,Catenate
0207 00ea | | Load_Encached Null_String_Cache
0208 01cc | | Execute Vector,Catenate
0209 0007 | | Action Break_Optional
020a BODY_01d0:
020a e5fc | | Load 0x2,-0x4
020b 6825 |h% | Jump_Zero 0x231
020c e403 | | Load 0x2,0x3
020d 0120 | | Execute Any,Is_Value
020e 6804 |h | Jump_Zero 0x213
020f e007 | | Load 0x0,0x7
0210 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0211 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0212 7801 |x | Jump 0x214
0213 e403 | | Load 0x2,0x3
0214 e402 | | Load 0x2,0x2
0215 e404 | | Load 0x2,0x4
0216 8238 | 8 | Call 0x1,0x38
0217 c403 | | Store 0x2,0x3
0218 e403 | | Load 0x2,0x3
0219 e007 | | Load 0x0,0x7
021a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
021b 180f | | Execute Package,Field_Execute,Field_Number 0xf
021c 6809 |h | Jump_Zero 0x226
021d e5fb | | Load 0x2,-0x5
021e e00a | | Load 0x0,0xa
021f 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0220 0092 06dc | | Action Push_String_Extended,0x6dc ; "<SESSION>"
0222 00da | | Load_Top At_Offset_2
0223 e00b | | Load 0x0,0xb
0224 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0225 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0226 e5fb | | Load 0x2,-0x5
0227 e00a | | Load 0x0,0xa
0228 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0229 e403 | | Load 0x2,0x3
022a e007 | | Load 0x0,0x7
022b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
022c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
022d 00db | | Load_Top At_Offset_3
022e e00b | | Load 0x0,0xb
022f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0230 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0231 e5fb | | Load 0x2,-0x5
0232 e00a | | Load 0x0,0xa
0233 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0234 e402 | | Load 0x2,0x2
0235 e007 | | Load 0x0,0x7
0236 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0237 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0238 e007 | | Load 0x0,0x7
0239 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
023b 00db | | Load_Top At_Offset_3
023c e00b | | Load 0x0,0xb
023d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
023e 4506 |E | Exit_Suprogram New_Top_Offset 0x6
023f 0000 | | .XXX[0x1]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 4800 |H | Short_Literal 0x0
0244 e006 | | Load 0x0,0x6
0245 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0246 e22c | , | Load 0x1,0x2c
0247 0322 | " | Declare_Variable Record
0248 e5ff | | Load 0x2,-0x1
0249 e22b | + | Load 0x1,0x2b
024a e006 | | Load 0x0,0x6
024b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024c e00c | | Load 0x0,0xc
024d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
024e 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
024f 00d9 | | Load_Top At_Offset_1
0250 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0251 e5fe | | Load 0x2,-0x2
0252 e22b | + | Load 0x1,0x2b
0253 e006 | | Load 0x0,0x6
0254 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0255 e00c | | Load 0x0,0xc
0256 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0257 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0258 00d9 | | Load_Top At_Offset_1
0259 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
025a e5fd | | Load 0x2,-0x3
025b e22b | + | Load 0x1,0x2b
025c e006 | | Load 0x0,0x6
025d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
025e e00c | | Load 0x0,0xc
025f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0260 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0261 00d9 | | Load_Top At_Offset_1
0262 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0263 e5fb | | Load 0x2,-0x5
0264 e22b | + | Load 0x1,0x2b
0265 e006 | | Load 0x0,0x6
0266 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0267 e00c | | Load 0x0,0xc
0268 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0269 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
026a 00d9 | | Load_Top At_Offset_1
026b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
026c e5fc | | Load 0x2,-0x4
026d e22b | + | Load 0x1,0x2b
026e e006 | | Load 0x0,0x6
026f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0270 e00c | | Load 0x0,0xc
0271 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0272 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0273 00d9 | | Load_Top At_Offset_1
0274 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0275 e22d | - | Load 0x1,0x2d
0276 e006 | | Load 0x0,0x6
0277 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0278 e00c | | Load 0x0,0xc
0279 1811 | | Execute Package,Field_Execute,Field_Number 0x11
027a 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
027b e230 | 0 | Load 0x1,0x30
027c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
027d 4506 |E | Exit_Suprogram New_Top_Offset 0x6
027e 0000 0000 | | .XXX[0x2]
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 0004 | | .CONST 0x0004 ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 4800 |H | Short_Literal 0x0
0284 e006 | | Load 0x0,0x6
0285 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0286 e22d | - | Load 0x1,0x2d
0287 e230 | 0 | Load 0x1,0x30
0288 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0289 4501 |E | Exit_Suprogram New_Top_Offset 0x1
028a 0000 0000 | | .BLANK 0000[0x6]
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 e006 | | Load 0x0,0x6
0294 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0295 e230 | 0 | Load 0x1,0x30
0296 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0297 680a |h | Jump_Zero 0x2a2
0298 e006 | | Load 0x0,0x6
0299 1811 | | Execute Package,Field_Execute,Field_Number 0x11
029a e230 | 0 | Load 0x1,0x30
029b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
029c 0217 | | Execute Heap_Access,All_Reference
029d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
029e 0217 | | Execute Heap_Access,All_Reference
029f 0335 | 5 | Declare_Variable Array,Duplicate
02a0 00cd | | Action Spare6_Action
02a1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02a2 00ea | | Load_Encached Null_String_Cache
02a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02a4 0000 0000 | | .BLANK 0000[0x4]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab | | .CONST 0x02ab ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0001 | | .CONST 0x0001 ; Number of locals
02ab BODY_02a8:
02ab INIT_02a8:
02ab e006 | | Load 0x0,0x6
02ac 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02ad e230 | 0 | Load 0x1,0x30
02ae 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02af 680a |h | Jump_Zero 0x2ba
02b0 e006 | | Load 0x0,0x6
02b1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02b2 e230 | 0 | Load 0x1,0x30
02b3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02b4 0217 | | Execute Heap_Access,All_Reference
02b5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
02b6 0217 | | Execute Heap_Access,All_Reference
02b7 0335 | 5 | Declare_Variable Array,Duplicate
02b8 00cd | | Action Spare6_Action
02b9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02ba 00ea | | Load_Encached Null_String_Cache
02bb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02bc 0000 0000 | | .BLANK 0000[0x4]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3 | | .CONST 0x02c3 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 0001 | | .CONST 0x0001 ; Number of locals
02c3 BODY_02c0:
02c3 INIT_02c0:
02c3 e006 | | Load 0x0,0x6
02c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02c5 e230 | 0 | Load 0x1,0x30
02c6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02c7 680a |h | Jump_Zero 0x2d2
02c8 e006 | | Load 0x0,0x6
02c9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02ca e230 | 0 | Load 0x1,0x30
02cb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02cc 0217 | | Execute Heap_Access,All_Reference
02cd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02ce 0217 | | Execute Heap_Access,All_Reference
02cf 0335 | 5 | Declare_Variable Array,Duplicate
02d0 00cd | | Action Spare6_Action
02d1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02d2 00ea | | Load_Encached Null_String_Cache
02d3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02d4 0000 0000 | | .BLANK 0000[0x4]
02d8 ; --------------------------------------------------------------------------------------
02d8 ; SUBPROGRAM
02d8 ; --------------------------------------------------------------------------------------
02d8 02db | | .CONST 0x02db ; Address of begin
02d9 0004 | | .CONST 0x0004 ; Address of exception handler
02da 0001 | | .CONST 0x0001 ; Number of locals
02db BODY_02d8:
02db INIT_02d8:
02db e006 | | Load 0x0,0x6
02dc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02dd e230 | 0 | Load 0x1,0x30
02de 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02df 680a |h | Jump_Zero 0x2ea
02e0 e006 | | Load 0x0,0x6
02e1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02e2 e230 | 0 | Load 0x1,0x30
02e3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02e4 0217 | | Execute Heap_Access,All_Reference
02e5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
02e6 0217 | | Execute Heap_Access,All_Reference
02e7 0335 | 5 | Declare_Variable Array,Duplicate
02e8 00cd | | Action Spare6_Action
02e9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02ea 00ea | | Load_Encached Null_String_Cache
02eb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02ec 0000 0000 | | .BLANK 0000[0x4]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3 | | .CONST 0x02f3 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0001 | | .CONST 0x0001 ; Number of locals
02f3 BODY_02f0:
02f3 INIT_02f0:
02f3 e22d | - | Load 0x1,0x2d
02f4 0033 | 3 | Store_Top Heap_Access,At_Offset_3
02f5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02f6 0000 0000 | | .XXX[0x2]
02f8 ; --------------------------------------------------------------------------------------
02f8 ; SUBPROGRAM
02f8 ; --------------------------------------------------------------------------------------
02f8 02fb | | .CONST 0x02fb ; Address of begin
02f9 0004 | | .CONST 0x0004 ; Address of exception handler
02fa 0001 | | .CONST 0x0001 ; Number of locals
02fb BODY_02f8:
02fb INIT_02f8:
02fb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02fc 0000 0000 | | .BLANK 0000[0x4]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303 | | .CONST 0x0303 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0001 | | .CONST 0x0001 ; Number of locals
0303 BODY_0300:
0303 INIT_0300:
0303 4801 |H | Short_Literal 0x1
0304 e007 | | Load 0x0,0x7
0305 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0306 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0307 e5ff | | Load 0x2,-0x1
0308 e00d | | Load 0x0,0xd
0309 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
030a 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
030b e007 | | Load 0x0,0x7
030c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
030d 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
030e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
030f 0000 | | .XXX[0x1]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0321 | ! | .CONST 0x0321 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0006 | | .CONST 0x0006 ; Number of locals
0313 INIT_0310:
0313 e00d | | Load 0x0,0xd
0314 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0315 02ff | | Declare_Variable Variant_Record
0316 00d8 | | Load_Top At_Offset_0
0317 1c00 | | Execute_Immediate Run_Utility,0x0
0318 e00d | | Load 0x0,0xd
0319 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
031a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
031b 029f 0563 | c| Declare_Subprogram INIT_0560,For_Call
031d 029f 056b | k| Declare_Subprogram INIT_0568,For_Call
031f 029f 057b | {| Declare_Subprogram INIT_0578,For_Call
0321 BODY_0310:
0321 e00d | | Load 0x0,0xd
0322 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0323 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0324 e402 | | Load 0x2,0x2
0325 6032 |`2 | Indirect_Literal Discrete,0x358,{0x00000000, 0x00004000}
0326 e00e | | Load 0x0,0xe
0327 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0328 4800 |H | Short_Literal 0x0
0329 e006 | | Load 0x0,0x6
032a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
032b e00d | | Load 0x0,0xd
032c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
032d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
032e e5ff | | Load 0x2,-0x1
032f 8405 | | Call 0x2,0x5
0330 e00d | | Load 0x0,0xd
0331 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0332 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0333 00d1 | | Pop_Control Pop_Count_1
0334 c403 | | Store 0x2,0x3
0335 00db | | Load_Top At_Offset_3
0336 8404 | | Call 0x2,0x4
0337 6802 |h | Jump_Zero 0x33a
0338 e402 | | Load 0x2,0x2
0339 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
033a e00d | | Load 0x0,0xd
033b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
033c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
033d e402 | | Load 0x2,0x2
033e 6019 |` | Indirect_Literal Discrete,0x358,{0x00000000, 0x00004000}
033f e00e | | Load 0x0,0xe
0340 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0341 4800 |H | Short_Literal 0x0
0342 e006 | | Load 0x0,0x6
0343 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0344 e00d | | Load 0x0,0xd
0345 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0346 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0347 e5ff | | Load 0x2,-0x1
0348 8406 | | Call 0x2,0x6
0349 e00d | | Load 0x0,0xd
034a 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
034b 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
034c 00d1 | | Pop_Control Pop_Count_1
034d c403 | | Store 0x2,0x3
034e 00db | | Load_Top At_Offset_3
034f 8404 | | Call 0x2,0x4
0350 6802 |h | Jump_Zero 0x353
0351 e402 | | Load 0x2,0x2
0352 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0353 e00f | | Load 0x0,0xf
0354 0257 | W | Execute Discrete,Raise
0355 0000 0000 | | .XXX[0x3]
0357 0000 | |
0358 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
035c 0000 0000 | | .BLANK 0000[0x4]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0376 | v | .CONST 0x0376 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0006 | | .CONST 0x0006 ; Number of locals
0363 INIT_0360:
0363 e007 | | Load 0x0,0x7
0364 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0365 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0366 02c7 | | Declare_Variable Any
0367 00db | | Load_Top At_Offset_3
0368 a402 | | Store_Unchecked 0x2,0x2
0369 e007 | | Load 0x0,0x7
036a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036c 02c7 | | Declare_Variable Any
036d 00d8 | | Load_Top At_Offset_0
036e 1c00 | | Execute_Immediate Run_Utility,0x0
036f e5fe | | Load 0x2,-0x2
0370 e008 | | Load 0x0,0x8
0371 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0372 e00d | | Load 0x0,0xd
0373 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0374 029f 058b | | Declare_Subprogram INIT_0588,For_Call
0376 BODY_0360:
0376 00cf | | Action Mark_Auxiliary
0377 8406 | | Call 0x2,0x6
0378 e007 | | Load 0x0,0x7
0379 1b0f | | Execute Package,Field_Read,Field_Number 0xf
037a 180f | | Execute Package,Field_Execute,Field_Number 0xf
037b e402 | | Load 0x2,0x2
037c e007 | | Load 0x0,0x7
037d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
037e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
037f 680e |h | Jump_Zero 0x38e
0380 4801 |H | Short_Literal 0x1
0381 e010 | | Load 0x0,0x10
0382 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0383 e011 | | Load 0x0,0x11
0384 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0385 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0386 8232 | 2 | Call 0x1,0x32
0387 e404 | | Load 0x2,0x4
0388 e009 | | Load 0x0,0x9
0389 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
038a 01cc | | Execute Vector,Catenate
038b e009 | | Load 0x0,0x9
038c 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
038d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
038e e402 | | Load 0x2,0x2
038f e007 | | Load 0x0,0x7
0390 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0391 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0392 c402 | | Store 0x2,0x2
0393 00c9 | | Action Pop_Auxiliary_Loop
0394 7fe2 | | Jump 0x377
0395 0000 0000 | | .XXX[0x3]
0397 0000 | |
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 03a9 | | .CONST 0x03a9 ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0003 | | .CONST 0x0003 ; Number of locals
039b INIT_0398:
039b 00da | | Load_Top At_Offset_2
039c e007 | | Load 0x0,0x7
039d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
039e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
039f 4801 |H | Short_Literal 0x1
03a0 e5fe | | Load 0x2,-0x2
03a1 00da | | Load_Top At_Offset_2
03a2 e012 | | Load 0x0,0x12
03a3 181d | | Execute Package,Field_Execute,Field_Number 0x1d
03a4 00d9 | | Load_Top At_Offset_1
03a5 01db | | Execute Vector,Length
03a6 0273 | s | Execute Discrete,Plus
03a7 00e3 | | Load_Encached Natural_Cache
03a8 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
03a9 BODY_0398:
03a9 e007 | | Load 0x0,0x7
03aa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03ab 180f | | Execute Package,Field_Execute,Field_Number 0xf
03ac e5ff | | Load 0x2,-0x1
03ad e007 | | Load 0x0,0x7
03ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03af 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03b0 7003 |p | Jump_Nonzero 0x3b4
03b1 00d8 | | Load_Top At_Offset_0
03b2 0a01 | | Execute_Immediate Plus,0x1
03b3 0059 | Y | Store_Top Discrete,At_Offset_1
03b4 00d8 | | Load_Top At_Offset_0
03b5 e5fe | | Load 0x2,-0x2
03b6 01dc | | Execute Vector,Last
03b7 e5fe | | Load 0x2,-0x2
03b8 01cf | | Execute Vector,Slice_Read
03b9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ba 0000 0000 | | .BLANK 0000[0x6]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03cc | | .CONST 0x03cc ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0003 | | .CONST 0x0003 ; Number of locals
03c3 INIT_03c0:
03c3 4801 |H | Short_Literal 0x1
03c4 00db | | Load_Top At_Offset_3
03c5 482e |H. | Short_Literal 0x2e
03c6 e012 | | Load 0x0,0x12
03c7 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03c8 00e3 | | Load_Encached Natural_Cache
03c9 03f1 | | Declare_Variable Discrete,With_Value
03ca 029f 05b3 | | Declare_Subprogram INIT_05b0,For_Call
03cc BODY_03c0:
03cc 00d9 | | Load_Top At_Offset_1
03cd e5ff | | Load 0x2,-0x1
03ce 01dd | | Execute Vector,First
03cf 0aff | | Execute_Immediate Plus,-0x1
03d0 027d | } | Execute Discrete,Greater
03d1 681a |h | Jump_Zero 0x3ec
03d2 e5ff | | Load 0x2,-0x1
03d3 01dd | | Execute Vector,First
03d4 00da | | Load_Top At_Offset_2
03d5 0aff | | Execute_Immediate Plus,-0x1
03d6 e5ff | | Load 0x2,-0x1
03d7 01cf | | Execute Vector,Slice_Read
03d8 8403 | | Call 0x2,0x3
03d9 e5fe | | Load 0x2,-0x2
03da e013 | | Load 0x0,0x13
03db 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
03dc 01cc | | Execute Vector,Catenate
03dd e5fe | | Load 0x2,-0x2
03de 00db | | Load_Top At_Offset_3
03df 0a01 | | Execute_Immediate Plus,0x1
03e0 00d8 | | Load_Top At_Offset_0
03e1 00e2 | | Load_Encached Integer_Cache
03e2 0260 | ` | Execute Discrete,In_Type
03e3 7001 |p | Jump_Nonzero 0x3e5
03e4 0801 | | Execute_Immediate Raise,0x1
03e5 e5ff | | Load 0x2,-0x1
03e6 01dc | | Execute Vector,Last
03e7 e5ff | | Load 0x2,-0x1
03e8 01cf | | Execute Vector,Slice_Read
03e9 8235 | 5 | Call 0x1,0x35
03ea 01cc | | Execute Vector,Catenate
03eb 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ec e5ff | | Load 0x2,-0x1
03ed 8403 | | Call 0x2,0x3
03ee 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03ef 0000 | | .XXX[0x1]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 0409 | | .CONST 0x0409 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0004 | | .CONST 0x0004 ; Number of locals
03f3 INIT_03f0:
03f3 e5fc | | Load 0x2,-0x4
03f4 00db | | Load_Top At_Offset_3
03f5 8234 | 4 | Call 0x1,0x34
03f6 e5fd | | Load 0x2,-0x3
03f7 e013 | | Load 0x0,0x13
03f8 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
03f9 e5fe | | Load 0x2,-0x2
03fa 01dd | | Execute Vector,First
03fb e5fe | | Load 0x2,-0x2
03fc 01dc | | Execute Vector,Last
03fd 00da | | Load_Top At_Offset_2
03fe 01db | | Execute Vector,Length
03ff 0272 | r | Execute Discrete,Minus
0400 00d8 | | Load_Top At_Offset_0
0401 00e2 | | Load_Encached Integer_Cache
0402 0260 | ` | Execute Discrete,In_Type
0403 7001 |p | Jump_Nonzero 0x405
0404 0801 | | Execute_Immediate Raise,0x1
0405 e5fe | | Load 0x2,-0x2
0406 01cf | | Execute Vector,Slice_Read
0407 0335 | 5 | Declare_Variable Array,Duplicate
0408 00cd | | Action Spare6_Action
0409 BODY_03f0:
0409 00d8 | | Load_Top At_Offset_0
040a e5fd | | Load 0x2,-0x3
040b e013 | | Load 0x0,0x13
040c 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
040d 01cc | | Execute Vector,Catenate
040e e5fd | | Load 0x2,-0x3
040f e402 | | Load 0x2,0x2
0410 8235 | 5 | Call 0x1,0x35
0411 01cc | | Execute Vector,Catenate
0412 00da | | Load_Top At_Offset_2
0413 01cc | | Execute Vector,Catenate
0414 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
0415 0000 0000 | | .XXX[0x3]
0417 0000 | |
0418 ; --------------------------------------------------------------------------------------
0418 ; SUBPROGRAM
0418 ; --------------------------------------------------------------------------------------
0418 0444 | D | .CONST 0x0444 ; Address of begin
0419 0004 | | .CONST 0x0004 ; Address of exception handler
041a 000a | | .CONST 0x000a ; Number of locals
041b INIT_0418:
041b e007 | | Load 0x0,0x7
041c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
041d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
041e 02c7 | | Declare_Variable Any
041f 00db | | Load_Top At_Offset_3
0420 a402 | | Store_Unchecked 0x2,0x2
0421 e007 | | Load 0x0,0x7
0422 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0423 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0424 02c7 | | Declare_Variable Any
0425 00d8 | | Load_Top At_Offset_0
0426 1c00 | | Execute_Immediate Run_Utility,0x0
0427 e5fe | | Load 0x2,-0x2
0428 e008 | | Load 0x0,0x8
0429 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
042a e013 | | Load 0x0,0x13
042b 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
042c 02c7 | | Declare_Variable Any
042d e5fe | | Load 0x2,-0x2
042e e014 | | Load 0x0,0x14
042f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0430 a405 | | Store_Unchecked 0x2,0x5
0431 00e3 | | Load_Encached Natural_Cache
0432 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0433 e00d | | Load 0x0,0xd
0434 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0435 e5ff | | Load 0x2,-0x1
0436 e007 | | Load 0x0,0x7
0437 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0438 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0439 e012 | | Load 0x0,0x12
043a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
043b 0092 06dd | | Action Push_String_Extended,0x6dd ; "."
043d 01cc | | Execute Vector,Catenate
043e e5fd | | Load 0x2,-0x3
043f 01cc | | Execute Vector,Catenate
0440 029f 061b | | Declare_Subprogram INIT_0618,For_Call
0442 029f 0643 | C| Declare_Subprogram INIT_0640,For_Call
0444 BODY_0418:
0444 00cf | | Action Mark_Auxiliary
0445 8409 | | Call 0x2,0x9
0446 e007 | | Load 0x0,0x7
0447 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0448 180f | | Execute Package,Field_Execute,Field_Number 0xf
0449 e402 | | Load 0x2,0x2
044a e007 | | Load 0x0,0x7
044b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
044c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
044d 6802 |h | Jump_Zero 0x450
044e 840a | | Call 0x2,0xa
044f 7808 |x | Jump 0x458
0450 e402 | | Load 0x2,0x2
0451 e007 | | Load 0x0,0x7
0452 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0453 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0454 c402 | | Store 0x2,0x2
0455 e406 | | Load 0x2,0x6
0456 0a01 | | Execute_Immediate Plus,0x1
0457 c406 | | Store 0x2,0x6
0458 00c9 | | Action Pop_Auxiliary_Loop
0459 7feb | | Jump 0x445
045a 0000 0000 | | .BLANK 0000[0x6]
0460 ; --------------------------------------------------------------------------------------
0460 ; SUBPROGRAM
0460 ; --------------------------------------------------------------------------------------
0460 0473 | s | .CONST 0x0473 ; Address of begin
0461 0004 | | .CONST 0x0004 ; Address of exception handler
0462 0005 | | .CONST 0x0005 ; Number of locals
0463 INIT_0460:
0463 e007 | | Load 0x0,0x7
0464 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0465 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0466 02c7 | | Declare_Variable Any
0467 00d8 | | Load_Top At_Offset_0
0468 1c00 | | Execute_Immediate Run_Utility,0x0
0469 e00d | | Load 0x0,0xd
046a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046b e007 | | Load 0x0,0x7
046c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046e 02c7 | | Declare_Variable Any
046f e5fe | | Load 0x2,-0x2
0470 a404 | | Store_Unchecked 0x2,0x4
0471 029f 0663 | c| Declare_Subprogram INIT_0660,For_Call
0473 BODY_0460:
0473 00cf | | Action Mark_Auxiliary
0474 8405 | | Call 0x2,0x5
0475 00da | | Load_Top At_Offset_2
0476 e007 | | Load 0x0,0x7
0477 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0478 180f | | Execute Package,Field_Execute,Field_Number 0xf
0479 012f | / | Execute Any,Equal
047a 6805 |h | Jump_Zero 0x480
047b e007 | | Load 0x0,0x7
047c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
047d 180e | | Execute Package,Field_Execute,Field_Number 0xe
047e c402 | | Store 0x2,0x2
047f 7807 |x | Jump 0x487
0480 00da | | Load_Top At_Offset_2
0481 e007 | | Load 0x0,0x7
0482 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0483 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0484 c404 | | Store 0x2,0x4
0485 00c9 | | Action Pop_Auxiliary_Loop
0486 7fed | | Jump 0x474
0487 00ce | | Action Pop_Auxiliary
0488 00db | | Load_Top At_Offset_3
0489 c5fd | | Store 0x2,-0x3
048a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
048b 0000 0000 | | .BLANK 0000[0x5]
0490 ; --------------------------------------------------------------------------------------
0490 ; SUBPROGRAM
0490 ; --------------------------------------------------------------------------------------
0490 0493 | | .CONST 0x0493 ; Address of begin
0491 0004 | | .CONST 0x0004 ; Address of exception handler
0492 0001 | | .CONST 0x0001 ; Number of locals
0493 BODY_0490:
0493 INIT_0490:
0493 e006 | | Load 0x0,0x6
0494 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0495 e230 | 0 | Load 0x1,0x30
0496 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0497 680a |h | Jump_Zero 0x4a2
0498 e006 | | Load 0x0,0x6
0499 1811 | | Execute Package,Field_Execute,Field_Number 0x11
049a e230 | 0 | Load 0x1,0x30
049b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
049c 0217 | | Execute Heap_Access,All_Reference
049d 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
049e 0217 | | Execute Heap_Access,All_Reference
049f 0335 | 5 | Declare_Variable Array,Duplicate
04a0 00cd | | Action Spare6_Action
04a1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04a2 00ea | | Load_Encached Null_String_Cache
04a3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04a4 0000 0000 | | .BLANK 0000[0x4]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04af | | .CONST 0x04af ; Address of begin
04a9 0004 | | .CONST 0x0004 ; Address of exception handler
04aa 0002 | | .CONST 0x0002 ; Number of locals
04ab INIT_04a8:
04ab e006 | | Load 0x0,0x6
04ac 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04ad e230 | 0 | Load 0x1,0x30
04ae 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04af BODY_04a8:
04af 00d8 | | Load_Top At_Offset_0
04b0 e22d | - | Load 0x1,0x2d
04b1 021e | | Execute Heap_Access,Maximum
04b2 6807 |h | Jump_Zero 0x4ba
04b3 00d8 | | Load_Top At_Offset_0
04b4 0217 | | Execute Heap_Access,All_Reference
04b5 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
04b6 0217 | | Execute Heap_Access,All_Reference
04b7 0335 | 5 | Declare_Variable Array,Duplicate
04b8 00cd | | Action Spare6_Action
04b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04ba 00ea | | Load_Encached Null_String_Cache
04bb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04bc 0000 0000 | | .BLANK 0000[0x4]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c7 | | .CONST 0x04c7 ; Address of begin
04c1 0004 | | .CONST 0x0004 ; Address of exception handler
04c2 0002 | | .CONST 0x0002 ; Number of locals
04c3 INIT_04c0:
04c3 e006 | | Load 0x0,0x6
04c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04c5 e230 | 0 | Load 0x1,0x30
04c6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04c7 BODY_04c0:
04c7 00d8 | | Load_Top At_Offset_0
04c8 e22d | - | Load 0x1,0x2d
04c9 021e | | Execute Heap_Access,Maximum
04ca 6807 |h | Jump_Zero 0x4d2
04cb 00d8 | | Load_Top At_Offset_0
04cc 0217 | | Execute Heap_Access,All_Reference
04cd 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
04ce 0217 | | Execute Heap_Access,All_Reference
04cf 0335 | 5 | Declare_Variable Array,Duplicate
04d0 00cd | | Action Spare6_Action
04d1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04d2 00ea | | Load_Encached Null_String_Cache
04d3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
04d4 0000 0000 | | .BLANK 0000[0x4]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04df | | .CONST 0x04df ; Address of begin
04d9 0004 | | .CONST 0x0004 ; Address of exception handler
04da 0002 | | .CONST 0x0002 ; Number of locals
04db INIT_04d8:
04db e006 | | Load 0x0,0x6
04dc 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04dd e230 | 0 | Load 0x1,0x30
04de 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04df BODY_04d8:
04df 00d8 | | Load_Top At_Offset_0
04e0 e22d | - | Load 0x1,0x2d
04e1 021e | | Execute Heap_Access,Maximum
04e2 6807 |h | Jump_Zero 0x4ea
04e3 00d8 | | Load_Top At_Offset_0
04e4 0217 | | Execute Heap_Access,All_Reference
04e5 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
04e6 0217 | | Execute Heap_Access,All_Reference
04e7 0335 | 5 | Declare_Variable Array,Duplicate
04e8 00cd | | Action Spare6_Action
04e9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04ea 00ea | | Load_Encached Null_String_Cache
04eb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04ec 0000 0000 | | .BLANK 0000[0x4]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04fd | | .CONST 0x04fd ; Address of begin
04f1 0004 | | .CONST 0x0004 ; Address of exception handler
04f2 0002 | | .CONST 0x0002 ; Number of locals
04f3 INIT_04f0:
04f3 e007 | | Load 0x0,0x7
04f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f6 02c7 | | Declare_Variable Any
04f7 e5ff | | Load 0x2,-0x1
04f8 8231 | 1 | Call 0x1,0x31
04f9 e007 | | Load 0x0,0x7
04fa 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04fb 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04fc a602 | | Store_Unchecked 0x3,0x2
04fd BODY_04f0:
04fd e5ff | | Load 0x2,-0x1
04fe e00d | | Load 0x0,0xd
04ff 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0500 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0501 e012 | | Load 0x0,0x12
0502 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0503 e5fe | | Load 0x2,-0x2
0504 00da | | Load_Top At_Offset_2
0505 8237 | 7 | Call 0x1,0x37
0506 00cb | | Action Pop_Block_With_Result
0507 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 051b | | .CONST 0x051b ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0002 | | .CONST 0x0002 ; Number of locals
050b INIT_0508:
050b e007 | | Load 0x0,0x7
050c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050e 02c7 | | Declare_Variable Any
050f 4801 |H | Short_Literal 0x1
0510 e007 | | Load 0x0,0x7
0511 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0512 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0513 e5ff | | Load 0x2,-0x1
0514 e007 | | Load 0x0,0x7
0515 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0516 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0517 e007 | | Load 0x0,0x7
0518 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0519 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
051a a602 | | Store_Unchecked 0x3,0x2
051b BODY_0508:
051b e5ff | | Load 0x2,-0x1
051c e007 | | Load 0x0,0x7
051d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
051e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
051f e012 | | Load 0x0,0x12
0520 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0521 e5fe | | Load 0x2,-0x2
0522 00da | | Load_Top At_Offset_2
0523 8237 | 7 | Call 0x1,0x37
0524 00cb | | Action Pop_Block_With_Result
0525 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0526 0000 0000 | | .XXX[0x2]
0528 ; --------------------------------------------------------------------------------------
0528 ; SUBPROGRAM
0528 ; --------------------------------------------------------------------------------------
0528 0535 | 5 | .CONST 0x0535 ; Address of begin
0529 0004 | | .CONST 0x0004 ; Address of exception handler
052a 0002 | | .CONST 0x0002 ; Number of locals
052b INIT_0528:
052b e007 | | Load 0x0,0x7
052c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
052d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
052e 02c7 | | Declare_Variable Any
052f e5ff | | Load 0x2,-0x1
0530 8231 | 1 | Call 0x1,0x31
0531 e007 | | Load 0x0,0x7
0532 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0533 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0534 a602 | | Store_Unchecked 0x3,0x2
0535 BODY_0528:
0535 e5ff | | Load 0x2,-0x1
0536 e00d | | Load 0x0,0xd
0537 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0538 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0539 e5fe | | Load 0x2,-0x2
053a 00da | | Load_Top At_Offset_2
053b 8233 | 3 | Call 0x1,0x33
053c 00cb | | Action Pop_Block_With_Result
053d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
053e 0000 0000 | | .XXX[0x2]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0553 | S | .CONST 0x0553 ; Address of begin
0541 0004 | | .CONST 0x0004 ; Address of exception handler
0542 0002 | | .CONST 0x0002 ; Number of locals
0543 INIT_0540:
0543 e007 | | Load 0x0,0x7
0544 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0545 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0546 02c7 | | Declare_Variable Any
0547 4801 |H | Short_Literal 0x1
0548 e007 | | Load 0x0,0x7
0549 1b0e | | Execute Package,Field_Read,Field_Number 0xe
054a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
054b e5ff | | Load 0x2,-0x1
054c e007 | | Load 0x0,0x7
054d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
054e 1815 | | Execute Package,Field_Execute,Field_Number 0x15
054f e007 | | Load 0x0,0x7
0550 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0551 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0552 a602 | | Store_Unchecked 0x3,0x2
0553 BODY_0540:
0553 e5ff | | Load 0x2,-0x1
0554 e007 | | Load 0x0,0x7
0555 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0556 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0557 e5fe | | Load 0x2,-0x2
0558 00da | | Load_Top At_Offset_2
0559 8233 | 3 | Call 0x1,0x33
055a 00cb | | Action Pop_Block_With_Result
055b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
055c 0000 0000 | | .BLANK 0000[0x4]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 0563 | c | .CONST 0x0563 ; Address of begin
0561 0004 | | .CONST 0x0004 ; Address of exception handler
0562 0001 | | .CONST 0x0001 ; Number of locals
0563 BODY_0560:
0563 INIT_0560:
0563 00da | | Load_Top At_Offset_2
0564 0f00 | | Execute_Immediate Equal,0x0
0565 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0566 0000 0000 | | .XXX[0x2]
0568 ; --------------------------------------------------------------------------------------
0568 ; SUBPROGRAM
0568 ; --------------------------------------------------------------------------------------
0568 056b | k | .CONST 0x056b ; Address of begin
0569 0004 | | .CONST 0x0004 ; Address of exception handler
056a 0001 | | .CONST 0x0001 ; Number of locals
056b BODY_0568:
056b INIT_0568:
056b 00da | | Load_Top At_Offset_2
056c e00d | | Load 0x0,0xd
056d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
056e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
056f 0092 06de | | Action Push_String_Extended,0x6de ; "_Switches"
0571 01cc | | Execute Vector,Catenate
0572 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0573 0000 0000 | | .BLANK 0000[0x5]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b | { | .CONST 0x057b ; Address of begin
0579 0004 | | .CONST 0x0004 ; Address of exception handler
057a 0001 | | .CONST 0x0001 ; Number of locals
057b BODY_0578:
057b INIT_0578:
057b 00da | | Load_Top At_Offset_2
057c e00d | | Load 0x0,0xd
057d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
057e 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
057f e00d | | Load 0x0,0xd
0580 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0581 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0582 0092 06df | | Action Push_String_Extended,0x6df ; ".S_1_Switches"
0584 01cc | | Execute Vector,Catenate
0585 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0586 0000 0000 | | .XXX[0x2]
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 0592 | | .CONST 0x0592 ; Address of begin
0589 0004 | | .CONST 0x0004 ; Address of exception handler
058a 0003 | | .CONST 0x0003 ; Number of locals
058b INIT_0588:
058b e00d | | Load 0x0,0xd
058c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
058d 02ff | | Declare_Variable Variant_Record
058e 00d8 | | Load_Top At_Offset_0
058f 1c00 | | Execute_Immediate Run_Utility,0x0
0590 029f 068b | | Declare_Subprogram INIT_0688,For_Call
0592 BODY_0588:
0592 e402 | | Load 0x2,0x2
0593 e007 | | Load 0x0,0x7
0594 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0595 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0596 c403 | | Store 0x2,0x3
0597 e00d | | Load 0x0,0xd
0598 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0599 00da | | Load_Top At_Offset_2
059a 600d |` | Indirect_Literal Discrete,0x5a8,{0x00000000, 0x00004000}
059b e00e | | Load 0x0,0xe
059c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
059d e403 | | Load 0x2,0x3
059e e007 | | Load 0x0,0x7
059f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05a0 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
05a1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05a2 00d1 | | Pop_Control Pop_Count_1
05a3 c405 | | Store 0x2,0x5
05a4 e405 | | Load 0x2,0x5
05a5 7001 |p | Jump_Nonzero 0x5a7
05a6 8603 | | Call 0x3,0x3
05a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
05a8 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
05ac 0000 0000 | | .BLANK 0000[0x4]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05ca | | .CONST 0x05ca ; Address of begin
05b1 0004 | | .CONST 0x0004 ; Address of exception handler
05b2 0006 | | .CONST 0x0006 ; Number of locals
05b3 INIT_05b0:
05b3 00da | | Load_Top At_Offset_2
05b4 01dd | | Execute Vector,First
05b5 00db | | Load_Top At_Offset_3
05b6 01dc | | Execute Vector,Last
05b7 00e9 | | Load_Encached String_Cache
05b8 035b | [ | Declare_Type Array,Constrained
05b9 0337 | 7 | Declare_Variable Array
05ba 00db | | Load_Top At_Offset_3
05bb 00d9 | | Load_Top At_Offset_1
05bc 01d4 | | Execute Vector,Structure_Write
05bd 00d8 | | Load_Top At_Offset_0
05be 01dd | | Execute Vector,First
05bf 00e2 | | Load_Encached Integer_Cache
05c0 03f1 | | Declare_Variable Discrete,With_Value
05c1 00d9 | | Load_Top At_Offset_1
05c2 01dc | | Execute Vector,Last
05c3 00e2 | | Load_Encached Integer_Cache
05c4 03f1 | | Declare_Variable Discrete,With_Value
05c5 e5fe | | Load 0x2,-0x2
05c6 e013 | | Load 0x0,0x13
05c7 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
05c8 029f 06a3 | | Declare_Subprogram INIT_06a0,For_Call
05ca BODY_05b0:
05ca 8606 | | Call 0x3,0x6
05cb 6841 |hA | Jump_Zero 0x60d
05cc 4801 |H | Short_Literal 0x1
05cd 0092 06e0 | | Action Push_String_Extended,0x6e0 ; "rev"
05cf e603 | | Load 0x3,0x3
05d0 00d8 | | Load_Top At_Offset_0
05d1 0a02 | | Execute_Immediate Plus,0x2
05d2 00d8 | | Load_Top At_Offset_0
05d3 00e2 | | Load_Encached Integer_Cache
05d4 0260 | ` | Execute Discrete,In_Type
05d5 7001 |p | Jump_Nonzero 0x5d7
05d6 0801 | | Execute_Immediate Raise,0x1
05d7 e602 | | Load 0x3,0x2
05d8 01cf | | Execute Vector,Slice_Read
05d9 e012 | | Load 0x0,0x12
05da 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
05db 680a |h | Jump_Zero 0x5e6
05dc 00db | | Load_Top At_Offset_3
05dd e602 | | Load 0x3,0x2
05de 01d7 | | Execute Vector,Field_Read
05df e603 | | Load 0x3,0x3
05e0 0a02 | | Execute_Immediate Plus,0x2
05e1 e602 | | Load 0x3,0x2
05e2 01d6 | | Execute Vector,Field_Write
05e3 00db | | Load_Top At_Offset_3
05e4 0a02 | | Execute_Immediate Plus,0x2
05e5 c603 | | Store 0x3,0x3
05e6 00da | | Load_Top At_Offset_2
05e7 e603 | | Load 0x3,0x3
05e8 0272 | r | Execute Discrete,Minus
05e9 0c08 | | Execute_Immediate Greater_Equal,0x8
05ea 6813 |h | Jump_Zero 0x5fe
05eb 4801 |H | Short_Literal 0x1
05ec 0092 06e1 | | Action Push_String_Extended,0x6e1 ; "_working"
05ee e604 | | Load 0x3,0x4
05ef 0af9 | | Execute_Immediate Plus,-0x7
05f0 00d8 | | Load_Top At_Offset_0
05f1 00e2 | | Load_Encached Integer_Cache
05f2 0260 | ` | Execute Discrete,In_Type
05f3 7001 |p | Jump_Nonzero 0x5f5
05f4 0801 | | Execute_Immediate Raise,0x1
05f5 e604 | | Load 0x3,0x4
05f6 e602 | | Load 0x3,0x2
05f7 01cf | | Execute Vector,Slice_Read
05f8 e012 | | Load 0x0,0x12
05f9 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
05fa 6803 |h | Jump_Zero 0x5fe
05fb 00da | | Load_Top At_Offset_2
05fc 0af8 | | Execute_Immediate Plus,-0x8
05fd 005b | [ | Store_Top Discrete,At_Offset_3
05fe 8606 | | Call 0x3,0x6
05ff 680d |h | Jump_Zero 0x60d
0600 00db | | Load_Top At_Offset_3
0601 00da | | Load_Top At_Offset_2
0602 0273 | s | Execute Discrete,Plus
0603 0aff | | Execute_Immediate Plus,-0x1
0604 005b | [ | Store_Top Discrete,At_Offset_3
0605 00da | | Load_Top At_Offset_2
0606 e602 | | Load 0x3,0x2
0607 01d7 | | Execute Vector,Field_Read
0608 0f5f | _ | Execute_Immediate Equal,0x5f
0609 6803 |h | Jump_Zero 0x60d
060a 00da | | Load_Top At_Offset_2
060b 0aff | | Execute_Immediate Plus,-0x1
060c 005b | [ | Store_Top Discrete,At_Offset_3
060d 00db | | Load_Top At_Offset_3
060e 00db | | Load_Top At_Offset_3
060f e602 | | Load 0x3,0x2
0610 01cf | | Execute Vector,Slice_Read
0611 00e9 | | Load_Encached String_Cache
0612 01c6 | | Execute Vector,Convert_To_Formal
0613 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0614 0000 0000 | | .BLANK 0000[0x4]
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 0622 | " | .CONST 0x0622 ; Address of begin
0619 0004 | | .CONST 0x0004 ; Address of exception handler
061a 0003 | | .CONST 0x0003 ; Number of locals
061b INIT_0618:
061b e00d | | Load 0x0,0xd
061c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
061d 02ff | | Declare_Variable Variant_Record
061e 00d8 | | Load_Top At_Offset_0
061f 1c00 | | Execute_Immediate Run_Utility,0x0
0620 029f 06b3 | | Declare_Subprogram INIT_06b0,For_Call
0622 BODY_0618:
0622 e402 | | Load 0x2,0x2
0623 e007 | | Load 0x0,0x7
0624 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0625 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0626 c403 | | Store 0x2,0x3
0627 e00d | | Load 0x0,0xd
0628 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0629 00da | | Load_Top At_Offset_2
062a 600d |` | Indirect_Literal Discrete,0x638,{0x00000000, 0x00004000}
062b e00e | | Load 0x0,0xe
062c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
062d e403 | | Load 0x2,0x3
062e e007 | | Load 0x0,0x7
062f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0630 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0631 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0632 00d1 | | Pop_Control Pop_Count_1
0633 c407 | | Store 0x2,0x7
0634 e407 | | Load 0x2,0x7
0635 7001 |p | Jump_Nonzero 0x637
0636 8603 | | Call 0x3,0x3
0637 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0638 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
063c 0000 0000 | | .BLANK 0000[0x4]
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 0650 | P | .CONST 0x0650 ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0002 | | .CONST 0x0002 ; Number of locals
0643 INIT_0640:
0643 4801 |H | Short_Literal 0x1
0644 e010 | | Load 0x0,0x10
0645 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0646 e011 | | Load 0x0,0x11
0647 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0648 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0649 8232 | 2 | Call 0x1,0x32
064a e404 | | Load 0x2,0x4
064b e009 | | Load 0x0,0x9
064c 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
064d 01cc | | Execute Vector,Catenate
064e e009 | | Load 0x0,0x9
064f 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0650 BODY_0640:
0650 00d8 | | Load_Top At_Offset_0
0651 01db | | Execute Vector,Length
0652 7003 |p | Jump_Nonzero 0x656
0653 00d8 | | Load_Top At_Offset_0
0654 00cb | | Action Pop_Block_With_Result
0655 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0656 e408 | | Load 0x2,0x8
0657 e405 | | Load 0x2,0x5
0658 00da | | Load_Top At_Offset_2
0659 e402 | | Load 0x2,0x2
065a 8236 | 6 | Call 0x1,0x36
065b 00cb | | Action Pop_Block_With_Result
065c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
065d 0000 0000 | | .XXX[0x3]
065f 0000 | |
0660 ; --------------------------------------------------------------------------------------
0660 ; SUBPROGRAM
0660 ; --------------------------------------------------------------------------------------
0660 066a | j | .CONST 0x066a ; Address of begin
0661 0004 | | .CONST 0x0004 ; Address of exception handler
0662 0003 | | .CONST 0x0003 ; Number of locals
0663 INIT_0660:
0663 e00d | | Load 0x0,0xd
0664 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0665 02ff | | Declare_Variable Variant_Record
0666 00d8 | | Load_Top At_Offset_0
0667 1c00 | | Execute_Immediate Run_Utility,0x0
0668 029f 06cb | | Declare_Subprogram INIT_06c8,For_Call
066a BODY_0660:
066a e404 | | Load 0x2,0x4
066b e007 | | Load 0x0,0x7
066c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
066d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
066e c402 | | Store 0x2,0x2
066f e00d | | Load 0x0,0xd
0670 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0671 00da | | Load_Top At_Offset_2
0672 600d |` | Indirect_Literal Discrete,0x680,{0x00000000, 0x00004000}
0673 e00e | | Load 0x0,0xe
0674 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0675 e402 | | Load 0x2,0x2
0676 e007 | | Load 0x0,0x7
0677 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0678 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0679 1811 | | Execute Package,Field_Execute,Field_Number 0x11
067a 00d1 | | Pop_Control Pop_Count_1
067b c403 | | Store 0x2,0x3
067c 8603 | | Call 0x3,0x3
067d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
067e 0000 0000 | | .XXX[0x2]
0680 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0684 0000 0000 | | .BLANK 0000[0x4]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 0693 | | .CONST 0x0693 ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0002 | | .CONST 0x0002 ; Number of locals
068b INIT_0688:
068b 4800 |H | Short_Literal 0x0
068c e602 | | Load 0x3,0x2
068d e404 | | Load 0x2,0x4
068e e009 | | Load 0x0,0x9
068f 1b2a | * | Execute Package,Field_Read,Field_Number 0x2a
0690 01cc | | Execute Vector,Catenate
0691 e009 | | Load 0x0,0x9
0692 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
0693 BODY_0688:
0693 00d8 | | Load_Top At_Offset_0
0694 01db | | Execute Vector,Length
0695 0c01 | | Execute_Immediate Greater_Equal,0x1
0696 6804 |h | Jump_Zero 0x69b
0697 00d8 | | Load_Top At_Offset_0
0698 00cb | | Action Pop_Block_With_Result
0699 00cb | | Action Pop_Block_With_Result
069a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
069b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
069c 0000 0000 | | .BLANK 0000[0x4]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06a3 | | .CONST 0x06a3 ; Address of begin
06a1 0004 | | .CONST 0x0004 ; Address of exception handler
06a2 0001 | | .CONST 0x0001 ; Number of locals
06a3 BODY_06a0:
06a3 INIT_06a0:
06a3 e604 | | Load 0x3,0x4
06a4 e603 | | Load 0x3,0x3
06a5 0272 | r | Execute Discrete,Minus
06a6 0a01 | | Execute_Immediate Plus,0x1
06a7 e605 | | Load 0x3,0x5
06a8 027d | } | Execute Discrete,Greater
06a9 00ca | | Action Exit_Nullary_Function
06aa 0000 0000 | | .BLANK 0000[0x6]
06b0 ; --------------------------------------------------------------------------------------
06b0 ; SUBPROGRAM
06b0 ; --------------------------------------------------------------------------------------
06b0 06bb | | .CONST 0x06bb ; Address of begin
06b1 0004 | | .CONST 0x0004 ; Address of exception handler
06b2 0002 | | .CONST 0x0002 ; Number of locals
06b3 INIT_06b0:
06b3 4800 |H | Short_Literal 0x0
06b4 e602 | | Load 0x3,0x2
06b5 e404 | | Load 0x2,0x4
06b6 e009 | | Load 0x0,0x9
06b7 1b29 | ) | Execute Package,Field_Read,Field_Number 0x29
06b8 01cc | | Execute Vector,Catenate
06b9 e009 | | Load 0x0,0x9
06ba 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
06bb BODY_06b0:
06bb 00d8 | | Load_Top At_Offset_0
06bc 01db | | Execute Vector,Length
06bd 0c01 | | Execute_Immediate Greater_Equal,0x1
06be 6808 |h | Jump_Zero 0x6c7
06bf e408 | | Load 0x2,0x8
06c0 e405 | | Load 0x2,0x5
06c1 00da | | Load_Top At_Offset_2
06c2 e402 | | Load 0x2,0x2
06c3 8236 | 6 | Call 0x1,0x36
06c4 00cb | | Action Pop_Block_With_Result
06c5 00cb | | Action Pop_Block_With_Result
06c6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
06c7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06d0 | | .CONST 0x06d0 ; Address of begin
06c9 0004 | | .CONST 0x0004 ; Address of exception handler
06ca 0002 | | .CONST 0x0002 ; Number of locals
06cb INIT_06c8:
06cb 4800 |H | Short_Literal 0x0
06cc e602 | | Load 0x3,0x2
06cd e5ff | | Load 0x2,-0x1
06ce e009 | | Load 0x0,0x9
06cf 1832 | 2 | Execute Package,Field_Execute,Field_Number 0x32
06d0 BODY_06c8:
06d0 00d8 | | Load_Top At_Offset_0
06d1 01db | | Execute Vector,Length
06d2 0c01 | | Execute_Immediate Greater_Equal,0x1
06d3 6803 |h | Jump_Zero 0x6d7
06d4 00cc | | Action Pop_Block
06d5 00cc | | Action Pop_Block
06d6 7db0 |} | Jump 0x487
06d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
06d8 ; --------------------------------------------------------------------------------------
06d8 ; STRING TABLE
06d8 ; --------------------------------------------------------------------------------------
06d8 0016 | | .STRTAB 0x0016->0x06e3 ; "RCI_Remote_Defaults"
06d9 0027 | ' | .STRTAB 0x0027->0x06ec ; "Rci."
06da 0029 | ) | .STRTAB 0x0029->0x06ee ; "Session_Rci."
06db 0033 | 3 | .STRTAB 0x0033->0x06f4 ; "\x22:="
06dc 0034 | 4 | .STRTAB 0x0034->0x06f6 ; "<SESSION>"
06dd 003b | ; | .STRTAB 0x003b->0x06fa ; "."
06de 003a | : | .STRTAB 0x003a->0x06fb ; "_Switches"
06df 0041 | A | .STRTAB 0x0041->0x06ff ; ".S_1_Switches"
06e0 004c | L | .STRTAB 0x004c->0x0706 ; "rev"
06e1 004d | M | .STRTAB 0x004d->0x0707 ; "_working"
06e2 0053 | S | .STREND 0x0053->0x070b
06e3 5243 495f |RCI_| .STRTAB_STRINGS
070c 0000 0000 | | .BLANK 0000[0x4]
0710 ; --------------------------------------------------------------------------------------
0710 ; Debug Table
0710 ; --------------------------------------------------------------------------------------
0710 0004 000f | | .DEBUG4 0x0004,0x000f,0x2f61,0x0000,0x0001,0x0000
0716 0000 0000 | | .BLANK 0000[0xea]