|
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: 10240 (0x2800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 1300 | | .CONST 0x1300 ; 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 800b | | .CONST 0x800b ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 009c | | .CONST 0x009c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0039 | 9 | .CONST 0x0039 ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
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 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
002b c229 | ) | Store 0x1,0x29
002c 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated
002e c22a | * | Store 0x1,0x2a
002f 029a 0323 | #| Declare_Subprogram INIT_0320,For_Outer_Call,Visible,Unelaborated
0031 c216 | | Store 0x1,0x16
0032 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
0034 c217 | | Store 0x1,0x17
0035 029a 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call,Visible,Unelaborated
0037 c218 | | Store 0x1,0x18
0038 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated
003a c219 | | Store 0x1,0x19
003b 029a 045b | [| Declare_Subprogram INIT_0458,For_Outer_Call,Visible,Unelaborated
003d c21a | | Store 0x1,0x1a
003e 029a 048b | | Declare_Subprogram INIT_0488,For_Outer_Call,Visible,Unelaborated
0040 c21b | | Store 0x1,0x1b
0041 029a 04a3 | | Declare_Subprogram INIT_04a0,For_Outer_Call,Visible,Unelaborated
0043 c21c | | Store 0x1,0x1c
0044 029a 04bb | | Declare_Subprogram INIT_04b8,For_Outer_Call,Visible,Unelaborated
0046 c223 | # | Store 0x1,0x23
0047 029a 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Visible,Unelaborated
0049 c21d | | Store 0x1,0x1d
004a 029a 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Visible,Unelaborated
004c c225 | % | Store 0x1,0x25
004d 029a 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call,Visible,Unelaborated
004f c21e | | Store 0x1,0x1e
0050 029a 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call,Visible,Unelaborated
0052 c21f | | Store 0x1,0x1f
0053 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated
0055 c220 | | Store 0x1,0x20
0056 029a 0563 | c| Declare_Subprogram INIT_0560,For_Outer_Call,Visible,Unelaborated
0058 c221 | ! | Store 0x1,0x21
0059 00bf | | Action Accept_Activation
005a e001 | | Load 0x0,0x1
005b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005c 0092 0e47 | G| Action Push_String_Extended,0xe47 ; "!MACHINE.GATEWAY_CLASSES.TPS_OBJECT.RPI_DOCUMENT_TEMPLATE"
005e e002 | | Load 0x0,0x2
005f 191d | | Execute Package,Field_Reference,Field_Number 0x1d
0060 0007 | | Action Break_Optional
0061 e002 | | Load 0x0,0x2
0062 191f | | Execute Package,Field_Reference,Field_Number 0x1f
0063 0007 | | Action Break_Optional
0064 e003 | | Load 0x0,0x3
0065 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
0066 0007 | | Action Break_Optional
0067 e004 | | Load 0x0,0x4
0068 193e | > | Execute Package,Field_Reference,Field_Number 0x3e
0069 0007 | | Action Break_Optional
006a 029d 058b | | Declare_Subprogram INIT_0588,For_Outer_Call
006c 029d 05ab | | Declare_Subprogram INIT_05a8,For_Outer_Call
006e 029d 05bb | | Declare_Subprogram INIT_05b8,For_Outer_Call
0070 029d 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call
0072 029d 068b | | Declare_Subprogram INIT_0688,For_Outer_Call
0074 029d 06ab | | Declare_Subprogram INIT_06a8,For_Outer_Call
0076 029d 06d3 | | Declare_Subprogram INIT_06d0,For_Outer_Call
0078 029d 06f3 | | Declare_Subprogram INIT_06f0,For_Outer_Call
007a 029d 0733 | 3| Declare_Subprogram INIT_0730,For_Outer_Call
007c 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
007d 00c7 | | Action Elaborate_Subprogram
007e 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
007f 00c7 | | Action Elaborate_Subprogram
0080 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0081 00c7 | | Action Elaborate_Subprogram
0082 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0083 00c7 | | Action Elaborate_Subprogram
0084 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0085 00c7 | | Action Elaborate_Subprogram
0086 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0087 00c7 | | Action Elaborate_Subprogram
0088 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0089 00c7 | | Action Elaborate_Subprogram
008a 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
008b 00c7 | | Action Elaborate_Subprogram
008c 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
008d 00c7 | | Action Elaborate_Subprogram
008e 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
008f 00c7 | | Action Elaborate_Subprogram
0090 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0091 00c7 | | Action Elaborate_Subprogram
0092 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
0093 00c7 | | Action Elaborate_Subprogram
0094 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0095 00c7 | | Action Elaborate_Subprogram
0096 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0097 00c7 | | Action Elaborate_Subprogram
0098 1d20 | | Execute_Immediate Reference_Lex_1,0x20
0099 00c7 | | Action Elaborate_Subprogram
009a 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
009b 00c7 | | Action Elaborate_Subprogram
009c BODY_0008:
009c 00bc | | Action Signal_Activated
009d 00bb | | Action Signal_Completion
009e 0000 0000 | | .XXX[0x2]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00b5 | | .CONST 0x00b5 ; Address of begin
00a1 02a6 | | .CONST 0x02a6 ; Address of exception handler
00a2 0007 | | .CONST 0x0007 ; Number of locals
00a3 INIT_00a0:
00a3 e5f2 | | Load 0x2,-0xe
00a4 e5fe | | Load 0x2,-0x2
00a5 e5ff | | Load 0x2,-0x1
00a6 8235 | 5 | Call 0x1,0x35
00a7 e22b | + | Load 0x1,0x2b
00a8 02c7 | | Declare_Variable Any
00a9 00d8 | | Load_Top At_Offset_0
00aa 1c00 | | Execute_Immediate Run_Utility,0x0
00ab e005 | | Load 0x0,0x5
00ac 1925 | % | Execute Package,Field_Reference,Field_Number 0x25
00ad 00c6 | | Action Check_Subprogram_Elaborated
00ae 4ff0 |O | Short_Literal -0x10
00af 4802 |H | Short_Literal 0x2
00b0 0099 | | Action Reference_Dynamic
00b1 e006 | | Load 0x0,0x6
00b2 e007 | | Load 0x0,0x7
00b3 4807 |H | Short_Literal 0x7
00b4 0007 | | Action Break_Optional
00b5 BODY_00a0:
00b5 e5f2 | | Load 0x2,-0xe
00b6 681b |h | Jump_Zero 0xd2
00b7 e402 | | Load 0x2,0x2
00b8 8236 | 6 | Call 0x1,0x36
00b9 c5ee | | Store 0x2,-0x12
00ba 4801 |H | Short_Literal 0x1
00bb e5ee | | Load 0x2,-0x12
00bc e008 | | Load 0x0,0x8
00bd 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00be 6813 |h | Jump_Zero 0xd2
00bf e004 | | Load 0x0,0x4
00c0 180e | | Execute Package,Field_Execute,Field_Number 0xe
00c1 4807 |H | Short_Literal 0x7
00c2 0092 0e48 | H| Action Push_String_Extended,0xe48 ; "Cannot create gateway \x22"
00c4 e5ff | | Load 0x2,-0x1
00c5 01cc | | Execute Vector,Catenate
00c6 0092 0e49 | I| Action Push_String_Extended,0xe49 ; "\x22: "
00c8 01cc | | Execute Vector,Catenate
00c9 e5ee | | Load 0x2,-0x12
00ca e008 | | Load 0x0,0x8
00cb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00cc 01cc | | Execute Vector,Catenate
00cd e009 | | Load 0x0,0x9
00ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00cf 4801 |H | Short_Literal 0x1
00d0 a5f0 | | Store_Unchecked 0x2,-0x10
00d1 4510 |E | Exit_Suprogram New_Top_Offset 0x10
00d2 e5ee | | Load 0x2,-0x12
00d3 e403 | | Load 0x2,0x3
00d4 e5f3 | | Load 0x2,-0xd
00d5 e5ff | | Load 0x2,-0x1
00d6 e001 | | Load 0x0,0x1
00d7 183a | : | Execute Package,Field_Execute,Field_Number 0x3a
00d8 c403 | | Store 0x2,0x3
00d9 c5ee | | Store 0x2,-0x12
00da 4801 |H | Short_Literal 0x1
00db e5ee | | Load 0x2,-0x12
00dc e008 | | Load 0x0,0x8
00dd 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00de 6813 |h | Jump_Zero 0xf2
00df e004 | | Load 0x0,0x4
00e0 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e1 e5ee | | Load 0x2,-0x12
00e2 e009 | | Load 0x0,0x9
00e3 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00e4 e004 | | Load 0x0,0x4
00e5 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e6 4807 |H | Short_Literal 0x7
00e7 0092 0e4a | J| Action Push_String_Extended,0xe4a ; "Cannot create gateway: "
00e9 e5ee | | Load 0x2,-0x12
00ea e008 | | Load 0x0,0x8
00eb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00ec 01cc | | Execute Vector,Catenate
00ed e009 | | Load 0x0,0x9
00ee 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00ef 4801 |H | Short_Literal 0x1
00f0 a5f0 | | Store_Unchecked 0x2,-0x10
00f1 4510 |E | Exit_Suprogram New_Top_Offset 0x10
00f2 e004 | | Load 0x0,0x4
00f3 180e | | Execute Package,Field_Execute,Field_Number 0xe
00f4 4803 |H | Short_Literal 0x3
00f5 4820 |H | Short_Literal 0x20
00f6 0092 0e4b | K| Action Push_String_Extended,0xe4b ; "Created "
00f8 4801 |H | Short_Literal 0x1
00f9 e403 | | Load 0x2,0x3
00fa e001 | | Load 0x0,0x1
00fb 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
00fc 01cc | | Execute Vector,Catenate
00fd 01cb | | Execute Vector,Append
00fe 4801 |H | Short_Literal 0x1
00ff e403 | | Load 0x2,0x3
0100 e001 | | Load 0x0,0x1
0101 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0102 01cc | | Execute Vector,Catenate
0103 e009 | | Load 0x0,0x9
0104 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0105 e403 | | Load 0x2,0x3
0106 e5fa | | Load 0x2,-0x6
0107 e00a | | Load 0x0,0xa
0108 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0109 011c | | Execute Any,Convert_Unchecked
010a 1c01 | | Execute_Immediate Run_Utility,0x1
010b e00a | | Load 0x0,0xa
010c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
010d 4804 |H | Short_Literal 0x4
010e 4802 |H | Short_Literal 0x2
010f 0099 | | Action Reference_Dynamic
0110 4805 |H | Short_Literal 0x5
0111 4802 |H | Short_Literal 0x2
0112 0099 | | Action Reference_Dynamic
0113 e005 | | Load 0x0,0x5
0114 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0115 4801 |H | Short_Literal 0x1
0116 0092 0e4c | L| Action Push_String_Extended,0xe4c ; "<AUTO GENERATE>"
0118 4820 |H | Short_Literal 0x20
0119 e5fe | | Load 0x2,-0x2
011a e003 | | Load 0x0,0x3
011b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
011c 822f | / | Call 0x1,0x2f
011d 6819 |h | Jump_Zero 0x137
011e e403 | | Load 0x2,0x3
011f 0092 0e4d | M| Action Push_String_Extended,0xe4d ; "$."
0121 e402 | | Load 0x2,0x2
0122 e00b | | Load 0x0,0xb
0123 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0124 e00b | | Load 0x0,0xb
0125 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0126 e402 | | Load 0x2,0x2
0127 e00b | | Load 0x0,0xb
0128 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0129 e00b | | Load 0x0,0xb
012a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
012b 01cc | | Execute Vector,Catenate
012c e00a | | Load 0x0,0xa
012d 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
012e 4804 |H | Short_Literal 0x4
012f 4802 |H | Short_Literal 0x2
0130 0099 | | Action Reference_Dynamic
0131 4805 |H | Short_Literal 0x5
0132 4802 |H | Short_Literal 0x2
0133 0099 | | Action Reference_Dynamic
0134 e005 | | Load 0x0,0x5
0135 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0136 780c |x | Jump 0x143
0137 e403 | | Load 0x2,0x3
0138 e402 | | Load 0x2,0x2
0139 e00a | | Load 0x0,0xa
013a 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
013b 4804 |H | Short_Literal 0x4
013c 4802 |H | Short_Literal 0x2
013d 0099 | | Action Reference_Dynamic
013e 4805 |H | Short_Literal 0x5
013f 4802 |H | Short_Literal 0x2
0140 0099 | | Action Reference_Dynamic
0141 e005 | | Load 0x0,0x5
0142 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0143 e403 | | Load 0x2,0x3
0144 e5fd | | Load 0x2,-0x3
0145 e00a | | Load 0x0,0xa
0146 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0147 4804 |H | Short_Literal 0x4
0148 4802 |H | Short_Literal 0x2
0149 0099 | | Action Reference_Dynamic
014a 4805 |H | Short_Literal 0x5
014b 4802 |H | Short_Literal 0x2
014c 0099 | | Action Reference_Dynamic
014d e005 | | Load 0x0,0x5
014e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
014f e403 | | Load 0x2,0x3
0150 e5fc | | Load 0x2,-0x4
0151 e00a | | Load 0x0,0xa
0152 1b19 | | Execute Package,Field_Read,Field_Number 0x19
0153 4804 |H | Short_Literal 0x4
0154 4802 |H | Short_Literal 0x2
0155 0099 | | Action Reference_Dynamic
0156 4805 |H | Short_Literal 0x5
0157 4802 |H | Short_Literal 0x2
0158 0099 | | Action Reference_Dynamic
0159 e005 | | Load 0x0,0x5
015a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
015b 4801 |H | Short_Literal 0x1
015c 0092 0e4c | L| Action Push_String_Extended,0xe4c ; "<AUTO GENERATE>"
015e e5fb | | Load 0x2,-0x5
015f 822f | / | Call 0x1,0x2f
0160 6812 |h | Jump_Zero 0x173
0161 e403 | | Load 0x2,0x3
0162 4801 |H | Short_Literal 0x1
0163 e403 | | Load 0x2,0x3
0164 e001 | | Load 0x0,0x1
0165 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0166 e00c | | Load 0x0,0xc
0167 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0168 e00a | | Load 0x0,0xa
0169 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
016a 4804 |H | Short_Literal 0x4
016b 4802 |H | Short_Literal 0x2
016c 0099 | | Action Reference_Dynamic
016d 4805 |H | Short_Literal 0x5
016e 4802 |H | Short_Literal 0x2
016f 0099 | | Action Reference_Dynamic
0170 e005 | | Load 0x0,0x5
0171 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0172 7828 |x( | Jump 0x19b
0173 4801 |H | Short_Literal 0x1
0174 0092 0e4e | N| Action Push_String_Extended,0xe4e ; "<DEFAULT VIEW CABINET>"
0176 e5fb | | Load 0x2,-0x5
0177 822f | / | Call 0x1,0x2f
0178 6816 |h | Jump_Zero 0x18f
0179 e403 | | Load 0x2,0x3
017a 4801 |H | Short_Literal 0x1
017b e403 | | Load 0x2,0x3
017c e001 | | Load 0x0,0x1
017d 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
017e e00b | | Load 0x0,0xb
017f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0180 e00b | | Load 0x0,0xb
0181 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0182 e00c | | Load 0x0,0xc
0183 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0184 e00a | | Load 0x0,0xa
0185 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0186 4804 |H | Short_Literal 0x4
0187 4802 |H | Short_Literal 0x2
0188 0099 | | Action Reference_Dynamic
0189 4805 |H | Short_Literal 0x5
018a 4802 |H | Short_Literal 0x2
018b 0099 | | Action Reference_Dynamic
018c e005 | | Load 0x0,0x5
018d 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
018e 780c |x | Jump 0x19b
018f e403 | | Load 0x2,0x3
0190 e5fb | | Load 0x2,-0x5
0191 e00a | | Load 0x0,0xa
0192 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27
0193 4804 |H | Short_Literal 0x4
0194 4802 |H | Short_Literal 0x2
0195 0099 | | Action Reference_Dynamic
0196 4805 |H | Short_Literal 0x5
0197 4802 |H | Short_Literal 0x2
0198 0099 | | Action Reference_Dynamic
0199 e005 | | Load 0x0,0x5
019a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
019b e403 | | Load 0x2,0x3
019c e5f9 | | Load 0x2,-0x7
019d 00e1 | | Load_Encached Boolean_Cache
019e 011c | | Execute Any,Convert_Unchecked
019f 1c01 | | Execute_Immediate Run_Utility,0x1
01a0 e00a | | Load 0x0,0xa
01a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a2 4804 |H | Short_Literal 0x4
01a3 4802 |H | Short_Literal 0x2
01a4 0099 | | Action Reference_Dynamic
01a5 4805 |H | Short_Literal 0x5
01a6 4802 |H | Short_Literal 0x2
01a7 0099 | | Action Reference_Dynamic
01a8 e005 | | Load 0x0,0x5
01a9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01aa e403 | | Load 0x2,0x3
01ab e5f8 | | Load 0x2,-0x8
01ac 00e1 | | Load_Encached Boolean_Cache
01ad 011c | | Execute Any,Convert_Unchecked
01ae 1c01 | | Execute_Immediate Run_Utility,0x1
01af e00a | | Load 0x0,0xa
01b0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01b1 4804 |H | Short_Literal 0x4
01b2 4802 |H | Short_Literal 0x2
01b3 0099 | | Action Reference_Dynamic
01b4 4805 |H | Short_Literal 0x5
01b5 4802 |H | Short_Literal 0x2
01b6 0099 | | Action Reference_Dynamic
01b7 e005 | | Load 0x0,0x5
01b8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01b9 e403 | | Load 0x2,0x3
01ba e5f7 | | Load 0x2,-0x9
01bb e00a | | Load 0x0,0xa
01bc 1b26 | & | Execute Package,Field_Read,Field_Number 0x26
01bd 011c | | Execute Any,Convert_Unchecked
01be 1c01 | | Execute_Immediate Run_Utility,0x1
01bf e00a | | Load 0x0,0xa
01c0 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01c1 4804 |H | Short_Literal 0x4
01c2 4802 |H | Short_Literal 0x2
01c3 0099 | | Action Reference_Dynamic
01c4 4805 |H | Short_Literal 0x5
01c5 4802 |H | Short_Literal 0x2
01c6 0099 | | Action Reference_Dynamic
01c7 e005 | | Load 0x0,0x5
01c8 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01c9 e403 | | Load 0x2,0x3
01ca e5f6 | | Load 0x2,-0xa
01cb e00a | | Load 0x0,0xa
01cc 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01cd 4804 |H | Short_Literal 0x4
01ce 4802 |H | Short_Literal 0x2
01cf 0099 | | Action Reference_Dynamic
01d0 4805 |H | Short_Literal 0x5
01d1 4802 |H | Short_Literal 0x2
01d2 0099 | | Action Reference_Dynamic
01d3 e005 | | Load 0x0,0x5
01d4 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01d5 e403 | | Load 0x2,0x3
01d6 e5f5 | | Load 0x2,-0xb
01d7 00e1 | | Load_Encached Boolean_Cache
01d8 011c | | Execute Any,Convert_Unchecked
01d9 1c01 | | Execute_Immediate Run_Utility,0x1
01da e00a | | Load 0x0,0xa
01db 1b15 | | Execute Package,Field_Read,Field_Number 0x15
01dc 4804 |H | Short_Literal 0x4
01dd 4802 |H | Short_Literal 0x2
01de 0099 | | Action Reference_Dynamic
01df 4805 |H | Short_Literal 0x5
01e0 4802 |H | Short_Literal 0x2
01e1 0099 | | Action Reference_Dynamic
01e2 e005 | | Load 0x0,0x5
01e3 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01e4 e403 | | Load 0x2,0x3
01e5 e5f4 | | Load 0x2,-0xc
01e6 e00a | | Load 0x0,0xa
01e7 1b18 | | Execute Package,Field_Read,Field_Number 0x18
01e8 4804 |H | Short_Literal 0x4
01e9 4802 |H | Short_Literal 0x2
01ea 0099 | | Action Reference_Dynamic
01eb 4805 |H | Short_Literal 0x5
01ec 4802 |H | Short_Literal 0x2
01ed 0099 | | Action Reference_Dynamic
01ee e005 | | Load 0x0,0x5
01ef 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01f0 e5fa | | Load 0x2,-0x6
01f1 e00a | | Load 0x0,0xa
01f2 1b20 | | Execute Package,Field_Read,Field_Number 0x20
01f3 0260 | ` | Execute Discrete,In_Type
01f4 7001 |p | Jump_Nonzero 0x1f6
01f5 78ab |x | Jump 0x2a1
01f6 e5f9 | | Load 0x2,-0x7
01f7 7001 |p | Jump_Nonzero 0x1f9
01f8 78a8 |x | Jump 0x2a1
01f9 e403 | | Load 0x2,0x3
01fa e00d | | Load 0x0,0xd
01fb 180f | | Execute Package,Field_Execute,Field_Number 0xf
01fc 6808 |h | Jump_Zero 0x205
01fd e004 | | Load 0x0,0x4
01fe 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ff 4802 |H | Short_Literal 0x2
0200 0092 0e4f | O| Action Push_String_Extended,0xe4f ; "Initialization was not required because the object already exists on the TPS desktop"
0202 e009 | | Load 0x0,0x9
0203 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0204 789c |x | Jump 0x2a1
0205 e22c | , | Load 0x1,0x2c
0206 e00b | | Load 0x0,0xb
0207 180d | | Execute Package,Field_Execute,Field_Number 0xd
0208 6898 |h | Jump_Zero 0x2a1
0209 e5ee | | Load 0x2,-0x12
020a 4801 |H | Short_Literal 0x1
020b e403 | | Load 0x2,0x3
020c e001 | | Load 0x0,0x1
020d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
020e 4801 |H | Short_Literal 0x1
020f e403 | | Load 0x2,0x3
0210 e001 | | Load 0x0,0x1
0211 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0212 8233 | 3 | Call 0x1,0x33
0213 c5ee | | Store 0x2,-0x12
0214 4801 |H | Short_Literal 0x1
0215 e5ee | | Load 0x2,-0x12
0216 e008 | | Load 0x0,0x8
0217 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0218 6815 |h | Jump_Zero 0x22e
0219 e004 | | Load 0x0,0x4
021a 180e | | Execute Package,Field_Execute,Field_Number 0xe
021b e5ee | | Load 0x2,-0x12
021c e009 | | Load 0x0,0x9
021d 1812 | | Execute Package,Field_Execute,Field_Number 0x12
021e e004 | | Load 0x0,0x4
021f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0220 4805 |H | Short_Literal 0x5
0221 e00e | | Load 0x0,0xe
0222 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0223 0092 0e50 | P| Action Push_String_Extended,0xe50 ; "Unable to initialize data object for <1>"
0225 4801 |H | Short_Literal 0x1
0226 e403 | | Load 0x2,0x3
0227 e001 | | Load 0x0,0x1
0228 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0229 e009 | | Load 0x0,0x9
022a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
022b 4801 |H | Short_Literal 0x1
022c a5f0 | | Store_Unchecked 0x2,-0x10
022d 7873 |xs | Jump 0x2a1
022e e5f1 | | Load 0x2,-0xf
022f 6815 |h | Jump_Zero 0x245
0230 4801 |H | Short_Literal 0x1
0231 e403 | | Load 0x2,0x3
0232 e001 | | Load 0x0,0x1
0233 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
0234 7010 |p | Jump_Nonzero 0x245
0235 e004 | | Load 0x0,0x4
0236 180e | | Execute Package,Field_Execute,Field_Number 0xe
0237 4806 |H | Short_Literal 0x6
0238 e00e | | Load 0x0,0xe
0239 1810 | | Execute Package,Field_Execute,Field_Number 0x10
023a 0092 0e51 | Q| Action Push_String_Extended,0xe51 ; "No TPS desktop object was initialized for <1> because its Connected property is False"
023c 4801 |H | Short_Literal 0x1
023d e403 | | Load 0x2,0x3
023e e001 | | Load 0x0,0x1
023f 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0240 e009 | | Load 0x0,0x9
0241 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0242 4801 |H | Short_Literal 0x1
0243 a5ef | | Store_Unchecked 0x2,-0x11
0244 785c |x\ | Jump 0x2a1
0245 e5f1 | | Load 0x2,-0xf
0246 685a |hZ | Jump_Zero 0x2a1
0247 e5f8 | | Load 0x2,-0x8
0248 700d |p | Jump_Nonzero 0x256
0249 e403 | | Load 0x2,0x3
024a 0092 0e52 | R| Action Push_String_Extended,0xe52 ; "True"
024c e00a | | Load 0x0,0xa
024d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
024e 4804 |H | Short_Literal 0x4
024f 4802 |H | Short_Literal 0x2
0250 0099 | | Action Reference_Dynamic
0251 4805 |H | Short_Literal 0x5
0252 4802 |H | Short_Literal 0x2
0253 0099 | | Action Reference_Dynamic
0254 e005 | | Load 0x0,0x5
0255 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0256 e5ee | | Load 0x2,-0x12
0257 e403 | | Load 0x2,0x3
0258 e00d | | Load 0x0,0xd
0259 1811 | | Execute Package,Field_Execute,Field_Number 0x11
025a c5ee | | Store 0x2,-0x12
025b e5f8 | | Load 0x2,-0x8
025c 700d |p | Jump_Nonzero 0x26a
025d e403 | | Load 0x2,0x3
025e 0092 0e53 | S| Action Push_String_Extended,0xe53 ; "False"
0260 e00a | | Load 0x0,0xa
0261 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0262 4804 |H | Short_Literal 0x4
0263 4802 |H | Short_Literal 0x2
0264 0099 | | Action Reference_Dynamic
0265 4805 |H | Short_Literal 0x5
0266 4802 |H | Short_Literal 0x2
0267 0099 | | Action Reference_Dynamic
0268 e005 | | Load 0x0,0x5
0269 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
026a 4801 |H | Short_Literal 0x1
026b e5ee | | Load 0x2,-0x12
026c e008 | | Load 0x0,0x8
026d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
026e 681d |h | Jump_Zero 0x28c
026f e004 | | Load 0x0,0x4
0270 180e | | Execute Package,Field_Execute,Field_Number 0xe
0271 e5ee | | Load 0x2,-0x12
0272 e009 | | Load 0x0,0x9
0273 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0274 e004 | | Load 0x0,0x4
0275 180e | | Execute Package,Field_Execute,Field_Number 0xe
0276 4805 |H | Short_Literal 0x5
0277 e00e | | Load 0x0,0xe
0278 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0279 0092 0e54 | T| Action Push_String_Extended,0xe54 ; "Unable to initialize TPS desktop object \x22"
027b 4801 |H | Short_Literal 0x1
027c e403 | | Load 0x2,0x3
027d e001 | | Load 0x0,0x1
027e 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
027f 01cc | | Execute Vector,Catenate
0280 0092 0e55 | U| Action Push_String_Extended,0xe55 ; "\x22 for <1>"
0282 01cc | | Execute Vector,Catenate
0283 4801 |H | Short_Literal 0x1
0284 e403 | | Load 0x2,0x3
0285 e001 | | Load 0x0,0x1
0286 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
0287 e009 | | Load 0x0,0x9
0288 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0289 4801 |H | Short_Literal 0x1
028a a5f0 | | Store_Unchecked 0x2,-0x10
028b 7815 |x | Jump 0x2a1
028c e004 | | Load 0x0,0x4
028d 180e | | Execute Package,Field_Execute,Field_Number 0xe
028e 4803 |H | Short_Literal 0x3
028f e00e | | Load 0x0,0xe
0290 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0291 0092 0e56 | V| Action Push_String_Extended,0xe56 ; "TPS desktop object \x22"
0293 4801 |H | Short_Literal 0x1
0294 e403 | | Load 0x2,0x3
0295 e001 | | Load 0x0,0x1
0296 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0297 01cc | | Execute Vector,Catenate
0298 0092 0e57 | W| Action Push_String_Extended,0xe57 ; "\x22 was successfully initialized for <1>"
029a 01cc | | Execute Vector,Catenate
029b 4801 |H | Short_Literal 0x1
029c e403 | | Load 0x2,0x3
029d e001 | | Load 0x0,0x1
029e 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
029f e009 | | Load 0x0,0x9
02a0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
02a1 e403 | | Load 0x2,0x3
02a2 e001 | | Load 0x0,0x1
02a3 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
02a4 c403 | | Store 0x2,0x3
02a5 4510 |E | Exit_Suprogram New_Top_Offset 0x10
02a6 TRAP_00a0:
02a6 0007 | | Action Break_Optional
02a7 e403 | | Load 0x2,0x3
02a8 e001 | | Load 0x0,0x1
02a9 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
02aa c403 | | Store 0x2,0x3
02ab 00d8 | | Load_Top At_Offset_0
02ac 0101 | | Execute Exception,Reraise
02ad 0000 0000 | | .XXX[0x3]
02af 0000 | |
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c1 | | .CONST 0x02c1 ; Address of begin
02b1 0319 | | .CONST 0x0319 ; Address of exception handler
02b2 0004 | | .CONST 0x0004 ; Number of locals
02b3 INIT_02b0:
02b3 e00e | | Load 0x0,0xe
02b4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02b5 1b18 | | Execute Package,Field_Read,Field_Number 0x18
02b6 02c7 | | Declare_Variable Any
02b7 e5ff | | Load 0x2,-0x1
02b8 e00b | | Load 0x0,0xb
02b9 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02ba a402 | | Store_Unchecked 0x2,0x2
02bb e5ff | | Load 0x2,-0x1
02bc e00b | | Load 0x0,0xb
02bd 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02be 8238 | 8 | Call 0x1,0x38
02bf 029f 07a3 | | Declare_Subprogram INIT_07a0,For_Call
02c1 BODY_02b0:
02c1 e402 | | Load 0x2,0x2
02c2 e00e | | Load 0x0,0xe
02c3 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02c4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02c5 6843 |hC | Jump_Zero 0x309
02c6 e5ff | | Load 0x2,-0x1
02c7 e00b | | Load 0x0,0xb
02c8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02c9 e00b | | Load 0x0,0xb
02ca 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
02cb c402 | | Store 0x2,0x2
02cc e402 | | Load 0x2,0x2
02cd e00e | | Load 0x0,0xe
02ce 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02cf 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02d0 680f |h | Jump_Zero 0x2e0
02d1 e004 | | Load 0x0,0x4
02d2 180e | | Execute Package,Field_Execute,Field_Number 0xe
02d3 4805 |H | Short_Literal 0x5
02d4 0092 0e58 | X| Action Push_String_Extended,0xe58 ; "The enclosing object for \x22"
02d6 e5ff | | Load 0x2,-0x1
02d7 01cc | | Execute Vector,Catenate
02d8 0092 0e59 | Y| Action Push_String_Extended,0xe59 ; "\x22 does not exist; unable to create gateway object."
02da 01cc | | Execute Vector,Catenate
02db e009 | | Load 0x0,0x9
02dc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02dd e004 | | Load 0x0,0x4
02de 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
02df 0257 | W | Execute Discrete,Raise
02e0 00cf | | Action Mark_Auxiliary
02e1 7820 |x | Jump 0x302
02e2 e5f1 | | Load 0x2,-0xf
02e3 e5f2 | | Load 0x2,-0xe
02e4 e5f3 | | Load 0x2,-0xd
02e5 e5f4 | | Load 0x2,-0xc
02e6 e5f5 | | Load 0x2,-0xb
02e7 e5f6 | | Load 0x2,-0xa
02e8 e5f7 | | Load 0x2,-0x9
02e9 e5f8 | | Load 0x2,-0x8
02ea e5f9 | | Load 0x2,-0x7
02eb e5fa | | Load 0x2,-0x6
02ec e5fb | | Load 0x2,-0x5
02ed e5fc | | Load 0x2,-0x4
02ee e5fd | | Load 0x2,-0x3
02ef e5fe | | Load 0x2,-0x2
02f0 482e |H. | Short_Literal 0x2e
02f1 e402 | | Load 0x2,0x2
02f2 e00b | | Load 0x0,0xb
02f3 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
02f4 01cb | | Execute Vector,Append
02f5 e403 | | Load 0x2,0x3
02f6 01cc | | Execute Vector,Catenate
02f7 8239 | 9 | Call 0x1,0x39
02f8 c5f4 | | Store 0x2,-0xc
02f9 c5f3 | | Store 0x2,-0xd
02fa c5f2 | | Store 0x2,-0xe
02fb c5f1 | | Store 0x2,-0xf
02fc e402 | | Load 0x2,0x2
02fd e00e | | Load 0x0,0xe
02fe 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02ff 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0300 c402 | | Store 0x2,0x2
0301 00c9 | | Action Pop_Auxiliary_Loop
0302 e402 | | Load 0x2,0x2
0303 e00e | | Load 0x0,0xe
0304 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0305 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0306 6fdb |o | Jump_Zero 0x2e2
0307 00ce | | Action Pop_Auxiliary
0308 450c |E | Exit_Suprogram New_Top_Offset 0xc
0309 00cf | | Action Mark_Auxiliary
030a 7807 |x | Jump 0x312
030b 8404 | | Call 0x2,0x4
030c e402 | | Load 0x2,0x2
030d e00e | | Load 0x0,0xe
030e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
030f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0310 c402 | | Store 0x2,0x2
0311 00c9 | | Action Pop_Auxiliary_Loop
0312 e402 | | Load 0x2,0x2
0313 e00e | | Load 0x0,0xe
0314 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0315 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0316 6ff4 |o | Jump_Zero 0x30b
0317 00ce | | Action Pop_Auxiliary
0318 450c |E | Exit_Suprogram New_Top_Offset 0xc
0319 TRAP_02b0:
0319 0007 | | Action Break_Optional
031a 4801 |H | Short_Literal 0x1
031b a5f3 | | Store_Unchecked 0x2,-0xd
031c 450c |E | Exit_Suprogram New_Top_Offset 0xc
031d 0000 0000 | | .XXX[0x3]
031f 0000 | |
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0340 | @ | .CONST 0x0340 ; Address of begin
0321 0360 | ` | .CONST 0x0360 ; Address of exception handler
0322 000c | | .CONST 0x000c ; Number of locals
0323 INIT_0320:
0323 e00f | | Load 0x0,0xf
0324 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0325 02c7 | | Declare_Variable Any
0326 00d8 | | Load_Top At_Offset_0
0327 1c00 | | Execute_Immediate Run_Utility,0x0
0328 029f 07f3 | | Declare_Subprogram INIT_07f0,For_Call
032a 029f 083b | ;| Declare_Subprogram INIT_0838,For_Call
032c 029f 08eb | | Declare_Subprogram INIT_08e8,For_Call
032e 029f 0923 | #| Declare_Subprogram INIT_0920,For_Call
0330 e005 | | Load 0x0,0x5
0331 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
0332 00c6 | | Action Check_Subprogram_Elaborated
0333 4806 |H | Short_Literal 0x6
0334 4802 |H | Short_Literal 0x2
0335 0099 | | Action Reference_Dynamic
0336 4ffb |O | Short_Literal -0x5
0337 4802 |H | Short_Literal 0x2
0338 0099 | | Action Reference_Dynamic
0339 4ffa |O | Short_Literal -0x6
033a 4802 |H | Short_Literal 0x2
033b 0099 | | Action Reference_Dynamic
033c e010 | | Load 0x0,0x10
033d e011 | | Load 0x0,0x11
033e 480c |H | Short_Literal 0xc
033f 0007 | | Action Break_Optional
0340 BODY_0320:
0340 e012 | | Load 0x0,0x12
0341 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0342 e00f | | Load 0x0,0xf
0343 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0344 c402 | | Store 0x2,0x2
0345 e005 | | Load 0x0,0x5
0346 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0347 e402 | | Load 0x2,0x2
0348 4801 |H | Short_Literal 0x1
0349 e5fe | | Load 0x2,-0x2
034a e5ff | | Load 0x2,-0x1
034b 4807 |H | Short_Literal 0x7
034c 4802 |H | Short_Literal 0x2
034d 0099 | | Action Reference_Dynamic
034e 4808 |H | Short_Literal 0x8
034f 4802 |H | Short_Literal 0x2
0350 0099 | | Action Reference_Dynamic
0351 4809 |H | Short_Literal 0x9
0352 4802 |H | Short_Literal 0x2
0353 0099 | | Action Reference_Dynamic
0354 480a |H | Short_Literal 0xa
0355 4802 |H | Short_Literal 0x2
0356 0099 | | Action Reference_Dynamic
0357 e005 | | Load 0x0,0x5
0358 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0359 e402 | | Load 0x2,0x2
035a 4801 |H | Short_Literal 0x1
035b 4801 |H | Short_Literal 0x1
035c e00f | | Load 0x0,0xf
035d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
035e c402 | | Store 0x2,0x2
035f 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0360 TRAP_0320:
0360 0007 | | Action Break_Optional
0361 e402 | | Load 0x2,0x2
0362 4801 |H | Short_Literal 0x1
0363 4800 |H | Short_Literal 0x0
0364 e00f | | Load 0x0,0xf
0365 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0366 c402 | | Store 0x2,0x2
0367 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 038a | | .CONST 0x038a ; Address of begin
0369 03aa | | .CONST 0x03aa ; Address of exception handler
036a 000d | | .CONST 0x000d ; Number of locals
036b INIT_0368:
036b e00f | | Load 0x0,0xf
036c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036d 02c7 | | Declare_Variable Any
036e 00d8 | | Load_Top At_Offset_0
036f 1c00 | | Execute_Immediate Run_Utility,0x0
0370 029f 099b | | Declare_Subprogram INIT_0998,For_Call
0372 029f 09e3 | | Declare_Subprogram INIT_09e0,For_Call
0374 029f 0a13 | | Declare_Subprogram INIT_0a10,For_Call
0376 029f 0acb | | Declare_Subprogram INIT_0ac8,For_Call
0378 029f 0b03 | | Declare_Subprogram INIT_0b00,For_Call
037a e005 | | Load 0x0,0x5
037b 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
037c 00c6 | | Action Check_Subprogram_Elaborated
037d 4807 |H | Short_Literal 0x7
037e 4802 |H | Short_Literal 0x2
037f 0099 | | Action Reference_Dynamic
0380 4ffb |O | Short_Literal -0x5
0381 4802 |H | Short_Literal 0x2
0382 0099 | | Action Reference_Dynamic
0383 4ffa |O | Short_Literal -0x6
0384 4802 |H | Short_Literal 0x2
0385 0099 | | Action Reference_Dynamic
0386 e013 | | Load 0x0,0x13
0387 e014 | | Load 0x0,0x14
0388 480d |H | Short_Literal 0xd
0389 0007 | | Action Break_Optional
038a BODY_0368:
038a e012 | | Load 0x0,0x12
038b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
038c e00f | | Load 0x0,0xf
038d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
038e c402 | | Store 0x2,0x2
038f e005 | | Load 0x0,0x5
0390 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0391 e402 | | Load 0x2,0x2
0392 4801 |H | Short_Literal 0x1
0393 e5fe | | Load 0x2,-0x2
0394 e5ff | | Load 0x2,-0x1
0395 4808 |H | Short_Literal 0x8
0396 4802 |H | Short_Literal 0x2
0397 0099 | | Action Reference_Dynamic
0398 4809 |H | Short_Literal 0x9
0399 4802 |H | Short_Literal 0x2
039a 0099 | | Action Reference_Dynamic
039b 480a |H | Short_Literal 0xa
039c 4802 |H | Short_Literal 0x2
039d 0099 | | Action Reference_Dynamic
039e 480b |H | Short_Literal 0xb
039f 4802 |H | Short_Literal 0x2
03a0 0099 | | Action Reference_Dynamic
03a1 e005 | | Load 0x0,0x5
03a2 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03a3 e402 | | Load 0x2,0x2
03a4 4801 |H | Short_Literal 0x1
03a5 4801 |H | Short_Literal 0x1
03a6 e00f | | Load 0x0,0xf
03a7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03a8 c402 | | Store 0x2,0x2
03a9 4505 |E | Exit_Suprogram New_Top_Offset 0x5
03aa TRAP_0368:
03aa 0007 | | Action Break_Optional
03ab e402 | | Load 0x2,0x2
03ac 4801 |H | Short_Literal 0x1
03ad 4800 |H | Short_Literal 0x0
03ae e00f | | Load 0x0,0xf
03af 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03b0 c402 | | Store 0x2,0x2
03b1 4505 |E | Exit_Suprogram New_Top_Offset 0x5
03b2 0000 0000 | | .BLANK 0000[0x6]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03d5 | | .CONST 0x03d5 ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 000c | | .CONST 0x000c ; Number of locals
03bb INIT_03b8:
03bb 00e3 | | Load_Encached Natural_Cache
03bc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
03bd 00e3 | | Load_Encached Natural_Cache
03be 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
03bf 00e3 | | Load_Encached Natural_Cache
03c0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
03c1 029f 0b7b | {| Declare_Subprogram INIT_0b78,For_Call
03c3 029f 0b93 | | Declare_Subprogram INIT_0b90,For_Call
03c5 e005 | | Load 0x0,0x5
03c6 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
03c7 00c6 | | Action Check_Subprogram_Elaborated
03c8 4806 |H | Short_Literal 0x6
03c9 4802 |H | Short_Literal 0x2
03ca 0099 | | Action Reference_Dynamic
03cb 4ffd |O | Short_Literal -0x3
03cc 4802 |H | Short_Literal 0x2
03cd 0099 | | Action Reference_Dynamic
03ce 4ffc |O | Short_Literal -0x4
03cf 4802 |H | Short_Literal 0x2
03d0 0099 | | Action Reference_Dynamic
03d1 e015 | | Load 0x0,0x15
03d2 e016 | | Load 0x0,0x16
03d3 480c |H | Short_Literal 0xc
03d4 0007 | | Action Break_Optional
03d5 BODY_03b8:
03d5 e005 | | Load 0x0,0x5
03d6 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
03d7 e00f | | Load 0x0,0xf
03d8 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03d9 4800 |H | Short_Literal 0x0
03da e5fe | | Load 0x2,-0x2
03db e5ff | | Load 0x2,-0x1
03dc 4807 |H | Short_Literal 0x7
03dd 4802 |H | Short_Literal 0x2
03de 0099 | | Action Reference_Dynamic
03df 4808 |H | Short_Literal 0x8
03e0 4802 |H | Short_Literal 0x2
03e1 0099 | | Action Reference_Dynamic
03e2 4809 |H | Short_Literal 0x9
03e3 4802 |H | Short_Literal 0x2
03e4 0099 | | Action Reference_Dynamic
03e5 480a |H | Short_Literal 0xa
03e6 4802 |H | Short_Literal 0x2
03e7 0099 | | Action Reference_Dynamic
03e8 e005 | | Load 0x0,0x5
03e9 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03ea e404 | | Load 0x2,0x4
03eb 0c01 | | Execute_Immediate Greater_Equal,0x1
03ec 6804 |h | Jump_Zero 0x3f1
03ed 4801 |H | Short_Literal 0x1
03ee e017 | | Load 0x0,0x17
03ef 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
03f0 780d |x | Jump 0x3fe
03f1 e5fd | | Load 0x2,-0x3
03f2 7002 |p | Jump_Nonzero 0x3f5
03f3 e5fc | | Load 0x2,-0x4
03f4 7801 |x | Jump 0x3f6
03f5 4801 |H | Short_Literal 0x1
03f6 7007 |p | Jump_Nonzero 0x3fe
03f7 e004 | | Load 0x0,0x4
03f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
03f9 4803 |H | Short_Literal 0x3
03fa 0092 0e5a | Z| Action Push_String_Extended,0xe5a ; "All gateway objects are up to date"
03fc e009 | | Load 0x0,0x9
03fd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03fe e402 | | Load 0x2,0x2
03ff 0c01 | | Execute_Immediate Greater_Equal,0x1
0400 680f |h | Jump_Zero 0x410
0401 e004 | | Load 0x0,0x4
0402 180e | | Execute Package,Field_Execute,Field_Number 0xe
0403 4806 |H | Short_Literal 0x6
0404 0092 0e5b | [| Action Push_String_Extended,0xe5b ; "s"
0406 0092 0e5c | \| Action Push_String_Extended,0xe5c ; "disconnected gateway"
0408 e402 | | Load 0x2,0x2
0409 e005 | | Load 0x0,0x5
040a 181e | | Execute Package,Field_Execute,Field_Number 0x1e
040b 0092 0e5d | ]| Action Push_String_Extended,0xe5d ; " not checked for changes on desktop"
040d 01cc | | Execute Vector,Catenate
040e e009 | | Load 0x0,0x9
040f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0410 e403 | | Load 0x2,0x3
0411 0c01 | | Execute_Immediate Greater_Equal,0x1
0412 680f |h | Jump_Zero 0x422
0413 e004 | | Load 0x0,0x4
0414 180e | | Execute Package,Field_Execute,Field_Number 0xe
0415 4806 |H | Short_Literal 0x6
0416 0092 0e5b | [| Action Push_String_Extended,0xe5b ; "s"
0418 0092 0e5e | ^| Action Push_String_Extended,0xe5e ; "inaccessible gateway"
041a e403 | | Load 0x2,0x3
041b e005 | | Load 0x0,0x5
041c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
041d 0092 0e5d | ]| Action Push_String_Extended,0xe5d ; " not checked for changes on desktop"
041f 01cc | | Execute Vector,Catenate
0420 e009 | | Load 0x0,0x9
0421 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0422 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0423 0000 0000 | | .BLANK 0000[0x5]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 043d | = | .CONST 0x043d ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0008 | | .CONST 0x0008 ; Number of locals
042b INIT_0428:
042b 029f 0c1b | | Declare_Subprogram INIT_0c18,For_Call
042d e005 | | Load 0x0,0x5
042e 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
042f 00c6 | | Action Check_Subprogram_Elaborated
0430 4802 |H | Short_Literal 0x2
0431 4802 |H | Short_Literal 0x2
0432 0099 | | Action Reference_Dynamic
0433 4ffd |O | Short_Literal -0x3
0434 4802 |H | Short_Literal 0x2
0435 0099 | | Action Reference_Dynamic
0436 4ffc |O | Short_Literal -0x4
0437 4802 |H | Short_Literal 0x2
0438 0099 | | Action Reference_Dynamic
0439 e018 | | Load 0x0,0x18
043a e019 | | Load 0x0,0x19
043b 4808 |H | Short_Literal 0x8
043c 0007 | | Action Break_Optional
043d BODY_0428:
043d e005 | | Load 0x0,0x5
043e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
043f e00f | | Load 0x0,0xf
0440 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0441 4800 |H | Short_Literal 0x0
0442 4800 |H | Short_Literal 0x0
0443 e5ff | | Load 0x2,-0x1
0444 4803 |H | Short_Literal 0x3
0445 4802 |H | Short_Literal 0x2
0446 0099 | | Action Reference_Dynamic
0447 4804 |H | Short_Literal 0x4
0448 4802 |H | Short_Literal 0x2
0449 0099 | | Action Reference_Dynamic
044a 4805 |H | Short_Literal 0x5
044b 4802 |H | Short_Literal 0x2
044c 0099 | | Action Reference_Dynamic
044d 4806 |H | Short_Literal 0x6
044e 4802 |H | Short_Literal 0x2
044f 0099 | | Action Reference_Dynamic
0450 e005 | | Load 0x0,0x5
0451 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0452 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0453 0000 0000 | | .BLANK 0000[0x5]
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 046d | m | .CONST 0x046d ; Address of begin
0459 0004 | | .CONST 0x0004 ; Address of exception handler
045a 0008 | | .CONST 0x0008 ; Number of locals
045b INIT_0458:
045b 029f 0c8b | | Declare_Subprogram INIT_0c88,For_Call
045d e005 | | Load 0x0,0x5
045e 1921 | ! | Execute Package,Field_Reference,Field_Number 0x21
045f 00c6 | | Action Check_Subprogram_Elaborated
0460 4802 |H | Short_Literal 0x2
0461 4802 |H | Short_Literal 0x2
0462 0099 | | Action Reference_Dynamic
0463 4ffd |O | Short_Literal -0x3
0464 4802 |H | Short_Literal 0x2
0465 0099 | | Action Reference_Dynamic
0466 4ffc |O | Short_Literal -0x4
0467 4802 |H | Short_Literal 0x2
0468 0099 | | Action Reference_Dynamic
0469 e01a | | Load 0x0,0x1a
046a e01b | | Load 0x0,0x1b
046b 4808 |H | Short_Literal 0x8
046c 0007 | | Action Break_Optional
046d BODY_0458:
046d e005 | | Load 0x0,0x5
046e 1b14 | | Execute Package,Field_Read,Field_Number 0x14
046f e00f | | Load 0x0,0xf
0470 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0471 4800 |H | Short_Literal 0x0
0472 4800 |H | Short_Literal 0x0
0473 e5ff | | Load 0x2,-0x1
0474 4803 |H | Short_Literal 0x3
0475 4802 |H | Short_Literal 0x2
0476 0099 | | Action Reference_Dynamic
0477 4804 |H | Short_Literal 0x4
0478 4802 |H | Short_Literal 0x2
0479 0099 | | Action Reference_Dynamic
047a 4805 |H | Short_Literal 0x5
047b 4802 |H | Short_Literal 0x2
047c 0099 | | Action Reference_Dynamic
047d 4806 |H | Short_Literal 0x6
047e 4802 |H | Short_Literal 0x2
047f 0099 | | Action Reference_Dynamic
0480 e005 | | Load 0x0,0x5
0481 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0482 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0483 0000 0000 | | .BLANK 0000[0x5]
0488 ; --------------------------------------------------------------------------------------
0488 ; SUBPROGRAM
0488 ; --------------------------------------------------------------------------------------
0488 048b | | .CONST 0x048b ; Address of begin
0489 0004 | | .CONST 0x0004 ; Address of exception handler
048a 0001 | | .CONST 0x0001 ; Number of locals
048b BODY_0488:
048b INIT_0488:
048b e5fc | | Load 0x2,-0x4
048c e5fd | | Load 0x2,-0x3
048d e5fe | | Load 0x2,-0x2
048e e00f | | Load 0x0,0xf
048f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0490 0092 0e52 | R| Action Push_String_Extended,0xe52 ; "True"
0492 e00a | | Load 0x0,0xa
0493 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0494 e5ff | | Load 0x2,-0x1
0495 8234 | 4 | Call 0x1,0x34
0496 c5fe | | Store 0x2,-0x2
0497 c5fd | | Store 0x2,-0x3
0498 c5fc | | Store 0x2,-0x4
0499 4502 |E | Exit_Suprogram New_Top_Offset 0x2
049a 0000 0000 | | .BLANK 0000[0x6]
04a0 ; --------------------------------------------------------------------------------------
04a0 ; SUBPROGRAM
04a0 ; --------------------------------------------------------------------------------------
04a0 04a3 | | .CONST 0x04a3 ; Address of begin
04a1 0004 | | .CONST 0x0004 ; Address of exception handler
04a2 0001 | | .CONST 0x0001 ; Number of locals
04a3 BODY_04a0:
04a3 INIT_04a0:
04a3 e5fc | | Load 0x2,-0x4
04a4 e5fd | | Load 0x2,-0x3
04a5 e5fe | | Load 0x2,-0x2
04a6 e00f | | Load 0x0,0xf
04a7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04a8 0092 0e53 | S| Action Push_String_Extended,0xe53 ; "False"
04aa e00a | | Load 0x0,0xa
04ab 1b18 | | Execute Package,Field_Read,Field_Number 0x18
04ac e5ff | | Load 0x2,-0x1
04ad 8234 | 4 | Call 0x1,0x34
04ae c5fe | | Store 0x2,-0x2
04af c5fd | | Store 0x2,-0x3
04b0 c5fc | | Store 0x2,-0x4
04b1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
04b2 0000 0000 | | .BLANK 0000[0x6]
04b8 ; --------------------------------------------------------------------------------------
04b8 ; SUBPROGRAM
04b8 ; --------------------------------------------------------------------------------------
04b8 04c6 | | .CONST 0x04c6 ; Address of begin
04b9 04d9 | | .CONST 0x04d9 ; Address of exception handler
04ba 0004 | | .CONST 0x0004 ; Number of locals
04bb INIT_04b8:
04bb e008 | | Load 0x0,0x8
04bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04bd 02c7 | | Declare_Variable Any
04be 00d8 | | Load_Top At_Offset_0
04bf 1c00 | | Execute_Immediate Run_Utility,0x0
04c0 e22b | + | Load 0x1,0x2b
04c1 02c7 | | Declare_Variable Any
04c2 00d8 | | Load_Top At_Offset_0
04c3 1c00 | | Execute_Immediate Run_Utility,0x0
04c4 029f 0cfb | | Declare_Subprogram INIT_0cf8,For_Call
04c6 BODY_04b8:
04c6 e402 | | Load 0x2,0x2
04c7 e403 | | Load 0x2,0x3
04c8 e00f | | Load 0x0,0xf
04c9 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04ca 4800 |H | Short_Literal 0x0
04cb e5ff | | Load 0x2,-0x1
04cc e001 | | Load 0x0,0x1
04cd 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
04ce c403 | | Store 0x2,0x3
04cf c402 | | Store 0x2,0x2
04d0 4801 |H | Short_Literal 0x1
04d1 e402 | | Load 0x2,0x2
04d2 e008 | | Load 0x0,0x8
04d3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04d4 6802 |h | Jump_Zero 0x4d7
04d5 00ea | | Load_Encached Null_String_Cache
04d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04d7 8404 | | Call 0x2,0x4
04d8 0831 | 1 | Execute_Immediate Raise,0x31
04d9 TRAP_04b8:
04d9 0007 | | Action Break_Optional
04da e403 | | Load 0x2,0x3
04db e001 | | Load 0x0,0x1
04dc 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
04dd c403 | | Store 0x2,0x3
04de 00ea | | Load_Encached Null_String_Cache
04df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04ee | | .CONST 0x04ee ; Address of begin
04e1 0501 | | .CONST 0x0501 ; Address of exception handler
04e2 0004 | | .CONST 0x0004 ; Number of locals
04e3 INIT_04e0:
04e3 e008 | | Load 0x0,0x8
04e4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04e5 02c7 | | Declare_Variable Any
04e6 00d8 | | Load_Top At_Offset_0
04e7 1c00 | | Execute_Immediate Run_Utility,0x0
04e8 e22b | + | Load 0x1,0x2b
04e9 02c7 | | Declare_Variable Any
04ea 00d8 | | Load_Top At_Offset_0
04eb 1c00 | | Execute_Immediate Run_Utility,0x0
04ec 029f 0d1b | | Declare_Subprogram INIT_0d18,For_Call
04ee BODY_04e0:
04ee e402 | | Load 0x2,0x2
04ef e403 | | Load 0x2,0x3
04f0 e00f | | Load 0x0,0xf
04f1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
04f2 4800 |H | Short_Literal 0x0
04f3 e5ff | | Load 0x2,-0x1
04f4 e001 | | Load 0x0,0x1
04f5 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
04f6 c403 | | Store 0x2,0x3
04f7 c402 | | Store 0x2,0x2
04f8 4801 |H | Short_Literal 0x1
04f9 e402 | | Load 0x2,0x2
04fa e008 | | Load 0x0,0x8
04fb 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04fc 6802 |h | Jump_Zero 0x4ff
04fd 4816 |H | Short_Literal 0x16
04fe 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
04ff 8404 | | Call 0x2,0x4
0500 0831 | 1 | Execute_Immediate Raise,0x31
0501 TRAP_04e0:
0501 0007 | | Action Break_Optional
0502 e403 | | Load 0x2,0x3
0503 e001 | | Load 0x0,0x1
0504 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0505 c403 | | Store 0x2,0x3
0506 4816 |H | Short_Literal 0x16
0507 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 0516 | | .CONST 0x0516 ; Address of begin
0509 0004 | | .CONST 0x0004 ; Address of exception handler
050a 0004 | | .CONST 0x0004 ; Number of locals
050b INIT_0508:
050b e008 | | Load 0x0,0x8
050c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
050d 02c7 | | Declare_Variable Any
050e 00d8 | | Load_Top At_Offset_0
050f 1c00 | | Execute_Immediate Run_Utility,0x0
0510 e22b | + | Load 0x1,0x2b
0511 02c7 | | Declare_Variable Any
0512 00d8 | | Load_Top At_Offset_0
0513 1c00 | | Execute_Immediate Run_Utility,0x0
0514 029f 0d43 | C| Declare_Subprogram INIT_0d40,For_Call
0516 BODY_0508:
0516 e402 | | Load 0x2,0x2
0517 e403 | | Load 0x2,0x3
0518 e00f | | Load 0x0,0xf
0519 1b0e | | Execute Package,Field_Read,Field_Number 0xe
051a 4800 |H | Short_Literal 0x0
051b e5ff | | Load 0x2,-0x1
051c e001 | | Load 0x0,0x1
051d 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
051e c403 | | Store 0x2,0x3
051f c402 | | Store 0x2,0x2
0520 4801 |H | Short_Literal 0x1
0521 e402 | | Load 0x2,0x2
0522 e008 | | Load 0x0,0x8
0523 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0524 6806 |h | Jump_Zero 0x52b
0525 e403 | | Load 0x2,0x3
0526 e001 | | Load 0x0,0x1
0527 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0528 c403 | | Store 0x2,0x3
0529 4800 |H | Short_Literal 0x0
052a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
052b 8404 | | Call 0x2,0x4
052c 0831 | 1 | Execute_Immediate Raise,0x31
052d 0000 0000 | | .XXX[0x3]
052f 0000 | |
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0533 | 3 | .CONST 0x0533 ; Address of begin
0531 0004 | | .CONST 0x0004 ; Address of exception handler
0532 0001 | | .CONST 0x0001 ; Number of locals
0533 BODY_0530:
0533 INIT_0530:
0533 e5ff | | Load 0x2,-0x1
0534 821d | | Call 0x1,0x1d
0535 e00a | | Load 0x0,0xa
0536 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
0537 0260 | ` | Execute Discrete,In_Type
0538 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0539 0000 0000 | | .BLANK 0000[0x7]
0540 ; --------------------------------------------------------------------------------------
0540 ; SUBPROGRAM
0540 ; --------------------------------------------------------------------------------------
0540 0543 | C | .CONST 0x0543 ; Address of begin
0541 0004 | | .CONST 0x0004 ; Address of exception handler
0542 0001 | | .CONST 0x0001 ; Number of locals
0543 BODY_0540:
0543 INIT_0540:
0543 e5ff | | Load 0x2,-0x1
0544 821d | | Call 0x1,0x1d
0545 e00a | | Load 0x0,0xa
0546 1b20 | | Execute Package,Field_Read,Field_Number 0x20
0547 0260 | ` | Execute Discrete,In_Type
0548 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0549 0000 0000 | | .BLANK 0000[0x7]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0553 | S | .CONST 0x0553 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0001 | | .CONST 0x0001 ; Number of locals
0553 BODY_0550:
0553 INIT_0550:
0553 e5ff | | Load 0x2,-0x1
0554 821d | | Call 0x1,0x1d
0555 e00a | | Load 0x0,0xa
0556 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0557 0260 | ` | Execute Discrete,In_Type
0558 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0559 0000 0000 | | .BLANK 0000[0x7]
0560 ; --------------------------------------------------------------------------------------
0560 ; SUBPROGRAM
0560 ; --------------------------------------------------------------------------------------
0560 056e | n | .CONST 0x056e ; Address of begin
0561 0581 | | .CONST 0x0581 ; Address of exception handler
0562 0004 | | .CONST 0x0004 ; Number of locals
0563 INIT_0560:
0563 e008 | | Load 0x0,0x8
0564 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0565 02c7 | | Declare_Variable Any
0566 00d8 | | Load_Top At_Offset_0
0567 1c00 | | Execute_Immediate Run_Utility,0x0
0568 e22b | + | Load 0x1,0x2b
0569 02c7 | | Declare_Variable Any
056a 00d8 | | Load_Top At_Offset_0
056b 1c00 | | Execute_Immediate Run_Utility,0x0
056c 029f 0d5b | [| Declare_Subprogram INIT_0d58,For_Call
056e BODY_0560:
056e e402 | | Load 0x2,0x2
056f e403 | | Load 0x2,0x3
0570 e00f | | Load 0x0,0xf
0571 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0572 4800 |H | Short_Literal 0x0
0573 e5ff | | Load 0x2,-0x1
0574 e001 | | Load 0x0,0x1
0575 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0576 c403 | | Store 0x2,0x3
0577 c402 | | Store 0x2,0x2
0578 4801 |H | Short_Literal 0x1
0579 e402 | | Load 0x2,0x2
057a e008 | | Load 0x0,0x8
057b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
057c 6802 |h | Jump_Zero 0x57f
057d 00ea | | Load_Encached Null_String_Cache
057e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
057f 8404 | | Call 0x2,0x4
0580 0831 | 1 | Execute_Immediate Raise,0x31
0581 TRAP_0560:
0581 0007 | | Action Break_Optional
0582 e403 | | Load 0x2,0x3
0583 e001 | | Load 0x0,0x1
0584 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0585 c403 | | Store 0x2,0x3
0586 00ea | | Load_Encached Null_String_Cache
0587 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0588 ; --------------------------------------------------------------------------------------
0588 ; SUBPROGRAM
0588 ; --------------------------------------------------------------------------------------
0588 058b | | .CONST 0x058b ; Address of begin
0589 0004 | | .CONST 0x0004 ; Address of exception handler
058a 0001 | | .CONST 0x0001 ; Number of locals
058b BODY_0588:
058b INIT_0588:
058b 4801 |H | Short_Literal 0x1
058c e5ff | | Load 0x2,-0x1
058d e001 | | Load 0x0,0x1
058e 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
058f e00a | | Load 0x0,0xa
0590 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0591 011c | | Execute Any,Convert_Unchecked
0592 1c01 | | Execute_Immediate Run_Utility,0x1
0593 e003 | | Load 0x0,0x3
0594 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0595 0092 0e5f | _| Action Push_String_Extended,0xe5f ; " icon \x22"
0597 01cc | | Execute Vector,Catenate
0598 4801 |H | Short_Literal 0x1
0599 e5ff | | Load 0x2,-0x1
059a e001 | | Load 0x0,0x1
059b 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
059c 01cc | | Execute Vector,Catenate
059d 0092 0e60 | `| Action Push_String_Extended,0xe60 ; "\x22 on host "
059f 01cc | | Execute Vector,Catenate
05a0 4801 |H | Short_Literal 0x1
05a1 e5ff | | Load 0x2,-0x1
05a2 e001 | | Load 0x0,0x1
05a3 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
05a4 01cc | | Execute Vector,Catenate
05a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05a6 0000 0000 | | .XXX[0x2]
05a8 ; --------------------------------------------------------------------------------------
05a8 ; SUBPROGRAM
05a8 ; --------------------------------------------------------------------------------------
05a8 05ab | | .CONST 0x05ab ; Address of begin
05a9 05b3 | | .CONST 0x05b3 ; Address of exception handler
05aa 0001 | | .CONST 0x0001 ; Number of locals
05ab BODY_05a8:
05ab INIT_05a8:
05ab 4801 |H | Short_Literal 0x1
05ac e5ff | | Load 0x2,-0x1
05ad e001 | | Load 0x0,0x1
05ae 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
05af e00a | | Load 0x0,0xa
05b0 1b1f | | Execute Package,Field_Read,Field_Number 0x1f
05b1 0260 | ` | Execute Discrete,In_Type
05b2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05b3 TRAP_05a8:
05b3 0007 | | Action Break_Optional
05b4 4800 |H | Short_Literal 0x0
05b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05b6 0000 0000 | | .XXX[0x2]
05b8 ; --------------------------------------------------------------------------------------
05b8 ; SUBPROGRAM
05b8 ; --------------------------------------------------------------------------------------
05b8 05ce | | .CONST 0x05ce ; Address of begin
05b9 0608 | | .CONST 0x0608 ; Address of exception handler
05ba 0006 | | .CONST 0x0006 ; Number of locals
05bb INIT_05b8:
05bb 4801 |H | Short_Literal 0x1
05bc 606b |`k | Indirect_Literal Discrete,0x628,{0x00000000, 0x00000400}
05bd e01c | | Load 0x0,0x1c
05be 1b13 | | Execute Package,Field_Read,Field_Number 0x13
05bf 035b | [ | Declare_Type Array,Constrained
05c0 0337 | 7 | Declare_Variable Array
05c1 0092 0e61 | a| Action Push_String_Extended,0xe61 ; "\x0a<para>\x0aInitialized by the Rational Publishing Interface.\x0a"
05c3 00e3 | | Load_Encached Natural_Cache
05c4 e01c | | Load 0x0,0x1c
05c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05c6 02c7 | | Declare_Variable Any
05c7 00d8 | | Load_Top At_Offset_0
05c8 1c00 | | Execute_Immediate Run_Utility,0x0
05c9 e01c | | Load 0x0,0x1c
05ca 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05cb 02c7 | | Declare_Variable Any
05cc 00d8 | | Load_Top At_Offset_0
05cd 1c00 | | Execute_Immediate Run_Utility,0x0
05ce BODY_05b8:
05ce e405 | | Load 0x2,0x5
05cf e5fe | | Load 0x2,-0x2
05d0 e00e | | Load 0x0,0xe
05d1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
05d2 00ea | | Load_Encached Null_String_Cache
05d3 e22c | , | Load 0x1,0x2c
05d4 4800 |H | Short_Literal 0x0
05d5 e01c | | Load 0x0,0x1c
05d6 1814 | | Execute Package,Field_Execute,Field_Number 0x14
05d7 c405 | | Store 0x2,0x5
05d8 00d8 | | Load_Top At_Offset_0
05d9 e5fe | | Load 0x2,-0x2
05da e405 | | Load 0x2,0x5
05db e01c | | Load 0x0,0x1c
05dc 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
05dd e00e | | Load 0x0,0xe
05de 181e | | Execute Package,Field_Execute,Field_Number 0x1e
05df 00ea | | Load_Encached Null_String_Cache
05e0 e5ff | | Load 0x2,-0x1
05e1 4801 |H | Short_Literal 0x1
05e2 e01c | | Load 0x0,0x1c
05e3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
05e4 c406 | | Store 0x2,0x6
05e5 00cf | | Action Mark_Auxiliary
05e6 780f |x | Jump 0x5f6
05e7 00e3 | | Load_Encached Natural_Cache
05e8 e402 | | Load 0x2,0x2
05e9 e405 | | Load 0x2,0x5
05ea e01c | | Load 0x0,0x1c
05eb 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
05ec 00d1 | | Pop_Control Pop_Count_1
05ed c404 | | Store 0x2,0x4
05ee 4801 |H | Short_Literal 0x1
05ef e404 | | Load 0x2,0x4
05f0 e402 | | Load 0x2,0x2
05f1 01cf | | Execute Vector,Slice_Read
05f2 e406 | | Load 0x2,0x6
05f3 e01c | | Load 0x0,0x1c
05f4 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
05f5 00c9 | | Action Pop_Auxiliary_Loop
05f6 e405 | | Load 0x2,0x5
05f7 e01c | | Load 0x0,0x1c
05f8 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
05f9 6fed |o | Jump_Zero 0x5e7
05fa 00ce | | Action Pop_Auxiliary
05fb e403 | | Load 0x2,0x3
05fc e406 | | Load 0x2,0x6
05fd e01c | | Load 0x0,0x1c
05fe 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
05ff e405 | | Load 0x2,0x5
0600 e01c | | Load 0x0,0x1c
0601 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0602 c405 | | Store 0x2,0x5
0603 00d8 | | Load_Top At_Offset_0
0604 e01c | | Load 0x0,0x1c
0605 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0606 c406 | | Store 0x2,0x6
0607 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0608 TRAP_05b8:
0608 0007 | | Action Break_Optional
0609 e5fd | | Load 0x2,-0x3
060a 4802 |H | Short_Literal 0x2
060b 0092 0e62 | b| Action Push_String_Extended,0xe62 ; "Unable to copy from !MACHINE.GATEWAY_CLASSES.TPS_OBJECT.RPI_DOCUMENT_TEMPLATE to "
060d e5ff | | Load 0x2,-0x1
060e 01cc | | Execute Vector,Catenate
060f 0092 0e63 | c| Action Push_String_Extended,0xe63 ; "; check the existence and ACLs of the source file"
0611 01cc | | Execute Vector,Catenate
0612 0092 0e64 | d| Action Push_String_Extended,0xe64 ; "Copy failed"
0614 e008 | | Load 0x0,0x8
0615 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0616 c5fd | | Store 0x2,-0x3
0617 e405 | | Load 0x2,0x5
0618 e01c | | Load 0x0,0x1c
0619 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
061a 6804 |h | Jump_Zero 0x61f
061b e405 | | Load 0x2,0x5
061c e01c | | Load 0x0,0x1c
061d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
061e c405 | | Store 0x2,0x5
061f e406 | | Load 0x2,0x6
0620 e01c | | Load 0x0,0x1c
0621 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0622 6804 |h | Jump_Zero 0x627
0623 e406 | | Load 0x2,0x6
0624 e01c | | Load 0x0,0x1c
0625 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0626 c406 | | Store 0x2,0x6
0627 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0628 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
062c 0000 0000 | | .BLANK 0000[0x4]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 0641 | A | .CONST 0x0641 ; Address of begin
0631 0681 | | .CONST 0x0681 ; Address of exception handler
0632 0006 | | .CONST 0x0006 ; Number of locals
0633 INIT_0630:
0633 e22b | + | Load 0x1,0x2b
0634 02c7 | | Declare_Variable Any
0635 00d8 | | Load_Top At_Offset_0
0636 1c00 | | Execute_Immediate Run_Utility,0x0
0637 e005 | | Load 0x0,0x5
0638 1925 | % | Execute Package,Field_Reference,Field_Number 0x25
0639 00c6 | | Action Check_Subprogram_Elaborated
063a 4ffb |O | Short_Literal -0x5
063b 4802 |H | Short_Literal 0x2
063c 0099 | | Action Reference_Dynamic
063d e01d | | Load 0x0,0x1d
063e e01e | | Load 0x0,0x1e
063f 4806 |H | Short_Literal 0x6
0640 0007 | | Action Break_Optional
0641 BODY_0630:
0641 e5f9 | | Load 0x2,-0x7
0642 e402 | | Load 0x2,0x2
0643 e5fc | | Load 0x2,-0x4
0644 4801 |H | Short_Literal 0x1
0645 e5ff | | Load 0x2,-0x1
0646 e001 | | Load 0x0,0x1
0647 183b | ; | Execute Package,Field_Execute,Field_Number 0x3b
0648 c402 | | Store 0x2,0x2
0649 c5f9 | | Store 0x2,-0x7
064a 4801 |H | Short_Literal 0x1
064b e5f9 | | Load 0x2,-0x7
064c e008 | | Load 0x0,0x8
064d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
064e 6822 |h" | Jump_Zero 0x671
064f e004 | | Load 0x0,0x4
0650 180e | | Execute Package,Field_Execute,Field_Number 0xe
0651 e5f9 | | Load 0x2,-0x7
0652 e009 | | Load 0x0,0x9
0653 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0654 e004 | | Load 0x0,0x4
0655 180e | | Execute Package,Field_Execute,Field_Number 0xe
0656 4807 |H | Short_Literal 0x7
0657 0092 0e65 | e| Action Push_String_Extended,0xe65 ; "Cannot set property "
0659 e5fe | | Load 0x2,-0x2
065a 01cc | | Execute Vector,Catenate
065b 0092 0e66 | f| Action Push_String_Extended,0xe66 ; " to value "
065d 01cc | | Execute Vector,Catenate
065e e5fd | | Load 0x2,-0x3
065f 01cc | | Execute Vector,Catenate
0660 0092 0e67 | g| Action Push_String_Extended,0xe67 ; " for gateway "
0662 01cc | | Execute Vector,Catenate
0663 e5ff | | Load 0x2,-0x1
0664 01cc | | Execute Vector,Catenate
0665 0092 0e68 | h| Action Push_String_Extended,0xe68 ; " : "
0667 01cc | | Execute Vector,Catenate
0668 e5f9 | | Load 0x2,-0x7
0669 e008 | | Load 0x0,0x8
066a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
066b 01cc | | Execute Vector,Catenate
066c e009 | | Load 0x0,0x9
066d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
066e 4801 |H | Short_Literal 0x1
066f a5fb | | Store_Unchecked 0x2,-0x5
0670 780b |x | Jump 0x67c
0671 e402 | | Load 0x2,0x2
0672 e5fd | | Load 0x2,-0x3
0673 e5fe | | Load 0x2,-0x2
0674 4803 |H | Short_Literal 0x3
0675 4802 |H | Short_Literal 0x2
0676 0099 | | Action Reference_Dynamic
0677 4804 |H | Short_Literal 0x4
0678 4802 |H | Short_Literal 0x2
0679 0099 | | Action Reference_Dynamic
067a e005 | | Load 0x0,0x5
067b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
067c e402 | | Load 0x2,0x2
067d e001 | | Load 0x0,0x1
067e 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
067f c402 | | Store 0x2,0x2
0680 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0681 TRAP_0630:
0681 0007 | | Action Break_Optional
0682 e402 | | Load 0x2,0x2
0683 e001 | | Load 0x0,0x1
0684 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0685 c402 | | Store 0x2,0x2
0686 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0687 0000 | | .XXX[0x1]
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 068e | | .CONST 0x068e ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0002 | | .CONST 0x0002 ; Number of locals
068b INIT_0688:
068b e5ff | | Load 0x2,-0x1
068c e00b | | Load 0x0,0xb
068d 1817 | | Execute Package,Field_Execute,Field_Number 0x17
068e BODY_0688:
068e e5fd | | Load 0x2,-0x3
068f 7002 |p | Jump_Nonzero 0x692
0690 00ea | | Load_Encached Null_String_Cache
0691 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0692 4801 |H | Short_Literal 0x1
0693 4820 |H | Short_Literal 0x20
0694 e5fe | | Load 0x2,-0x2
0695 e003 | | Load 0x0,0x3
0696 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0697 0092 0e4c | L| Action Push_String_Extended,0xe4c ; "<AUTO GENERATE>"
0699 822f | / | Call 0x1,0x2f
069a 680a |h | Jump_Zero 0x6a5
069b 00d8 | | Load_Top At_Offset_0
069c 821e | | Call 0x1,0x1e
069d 6802 |h | Jump_Zero 0x6a0
069e 00d8 | | Load_Top At_Offset_0
069f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
06a0 00d8 | | Load_Top At_Offset_0
06a1 0092 0e69 | i| Action Push_String_Extended,0xe69 ; "_Tps"
06a3 01cc | | Execute Vector,Catenate
06a4 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
06a5 e5fe | | Load 0x2,-0x2
06a6 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
06a7 0000 | | .XXX[0x1]
06a8 ; --------------------------------------------------------------------------------------
06a8 ; SUBPROGRAM
06a8 ; --------------------------------------------------------------------------------------
06a8 06b0 | | .CONST 0x06b0 ; Address of begin
06a9 0004 | | .CONST 0x0004 ; Address of exception handler
06aa 0002 | | .CONST 0x0002 ; Number of locals
06ab INIT_06a8:
06ab e008 | | Load 0x0,0x8
06ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06ad 02c7 | | Declare_Variable Any
06ae 00d8 | | Load_Top At_Offset_0
06af 1c00 | | Execute_Immediate Run_Utility,0x0
06b0 BODY_06a8:
06b0 00d8 | | Load_Top At_Offset_0
06b1 e008 | | Load 0x0,0x8
06b2 1810 | | Execute Package,Field_Execute,Field_Number 0x10
06b3 c402 | | Store 0x2,0x2
06b4 4820 |H | Short_Literal 0x20
06b5 e5ff | | Load 0x2,-0x1
06b6 e003 | | Load 0x0,0x3
06b7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
06b8 01db | | Execute Vector,Length
06b9 6810 |h | Jump_Zero 0x6ca
06ba e5ff | | Load 0x2,-0x1
06bb 821e | | Call 0x1,0x1e
06bc 700d |p | Jump_Nonzero 0x6ca
06bd 00d8 | | Load_Top At_Offset_0
06be 4803 |H | Short_Literal 0x3
06bf 0092 0e6a | j| Action Push_String_Extended,0xe6a ; "The parent gateway \x22"
06c1 e5ff | | Load 0x2,-0x1
06c2 01cc | | Execute Vector,Catenate
06c3 0092 0e6b | k| Action Push_String_Extended,0xe6b ; "\x22 does not exist, or is not a container gateway."
06c5 01cc | | Execute Vector,Catenate
06c6 00ea | | Load_Encached Null_String_Cache
06c7 e008 | | Load 0x0,0x8
06c8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06c9 c402 | | Store 0x2,0x2
06ca 00d8 | | Load_Top At_Offset_0
06cb 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
06cc 0000 0000 | | .BLANK 0000[0x4]
06d0 ; --------------------------------------------------------------------------------------
06d0 ; SUBPROGRAM
06d0 ; --------------------------------------------------------------------------------------
06d0 06d8 | | .CONST 0x06d8 ; Address of begin
06d1 0004 | | .CONST 0x0004 ; Address of exception handler
06d2 0002 | | .CONST 0x0002 ; Number of locals
06d3 INIT_06d0:
06d3 e5ff | | Load 0x2,-0x1
06d4 e00b | | Load 0x0,0xb
06d5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06d6 e003 | | Load 0x0,0x3
06d7 1815 | | Execute Package,Field_Execute,Field_Number 0x15
06d8 BODY_06d0:
06d8 e5fe | | Load 0x2,-0x2
06d9 7002 |p | Jump_Nonzero 0x6dc
06da 00ea | | Load_Encached Null_String_Cache
06db 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06dc 00d8 | | Load_Top At_Offset_0
06dd 01db | | Execute Vector,Length
06de 0d14 | | Execute_Immediate Less,0x14
06df 6802 |h | Jump_Zero 0x6e2
06e0 00d8 | | Load_Top At_Offset_0
06e1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06e2 00d8 | | Load_Top At_Offset_0
06e3 01dd | | Execute Vector,First
06e4 e402 | | Load 0x2,0x2
06e5 01dd | | Execute Vector,First
06e6 0a12 | | Execute_Immediate Plus,0x12
06e7 00d8 | | Load_Top At_Offset_0
06e8 00e2 | | Load_Encached Integer_Cache
06e9 0260 | ` | Execute Discrete,In_Type
06ea 7001 |p | Jump_Nonzero 0x6ec
06eb 0801 | | Execute_Immediate Raise,0x1
06ec e402 | | Load 0x2,0x2
06ed 01cf | | Execute Vector,Slice_Read
06ee 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
06ef 0000 | | .XXX[0x1]
06f0 ; --------------------------------------------------------------------------------------
06f0 ; SUBPROGRAM
06f0 ; --------------------------------------------------------------------------------------
06f0 06fa | | .CONST 0x06fa ; Address of begin
06f1 0004 | | .CONST 0x0004 ; Address of exception handler
06f2 0003 | | .CONST 0x0003 ; Number of locals
06f3 INIT_06f0:
06f3 4801 |H | Short_Literal 0x1
06f4 48ff |H | Short_Literal 0xff
06f5 00e9 | | Load_Encached String_Cache
06f6 035b | [ | Declare_Type Array,Constrained
06f7 0337 | 7 | Declare_Variable Array
06f8 00e3 | | Load_Encached Natural_Cache
06f9 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
06fa BODY_06f0:
06fa 00cf | | Action Mark_Auxiliary
06fb e5ff | | Load 0x2,-0x1
06fc 01dc | | Execute Vector,Last
06fd e5ff | | Load 0x2,-0x1
06fe 01dd | | Execute Vector,First
06ff 0263 | c | Execute Discrete,Above_Bound
0700 7026 |p& | Jump_Nonzero 0x727
0701 00d8 | | Load_Top At_Offset_0
0702 e5ff | | Load 0x2,-0x1
0703 01d7 | | Execute Vector,Field_Read
0704 00d8 | | Load_Top At_Offset_0
0705 0d41 | A | Execute_Immediate Less,0x41
0706 7013 |p | Jump_Nonzero 0x71a
0707 00d8 | | Load_Top At_Offset_0
0708 0c5c | \ | Execute_Immediate Greater_Equal,0x5c
0709 700b |p | Jump_Nonzero 0x715
070a 00d1 | | Pop_Control Pop_Count_1
070b e403 | | Load 0x2,0x3
070c 0a01 | | Execute_Immediate Plus,0x1
070d c403 | | Store 0x2,0x3
070e 00d8 | | Load_Top At_Offset_0
070f e5ff | | Load 0x2,-0x1
0710 01d7 | | Execute Vector,Field_Read
0711 e403 | | Load 0x2,0x3
0712 e402 | | Load 0x2,0x2
0713 01d6 | | Execute Vector,Field_Write
0714 7810 |x | Jump 0x725
0715 0b5c | \ | Execute_Immediate Case_Compare,0x5c
0716 700d |p | Jump_Nonzero 0x724
0717 0f5e | ^ | Execute_Immediate Equal,0x5e
0718 700c |p | Jump_Nonzero 0x725
0719 7ff1 | | Jump 0x70b
071a 00d8 | | Load_Top At_Offset_0
071b 4823 |H# | Short_Literal 0x23
071c 4824 |H$ | Short_Literal 0x24
071d 0262 | b | Execute Discrete,In_Range
071e 7005 |p | Jump_Nonzero 0x724
071f 483f |H? | Short_Literal 0x3f
0720 4840 |H@ | Short_Literal 0x40
0721 0262 | b | Execute Discrete,In_Range
0722 7002 |p | Jump_Nonzero 0x725
0723 7fe7 | | Jump 0x70b
0724 00d1 | | Pop_Control Pop_Count_1
0725 00c8 | | Action Pop_Auxiliary_Range
0726 3fda |? | Loop_Increasing 0x701
0727 00ce | | Action Pop_Auxiliary
0728 4801 |H | Short_Literal 0x1
0729 e403 | | Load 0x2,0x3
072a e402 | | Load 0x2,0x2
072b 01cf | | Execute Vector,Slice_Read
072c 00e9 | | Load_Encached String_Cache
072d 01c6 | | Execute Vector,Convert_To_Formal
072e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
072f 0000 | | .XXX[0x1]
0730 ; --------------------------------------------------------------------------------------
0730 ; SUBPROGRAM
0730 ; --------------------------------------------------------------------------------------
0730 077c | | | .CONST 0x077c ; Address of begin
0731 0004 | | .CONST 0x0004 ; Address of exception handler
0732 000c | | .CONST 0x000c ; Number of locals
0733 INIT_0730:
0733 e00e | | Load 0x0,0xe
0734 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0735 02c7 | | Declare_Variable Any
0736 e5fe | | Load 0x2,-0x2
0737 e00b | | Load 0x0,0xb
0738 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0739 a402 | | Store_Unchecked 0x2,0x2
073a e00e | | Load 0x0,0xe
073b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
073c 02c7 | | Declare_Variable Any
073d e5fd | | Load 0x2,-0x3
073e e00b | | Load 0x0,0xb
073f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0740 a403 | | Store_Unchecked 0x2,0x3
0741 e00e | | Load 0x0,0xe
0742 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0743 02c7 | | Declare_Variable Any
0744 e5fe | | Load 0x2,-0x2
0745 e00b | | Load 0x0,0xb
0746 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0747 a404 | | Store_Unchecked 0x2,0x4
0748 00e1 | | Load_Encached Boolean_Cache
0749 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
074a 00e1 | | Load_Encached Boolean_Cache
074b 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
074c 00e1 | | Load_Encached Boolean_Cache
074d 0266 | f | Execute Discrete,Bounds
074e e00a | | Load 0x0,0xa
074f 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0750 02a0 | | Declare_Subprogram Null_Subprogram
0751 4801 |H | Short_Literal 0x1
0752 035d | ] | Declare_Type Array,Defined
0753 00d8 | | Load_Top At_Offset_0
0754 0337 | 7 | Declare_Variable Array
0755 00d8 | | Load_Top At_Offset_0
0756 0335 | 5 | Declare_Variable Array,Duplicate
0757 00cd | | Action Spare6_Action
0758 4809 |H | Short_Literal 0x9
0759 4801 |H | Short_Literal 0x1
075a e409 | | Load 0x2,0x9
075b 01d6 | | Execute Vector,Field_Write
075c 480a |H | Short_Literal 0xa
075d 4800 |H | Short_Literal 0x0
075e e409 | | Load 0x2,0x9
075f 01d6 | | Execute Vector,Field_Write
0760 e408 | | Load 0x2,0x8
0761 01d4 | | Execute Vector,Structure_Write
0762 00e1 | | Load_Encached Boolean_Cache
0763 0266 | f | Execute Discrete,Bounds
0764 e00a | | Load 0x0,0xa
0765 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0766 02a0 | | Declare_Subprogram Null_Subprogram
0767 4801 |H | Short_Literal 0x1
0768 035d | ] | Declare_Type Array,Defined
0769 00d8 | | Load_Top At_Offset_0
076a 0337 | 7 | Declare_Variable Array
076b 00d8 | | Load_Top At_Offset_0
076c 0335 | 5 | Declare_Variable Array,Duplicate
076d 00cd | | Action Spare6_Action
076e 4802 |H | Short_Literal 0x2
076f 4801 |H | Short_Literal 0x1
0770 e40b | | Load 0x2,0xb
0771 01d6 | | Execute Vector,Field_Write
0772 4801 |H | Short_Literal 0x1
0773 4800 |H | Short_Literal 0x0
0774 e40b | | Load 0x2,0xb
0775 01d6 | | Execute Vector,Field_Write
0776 e40a | | Load 0x2,0xa
0777 01d4 | | Execute Vector,Structure_Write
0778 029f 0d8b | | Declare_Subprogram INIT_0d88,For_Call
077a 029f 0dbb | | Declare_Subprogram INIT_0db8,For_Call
077c BODY_0730:
077c e5f6 | | Load 0x2,-0xa
077d 681b |h | Jump_Zero 0x799
077e e5fd | | Load 0x2,-0x3
077f 8236 | 6 | Call 0x1,0x36
0780 c5f1 | | Store 0x2,-0xf
0781 4801 |H | Short_Literal 0x1
0782 e5f1 | | Load 0x2,-0xf
0783 e008 | | Load 0x0,0x8
0784 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0785 6813 |h | Jump_Zero 0x799
0786 e004 | | Load 0x0,0x4
0787 180e | | Execute Package,Field_Execute,Field_Number 0xe
0788 4807 |H | Short_Literal 0x7
0789 0092 0e48 | H| Action Push_String_Extended,0xe48 ; "Cannot create gateway \x22"
078b e5ff | | Load 0x2,-0x1
078c 01cc | | Execute Vector,Catenate
078d 0092 0e6c | l| Action Push_String_Extended,0xe6c ; ": "
078f 01cc | | Execute Vector,Catenate
0790 e5f1 | | Load 0x2,-0xf
0791 e008 | | Load 0x0,0x8
0792 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0793 01cc | | Execute Vector,Catenate
0794 e009 | | Load 0x0,0x9
0795 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0796 4801 |H | Short_Literal 0x1
0797 a5f3 | | Store_Unchecked 0x2,-0xd
0798 450c |E | Exit_Suprogram New_Top_Offset 0xc
0799 00cf | | Action Mark_Auxiliary
079a 7802 |x | Jump 0x79d
079b 840c | | Call 0x2,0xc
079c 00c9 | | Action Pop_Auxiliary_Loop
079d e405 | | Load 0x2,0x5
079e 6ffc |o | Jump_Zero 0x79b
079f 450c |E | Exit_Suprogram New_Top_Offset 0xc
07a0 ; --------------------------------------------------------------------------------------
07a0 ; SUBPROGRAM
07a0 ; --------------------------------------------------------------------------------------
07a0 07a6 | | .CONST 0x07a6 ; Address of begin
07a1 0004 | | .CONST 0x0004 ; Address of exception handler
07a2 0002 | | .CONST 0x0002 ; Number of locals
07a3 INIT_07a0:
07a3 e402 | | Load 0x2,0x2
07a4 e00b | | Load 0x0,0xb
07a5 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
07a6 BODY_07a0:
07a6 e5fb | | Load 0x2,-0x5
07a7 683d |h= | Jump_Zero 0x7e5
07a8 e5f1 | | Load 0x2,-0xf
07a9 e5f7 | | Load 0x2,-0x9
07aa e402 | | Load 0x2,0x2
07ab e00b | | Load 0x0,0xb
07ac 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
07ad e00b | | Load 0x0,0xb
07ae 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
07af c5f1 | | Store 0x2,-0xf
07b0 4801 |H | Short_Literal 0x1
07b1 e5f1 | | Load 0x2,-0xf
07b2 e008 | | Load 0x0,0x8
07b3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
07b4 681b |h | Jump_Zero 0x7d0
07b5 e004 | | Load 0x0,0x4
07b6 180e | | Execute Package,Field_Execute,Field_Number 0xe
07b7 4805 |H | Short_Literal 0x5
07b8 0092 0e6d | m| Action Push_String_Extended,0xe6d ; "Unable to replace "
07ba e602 | | Load 0x3,0x2
07bb 01cc | | Execute Vector,Catenate
07bc 0092 0e6e | n| Action Push_String_Extended,0xe6e ; " with a gateway object; "
07be 01cc | | Execute Vector,Catenate
07bf e5f1 | | Load 0x2,-0xf
07c0 e008 | | Load 0x0,0x8
07c1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
07c2 01cc | | Execute Vector,Catenate
07c3 e009 | | Load 0x0,0x9
07c4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07c5 e004 | | Load 0x0,0x4
07c6 180e | | Execute Package,Field_Execute,Field_Number 0xe
07c7 e004 | | Load 0x0,0x4
07c8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
07c9 6803 |h | Jump_Zero 0x7cd
07ca 4801 |H | Short_Literal 0x1
07cb a5f3 | | Store_Unchecked 0x2,-0xd
07cc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07cd e004 | | Load 0x0,0x4
07ce 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
07cf 0257 | W | Execute Discrete,Raise
07d0 e5f1 | | Load 0x2,-0xf
07d1 e5f2 | | Load 0x2,-0xe
07d2 e5f3 | | Load 0x2,-0xd
07d3 e5f4 | | Load 0x2,-0xc
07d4 e5f5 | | Load 0x2,-0xb
07d5 e5f6 | | Load 0x2,-0xa
07d6 e5f7 | | Load 0x2,-0x9
07d7 e5f8 | | Load 0x2,-0x8
07d8 e5f9 | | Load 0x2,-0x7
07d9 e5fa | | Load 0x2,-0x6
07da e5fb | | Load 0x2,-0x5
07db e5fc | | Load 0x2,-0x4
07dc e5fd | | Load 0x2,-0x3
07dd e5fe | | Load 0x2,-0x2
07de e602 | | Load 0x3,0x2
07df 8239 | 9 | Call 0x1,0x39
07e0 c5f4 | | Store 0x2,-0xc
07e1 c5f3 | | Store 0x2,-0xd
07e2 c5f2 | | Store 0x2,-0xe
07e3 c5f1 | | Store 0x2,-0xf
07e4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07e5 e004 | | Load 0x0,0x4
07e6 180e | | Execute Package,Field_Execute,Field_Number 0xe
07e7 4802 |H | Short_Literal 0x2
07e8 e602 | | Load 0x3,0x2
07e9 0092 0e6f | o| Action Push_String_Extended,0xe6f ; " already exists and will not be replaced"
07eb 01cc | | Execute Vector,Catenate
07ec e009 | | Load 0x0,0x9
07ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07ee 4501 |E | Exit_Suprogram New_Top_Offset 0x1
07ef 0000 | | .XXX[0x1]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3 | | .CONST 0x07f3 ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0001 | | .CONST 0x0001 ; Number of locals
07f3 BODY_07f0:
07f3 INIT_07f0:
07f3 e7fe | | Load 0x3,-0x2
07f4 e7fd | | Load 0x3,-0x3
07f5 822e | . | Call 0x1,0x2e
07f6 6819 |h | Jump_Zero 0x810
07f7 e004 | | Load 0x0,0x4
07f8 180e | | Execute Package,Field_Execute,Field_Number 0xe
07f9 4806 |H | Short_Literal 0x6
07fa 0092 0e70 | p| Action Push_String_Extended,0xe70 ; "Accepting changes into "
07fc 4801 |H | Short_Literal 0x1
07fd e7ff | | Load 0x3,-0x1
07fe e001 | | Load 0x0,0x1
07ff 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0800 01cc | | Execute Vector,Catenate
0801 0092 0e71 | q| Action Push_String_Extended,0xe71 ; " would overlay changes that have been"
0803 01cc | | Execute Vector,Catenate
0804 0092 0e72 | r| Action Push_String_Extended,0xe72 ; " made to the local gateway data."
0806 01cc | | Execute Vector,Catenate
0807 0092 0e73 | s| Action Push_String_Extended,0xe73 ; " Set Force => True to do this."
0809 01cc | | Execute Vector,Catenate
080a e009 | | Load 0x0,0x9
080b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
080c 4801 |H | Short_Literal 0x1
080d a5fa | | Store_Unchecked 0x2,-0x6
080e 4801 |H | Short_Literal 0x1
080f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0810 e7fe | | Load 0x3,-0x2
0811 e7fd | | Load 0x3,-0x3
0812 822d | - | Call 0x1,0x2d
0813 681c |h | Jump_Zero 0x830
0814 e004 | | Load 0x0,0x4
0815 180e | | Execute Package,Field_Execute,Field_Number 0xe
0816 4806 |H | Short_Literal 0x6
0817 0092 0e70 | p| Action Push_String_Extended,0xe70 ; "Accepting changes into "
0819 4801 |H | Short_Literal 0x1
081a e7ff | | Load 0x3,-0x1
081b e001 | | Load 0x0,0x1
081c 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
081d 01cc | | Execute Vector,Catenate
081e 0092 0e74 | t| Action Push_String_Extended,0xe74 ; " would overlay local gateway data"
0820 01cc | | Execute Vector,Catenate
0821 0092 0e75 | u| Action Push_String_Extended,0xe75 ; " that appears to have been restored"
0823 01cc | | Execute Vector,Catenate
0824 0092 0e76 | v| Action Push_String_Extended,0xe76 ; " to a previous version."
0826 01cc | | Execute Vector,Catenate
0827 0092 0e73 | s| Action Push_String_Extended,0xe73 ; " Set Force => True to do this."
0829 01cc | | Execute Vector,Catenate
082a e009 | | Load 0x0,0x9
082b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
082c 4801 |H | Short_Literal 0x1
082d a5fa | | Store_Unchecked 0x2,-0x6
082e 4801 |H | Short_Literal 0x1
082f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0830 4800 |H | Short_Literal 0x0
0831 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0832 0000 0000 | | .BLANK 0000[0x6]
0838 ; --------------------------------------------------------------------------------------
0838 ; SUBPROGRAM
0838 ; --------------------------------------------------------------------------------------
0838 0855 | U | .CONST 0x0855 ; Address of begin
0839 0004 | | .CONST 0x0004 ; Address of exception handler
083a 0005 | | .CONST 0x0005 ; Number of locals
083b INIT_0838:
083b 4801 |H | Short_Literal 0x1
083c e7ff | | Load 0x3,-0x1
083d e001 | | Load 0x0,0x1
083e 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
083f e002 | | Load 0x0,0x2
0840 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0841 011e | | Execute Any,Convert
0842 e002 | | Load 0x0,0x2
0843 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0844 02c7 | | Declare_Variable Any
0845 00d8 | | Load_Top At_Offset_0
0846 1c00 | | Execute_Immediate Run_Utility,0x0
0847 4801 |H | Short_Literal 0x1
0848 e7ff | | Load 0x3,-0x1
0849 e001 | | Load 0x0,0x1
084a 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
084b e002 | | Load 0x0,0x2
084c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
084d 011e | | Execute Any,Convert
084e 4801 |H | Short_Literal 0x1
084f e7ff | | Load 0x3,-0x1
0850 e001 | | Load 0x0,0x1
0851 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0852 e002 | | Load 0x0,0x2
0853 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0854 011e | | Execute Any,Convert
0855 BODY_0838:
0855 e5f9 | | Load 0x2,-0x7
0856 e603 | | Load 0x3,0x3
0857 0120 | | Execute Any,Is_Value
0858 6803 |h | Jump_Zero 0x85c
0859 e002 | | Load 0x0,0x2
085a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
085b 7801 |x | Jump 0x85d
085c e603 | | Load 0x3,0x3
085d e7ff | | Load 0x3,-0x1
085e e00d | | Load 0x0,0xd
085f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0860 c603 | | Store 0x3,0x3
0861 c5f9 | | Store 0x2,-0x7
0862 4801 |H | Short_Literal 0x1
0863 e5f9 | | Load 0x2,-0x7
0864 e008 | | Load 0x0,0x8
0865 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0866 6817 |h | Jump_Zero 0x87e
0867 e004 | | Load 0x0,0x4
0868 180e | | Execute Package,Field_Execute,Field_Number 0xe
0869 4807 |H | Short_Literal 0x7
086a 0092 0e77 | w| Action Push_String_Extended,0xe77 ; "Unable to accept changes into "
086c 4801 |H | Short_Literal 0x1
086d e7ff | | Load 0x3,-0x1
086e e001 | | Load 0x0,0x1
086f 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0870 01cc | | Execute Vector,Catenate
0871 0092 0e78 | x| Action Push_String_Extended,0xe78 ; "; "
0873 01cc | | Execute Vector,Catenate
0874 e5f9 | | Load 0x2,-0x7
0875 e008 | | Load 0x0,0x8
0876 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0877 01cc | | Execute Vector,Catenate
0878 e009 | | Load 0x0,0x9
0879 1813 | | Execute Package,Field_Execute,Field_Number 0x13
087a 4801 |H | Short_Literal 0x1
087b a5fb | | Store_Unchecked 0x2,-0x5
087c 4800 |H | Short_Literal 0x0
087d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
087e e603 | | Load 0x3,0x3
087f e00b | | Load 0x0,0xb
0880 180e | | Execute Package,Field_Execute,Field_Number 0xe
0881 7019 |p | Jump_Nonzero 0x89b
0882 e004 | | Load 0x0,0x4
0883 180e | | Execute Package,Field_Execute,Field_Number 0xe
0884 4807 |H | Short_Literal 0x7
0885 0092 0e79 | y| Action Push_String_Extended,0xe79 ; "Cannot accept changes into "
0887 4801 |H | Short_Literal 0x1
0888 e7ff | | Load 0x3,-0x1
0889 e001 | | Load 0x0,0x1
088a 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
088b 01cc | | Execute Vector,Catenate
088c 0092 0e7a | z| Action Push_String_Extended,0xe7a ; " because "
088e 01cc | | Execute Vector,Catenate
088f e7ff | | Load 0x3,-0x1
0890 8231 | 1 | Call 0x1,0x31
0891 01cc | | Execute Vector,Catenate
0892 0092 0e7b | {| Action Push_String_Extended,0xe7b ; " does not exist."
0894 01cc | | Execute Vector,Catenate
0895 e009 | | Load 0x0,0x9
0896 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0897 4801 |H | Short_Literal 0x1
0898 a5fb | | Store_Unchecked 0x2,-0x5
0899 4800 |H | Short_Literal 0x0
089a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
089b e7fe | | Load 0x3,-0x2
089c 6802 |h | Jump_Zero 0x89f
089d 4801 |H | Short_Literal 0x1
089e 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
089f 00d8 | | Load_Top At_Offset_0
08a0 e00b | | Load 0x0,0xb
08a1 180e | | Execute Package,Field_Execute,Field_Number 0xe
08a2 7002 |p | Jump_Nonzero 0x8a5
08a3 4801 |H | Short_Literal 0x1
08a4 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08a5 e602 | | Load 0x3,0x2
08a6 e603 | | Load 0x3,0x3
08a7 822e | . | Call 0x1,0x2e
08a8 6806 |h | Jump_Zero 0x8af
08a9 00d8 | | Load_Top At_Offset_0
08aa e604 | | Load 0x3,0x4
08ab e7ff | | Load 0x3,-0x1
08ac 8403 | | Call 0x2,0x3
08ad 0f00 | | Execute_Immediate Equal,0x0
08ae 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08af e602 | | Load 0x3,0x2
08b0 e603 | | Load 0x3,0x3
08b1 822d | - | Call 0x1,0x2d
08b2 681c |h | Jump_Zero 0x8cf
08b3 e004 | | Load 0x0,0x4
08b4 180e | | Execute Package,Field_Execute,Field_Number 0xe
08b5 4806 |H | Short_Literal 0x6
08b6 0092 0e70 | p| Action Push_String_Extended,0xe70 ; "Accepting changes into "
08b8 4801 |H | Short_Literal 0x1
08b9 e7ff | | Load 0x3,-0x1
08ba e001 | | Load 0x0,0x1
08bb 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
08bc 01cc | | Execute Vector,Catenate
08bd 0092 0e7c | || Action Push_String_Extended,0xe7c ; " would retrieve data from the desktop"
08bf 01cc | | Execute Vector,Catenate
08c0 0092 0e75 | u| Action Push_String_Extended,0xe75 ; " that appears to have been restored"
08c2 01cc | | Execute Vector,Catenate
08c3 0092 0e76 | v| Action Push_String_Extended,0xe76 ; " to a previous version."
08c5 01cc | | Execute Vector,Catenate
08c6 0092 0e73 | s| Action Push_String_Extended,0xe73 ; " Set Force => True to do this."
08c8 01cc | | Execute Vector,Catenate
08c9 e009 | | Load 0x0,0x9
08ca 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08cb 4801 |H | Short_Literal 0x1
08cc a5fa | | Store_Unchecked 0x2,-0x6
08cd 4800 |H | Short_Literal 0x0
08ce 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08cf 00d8 | | Load_Top At_Offset_0
08d0 e604 | | Load 0x3,0x4
08d1 e7ff | | Load 0x3,-0x1
08d2 8403 | | Call 0x2,0x3
08d3 6801 |h | Jump_Zero 0x8d5
08d4 780c |x | Jump 0x8e1
08d5 e004 | | Load 0x0,0x4
08d6 180e | | Execute Package,Field_Execute,Field_Number 0xe
08d7 4802 |H | Short_Literal 0x2
08d8 4801 |H | Short_Literal 0x1
08d9 e7ff | | Load 0x3,-0x1
08da e001 | | Load 0x0,0x1
08db 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
08dc 0092 0e7d | }| Action Push_String_Extended,0xe7d ; " is up to date"
08de 01cc | | Execute Vector,Catenate
08df e009 | | Load 0x0,0x9
08e0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
08e1 4800 |H | Short_Literal 0x0
08e2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
08e3 0000 0000 | | .BLANK 0000[0x5]
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08eb | | .CONST 0x08eb ; Address of begin
08e9 0004 | | .CONST 0x0004 ; Address of exception handler
08ea 0001 | | .CONST 0x0001 ; Number of locals
08eb BODY_08e8:
08eb INIT_08e8:
08eb e5f9 | | Load 0x2,-0x7
08ec e7ff | | Load 0x3,-0x1
08ed e00d | | Load 0x0,0xd
08ee 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08ef c5f9 | | Store 0x2,-0x7
08f0 4801 |H | Short_Literal 0x1
08f1 e5f9 | | Load 0x2,-0x7
08f2 e008 | | Load 0x0,0x8
08f3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
08f4 6813 |h | Jump_Zero 0x908
08f5 e004 | | Load 0x0,0x4
08f6 180e | | Execute Package,Field_Execute,Field_Number 0xe
08f7 4807 |H | Short_Literal 0x7
08f8 0092 0e77 | w| Action Push_String_Extended,0xe77 ; "Unable to accept changes into "
08fa e7fe | | Load 0x3,-0x2
08fb 01cc | | Execute Vector,Catenate
08fc 0092 0e78 | x| Action Push_String_Extended,0xe78 ; "; "
08fe 01cc | | Execute Vector,Catenate
08ff e5f9 | | Load 0x2,-0x7
0900 e008 | | Load 0x0,0x8
0901 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0902 01cc | | Execute Vector,Catenate
0903 e009 | | Load 0x0,0x9
0904 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0905 4801 |H | Short_Literal 0x1
0906 a5fb | | Store_Unchecked 0x2,-0x5
0907 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0908 e004 | | Load 0x0,0x4
0909 180e | | Execute Package,Field_Execute,Field_Number 0xe
090a 4803 |H | Short_Literal 0x3
090b 0092 0e7e | ~| Action Push_String_Extended,0xe7e ; "Successfully accepted changes into "
090d e7fe | | Load 0x3,-0x2
090e 01cc | | Execute Vector,Catenate
090f 0092 0e7f | | Action Push_String_Extended,0xe7f ; " from "
0911 01cc | | Execute Vector,Catenate
0912 e7ff | | Load 0x3,-0x1
0913 8231 | 1 | Call 0x1,0x31
0914 01cc | | Execute Vector,Catenate
0915 e009 | | Load 0x0,0x9
0916 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0917 4800 |H | Short_Literal 0x0
0918 a5fb | | Store_Unchecked 0x2,-0x5
0919 4503 |E | Exit_Suprogram New_Top_Offset 0x3
091a 0000 0000 | | .BLANK 0000[0x6]
0920 ; --------------------------------------------------------------------------------------
0920 ; SUBPROGRAM
0920 ; --------------------------------------------------------------------------------------
0920 0927 | ' | .CONST 0x0927 ; Address of begin
0921 0004 | | .CONST 0x0004 ; Address of exception handler
0922 0002 | | .CONST 0x0002 ; Number of locals
0923 INIT_0920:
0923 4801 |H | Short_Literal 0x1
0924 e7ff | | Load 0x3,-0x1
0925 e001 | | Load 0x0,0x1
0926 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0927 BODY_0920:
0927 4801 |H | Short_Literal 0x1
0928 e7ff | | Load 0x3,-0x1
0929 e001 | | Load 0x0,0x1
092a 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
092b 700c |p | Jump_Nonzero 0x938
092c e004 | | Load 0x0,0x4
092d 180e | | Execute Package,Field_Execute,Field_Number 0xe
092e 4807 |H | Short_Literal 0x7
092f e602 | | Load 0x3,0x2
0930 0092 0e80 | | Action Push_String_Extended,0xe80 ; " does not allow Accept_Changes"
0932 01cc | | Execute Vector,Catenate
0933 e009 | | Load 0x0,0x9
0934 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0935 4801 |H | Short_Literal 0x1
0936 a5fb | | Store_Unchecked 0x2,-0x5
0937 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0938 4801 |H | Short_Literal 0x1
0939 e7ff | | Load 0x3,-0x1
093a e001 | | Load 0x0,0x1
093b 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
093c 700c |p | Jump_Nonzero 0x949
093d e004 | | Load 0x0,0x4
093e 180e | | Execute Package,Field_Execute,Field_Number 0xe
093f 4807 |H | Short_Literal 0x7
0940 e602 | | Load 0x3,0x2
0941 0092 0e81 | | Action Push_String_Extended,0xe81 ; " is not connected"
0943 01cc | | Execute Vector,Catenate
0944 e009 | | Load 0x0,0x9
0945 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0946 4801 |H | Short_Literal 0x1
0947 a5fb | | Store_Unchecked 0x2,-0x5
0948 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0949 e5fd | | Load 0x2,-0x3
094a e7ff | | Load 0x3,-0x1
094b 8404 | | Call 0x2,0x4
094c 6844 |hD | Jump_Zero 0x991
094d e5fc | | Load 0x2,-0x4
094e 682d |h- | Jump_Zero 0x97c
094f e004 | | Load 0x0,0x4
0950 180e | | Execute Package,Field_Execute,Field_Number 0xe
0951 e004 | | Load 0x0,0x4
0952 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0953 e004 | | Load 0x0,0x4
0954 180e | | Execute Package,Field_Execute,Field_Number 0xe
0955 e004 | | Load 0x0,0x4
0956 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0957 e004 | | Load 0x0,0x4
0958 180e | | Execute Package,Field_Execute,Field_Number 0xe
0959 e004 | | Load 0x0,0x4
095a 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
095b e004 | | Load 0x0,0x4
095c 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
095d 0337 | 7 | Declare_Variable Array
095e 4808 |H | Short_Literal 0x8
095f 4801 |H | Short_Literal 0x1
0960 e606 | | Load 0x3,0x6
0961 01d6 | | Execute Vector,Field_Write
0962 4800 |H | Short_Literal 0x0
0963 4802 |H | Short_Literal 0x2
0964 e606 | | Load 0x3,0x6
0965 01d6 | | Execute Vector,Field_Write
0966 4800 |H | Short_Literal 0x0
0967 4803 |H | Short_Literal 0x3
0968 e606 | | Load 0x3,0x6
0969 01d6 | | Execute Vector,Field_Write
096a e004 | | Load 0x0,0x4
096b 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
096c 01c3 | | Execute Vector,Check_In_Type
096d e004 | | Load 0x0,0x4
096e 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
096f e004 | | Load 0x0,0x4
0970 180e | | Execute Package,Field_Execute,Field_Number 0xe
0971 e004 | | Load 0x0,0x4
0972 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0973 8230 | 0 | Call 0x1,0x30
0974 4802 |H | Short_Literal 0x2
0975 0092 0e82 | | Action Push_String_Extended,0xe82 ; "Need to accept changes into "
0977 e602 | | Load 0x3,0x2
0978 01cc | | Execute Vector,Catenate
0979 e009 | | Load 0x0,0x9
097a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
097b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
097c e004 | | Load 0x0,0x4
097d 180e | | Execute Package,Field_Execute,Field_Number 0xe
097e 4802 |H | Short_Literal 0x2
097f 0092 0e70 | p| Action Push_String_Extended,0xe70 ; "Accepting changes into "
0981 e602 | | Load 0x3,0x2
0982 01cc | | Execute Vector,Catenate
0983 e009 | | Load 0x0,0x9
0984 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0985 00d8 | | Load_Top At_Offset_0
0986 e00b | | Load 0x0,0xb
0987 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0988 e7ff | | Load 0x3,-0x1
0989 8405 | | Call 0x2,0x5
098a e5fb | | Load 0x2,-0x5
098b 6805 |h | Jump_Zero 0x991
098c e004 | | Load 0x0,0x4
098d 180e | | Execute Package,Field_Execute,Field_Number 0xe
098e e004 | | Load 0x0,0x4
098f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0990 a7fe | | Store_Unchecked 0x3,-0x2
0991 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0992 0000 0000 | | .BLANK 0000[0x6]
0998 ; --------------------------------------------------------------------------------------
0998 ; SUBPROGRAM
0998 ; --------------------------------------------------------------------------------------
0998 099b | | .CONST 0x099b ; Address of begin
0999 0004 | | .CONST 0x0004 ; Address of exception handler
099a 0001 | | .CONST 0x0001 ; Number of locals
099b BODY_0998:
099b INIT_0998:
099b e7fe | | Load 0x3,-0x2
099c e7fd | | Load 0x3,-0x3
099d 822e | . | Call 0x1,0x2e
099e 6819 |h | Jump_Zero 0x9b8
099f e004 | | Load 0x0,0x4
09a0 180e | | Execute Package,Field_Execute,Field_Number 0xe
09a1 4806 |H | Short_Literal 0x6
09a2 0092 0e83 | | Action Push_String_Extended,0xe83 ; "Putting changes from "
09a4 4801 |H | Short_Literal 0x1
09a5 e7ff | | Load 0x3,-0x1
09a6 e001 | | Load 0x0,0x1
09a7 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
09a8 01cc | | Execute Vector,Catenate
09a9 0092 0e71 | q| Action Push_String_Extended,0xe71 ; " would overlay changes that have been"
09ab 01cc | | Execute Vector,Catenate
09ac 0092 0e84 | | Action Push_String_Extended,0xe84 ; " made on the TPS desktop."
09ae 01cc | | Execute Vector,Catenate
09af 0092 0e73 | s| Action Push_String_Extended,0xe73 ; " Set Force => True to do this."
09b1 01cc | | Execute Vector,Catenate
09b2 e009 | | Load 0x0,0x9
09b3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09b4 4801 |H | Short_Literal 0x1
09b5 a5fa | | Store_Unchecked 0x2,-0x6
09b6 4801 |H | Short_Literal 0x1
09b7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
09b8 e7fe | | Load 0x3,-0x2
09b9 e7fd | | Load 0x3,-0x3
09ba 822d | - | Call 0x1,0x2d
09bb 681c |h | Jump_Zero 0x9d8
09bc e004 | | Load 0x0,0x4
09bd 180e | | Execute Package,Field_Execute,Field_Number 0xe
09be 4806 |H | Short_Literal 0x6
09bf 0092 0e83 | | Action Push_String_Extended,0xe83 ; "Putting changes from "
09c1 4801 |H | Short_Literal 0x1
09c2 e7ff | | Load 0x3,-0x1
09c3 e001 | | Load 0x0,0x1
09c4 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
09c5 01cc | | Execute Vector,Catenate
09c6 0092 0e85 | | Action Push_String_Extended,0xe85 ; " would overlay data on the desktop"
09c8 01cc | | Execute Vector,Catenate
09c9 0092 0e75 | u| Action Push_String_Extended,0xe75 ; " that appears to have been restored"
09cb 01cc | | Execute Vector,Catenate
09cc 0092 0e76 | v| Action Push_String_Extended,0xe76 ; " to a previous version."
09ce 01cc | | Execute Vector,Catenate
09cf 0092 0e73 | s| Action Push_String_Extended,0xe73 ; " Set Force => True to do this."
09d1 01cc | | Execute Vector,Catenate
09d2 e009 | | Load 0x0,0x9
09d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
09d4 4801 |H | Short_Literal 0x1
09d5 a5fa | | Store_Unchecked 0x2,-0x6
09d6 4801 |H | Short_Literal 0x1
09d7 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
09d8 4800 |H | Short_Literal 0x0
09d9 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
09da 0000 0000 | | .BLANK 0000[0x6]
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3 | | .CONST 0x09e3 ; Address of begin
09e1 0004 | | .CONST 0x0004 ; Address of exception handler
09e2 0001 | | .CONST 0x0001 ; Number of locals
09e3 BODY_09e0:
09e3 INIT_09e0:
09e3 e5f9 | | Load 0x2,-0x7
09e4 e7fe | | Load 0x3,-0x2
09e5 0120 | | Execute Any,Is_Value
09e6 6803 |h | Jump_Zero 0x9ea
09e7 e002 | | Load 0x0,0x2
09e8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09e9 7801 |x | Jump 0x9eb
09ea e7fe | | Load 0x3,-0x2
09eb e7ff | | Load 0x3,-0x1
09ec e00d | | Load 0x0,0xd
09ed 180d | | Execute Package,Field_Execute,Field_Number 0xd
09ee c7fe | | Store 0x3,-0x2
09ef c5f9 | | Store 0x2,-0x7
09f0 4801 |H | Short_Literal 0x1
09f1 e5f9 | | Load 0x2,-0x7
09f2 e008 | | Load 0x0,0x8
09f3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
09f4 6818 |h | Jump_Zero 0xa0d
09f5 e004 | | Load 0x0,0x4
09f6 180e | | Execute Package,Field_Execute,Field_Number 0xe
09f7 4807 |H | Short_Literal 0x7
09f8 0092 0e86 | | Action Push_String_Extended,0xe86 ; "Unable to put changes from "
09fa 4801 |H | Short_Literal 0x1
09fb e7ff | | Load 0x3,-0x1
09fc e001 | | Load 0x0,0x1
09fd 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
09fe 01cc | | Execute Vector,Catenate
09ff 0092 0e6c | l| Action Push_String_Extended,0xe6c ; ": "
0a01 01cc | | Execute Vector,Catenate
0a02 e5f9 | | Load 0x2,-0x7
0a03 e008 | | Load 0x0,0x8
0a04 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a05 01cc | | Execute Vector,Catenate
0a06 e009 | | Load 0x0,0x9
0a07 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a08 4801 |H | Short_Literal 0x1
0a09 a5fb | | Store_Unchecked 0x2,-0x5
0a0a 4801 |H | Short_Literal 0x1
0a0b a7fd | | Store_Unchecked 0x3,-0x3
0a0c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a0d 4800 |H | Short_Literal 0x0
0a0e a7fd | | Store_Unchecked 0x3,-0x3
0a0f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0a10 ; --------------------------------------------------------------------------------------
0a10 ; SUBPROGRAM
0a10 ; --------------------------------------------------------------------------------------
0a10 0a2f | / | .CONST 0x0a2f ; Address of begin
0a11 0004 | | .CONST 0x0004 ; Address of exception handler
0a12 0006 | | .CONST 0x0006 ; Number of locals
0a13 INIT_0a10:
0a13 4801 |H | Short_Literal 0x1
0a14 e7ff | | Load 0x3,-0x1
0a15 e001 | | Load 0x0,0x1
0a16 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0a17 e002 | | Load 0x0,0x2
0a18 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a19 011e | | Execute Any,Convert
0a1a 4801 |H | Short_Literal 0x1
0a1b e7ff | | Load 0x3,-0x1
0a1c e001 | | Load 0x0,0x1
0a1d 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0a1e e002 | | Load 0x0,0x2
0a1f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a20 011e | | Execute Any,Convert
0a21 4801 |H | Short_Literal 0x1
0a22 e7ff | | Load 0x3,-0x1
0a23 e001 | | Load 0x0,0x1
0a24 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0a25 e002 | | Load 0x0,0x2
0a26 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a27 011e | | Execute Any,Convert
0a28 e002 | | Load 0x0,0x2
0a29 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a2a 02c7 | | Declare_Variable Any
0a2b 00d8 | | Load_Top At_Offset_0
0a2c 1c00 | | Execute_Immediate Run_Utility,0x0
0a2d 00e1 | | Load_Encached Boolean_Cache
0a2e 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0a2f BODY_0a10:
0a2f e7ff | | Load 0x3,-0x1
0a30 8232 | 2 | Call 0x1,0x32
0a31 6819 |h | Jump_Zero 0xa4b
0a32 00e1 | | Load_Encached Boolean_Cache
0a33 e605 | | Load 0x3,0x5
0a34 0120 | | Execute Any,Is_Value
0a35 6803 |h | Jump_Zero 0xa39
0a36 e002 | | Load 0x0,0x2
0a37 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a38 7801 |x | Jump 0xa3a
0a39 e605 | | Load 0x3,0x5
0a3a e7ff | | Load 0x3,-0x1
0a3b 8404 | | Call 0x2,0x4
0a3c c605 | | Store 0x3,0x5
0a3d c606 | | Store 0x3,0x6
0a3e 00d8 | | Load_Top At_Offset_0
0a3f 6802 |h | Jump_Zero 0xa42
0a40 4800 |H | Short_Literal 0x0
0a41 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a42 e7fe | | Load 0x3,-0x2
0a43 7005 |p | Jump_Nonzero 0xa49
0a44 e605 | | Load 0x3,0x5
0a45 e00b | | Load 0x0,0xb
0a46 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a47 0f00 | | Execute_Immediate Equal,0x0
0a48 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a49 4801 |H | Short_Literal 0x1
0a4a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a4b e603 | | Load 0x3,0x3
0a4c e00b | | Load 0x0,0xb
0a4d 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a4e 701b |p | Jump_Nonzero 0xa6a
0a4f e004 | | Load 0x0,0x4
0a50 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a51 4807 |H | Short_Literal 0x7
0a52 0092 0e87 | | Action Push_String_Extended,0xe87 ; "Cannot put changes from "
0a54 4801 |H | Short_Literal 0x1
0a55 e7ff | | Load 0x3,-0x1
0a56 e001 | | Load 0x0,0x1
0a57 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0a58 01cc | | Execute Vector,Catenate
0a59 0092 0e7a | z| Action Push_String_Extended,0xe7a ; " because "
0a5b 01cc | | Execute Vector,Catenate
0a5c 4801 |H | Short_Literal 0x1
0a5d e7ff | | Load 0x3,-0x1
0a5e e001 | | Load 0x0,0x1
0a5f 1862 | b | Execute Package,Field_Execute,Field_Number 0x62
0a60 01cc | | Execute Vector,Catenate
0a61 0092 0e7b | {| Action Push_String_Extended,0xe7b ; " does not exist."
0a63 01cc | | Execute Vector,Catenate
0a64 e009 | | Load 0x0,0x9
0a65 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0a66 4801 |H | Short_Literal 0x1
0a67 a5fb | | Store_Unchecked 0x2,-0x5
0a68 4800 |H | Short_Literal 0x0
0a69 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a6a 00e1 | | Load_Encached Boolean_Cache
0a6b e605 | | Load 0x3,0x5
0a6c 0120 | | Execute Any,Is_Value
0a6d 6803 |h | Jump_Zero 0xa71
0a6e e002 | | Load 0x0,0x2
0a6f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a70 7801 |x | Jump 0xa72
0a71 e605 | | Load 0x3,0x5
0a72 e7ff | | Load 0x3,-0x1
0a73 8404 | | Call 0x2,0x4
0a74 c605 | | Store 0x3,0x5
0a75 c606 | | Store 0x3,0x6
0a76 00d8 | | Load_Top At_Offset_0
0a77 6802 |h | Jump_Zero 0xa7a
0a78 4800 |H | Short_Literal 0x0
0a79 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a7a e7fe | | Load 0x3,-0x2
0a7b 6802 |h | Jump_Zero 0xa7e
0a7c 4801 |H | Short_Literal 0x1
0a7d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a7e e605 | | Load 0x3,0x5
0a7f e00b | | Load 0x0,0xb
0a80 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a81 7002 |p | Jump_Nonzero 0xa84
0a82 4801 |H | Short_Literal 0x1
0a83 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a84 e602 | | Load 0x3,0x2
0a85 e603 | | Load 0x3,0x3
0a86 822e | . | Call 0x1,0x2e
0a87 6806 |h | Jump_Zero 0xa8e
0a88 e605 | | Load 0x3,0x5
0a89 e604 | | Load 0x3,0x4
0a8a e7ff | | Load 0x3,-0x1
0a8b 8403 | | Call 0x2,0x3
0a8c 0f00 | | Execute_Immediate Equal,0x0
0a8d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0a8e e602 | | Load 0x3,0x2
0a8f e603 | | Load 0x3,0x3
0a90 822d | - | Call 0x1,0x2d
0a91 681c |h | Jump_Zero 0xaae
0a92 e004 | | Load 0x0,0x4
0a93 180e | | Execute Package,Field_Execute,Field_Number 0xe
0a94 4806 |H | Short_Literal 0x6
0a95 0092 0e83 | | Action Push_String_Extended,0xe83 ; "Putting changes from "
0a97 4801 |H | Short_Literal 0x1
0a98 e7ff | | Load 0x3,-0x1
0a99 e001 | | Load 0x0,0x1
0a9a 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0a9b 01cc | | Execute Vector,Catenate
0a9c 0092 0e88 | | Action Push_String_Extended,0xe88 ; " would send local gateway data"
0a9e 01cc | | Execute Vector,Catenate
0a9f 0092 0e75 | u| Action Push_String_Extended,0xe75 ; " that appears to have been restored"
0aa1 01cc | | Execute Vector,Catenate
0aa2 0092 0e76 | v| Action Push_String_Extended,0xe76 ; " to a previous version."
0aa4 01cc | | Execute Vector,Catenate
0aa5 0092 0e73 | s| Action Push_String_Extended,0xe73 ; " Set Force => True to do this."
0aa7 01cc | | Execute Vector,Catenate
0aa8 e009 | | Load 0x0,0x9
0aa9 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0aaa 4801 |H | Short_Literal 0x1
0aab a5fa | | Store_Unchecked 0x2,-0x6
0aac 4800 |H | Short_Literal 0x0
0aad 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0aae e605 | | Load 0x3,0x5
0aaf e604 | | Load 0x3,0x4
0ab0 e7ff | | Load 0x3,-0x1
0ab1 8403 | | Call 0x2,0x3
0ab2 6801 |h | Jump_Zero 0xab4
0ab3 780c |x | Jump 0xac0
0ab4 e004 | | Load 0x0,0x4
0ab5 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ab6 4802 |H | Short_Literal 0x2
0ab7 4801 |H | Short_Literal 0x1
0ab8 e7ff | | Load 0x3,-0x1
0ab9 e001 | | Load 0x0,0x1
0aba 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0abb 0092 0e7d | }| Action Push_String_Extended,0xe7d ; " is up to date"
0abd 01cc | | Execute Vector,Catenate
0abe e009 | | Load 0x0,0x9
0abf 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ac0 4800 |H | Short_Literal 0x0
0ac1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0ac2 0000 0000 | | .BLANK 0000[0x6]
0ac8 ; --------------------------------------------------------------------------------------
0ac8 ; SUBPROGRAM
0ac8 ; --------------------------------------------------------------------------------------
0ac8 0acb | | .CONST 0x0acb ; Address of begin
0ac9 0004 | | .CONST 0x0004 ; Address of exception handler
0aca 0001 | | .CONST 0x0001 ; Number of locals
0acb BODY_0ac8:
0acb INIT_0ac8:
0acb e5f9 | | Load 0x2,-0x7
0acc e7ff | | Load 0x3,-0x1
0acd e00d | | Load 0x0,0xd
0ace 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0acf c5f9 | | Store 0x2,-0x7
0ad0 4801 |H | Short_Literal 0x1
0ad1 e5f9 | | Load 0x2,-0x7
0ad2 e008 | | Load 0x0,0x8
0ad3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0ad4 6813 |h | Jump_Zero 0xae8
0ad5 e004 | | Load 0x0,0x4
0ad6 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ad7 4807 |H | Short_Literal 0x7
0ad8 0092 0e86 | | Action Push_String_Extended,0xe86 ; "Unable to put changes from "
0ada e7fe | | Load 0x3,-0x2
0adb 01cc | | Execute Vector,Catenate
0adc 0092 0e6c | l| Action Push_String_Extended,0xe6c ; ": "
0ade 01cc | | Execute Vector,Catenate
0adf e5f9 | | Load 0x2,-0x7
0ae0 e008 | | Load 0x0,0x8
0ae1 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ae2 01cc | | Execute Vector,Catenate
0ae3 e009 | | Load 0x0,0x9
0ae4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ae5 4801 |H | Short_Literal 0x1
0ae6 a5fb | | Store_Unchecked 0x2,-0x5
0ae7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0ae8 e004 | | Load 0x0,0x4
0ae9 180e | | Execute Package,Field_Execute,Field_Number 0xe
0aea 4803 |H | Short_Literal 0x3
0aeb 0092 0e89 | | Action Push_String_Extended,0xe89 ; "Successfully put changes from "
0aed e7fe | | Load 0x3,-0x2
0aee 01cc | | Execute Vector,Catenate
0aef 0092 0e8a | | Action Push_String_Extended,0xe8a ; " to "
0af1 01cc | | Execute Vector,Catenate
0af2 e7ff | | Load 0x3,-0x1
0af3 8231 | 1 | Call 0x1,0x31
0af4 01cc | | Execute Vector,Catenate
0af5 e009 | | Load 0x0,0x9
0af6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0af7 4800 |H | Short_Literal 0x0
0af8 a5fb | | Store_Unchecked 0x2,-0x5
0af9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0afa 0000 0000 | | .BLANK 0000[0x6]
0b00 ; --------------------------------------------------------------------------------------
0b00 ; SUBPROGRAM
0b00 ; --------------------------------------------------------------------------------------
0b00 0b07 | | .CONST 0x0b07 ; Address of begin
0b01 0004 | | .CONST 0x0004 ; Address of exception handler
0b02 0002 | | .CONST 0x0002 ; Number of locals
0b03 INIT_0b00:
0b03 4801 |H | Short_Literal 0x1
0b04 e7ff | | Load 0x3,-0x1
0b05 e001 | | Load 0x0,0x1
0b06 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0b07 BODY_0b00:
0b07 4801 |H | Short_Literal 0x1
0b08 e7ff | | Load 0x3,-0x1
0b09 e001 | | Load 0x0,0x1
0b0a 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
0b0b 700f |p | Jump_Nonzero 0xb1b
0b0c e7ff | | Load 0x3,-0x1
0b0d 8232 | 2 | Call 0x1,0x32
0b0e 700c |p | Jump_Nonzero 0xb1b
0b0f e004 | | Load 0x0,0x4
0b10 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b11 4807 |H | Short_Literal 0x7
0b12 e602 | | Load 0x3,0x2
0b13 0092 0e8b | | Action Push_String_Extended,0xe8b ; " does not allow Put_Changes"
0b15 01cc | | Execute Vector,Catenate
0b16 e009 | | Load 0x0,0x9
0b17 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b18 4801 |H | Short_Literal 0x1
0b19 a5fb | | Store_Unchecked 0x2,-0x5
0b1a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b1b 4801 |H | Short_Literal 0x1
0b1c e7ff | | Load 0x3,-0x1
0b1d e001 | | Load 0x0,0x1
0b1e 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
0b1f 700c |p | Jump_Nonzero 0xb2c
0b20 e004 | | Load 0x0,0x4
0b21 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b22 4807 |H | Short_Literal 0x7
0b23 e602 | | Load 0x3,0x2
0b24 0092 0e81 | | Action Push_String_Extended,0xe81 ; " is not connected"
0b26 01cc | | Execute Vector,Catenate
0b27 e009 | | Load 0x0,0x9
0b28 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b29 4801 |H | Short_Literal 0x1
0b2a a5fb | | Store_Unchecked 0x2,-0x5
0b2b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b2c e5fd | | Load 0x2,-0x3
0b2d e7ff | | Load 0x3,-0x1
0b2e 8405 | | Call 0x2,0x5
0b2f 6844 |hD | Jump_Zero 0xb74
0b30 e5fc | | Load 0x2,-0x4
0b31 682d |h- | Jump_Zero 0xb5f
0b32 e004 | | Load 0x0,0x4
0b33 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b34 e004 | | Load 0x0,0x4
0b35 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0b36 e004 | | Load 0x0,0x4
0b37 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b38 e004 | | Load 0x0,0x4
0b39 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0b3a e004 | | Load 0x0,0x4
0b3b 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b3c e004 | | Load 0x0,0x4
0b3d 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0b3e e004 | | Load 0x0,0x4
0b3f 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0b40 0337 | 7 | Declare_Variable Array
0b41 4808 |H | Short_Literal 0x8
0b42 4801 |H | Short_Literal 0x1
0b43 e606 | | Load 0x3,0x6
0b44 01d6 | | Execute Vector,Field_Write
0b45 4800 |H | Short_Literal 0x0
0b46 4802 |H | Short_Literal 0x2
0b47 e606 | | Load 0x3,0x6
0b48 01d6 | | Execute Vector,Field_Write
0b49 4800 |H | Short_Literal 0x0
0b4a 4803 |H | Short_Literal 0x3
0b4b e606 | | Load 0x3,0x6
0b4c 01d6 | | Execute Vector,Field_Write
0b4d e004 | | Load 0x0,0x4
0b4e 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0b4f 01c3 | | Execute Vector,Check_In_Type
0b50 e004 | | Load 0x0,0x4
0b51 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0b52 e004 | | Load 0x0,0x4
0b53 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b54 e004 | | Load 0x0,0x4
0b55 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0b56 8230 | 0 | Call 0x1,0x30
0b57 4802 |H | Short_Literal 0x2
0b58 0092 0e8c | | Action Push_String_Extended,0xe8c ; "Need to put changes from "
0b5a e602 | | Load 0x3,0x2
0b5b 01cc | | Execute Vector,Catenate
0b5c e009 | | Load 0x0,0x9
0b5d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b5e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b5f e004 | | Load 0x0,0x4
0b60 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b61 4802 |H | Short_Literal 0x2
0b62 0092 0e83 | | Action Push_String_Extended,0xe83 ; "Putting changes from "
0b64 e602 | | Load 0x3,0x2
0b65 01cc | | Execute Vector,Catenate
0b66 e009 | | Load 0x0,0x9
0b67 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0b68 00d8 | | Load_Top At_Offset_0
0b69 e00b | | Load 0x0,0xb
0b6a 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0b6b e7ff | | Load 0x3,-0x1
0b6c 8406 | | Call 0x2,0x6
0b6d e5fb | | Load 0x2,-0x5
0b6e 6805 |h | Jump_Zero 0xb74
0b6f e004 | | Load 0x0,0x4
0b70 180e | | Execute Package,Field_Execute,Field_Number 0xe
0b71 e004 | | Load 0x0,0x4
0b72 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0b73 a7fe | | Store_Unchecked 0x3,-0x2
0b74 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0b75 0000 0000 | | .XXX[0x3]
0b77 0000 | |
0b78 ; --------------------------------------------------------------------------------------
0b78 ; SUBPROGRAM
0b78 ; --------------------------------------------------------------------------------------
0b78 0b7b | { | .CONST 0x0b7b ; Address of begin
0b79 0004 | | .CONST 0x0004 ; Address of exception handler
0b7a 0001 | | .CONST 0x0001 ; Number of locals
0b7b BODY_0b78:
0b7b INIT_0b78:
0b7b e7ff | | Load 0x3,-0x1
0b7c e7fe | | Load 0x3,-0x2
0b7d 012f | / | Execute Any,Equal
0b7e 7005 |p | Jump_Nonzero 0xb84
0b7f 0092 0e8d | | Action Push_String_Extended,0xe8d ; "* "
0b81 e017 | | Load 0x0,0x17
0b82 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0b83 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0b84 0092 0e8e | | Action Push_String_Extended,0xe8e ; " "
0b86 e017 | | Load 0x0,0x17
0b87 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0b88 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0b89 0000 0000 | | .BLANK 0000[0x7]
0b90 ; --------------------------------------------------------------------------------------
0b90 ; SUBPROGRAM
0b90 ; --------------------------------------------------------------------------------------
0b90 0bb1 | | .CONST 0x0bb1 ; Address of begin
0b91 0004 | | .CONST 0x0004 ; Address of exception handler
0b92 0007 | | .CONST 0x0007 ; Number of locals
0b93 INIT_0b90:
0b93 4801 |H | Short_Literal 0x1
0b94 e7ff | | Load 0x3,-0x1
0b95 e001 | | Load 0x0,0x1
0b96 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
0b97 e002 | | Load 0x0,0x2
0b98 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0b99 02c7 | | Declare_Variable Any
0b9a 00d8 | | Load_Top At_Offset_0
0b9b 1c00 | | Execute_Immediate Run_Utility,0x0
0b9c 00e1 | | Load_Encached Boolean_Cache
0b9d 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0b9e e002 | | Load 0x0,0x2
0b9f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ba0 02c7 | | Declare_Variable Any
0ba1 00d8 | | Load_Top At_Offset_0
0ba2 1c00 | | Execute_Immediate Run_Utility,0x0
0ba3 4801 |H | Short_Literal 0x1
0ba4 e7ff | | Load 0x3,-0x1
0ba5 e001 | | Load 0x0,0x1
0ba6 1850 | P | Execute Package,Field_Execute,Field_Number 0x50
0ba7 e002 | | Load 0x0,0x2
0ba8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0ba9 011e | | Execute Any,Convert
0baa 4801 |H | Short_Literal 0x1
0bab e7ff | | Load 0x3,-0x1
0bac e001 | | Load 0x0,0x1
0bad 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0bae e002 | | Load 0x0,0x2
0baf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bb0 011e | | Execute Any,Convert
0bb1 BODY_0b90:
0bb1 e602 | | Load 0x3,0x2
0bb2 681e |h | Jump_Zero 0xbd1
0bb3 4801 |H | Short_Literal 0x1
0bb4 e7ff | | Load 0x3,-0x1
0bb5 e001 | | Load 0x0,0x1
0bb6 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0bb7 c603 | | Store 0x3,0x3
0bb8 e5fb | | Load 0x2,-0x5
0bb9 e605 | | Load 0x3,0x5
0bba 0120 | | Execute Any,Is_Value
0bbb 6803 |h | Jump_Zero 0xbbf
0bbc e002 | | Load 0x0,0x2
0bbd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0bbe 7801 |x | Jump 0xbc0
0bbf e605 | | Load 0x3,0x5
0bc0 e7ff | | Load 0x3,-0x1
0bc1 e00d | | Load 0x0,0xd
0bc2 180d | | Execute Package,Field_Execute,Field_Number 0xd
0bc3 c605 | | Store 0x3,0x5
0bc4 c5fb | | Store 0x2,-0x5
0bc5 4801 |H | Short_Literal 0x1
0bc6 e5fb | | Load 0x2,-0x5
0bc7 e008 | | Load 0x0,0x8
0bc8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0bc9 680b |h | Jump_Zero 0xbd5
0bca 4801 |H | Short_Literal 0x1
0bcb a604 | | Store_Unchecked 0x3,0x4
0bcc 00e2 | | Load_Encached Integer_Cache
0bcd e403 | | Load 0x2,0x3
0bce 0268 | h | Execute Discrete,Successor
0bcf c403 | | Store 0x2,0x3
0bd0 7804 |x | Jump 0xbd5
0bd1 00e2 | | Load_Encached Integer_Cache
0bd2 e402 | | Load 0x2,0x2
0bd3 0268 | h | Execute Discrete,Successor
0bd4 c402 | | Store 0x2,0x2
0bd5 e606 | | Load 0x3,0x6
0bd6 e607 | | Load 0x3,0x7
0bd7 012f | / | Execute Any,Equal
0bd8 6808 |h | Jump_Zero 0xbe1
0bd9 e602 | | Load 0x3,0x2
0bda 6835 |h5 | Jump_Zero 0xc10
0bdb e604 | | Load 0x3,0x4
0bdc 7033 |p3 | Jump_Nonzero 0xc10
0bdd e603 | | Load 0x3,0x3
0bde e605 | | Load 0x3,0x5
0bdf 012f | / | Execute Any,Equal
0be0 702f |p/ | Jump_Nonzero 0xc10
0be1 00e2 | | Load_Encached Integer_Cache
0be2 e404 | | Load 0x2,0x4
0be3 0268 | h | Execute Discrete,Successor
0be4 c404 | | Store 0x2,0x4
0be5 4801 |H | Short_Literal 0x1
0be6 e017 | | Load 0x0,0x17
0be7 1840 | @ | Execute Package,Field_Execute,Field_Number 0x40
0be8 00d8 | | Load_Top At_Offset_0
0be9 e606 | | Load 0x3,0x6
0bea 8405 | | Call 0x2,0x5
0beb 4801 |H | Short_Literal 0x1
0bec e7ff | | Load 0x3,-0x1
0bed e001 | | Load 0x0,0x1
0bee 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0bef e017 | | Load 0x0,0x17
0bf0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0bf1 e602 | | Load 0x3,0x2
0bf2 6812 |h | Jump_Zero 0xc05
0bf3 e605 | | Load 0x3,0x5
0bf4 e603 | | Load 0x3,0x3
0bf5 8405 | | Call 0x2,0x5
0bf6 4801 |H | Short_Literal 0x1
0bf7 e7ff | | Load 0x3,-0x1
0bf8 e001 | | Load 0x0,0x1
0bf9 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0bfa 0092 0e68 | h| Action Push_String_Extended,0xe68 ; " : "
0bfc 01cc | | Execute Vector,Catenate
0bfd 4801 |H | Short_Literal 0x1
0bfe e7ff | | Load 0x3,-0x1
0bff e001 | | Load 0x0,0x1
0c00 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0c01 01cc | | Execute Vector,Catenate
0c02 e017 | | Load 0x0,0x17
0c03 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0c04 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c05 e604 | | Load 0x3,0x4
0c06 6805 |h | Jump_Zero 0xc0c
0c07 0092 0e8f | | Action Push_String_Extended,0xe8f ; " unable to obtain update time"
0c09 e017 | | Load 0x0,0x17
0c0a 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0c0b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c0c 0092 0e90 | | Action Push_String_Extended,0xe90 ; " disconnected"
0c0e e017 | | Load 0x0,0x17
0c0f 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0c10 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c11 0000 0000 | | .BLANK 0000[0x7]
0c18 ; --------------------------------------------------------------------------------------
0c18 ; SUBPROGRAM
0c18 ; --------------------------------------------------------------------------------------
0c18 0c1f | | .CONST 0x0c1f ; Address of begin
0c19 0004 | | .CONST 0x0004 ; Address of exception handler
0c1a 0002 | | .CONST 0x0002 ; Number of locals
0c1b INIT_0c18:
0c1b 4801 |H | Short_Literal 0x1
0c1c e7ff | | Load 0x3,-0x1
0c1d e001 | | Load 0x0,0x1
0c1e 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0c1f BODY_0c18:
0c1f e5fe | | Load 0x2,-0x2
0c20 682d |h- | Jump_Zero 0xc4e
0c21 e004 | | Load 0x0,0x4
0c22 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c23 e004 | | Load 0x0,0x4
0c24 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0c25 e004 | | Load 0x0,0x4
0c26 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c27 e004 | | Load 0x0,0x4
0c28 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0c29 e004 | | Load 0x0,0x4
0c2a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c2b e004 | | Load 0x0,0x4
0c2c 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0c2d e004 | | Load 0x0,0x4
0c2e 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0c2f 0337 | 7 | Declare_Variable Array
0c30 4808 |H | Short_Literal 0x8
0c31 4801 |H | Short_Literal 0x1
0c32 e606 | | Load 0x3,0x6
0c33 01d6 | | Execute Vector,Field_Write
0c34 4800 |H | Short_Literal 0x0
0c35 4802 |H | Short_Literal 0x2
0c36 e606 | | Load 0x3,0x6
0c37 01d6 | | Execute Vector,Field_Write
0c38 4800 |H | Short_Literal 0x0
0c39 4803 |H | Short_Literal 0x3
0c3a e606 | | Load 0x3,0x6
0c3b 01d6 | | Execute Vector,Field_Write
0c3c e004 | | Load 0x0,0x4
0c3d 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0c3e 01c3 | | Execute Vector,Check_In_Type
0c3f e004 | | Load 0x0,0x4
0c40 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0c41 e004 | | Load 0x0,0x4
0c42 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c43 e004 | | Load 0x0,0x4
0c44 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c45 8230 | 0 | Call 0x1,0x30
0c46 4802 |H | Short_Literal 0x2
0c47 0092 0e91 | | Action Push_String_Extended,0xe91 ; "Need to create archive for "
0c49 e602 | | Load 0x3,0x2
0c4a 01cc | | Execute Vector,Catenate
0c4b e009 | | Load 0x0,0x9
0c4c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c4d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c4e e004 | | Load 0x0,0x4
0c4f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c50 4802 |H | Short_Literal 0x2
0c51 0092 0e92 | | Action Push_String_Extended,0xe92 ; "Creating archive for "
0c53 e602 | | Load 0x3,0x2
0c54 01cc | | Execute Vector,Catenate
0c55 e009 | | Load 0x0,0x9
0c56 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c57 e5fb | | Load 0x2,-0x5
0c58 e7ff | | Load 0x3,-0x1
0c59 e00d | | Load 0x0,0xd
0c5a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0c5b c5fb | | Store 0x2,-0x5
0c5c 4801 |H | Short_Literal 0x1
0c5d e5fb | | Load 0x2,-0x5
0c5e e008 | | Load 0x0,0x8
0c5f 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0c60 6818 |h | Jump_Zero 0xc79
0c61 e004 | | Load 0x0,0x4
0c62 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c63 4807 |H | Short_Literal 0x7
0c64 0092 0e93 | | Action Push_String_Extended,0xe93 ; "Unable to save archive of "
0c66 e602 | | Load 0x3,0x2
0c67 01cc | | Execute Vector,Catenate
0c68 0092 0e78 | x| Action Push_String_Extended,0xe78 ; "; "
0c6a 01cc | | Execute Vector,Catenate
0c6b e5fb | | Load 0x2,-0x5
0c6c e008 | | Load 0x0,0x8
0c6d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c6e 01cc | | Execute Vector,Catenate
0c6f e009 | | Load 0x0,0x9
0c70 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c71 4801 |H | Short_Literal 0x1
0c72 a5fd | | Store_Unchecked 0x2,-0x3
0c73 e004 | | Load 0x0,0x4
0c74 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c75 e004 | | Load 0x0,0x4
0c76 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0c77 a7fe | | Store_Unchecked 0x3,-0x2
0c78 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c79 e004 | | Load 0x0,0x4
0c7a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c7b 4803 |H | Short_Literal 0x3
0c7c e602 | | Load 0x3,0x2
0c7d 0092 0e94 | | Action Push_String_Extended,0xe94 ; " archive has been successfully created"
0c7f 01cc | | Execute Vector,Catenate
0c80 e009 | | Load 0x0,0x9
0c81 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0c82 4800 |H | Short_Literal 0x0
0c83 a5fd | | Store_Unchecked 0x2,-0x3
0c84 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0c85 0000 0000 | | .XXX[0x3]
0c87 0000 | |
0c88 ; --------------------------------------------------------------------------------------
0c88 ; SUBPROGRAM
0c88 ; --------------------------------------------------------------------------------------
0c88 0c8f | | .CONST 0x0c8f ; Address of begin
0c89 0004 | | .CONST 0x0004 ; Address of exception handler
0c8a 0002 | | .CONST 0x0002 ; Number of locals
0c8b INIT_0c88:
0c8b 4801 |H | Short_Literal 0x1
0c8c e7ff | | Load 0x3,-0x1
0c8d e001 | | Load 0x0,0x1
0c8e 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0c8f BODY_0c88:
0c8f e5fe | | Load 0x2,-0x2
0c90 682d |h- | Jump_Zero 0xcbe
0c91 e004 | | Load 0x0,0x4
0c92 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c93 e004 | | Load 0x0,0x4
0c94 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
0c95 e004 | | Load 0x0,0x4
0c96 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c97 e004 | | Load 0x0,0x4
0c98 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
0c99 e004 | | Load 0x0,0x4
0c9a 180e | | Execute Package,Field_Execute,Field_Number 0xe
0c9b e004 | | Load 0x0,0x4
0c9c 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0c9d e004 | | Load 0x0,0x4
0c9e 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0c9f 0337 | 7 | Declare_Variable Array
0ca0 4808 |H | Short_Literal 0x8
0ca1 4801 |H | Short_Literal 0x1
0ca2 e606 | | Load 0x3,0x6
0ca3 01d6 | | Execute Vector,Field_Write
0ca4 4800 |H | Short_Literal 0x0
0ca5 4802 |H | Short_Literal 0x2
0ca6 e606 | | Load 0x3,0x6
0ca7 01d6 | | Execute Vector,Field_Write
0ca8 4800 |H | Short_Literal 0x0
0ca9 4803 |H | Short_Literal 0x3
0caa e606 | | Load 0x3,0x6
0cab 01d6 | | Execute Vector,Field_Write
0cac e004 | | Load 0x0,0x4
0cad 1b2b | + | Execute Package,Field_Read,Field_Number 0x2b
0cae 01c3 | | Execute Vector,Check_In_Type
0caf e004 | | Load 0x0,0x4
0cb0 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0cb1 e004 | | Load 0x0,0x4
0cb2 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cb3 e004 | | Load 0x0,0x4
0cb4 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0cb5 8230 | 0 | Call 0x1,0x30
0cb6 4802 |H | Short_Literal 0x2
0cb7 0092 0e95 | | Action Push_String_Extended,0xe95 ; "Need to restore archive for "
0cb9 e602 | | Load 0x3,0x2
0cba 01cc | | Execute Vector,Catenate
0cbb e009 | | Load 0x0,0x9
0cbc 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0cbd 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cbe e004 | | Load 0x0,0x4
0cbf 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cc0 4802 |H | Short_Literal 0x2
0cc1 0092 0e96 | | Action Push_String_Extended,0xe96 ; "Restoring archive for "
0cc3 e602 | | Load 0x3,0x2
0cc4 01cc | | Execute Vector,Catenate
0cc5 e009 | | Load 0x0,0x9
0cc6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0cc7 e5fb | | Load 0x2,-0x5
0cc8 e7ff | | Load 0x3,-0x1
0cc9 e00d | | Load 0x0,0xd
0cca 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ccb c5fb | | Store 0x2,-0x5
0ccc 4801 |H | Short_Literal 0x1
0ccd e5fb | | Load 0x2,-0x5
0cce e008 | | Load 0x0,0x8
0ccf 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0cd0 6818 |h | Jump_Zero 0xce9
0cd1 e004 | | Load 0x0,0x4
0cd2 180e | | Execute Package,Field_Execute,Field_Number 0xe
0cd3 4807 |H | Short_Literal 0x7
0cd4 0092 0e97 | | Action Push_String_Extended,0xe97 ; "Unable to restore archive of "
0cd6 e602 | | Load 0x3,0x2
0cd7 01cc | | Execute Vector,Catenate
0cd8 0092 0e78 | x| Action Push_String_Extended,0xe78 ; "; "
0cda 01cc | | Execute Vector,Catenate
0cdb e5fb | | Load 0x2,-0x5
0cdc e008 | | Load 0x0,0x8
0cdd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0cde 01cc | | Execute Vector,Catenate
0cdf e009 | | Load 0x0,0x9
0ce0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0ce1 4801 |H | Short_Literal 0x1
0ce2 a5fd | | Store_Unchecked 0x2,-0x3
0ce3 e004 | | Load 0x0,0x4
0ce4 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ce5 e004 | | Load 0x0,0x4
0ce6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0ce7 a7fe | | Store_Unchecked 0x3,-0x2
0ce8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0ce9 e004 | | Load 0x0,0x4
0cea 180e | | Execute Package,Field_Execute,Field_Number 0xe
0ceb 4803 |H | Short_Literal 0x3
0cec e602 | | Load 0x3,0x2
0ced 0092 0e98 | | Action Push_String_Extended,0xe98 ; " archive has been successfully restored"
0cef 01cc | | Execute Vector,Catenate
0cf0 e009 | | Load 0x0,0x9
0cf1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0cf2 4800 |H | Short_Literal 0x0
0cf3 a5fd | | Store_Unchecked 0x2,-0x3
0cf4 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0cf5 0000 0000 | | .XXX[0x3]
0cf7 0000 | |
0cf8 ; --------------------------------------------------------------------------------------
0cf8 ; SUBPROGRAM
0cf8 ; --------------------------------------------------------------------------------------
0cf8 0d03 | | .CONST 0x0d03 ; Address of begin
0cf9 0004 | | .CONST 0x0004 ; Address of exception handler
0cfa 0003 | | .CONST 0x0003 ; Number of locals
0cfb INIT_0cf8:
0cfb 4801 |H | Short_Literal 0x1
0cfc e403 | | Load 0x2,0x3
0cfd e001 | | Load 0x0,0x1
0cfe 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0cff 4801 |H | Short_Literal 0x1
0d00 e403 | | Load 0x2,0x3
0d01 e001 | | Load 0x0,0x1
0d02 1849 | I | Execute Package,Field_Execute,Field_Number 0x49
0d03 BODY_0cf8:
0d03 e403 | | Load 0x2,0x3
0d04 e001 | | Load 0x0,0x1
0d05 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0d06 c403 | | Store 0x2,0x3
0d07 4801 |H | Short_Literal 0x1
0d08 e00a | | Load 0x0,0xa
0d09 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d0a e602 | | Load 0x3,0x2
0d0b 822f | / | Call 0x1,0x2f
0d0c 7003 |p | Jump_Nonzero 0xd10
0d0d 00ea | | Load_Encached Null_String_Cache
0d0e 00cb | | Action Pop_Block_With_Result
0d0f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d10 00d8 | | Load_Top At_Offset_0
0d11 00cb | | Action Pop_Block_With_Result
0d12 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d13 0000 0000 | | .BLANK 0000[0x5]
0d18 ; --------------------------------------------------------------------------------------
0d18 ; SUBPROGRAM
0d18 ; --------------------------------------------------------------------------------------
0d18 0d2d | - | .CONST 0x0d2d ; Address of begin
0d19 0004 | | .CONST 0x0004 ; Address of exception handler
0d1a 0005 | | .CONST 0x0005 ; Number of locals
0d1b INIT_0d18:
0d1b 4801 |H | Short_Literal 0x1
0d1c e403 | | Load 0x2,0x3
0d1d e001 | | Load 0x0,0x1
0d1e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0d1f 4801 |H | Short_Literal 0x1
0d20 e403 | | Load 0x2,0x3
0d21 e001 | | Load 0x0,0x1
0d22 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0d23 e00a | | Load 0x0,0xa
0d24 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0d25 03f1 | | Declare_Variable Discrete,With_Value
0d26 00d8 | | Load_Top At_Offset_0
0d27 e00a | | Load 0x0,0xa
0d28 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0d29 011c | | Execute Any,Convert_Unchecked
0d2a 1c01 | | Execute_Immediate Run_Utility,0x1
0d2b 029f 0e3b | ;| Declare_Subprogram INIT_0e38,For_Call
0d2d BODY_0d18:
0d2d e403 | | Load 0x2,0x3
0d2e e001 | | Load 0x0,0x1
0d2f 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0d30 c403 | | Store 0x2,0x3
0d31 4801 |H | Short_Literal 0x1
0d32 e00a | | Load 0x0,0xa
0d33 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d34 e602 | | Load 0x3,0x2
0d35 822f | / | Call 0x1,0x2f
0d36 7003 |p | Jump_Nonzero 0xd3a
0d37 4816 |H | Short_Literal 0x16
0d38 00cb | | Action Pop_Block_With_Result
0d39 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d3a 8605 | | Call 0x3,0x5
0d3b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0d3c 0000 0000 | | .BLANK 0000[0x4]
0d40 ; --------------------------------------------------------------------------------------
0d40 ; SUBPROGRAM
0d40 ; --------------------------------------------------------------------------------------
0d40 0d47 | G | .CONST 0x0d47 ; Address of begin
0d41 0004 | | .CONST 0x0004 ; Address of exception handler
0d42 0002 | | .CONST 0x0002 ; Number of locals
0d43 INIT_0d40:
0d43 4801 |H | Short_Literal 0x1
0d44 e403 | | Load 0x2,0x3
0d45 e001 | | Load 0x0,0x1
0d46 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0d47 BODY_0d40:
0d47 e403 | | Load 0x2,0x3
0d48 e001 | | Load 0x0,0x1
0d49 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0d4a c403 | | Store 0x2,0x3
0d4b 4801 |H | Short_Literal 0x1
0d4c e00a | | Load 0x0,0xa
0d4d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d4e e602 | | Load 0x3,0x2
0d4f 822f | / | Call 0x1,0x2f
0d50 00cb | | Action Pop_Block_With_Result
0d51 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d52 0000 0000 | | .BLANK 0000[0x6]
0d58 ; --------------------------------------------------------------------------------------
0d58 ; SUBPROGRAM
0d58 ; --------------------------------------------------------------------------------------
0d58 0d6f | o | .CONST 0x0d6f ; Address of begin
0d59 0004 | | .CONST 0x0004 ; Address of exception handler
0d5a 0005 | | .CONST 0x0005 ; Number of locals
0d5b INIT_0d58:
0d5b 4801 |H | Short_Literal 0x1
0d5c e403 | | Load 0x2,0x3
0d5d e001 | | Load 0x0,0x1
0d5e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0d5f 4801 |H | Short_Literal 0x1
0d60 e403 | | Load 0x2,0x3
0d61 e001 | | Load 0x0,0x1
0d62 184a | J | Execute Package,Field_Execute,Field_Number 0x4a
0d63 e00a | | Load 0x0,0xa
0d64 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0d65 03f1 | | Declare_Variable Discrete,With_Value
0d66 00d8 | | Load_Top At_Offset_0
0d67 e00a | | Load 0x0,0xa
0d68 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0d69 011c | | Execute Any,Convert_Unchecked
0d6a 1c01 | | Execute_Immediate Run_Utility,0x1
0d6b 4801 |H | Short_Literal 0x1
0d6c e403 | | Load 0x2,0x3
0d6d e001 | | Load 0x0,0x1
0d6e 184f | O | Execute Package,Field_Execute,Field_Number 0x4f
0d6f BODY_0d58:
0d6f e403 | | Load 0x2,0x3
0d70 e001 | | Load 0x0,0x1
0d71 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0d72 c403 | | Store 0x2,0x3
0d73 4801 |H | Short_Literal 0x1
0d74 e00a | | Load 0x0,0xa
0d75 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0d76 e602 | | Load 0x3,0x2
0d77 822f | / | Call 0x1,0x2f
0d78 7003 |p | Jump_Nonzero 0xd7c
0d79 00ea | | Load_Encached Null_String_Cache
0d7a 00cb | | Action Pop_Block_With_Result
0d7b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d7c 4801 |H | Short_Literal 0x1
0d7d 0092 0e99 | | Action Push_String_Extended,0xe99 ; "CATALOG"
0d7f e604 | | Load 0x3,0x4
0d80 822f | / | Call 0x1,0x2f
0d81 7003 |p | Jump_Nonzero 0xd85
0d82 00ea | | Load_Encached Null_String_Cache
0d83 00cb | | Action Pop_Block_With_Result
0d84 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d85 00d8 | | Load_Top At_Offset_0
0d86 00cb | | Action Pop_Block_With_Result
0d87 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0d88 ; --------------------------------------------------------------------------------------
0d88 ; SUBPROGRAM
0d88 ; --------------------------------------------------------------------------------------
0d88 0d93 | | .CONST 0x0d93 ; Address of begin
0d89 0004 | | .CONST 0x0004 ; Address of exception handler
0d8a 0002 | | .CONST 0x0002 ; Number of locals
0d8b INIT_0d88:
0d8b 0092 0e9a | | Action Push_String_Extended,0xe9a ; "$$."
0d8d e402 | | Load 0x2,0x2
0d8e e403 | | Load 0x2,0x3
0d8f e00b | | Load 0x0,0xb
0d90 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0d91 01cc | | Execute Vector,Catenate
0d92 0007 | | Action Break_Optional
0d93 BODY_0d88:
0d93 e5f1 | | Load 0x2,-0xf
0d94 e5f2 | | Load 0x2,-0xe
0d95 e5f3 | | Load 0x2,-0xd
0d96 e5f5 | | Load 0x2,-0xb
0d97 e5f6 | | Load 0x2,-0xa
0d98 e5f7 | | Load 0x2,-0x9
0d99 0092 0e9b | | Action Push_String_Extended,0xe9b ; "<Parent>"
0d9b 4800 |H | Short_Literal 0x0
0d9c e7fd | | Load 0x3,-0x3
0d9d 0f0a | | Execute_Immediate Equal,0xa
0d9e e7ff | | Load 0x3,-0x1
0d9f 8237 | 7 | Call 0x1,0x37
0da0 e5f8 | | Load 0x2,-0x8
0da1 e5f9 | | Load 0x2,-0x7
0da2 e5fa | | Load 0x2,-0x6
0da3 e7fd | | Load 0x3,-0x3
0da4 e7fe | | Load 0x3,-0x2
0da5 0092 0e9b | | Action Push_String_Extended,0xe9b ; "<Parent>"
0da7 0092 0e9b | | Action Push_String_Extended,0xe9b ; "<Parent>"
0da9 e602 | | Load 0x3,0x2
0daa e7ff | | Load 0x3,-0x1
0dab 8229 | ) | Call 0x1,0x29
0dac c5f3 | | Store 0x2,-0xd
0dad c5f2 | | Store 0x2,-0xe
0dae c5f1 | | Store 0x2,-0xf
0daf e5f4 | | Load 0x2,-0xc
0db0 0a01 | | Execute_Immediate Plus,0x1
0db1 c5f4 | | Store 0x2,-0xc
0db2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0db3 0000 0000 | | .BLANK 0000[0x5]
0db8 ; --------------------------------------------------------------------------------------
0db8 ; SUBPROGRAM
0db8 ; --------------------------------------------------------------------------------------
0db8 0dd3 | | .CONST 0x0dd3 ; Address of begin
0db9 0004 | | .CONST 0x0004 ; Address of exception handler
0dba 0005 | | .CONST 0x0005 ; Number of locals
0dbb INIT_0db8:
0dbb e404 | | Load 0x2,0x4
0dbc e00b | | Load 0x0,0xb
0dbd 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0dbe 00d8 | | Load_Top At_Offset_0
0dbf e5ff | | Load 0x2,-0x1
0dc0 e00b | | Load 0x0,0xb
0dc1 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0dc2 e00b | | Load 0x0,0xb
0dc3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0dc4 482e |H. | Short_Literal 0x2e
0dc5 e602 | | Load 0x3,0x2
0dc6 01cb | | Execute Vector,Append
0dc7 e603 | | Load 0x3,0x3
0dc8 01cc | | Execute Vector,Catenate
0dc9 0007 | | Action Break_Optional
0dca 482e |H. | Short_Literal 0x2e
0dcb e604 | | Load 0x3,0x4
0dcc 01cb | | Execute Vector,Append
0dcd e603 | | Load 0x3,0x3
0dce 01cc | | Execute Vector,Catenate
0dcf 0092 0e69 | i| Action Push_String_Extended,0xe69 ; "_Tps"
0dd1 01cc | | Execute Vector,Catenate
0dd2 0007 | | Action Break_Optional
0dd3 BODY_0db8:
0dd3 4801 |H | Short_Literal 0x1
0dd4 e5ff | | Load 0x2,-0x1
0dd5 e604 | | Load 0x3,0x4
0dd6 822f | / | Call 0x1,0x2f
0dd7 680b |h | Jump_Zero 0xde3
0dd8 e5fc | | Load 0x2,-0x4
0dd9 e408 | | Load 0x2,0x8
0dda 01d7 | | Execute Vector,Field_Read
0ddb e603 | | Load 0x3,0x3
0ddc e00c | | Load 0x0,0xc
0ddd 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0dde e5ff | | Load 0x2,-0x1
0ddf 840b | | Call 0x2,0xb
0de0 4801 |H | Short_Literal 0x1
0de1 a405 | | Store_Unchecked 0x2,0x5
0de2 7830 |x0 | Jump 0xe13
0de3 e604 | | Load 0x3,0x4
0de4 821e | | Call 0x1,0x1e
0de5 6805 |h | Jump_Zero 0xdeb
0de6 e604 | | Load 0x3,0x4
0de7 e00b | | Load 0x0,0xb
0de8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0de9 c403 | | Store 0x2,0x3
0dea 7828 |x( | Jump 0xe13
0deb 00d8 | | Load_Top At_Offset_0
0dec 821e | | Call 0x1,0x1e
0ded 6805 |h | Jump_Zero 0xdf3
0dee 00d8 | | Load_Top At_Offset_0
0def e00b | | Load 0x0,0xb
0df0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0df1 c403 | | Store 0x2,0x3
0df2 7820 |x | Jump 0xe13
0df3 00d8 | | Load_Top At_Offset_0
0df4 e00b | | Load 0x0,0xb
0df5 180d | | Execute Package,Field_Execute,Field_Number 0xd
0df6 6810 |h | Jump_Zero 0xe07
0df7 e5f1 | | Load 0x2,-0xf
0df8 4803 |H | Short_Literal 0x3
0df9 0092 0e9c | | Action Push_String_Extended,0xe9c ; "Unable to create parent gateway named \x22"
0dfb e605 | | Load 0x3,0x5
0dfc 01cc | | Execute Vector,Catenate
0dfd 0092 0e9d | | Action Push_String_Extended,0xe9d ; "\x22. An object of this name already exists, and is not a TPS Object container gateway."
0dff 01cc | | Execute Vector,Catenate
0e00 00ea | | Load_Encached Null_String_Cache
0e01 e008 | | Load 0x0,0x8
0e02 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0e03 c5f1 | | Store 0x2,-0xf
0e04 4801 |H | Short_Literal 0x1
0e05 a405 | | Store_Unchecked 0x2,0x5
0e06 780c |x | Jump 0xe13
0e07 e406 | | Load 0x2,0x6
0e08 e40a | | Load 0x2,0xa
0e09 01d7 | | Execute Vector,Field_Read
0e0a e603 | | Load 0x3,0x3
0e0b e00c | | Load 0x0,0xc
0e0c 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0e0d e605 | | Load 0x3,0x5
0e0e 840b | | Call 0x2,0xb
0e0f 00d8 | | Load_Top At_Offset_0
0e10 e00b | | Load 0x0,0xb
0e11 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0e12 c403 | | Store 0x2,0x3
0e13 e604 | | Load 0x3,0x4
0e14 e00b | | Load 0x0,0xb
0e15 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0e16 c404 | | Store 0x2,0x4
0e17 4800 |H | Short_Literal 0x0
0e18 a406 | | Store_Unchecked 0x2,0x6
0e19 4801 |H | Short_Literal 0x1
0e1a e5f1 | | Load 0x2,-0xf
0e1b e008 | | Load 0x0,0x8
0e1c 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0e1d 6812 |h | Jump_Zero 0xe30
0e1e e004 | | Load 0x0,0x4
0e1f 180e | | Execute Package,Field_Execute,Field_Number 0xe
0e20 4807 |H | Short_Literal 0x7
0e21 0092 0e9e | | Action Push_String_Extended,0xe9e ; "Unable to create gateway \x22"
0e23 e5ff | | Load 0x2,-0x1
0e24 01cc | | Execute Vector,Catenate
0e25 0092 0e49 | I| Action Push_String_Extended,0xe49 ; "\x22: "
0e27 01cc | | Execute Vector,Catenate
0e28 e5f1 | | Load 0x2,-0xf
0e29 e008 | | Load 0x0,0x8
0e2a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0e2b 01cc | | Execute Vector,Catenate
0e2c e009 | | Load 0x0,0x9
0e2d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0e2e 4801 |H | Short_Literal 0x1
0e2f a405 | | Store_Unchecked 0x2,0x5
0e30 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0e31 0000 0000 | | .BLANK 0000[0x7]
0e38 ; --------------------------------------------------------------------------------------
0e38 ; SUBPROGRAM
0e38 ; --------------------------------------------------------------------------------------
0e38 0e3b | ; | .CONST 0x0e3b ; Address of begin
0e39 0e42 | B | .CONST 0x0e42 ; Address of exception handler
0e3a 0001 | | .CONST 0x0001 ; Number of locals
0e3b BODY_0e38:
0e3b INIT_0e38:
0e3b e604 | | Load 0x3,0x4
0e3c e00a | | Load 0x0,0xa
0e3d 1b25 | % | Execute Package,Field_Read,Field_Number 0x25
0e3e 1c02 | | Execute_Immediate Run_Utility,0x2
0e3f 00cb | | Action Pop_Block_With_Result
0e40 00cb | | Action Pop_Block_With_Result
0e41 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e42 TRAP_0e38:
0e42 0007 | | Action Break_Optional
0e43 4816 |H | Short_Literal 0x16
0e44 00cb | | Action Pop_Block_With_Result
0e45 00cb | | Action Pop_Block_With_Result
0e46 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0e47 ; --------------------------------------------------------------------------------------
0e47 ; STRING TABLE
0e47 ; --------------------------------------------------------------------------------------
0e47 00b2 | | .STRTAB 0x00b2->0x0ea0 ; "!MACHINE.GATEWAY_CLASSES.TPS_OBJECT.RPI_DOCUMENT_TEMPLATE"
0e48 00e9 | | .STRTAB 0x00e9->0x0ebc ; "Cannot create gateway \x22"
0e49 00fe | | .STRTAB 0x00fe->0x0ec8 ; "\x22: "
0e4a 00ff | | .STRTAB 0x00ff->0x0ec9 ; "Cannot create gateway: "
0e4b 0114 | | .STRTAB 0x0114->0x0ed5 ; "Created "
0e4c 011a | | .STRTAB 0x011a->0x0ed9 ; "<AUTO GENERATE>"
0e4d 0127 | ' | .STRTAB 0x0127->0x0ee0 ; "$."
0e4e 0127 | ' | .STRTAB 0x0127->0x0ee1 ; "<DEFAULT VIEW CABINET>"
0e4f 013b | ; | .STRTAB 0x013b->0x0eec ; "Initialization was not required because the object already exists on the TPS desktop"
0e50 018d | | .STRTAB 0x018d->0x0f16 ; "Unable to initialize data object for <1>"
0e51 01b3 | | .STRTAB 0x01b3->0x0f2a ; "No TPS desktop object was initialized for <1> because its Connected property is False"
0e52 0206 | | .STRTAB 0x0206->0x0f55 ; "True"
0e53 0208 | | .STRTAB 0x0208->0x0f57 ; "False"
0e54 020b | | .STRTAB 0x020b->0x0f59 ; "Unable to initialize TPS desktop object \x22"
0e55 0232 | 2 | .STRTAB 0x0232->0x0f6e ; "\x22 for <1>"
0e56 0239 | 9 | .STRTAB 0x0239->0x0f72 ; "TPS desktop object \x22"
0e57 024b | K | .STRTAB 0x024b->0x0f7c ; "\x22 was successfully initialized for <1>"
0e58 026f | o | .STRTAB 0x026f->0x0f8f ; "The enclosing object for \x22"
0e59 0287 | | .STRTAB 0x0287->0x0f9c ; "\x22 does not exist; unable to create gateway object."
0e5a 02b7 | | .STRTAB 0x02b7->0x0fb5 ; "All gateway objects are up to date"
0e5b 02d7 | | .STRTAB 0x02d7->0x0fc6 ; "s"
0e5c 02d6 | | .STRTAB 0x02d6->0x0fc7 ; "disconnected gateway"
0e5d 02e8 | | .STRTAB 0x02e8->0x0fd1 ; " not checked for changes on desktop"
0e5e 0309 | | .STRTAB 0x0309->0x0fe2 ; "inaccessible gateway"
0e5f 031b | | .STRTAB 0x031b->0x0fec ; " icon \x22"
0e60 0320 | | .STRTAB 0x0320->0x0ff0 ; "\x22 on host "
0e61 0328 | ( | .STRTAB 0x0328->0x0ff5 ; "\x0a<para>\x0aInitialized by the Rational Publishing Interface.\x0a"
0e62 0360 | ` | .STRTAB 0x0360->0x1012 ; "Unable to copy from !MACHINE.GATEWAY_CLASSES.TPS_OBJECT.RPI_DOCUMENT_TEMPLATE to "
0e63 03af | | .STRTAB 0x03af->0x103a ; "; check the existence and ACLs of the source file"
0e64 03de | | .STRTAB 0x03de->0x1053 ; "Copy failed"
0e65 03e7 | | .STRTAB 0x03e7->0x1058 ; "Cannot set property "
0e66 03f9 | | .STRTAB 0x03f9->0x1062 ; " to value "
0e67 0401 | | .STRTAB 0x0401->0x1067 ; " for gateway "
0e68 040c | | .STRTAB 0x040c->0x106e ; " : "
0e69 040d | | .STRTAB 0x040d->0x106f ; "_Tps"
0e6a 040f | | .STRTAB 0x040f->0x1071 ; "The parent gateway \x22"
0e6b 0421 | ! | .STRTAB 0x0421->0x107b ; "\x22 does not exist, or is not a container gateway."
0e6c 044f | O | .STRTAB 0x044f->0x1093 ; ": "
0e6d 044f | O | .STRTAB 0x044f->0x1094 ; "Unable to replace "
0e6e 045f | _ | .STRTAB 0x045f->0x109d ; " with a gateway object; "
0e6f 0475 | u | .STRTAB 0x0475->0x10a9 ; " already exists and will not be replaced"
0e70 049b | | .STRTAB 0x049b->0x10bd ; "Accepting changes into "
0e71 04b0 | | .STRTAB 0x04b0->0x10c9 ; " would overlay changes that have been"
0e72 04d3 | | .STRTAB 0x04d3->0x10db ; " made to the local gateway data."
0e73 04f1 | | .STRTAB 0x04f1->0x10eb ; " Set Force => True to do this."
0e74 050d | | .STRTAB 0x050d->0x10fa ; " would overlay local gateway data"
0e75 052c | , | .STRTAB 0x052c->0x110b ; " that appears to have been restored"
0e76 054d | M | .STRTAB 0x054d->0x111c ; " to a previous version."
0e77 0562 | b | .STRTAB 0x0562->0x1128 ; "Unable to accept changes into "
0e78 057e | ~ | .STRTAB 0x057e->0x1137 ; "; "
0e79 057e | ~ | .STRTAB 0x057e->0x1138 ; "Cannot accept changes into "
0e7a 0597 | | .STRTAB 0x0597->0x1145 ; " because "
0e7b 059e | | .STRTAB 0x059e->0x114a ; " does not exist."
0e7c 05ac | | .STRTAB 0x05ac->0x1152 ; " would retrieve data from the desktop"
0e7d 05cf | | .STRTAB 0x05cf->0x1164 ; " is up to date"
0e7e 05db | | .STRTAB 0x05db->0x116b ; "Successfully accepted changes into "
0e7f 05fc | | .STRTAB 0x05fc->0x117d ; " from "
0e80 0600 | | .STRTAB 0x0600->0x1180 ; " does not allow Accept_Changes"
0e81 061c | | .STRTAB 0x061c->0x118f ; " is not connected"
0e82 062b | + | .STRTAB 0x062b->0x1197 ; "Need to accept changes into "
0e83 0645 | E | .STRTAB 0x0645->0x11a5 ; "Putting changes from "
0e84 0658 | X | .STRTAB 0x0658->0x11b0 ; " made on the TPS desktop."
0e85 066f | o | .STRTAB 0x066f->0x11bc ; " would overlay data on the desktop"
0e86 068f | | .STRTAB 0x068f->0x11cd ; "Unable to put changes from "
0e87 06a8 | | .STRTAB 0x06a8->0x11db ; "Cannot put changes from "
0e88 06be | | .STRTAB 0x06be->0x11e7 ; " would send local gateway data"
0e89 06da | | .STRTAB 0x06da->0x11f6 ; "Successfully put changes from "
0e8a 06f6 | | .STRTAB 0x06f6->0x1205 ; " to "
0e8b 06f8 | | .STRTAB 0x06f8->0x1207 ; " does not allow Put_Changes"
0e8c 0711 | | .STRTAB 0x0711->0x1214 ; "Need to put changes from "
0e8d 0728 | ( | .STRTAB 0x0728->0x1221 ; "* "
0e8e 0728 | ( | .STRTAB 0x0728->0x1222 ; " "
0e8f 0728 | ( | .STRTAB 0x0728->0x1223 ; " unable to obtain update time"
0e90 0744 | D | .STRTAB 0x0744->0x1232 ; " disconnected"
0e91 0750 | P | .STRTAB 0x0750->0x1239 ; "Need to create archive for "
0e92 0769 | i | .STRTAB 0x0769->0x1246 ; "Creating archive for "
0e93 077c | | | .STRTAB 0x077c->0x1251 ; "Unable to save archive of "
0e94 0794 | | .STRTAB 0x0794->0x125e ; " archive has been successfully created"
0e95 07b8 | | .STRTAB 0x07b8->0x1271 ; "Need to restore archive for "
0e96 07d2 | | .STRTAB 0x07d2->0x127f ; "Restoring archive for "
0e97 07e6 | | .STRTAB 0x07e6->0x128a ; "Unable to restore archive of "
0e98 0801 | | .STRTAB 0x0801->0x1298 ; " archive has been successfully restored"
0e99 0826 | & | .STRTAB 0x0826->0x12ac ; "CATALOG"
0e9a 082b | + | .STRTAB 0x082b->0x12af ; "$$."
0e9b 082c | , | .STRTAB 0x082c->0x12b1 ; "<Parent>"
0e9c 0832 | 2 | .STRTAB 0x0832->0x12b5 ; "Unable to create parent gateway named \x22"
0e9d 0857 | W | .STRTAB 0x0857->0x12c8 ; "\x22. An object of this name already exists, and is not a TPS Object container gateway."
0e9e 08a9 | | .STRTAB 0x08a9->0x12f2 ; "Unable to create gateway \x22"
0e9f 08c1 | | .STREND 0x08c1->0x12ff
0ea0 214d 4143 |!MAC| .STRTAB_STRINGS
1300 ; --------------------------------------------------------------------------------------
1300 ; Debug Table
1300 ; --------------------------------------------------------------------------------------
1300 0004 0012 | | .DEBUG4 0x0004,0x0012,0xcea0,0x0000,0x0001,0x0000
1306 2e3c 12d9 |.< | .XXX[0xfa]
1308 6457 6d3e |dWm>|
130a 02dd f5f1 | |
130c b687 3d37 | =7|
130e c0c3 5a3f | Z?|
1310 f8c3 79e9 | y |
1312 ce87 bd3f | ?|
1314 763c 90c7 |v< |
1316 91e8 56db | V |
1318 f99b 8e3f | ?|
131a fe89 6a39 | j9|
131c eb3a 0684 | : |
131e 80c6 5edf | ^ |
1320 ed3d de86 | = |
1322 1a84 419f | A |
1324 c23e 76dc | >v |
1326 96d9 1196 | |
1328 86dc 6d9e | m |
132a 8ede 22dd | " |
132c 1654 628c | Tb |
132e 9a8e a2dc | |
1330 c2da 4684 | F |
1332 7a8c 9a8e |z |
1334 bedf c590 | |
1336 ded8 859c | |
1338 3a41 bcc5 |:A |
133a fa3a 92f2 | : |
133c 0238 bd40 | 8 @|
133e b68d bcc7 | |
1340 5715 299e |W ) |
1342 a287 1a85 | |
1344 1ccb 6c12 | l |
1346 263a 58c5 |&:X |
1348 22d9 fed9 |" |
134a fe59 7eda | Y~ |
134c 3edb cadb |> |
134e e8c4 4867 | Hg|
1350 1687 6687 | f |
1352 a8c4 d33e | >|
1354 7a38 ad3a |z8 :|
1356 ea86 58c5 | X |
1358 52da fed8 |R |
135a 00c9 0b3f | ?|
135c 8a7a 0595 | z |
135e 09c5 2edb | . |
1360 1dc0 0003 | |
1362 b8c5 6a66 | jf|
1364 3938 e73f |98 ?|
1366 2285 3b3e |" ;>|
1368 3196 58c5 |1 X |
136a 09ef 2a39 | *9|
136c 533d 287d |S=(}|
136e a2db 4286 | B |
1370 268b 4a86 |& J |
1372 d63a ec42 | : B|
1374 de38 1528 | 8 (|
1376 2006 7995 | y |
1378 6b3d 2b3f |k=+?|
137a 6e85 d6d8 |n |
137c fca5 59ee | Y |
137e 58c5 e6d8 |X |
1380 e33d a33c | = <|
1382 408b 2a85 |@ * |
1384 30ca d167 |0 g|
1386 9a85 9f3d | =|
1388 91ed b53b | ;|
138a a686 0edb | |
138c 3e39 b80d |>9 |
138e cd39 ce4d | 9 M|
1390 b1ee 26da | & |
1392 3f18 f8ba |? |
1394 cd83 e287 | |
1396 d687 302b | 0+|
1398 de86 36db | 6 |
139a e686 4ad9 | J |
139c 6483 7a3a |d z:|
139e 56d9 f1ee |V |
13a0 5ed9 35ed |^ 5 |
13a2 468c 3289 |F 2 |
13a4 a939 6f3f | 9o?|
13a6 9e38 2289 | 8" |
13a8 6c9a e23b |l ;|
13aa bdf2 ea39 | 9|
13ac bf3e 5dee | >] |
13ae aada 7ada | z |
13b0 5f3e 853b |_> ;|
13b2 b6ff ce39 | 9|
13b4 4f3d c33e |O= >|
13b6 11ef a23a | :|
13b8 b2d8 b06f | o|
13ba f23a 79ee | :y |
13bc c2d8 7a89 | z |
13be 5f20 8c2e |_ .|
13c0 95ef 89cc | |
13c2 163d f726 | = &|
13c4 acca f93a | :|
13c6 eed8 2a3f | *?|
13c8 b6fe fad8 | |
13ca cb3d 073e | = >|
13cc 733c 3a12 |s<: |
13ce 7c2a e8cb ||* |
13d0 6017 12da |` |
13d2 f8c8 d28a | |
13d4 e9ef 3ed9 | > |
13d6 782c e28a |x, |
13d8 fdec 6e3f | n?|
13da 09ef 7938 | y8|
13dc 7a3c fa8b |z< |
13de 46db 133c |F <|
13e0 759b 29ec |u ) |
13e2 963d 128b | = |
13e4 35ed 1e88 |5 |
13e6 a63f b6fc | ? |
13e8 999b c538 | 8|
13ea cd98 be3d | =|
13ec 3a8b 633c |: c<|
13ee 013d 4a88 | =J |
13f0 d63f 72db | ?r |
13f2 9adb 7ded | } |
13f4 668b 89ec |f |
13f6 213e f0c7 |!> |
13f8 99ee 9eb3 | |
13fa e26b cd83 | k |
13fc aded 9720 | |
13fe 1542 f8c7 | B |