|
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: 6144 (0x1800) Notes: 00_class, 5900_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03c8f4
└─⟦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 5900 |Y | .CONST 0x5900 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 0bf0 | | .CONST 0x0bf0 ; 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 8008 | | .CONST 0x8008 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0115 | | .CONST 0x0115 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 002f | / | .CONST 0x002f ; Number of locals 000b INIT_0008: 000b 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated 000d 029a 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call,Visible,Unelaborated 000f 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated 0011 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated 0013 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated 0015 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated 0017 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated 0019 029a 01f3 | | Declare_Subprogram INIT_01f0,For_Outer_Call,Visible,Unelaborated 001b 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated 001d 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated 001f 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated 0021 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated 0023 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 0025 029a 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call,Visible,Unelaborated 0027 029a 02bb | | Declare_Subprogram INIT_02b8,For_Outer_Call,Visible,Unelaborated 0029 029a 02e3 | | Declare_Subprogram INIT_02e0,For_Outer_Call,Visible,Unelaborated 002b 029a 0303 | | Declare_Subprogram INIT_0300,For_Outer_Call,Visible,Unelaborated 002d 4800 |H | Short_Literal 0x0 002e 0093 0913 | | push_full_address INIT_0910 0030 02a0 | | Declare_Subprogram Null_Subprogram 0031 038f | | Declare_Type Package,Defined,Visible 0032 0386 | | Declare_Variable Package,Visible 0033 4800 |H | Short_Literal 0x0 0034 0093 0753 | S| push_full_address INIT_0750 0036 02a0 | | Declare_Subprogram Null_Subprogram 0037 038f | | Declare_Type Package,Defined,Visible 0038 0386 | | Declare_Variable Package,Visible 0039 4800 |H | Short_Literal 0x0 003a 0093 0653 | S| push_full_address INIT_0650 003c 02a0 | | Declare_Subprogram Null_Subprogram 003d 038f | | Declare_Type Package,Defined,Visible 003e 0386 | | Declare_Variable Package,Visible 003f 4800 |H | Short_Literal 0x0 0040 0093 05a3 | | push_full_address INIT_05a0 0042 02a0 | | Declare_Subprogram Null_Subprogram 0043 038f | | Declare_Type Package,Defined,Visible 0044 0386 | | Declare_Variable Package,Visible 0045 4800 |H | Short_Literal 0x0 0046 0093 04e3 | | push_full_address INIT_04e0 0048 02a0 | | Declare_Subprogram Null_Subprogram 0049 038f | | Declare_Type Package,Defined,Visible 004a 0386 | | Declare_Variable Package,Visible 004b 4800 |H | Short_Literal 0x0 004c 0093 040b | | push_full_address INIT_0408 004e 02a0 | | Declare_Subprogram Null_Subprogram 004f 038f | | Declare_Type Package,Defined,Visible 0050 0386 | | Declare_Variable Package,Visible 0051 4800 |H | Short_Literal 0x0 0052 0093 0343 | C| push_full_address INIT_0340 0054 02a0 | | Declare_Subprogram Null_Subprogram 0055 038f | | Declare_Type Package,Defined,Visible 0056 0386 | | Declare_Variable Package,Visible 0057 0093 0000 | | push_full_address 0x0 0059 60ca |` | Indirect_Literal Discrete,0x124,{0x80000000, 0x00010000} 005a 0273 | s | Execute Discrete,Plus 005b 0129 | ) | Execute Any,Make_Visible 005c 00bf | | Action Accept_Activation 005d 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 005f e002 | | Load 0x0,0x2 0060 0007 | | Action Break_Optional 0061 4800 |H | Short_Literal 0x0 0062 8003 | | Call 0x0,0x3 0063 0092 0adc | | Action Push_String_Extended,0xadc ; "Shut_down" 0065 0092 0add | | Action Push_String_Extended,0xadd ; "Query" 0067 0092 0ade | | Action Push_String_Extended,0xade ; "Query_reply" 0069 0092 0adf | | Action Push_String_Extended,0xadf ; "behavior_id" 006b 0092 0ae0 | | Action Push_String_Extended,0xae0 ; "behavior_class" 006d 1d0d | | Execute_Immediate Reference_Lex_1,0xd 006e 00c7 | | Action Elaborate_Subprogram 006f 029d 0313 | | Declare_Subprogram INIT_0310,For_Outer_Call 0071 029d 0333 | 3| Declare_Subprogram INIT_0330,For_Outer_Call 0073 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0074 00c7 | | Action Elaborate_Subprogram 0075 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0076 00c7 | | Action Elaborate_Subprogram 0077 e004 | | Load 0x0,0x4 0078 e005 | | Load 0x0,0x5 0079 a006 | | Store_Unchecked 0x0,0x6 007a a007 | | Store_Unchecked 0x0,0x7 007b e228 | ( | Load 0x1,0x28 007c e227 | ' | Load 0x1,0x27 007d a008 | | Store_Unchecked 0x0,0x8 007e 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 007f 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0080 a009 | | Store_Unchecked 0x0,0x9 0081 e00a | | Load 0x0,0xa 0082 e225 | % | Load 0x1,0x25 0083 a00b | | Store_Unchecked 0x0,0xb 0084 e00c | | Load 0x0,0xc 0085 a00d | | Store_Unchecked 0x0,0xd 0086 480f |H | Short_Literal 0xf 0087 e21f | | Load 0x1,0x1f 0088 020e | | Execute Module,Augment_Imports 0089 e21f | | Load 0x1,0x1f 008a 020f | | Execute Module,Activate 008b e004 | | Load 0x0,0x4 008c e005 | | Load 0x0,0x5 008d a00e | | Store_Unchecked 0x0,0xe 008e a007 | | Store_Unchecked 0x0,0x7 008f e228 | ( | Load 0x1,0x28 0090 e227 | ' | Load 0x1,0x27 0091 a008 | | Store_Unchecked 0x0,0x8 0092 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0093 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 0094 a009 | | Store_Unchecked 0x0,0x9 0095 e225 | % | Load 0x1,0x25 0096 a00f | | Store_Unchecked 0x0,0xf 0097 a010 | | Store_Unchecked 0x0,0x10 0098 480d |H | Short_Literal 0xd 0099 e220 | | Load 0x1,0x20 009a 020e | | Execute Module,Augment_Imports 009b e220 | | Load 0x1,0x20 009c 020f | | Execute Module,Activate 009d e005 | | Load 0x0,0x5 009e e004 | | Load 0x0,0x4 009f a006 | | Store_Unchecked 0x0,0x6 00a0 a007 | | Store_Unchecked 0x0,0x7 00a1 e228 | ( | Load 0x1,0x28 00a2 e227 | ' | Load 0x1,0x27 00a3 a008 | | Store_Unchecked 0x0,0x8 00a4 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00a5 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00a6 a009 | | Store_Unchecked 0x0,0x9 00a7 e225 | % | Load 0x1,0x25 00a8 480b |H | Short_Literal 0xb 00a9 e221 | ! | Load 0x1,0x21 00aa 020e | | Execute Module,Augment_Imports 00ab e221 | ! | Load 0x1,0x21 00ac 020f | | Execute Module,Activate 00ad e005 | | Load 0x0,0x5 00ae e004 | | Load 0x0,0x4 00af a006 | | Store_Unchecked 0x0,0x6 00b0 a007 | | Store_Unchecked 0x0,0x7 00b1 e228 | ( | Load 0x1,0x28 00b2 e227 | ' | Load 0x1,0x27 00b3 a008 | | Store_Unchecked 0x0,0x8 00b4 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00b5 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00b6 a009 | | Store_Unchecked 0x0,0x9 00b7 e225 | % | Load 0x1,0x25 00b8 a00d | | Store_Unchecked 0x0,0xd 00b9 480c |H | Short_Literal 0xc 00ba e222 | " | Load 0x1,0x22 00bb 020e | | Execute Module,Augment_Imports 00bc e222 | " | Load 0x1,0x22 00bd 020f | | Execute Module,Activate 00be e005 | | Load 0x0,0x5 00bf e004 | | Load 0x0,0x4 00c0 a00e | | Store_Unchecked 0x0,0xe 00c1 a007 | | Store_Unchecked 0x0,0x7 00c2 e228 | ( | Load 0x1,0x28 00c3 e227 | ' | Load 0x1,0x27 00c4 a008 | | Store_Unchecked 0x0,0x8 00c5 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00c6 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00c7 a009 | | Store_Unchecked 0x0,0x9 00c8 e225 | % | Load 0x1,0x25 00c9 480b |H | Short_Literal 0xb 00ca e223 | # | Load 0x1,0x23 00cb 020e | | Execute Module,Augment_Imports 00cc e223 | # | Load 0x1,0x23 00cd 020f | | Execute Module,Activate 00ce e005 | | Load 0x0,0x5 00cf e004 | | Load 0x0,0x4 00d0 a006 | | Store_Unchecked 0x0,0x6 00d1 a007 | | Store_Unchecked 0x0,0x7 00d2 e228 | ( | Load 0x1,0x28 00d3 e227 | ' | Load 0x1,0x27 00d4 a008 | | Store_Unchecked 0x0,0x8 00d5 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00d6 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00d7 a009 | | Store_Unchecked 0x0,0x9 00d8 e225 | % | Load 0x1,0x25 00d9 480b |H | Short_Literal 0xb 00da e224 | $ | Load 0x1,0x24 00db 020e | | Execute Module,Augment_Imports 00dc e224 | $ | Load 0x1,0x24 00dd 020f | | Execute Module,Activate 00de 1d10 | | Execute_Immediate Reference_Lex_1,0x10 00df 00c7 | | Action Elaborate_Subprogram 00e0 1d11 | | Execute_Immediate Reference_Lex_1,0x11 00e1 00c7 | | Action Elaborate_Subprogram 00e2 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00e3 00c7 | | Action Elaborate_Subprogram 00e4 1d13 | | Execute_Immediate Reference_Lex_1,0x13 00e5 00c7 | | Action Elaborate_Subprogram 00e6 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00e7 00c7 | | Action Elaborate_Subprogram 00e8 1d15 | | Execute_Immediate Reference_Lex_1,0x15 00e9 00c7 | | Action Elaborate_Subprogram 00ea 1d16 | | Execute_Immediate Reference_Lex_1,0x16 00eb 00c7 | | Action Elaborate_Subprogram 00ec 1d17 | | Execute_Immediate Reference_Lex_1,0x17 00ed 00c7 | | Action Elaborate_Subprogram 00ee 1d18 | | Execute_Immediate Reference_Lex_1,0x18 00ef 00c7 | | Action Elaborate_Subprogram 00f0 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00f1 00c7 | | Action Elaborate_Subprogram 00f2 1d1a | | Execute_Immediate Reference_Lex_1,0x1a 00f3 00c7 | | Action Elaborate_Subprogram 00f4 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00f5 00c7 | | Action Elaborate_Subprogram 00f6 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00f7 00c7 | | Action Elaborate_Subprogram 00f8 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00f9 00c7 | | Action Elaborate_Subprogram 00fa e005 | | Load 0x0,0x5 00fb e004 | | Load 0x0,0x4 00fc a00d | | Store_Unchecked 0x0,0xd 00fd a007 | | Store_Unchecked 0x0,0x7 00fe e228 | ( | Load 0x1,0x28 00ff e227 | ' | Load 0x1,0x27 0100 a008 | | Store_Unchecked 0x0,0x8 0101 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 0102 a006 | | Store_Unchecked 0x0,0x6 0103 e011 | | Load 0x0,0x11 0104 a012 | | Store_Unchecked 0x0,0x12 0105 a013 | | Store_Unchecked 0x0,0x13 0106 a014 | | Store_Unchecked 0x0,0x14 0107 a015 | | Store_Unchecked 0x0,0x15 0108 a016 | | Store_Unchecked 0x0,0x16 0109 a017 | | Store_Unchecked 0x0,0x17 010a a018 | | Store_Unchecked 0x0,0x18 010b a009 | | Store_Unchecked 0x0,0x9 010c e225 | % | Load 0x1,0x25 010d e019 | | Load 0x0,0x19 010e a01a | | Store_Unchecked 0x0,0x1a 010f 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0110 4816 |H | Short_Literal 0x16 0111 e21e | | Load 0x1,0x1e 0112 020e | | Execute Module,Augment_Imports 0113 e21e | | Load 0x1,0x1e 0114 020f | | Execute Module,Activate 0115 BODY_0008: 0115 00bc | | Action Signal_Activated 0116 00bb | | Action Signal_Completion 0117 0000 | | .XXX[0x1] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 4801 |H | Short_Literal 0x1 011c e226 | & | Load 0x1,0x26 011d e5ff | | Load 0x2,-0x1 011e 8012 | | Call 0x0,0x12 011f 801b | | Call 0x0,0x1b 0120 801c | | Call 0x0,0x1c 0121 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0122 0000 0000 | | .XXX[0x2] 0124 8000 0000 | | .LITERAL {0x80000000, 0x00010000} 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 0133 | 3 | .CONST 0x0133 ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0003 | | .CONST 0x0003 ; Number of locals 012b INIT_0128: 012b e004 | | Load 0x0,0x4 012c 0322 | " | Declare_Variable Record 012d 00d8 | | Load_Top At_Offset_0 012e 1c00 | | Execute_Immediate Run_Utility,0x0 012f e005 | | Load 0x0,0x5 0130 0322 | " | Declare_Variable Record 0131 00d8 | | Load_Top At_Offset_0 0132 1c00 | | Execute_Immediate Run_Utility,0x0 0133 BODY_0128: 0133 00d8 | | Load_Top At_Offset_0 0134 4800 |H | Short_Literal 0x0 0135 801a | | Call 0x0,0x1a 0136 00d1 | | Pop_Control Pop_Count_1 0137 00d9 | | Load_Top At_Offset_1 0138 00d9 | | Load_Top At_Offset_1 0139 e226 | & | Load 0x1,0x26 013a e229 | ) | Load 0x1,0x29 013b 8007 | | Call 0x0,0x7 013c 00d1 | | Pop_Control Pop_Count_1 013d 00d9 | | Load_Top At_Offset_1 013e e228 | ( | Load 0x1,0x28 013f e227 | ' | Load 0x1,0x27 0140 e5fe | | Load 0x2,-0x2 0141 e5ff | | Load 0x2,-0x1 0142 4800 |H | Short_Literal 0x0 0143 8008 | | Call 0x0,0x8 0144 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0145 0000 0000 | | .XXX[0x3] 0147 0000 | | 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b 00da | | Load_Top At_Offset_2 014c 820d | | Call 0x1,0xd 014d 6804 |h | Jump_Zero 0x152 014e e229 | ) | Load 0x1,0x29 014f 00db | | Load_Top At_Offset_3 0150 822e | . | Call 0x1,0x2e 0151 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0152 4800 |H | Short_Literal 0x0 0153 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0154 0000 0000 | | .BLANK 0000[0x4] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 0158 ; -------------------------------------------------------------------------------------- 0158 015f | _ | .CONST 0x015f ; Address of begin 0159 0004 | | .CONST 0x0004 ; Address of exception handler 015a 0002 | | .CONST 0x0002 ; Number of locals 015b INIT_0158: 015b e019 | | Load 0x0,0x19 015c 0322 | " | Declare_Variable Record 015d 00d8 | | Load_Top At_Offset_0 015e 1c00 | | Execute_Immediate Run_Utility,0x0 015f BODY_0158: 015f 4801 |H | Short_Literal 0x1 0160 e5fd | | Load 0x2,-0x3 0161 e5fe | | Load 0x2,-0x2 0162 e5ff | | Load 0x2,-0x1 0163 8213 | | Call 0x1,0x13 0164 00d9 | | Load_Top At_Offset_1 0165 017d | } | Execute Record,Structure_Write 0166 00d8 | | Load_Top At_Offset_0 0167 e5fa | | Load 0x2,-0x6 0168 e5fb | | Load 0x2,-0x5 0169 e5fc | | Load 0x2,-0x4 016a 4801 |H | Short_Literal 0x1 016b 8214 | | Call 0x1,0x14 016c 00d1 | | Pop_Control Pop_Count_1 016d 00d8 | | Load_Top At_Offset_0 016e 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 016f 0000 | | .XXX[0x1] 0170 ; -------------------------------------------------------------------------------------- 0170 ; SUBPROGRAM 0170 ; -------------------------------------------------------------------------------------- 0170 0177 | w | .CONST 0x0177 ; Address of begin 0171 0004 | | .CONST 0x0004 ; Address of exception handler 0172 0002 | | .CONST 0x0002 ; Number of locals 0173 INIT_0170: 0173 e019 | | Load 0x0,0x19 0174 0322 | " | Declare_Variable Record 0175 00d8 | | Load_Top At_Offset_0 0176 1c00 | | Execute_Immediate Run_Utility,0x0 0177 BODY_0170: 0177 4802 |H | Short_Literal 0x2 0178 e5fd | | Load 0x2,-0x3 0179 e5fe | | Load 0x2,-0x2 017a e5ff | | Load 0x2,-0x1 017b 8213 | | Call 0x1,0x13 017c 00d9 | | Load_Top At_Offset_1 017d 017d | } | Execute Record,Structure_Write 017e 00d8 | | Load_Top At_Offset_0 017f e5fa | | Load 0x2,-0x6 0180 e5fb | | Load 0x2,-0x5 0181 e5fc | | Load 0x2,-0x4 0182 4801 |H | Short_Literal 0x1 0183 8214 | | Call 0x1,0x14 0184 00d1 | | Pop_Control Pop_Count_1 0185 00d8 | | Load_Top At_Offset_0 0186 e5f7 | | Load 0x2,-0x9 0187 e5f8 | | Load 0x2,-0x8 0188 e5f9 | | Load 0x2,-0x7 0189 4802 |H | Short_Literal 0x2 018a 8214 | | Call 0x1,0x14 018b 00d1 | | Pop_Control Pop_Count_1 018c 00d8 | | Load_Top At_Offset_0 018d 4409 |D | Exit_Subprogram With_Value,New_Top_Offset 0x9 018e 0000 0000 | | .XXX[0x2] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0197 | | .CONST 0x0197 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0002 | | .CONST 0x0002 ; Number of locals 0193 INIT_0190: 0193 e019 | | Load 0x0,0x19 0194 0322 | " | Declare_Variable Record 0195 00d8 | | Load_Top At_Offset_0 0196 1c00 | | Execute_Immediate Run_Utility,0x0 0197 BODY_0190: 0197 4803 |H | Short_Literal 0x3 0198 e5fd | | Load 0x2,-0x3 0199 e5fe | | Load 0x2,-0x2 019a e5ff | | Load 0x2,-0x1 019b 8213 | | Call 0x1,0x13 019c 00d9 | | Load_Top At_Offset_1 019d 017d | } | Execute Record,Structure_Write 019e 00d8 | | Load_Top At_Offset_0 019f e5fa | | Load 0x2,-0x6 01a0 e5fb | | Load 0x2,-0x5 01a1 e5fc | | Load 0x2,-0x4 01a2 4801 |H | Short_Literal 0x1 01a3 8214 | | Call 0x1,0x14 01a4 00d1 | | Pop_Control Pop_Count_1 01a5 00d8 | | Load_Top At_Offset_0 01a6 e5f7 | | Load 0x2,-0x9 01a7 e5f8 | | Load 0x2,-0x8 01a8 e5f9 | | Load 0x2,-0x7 01a9 4802 |H | Short_Literal 0x2 01aa 8214 | | Call 0x1,0x14 01ab 00d1 | | Pop_Control Pop_Count_1 01ac 00d8 | | Load_Top At_Offset_0 01ad e5f4 | | Load 0x2,-0xc 01ae e5f5 | | Load 0x2,-0xb 01af e5f6 | | Load 0x2,-0xa 01b0 4803 |H | Short_Literal 0x3 01b1 8214 | | Call 0x1,0x14 01b2 00d1 | | Pop_Control Pop_Count_1 01b3 00d8 | | Load_Top At_Offset_0 01b4 440c |D | Exit_Subprogram With_Value,New_Top_Offset 0xc 01b5 0000 0000 | | .XXX[0x3] 01b7 0000 | | 01b8 ; -------------------------------------------------------------------------------------- 01b8 ; SUBPROGRAM 01b8 ; -------------------------------------------------------------------------------------- 01b8 01c7 | | .CONST 0x01c7 ; Address of begin 01b9 0004 | | .CONST 0x0004 ; Address of exception handler 01ba 0004 | | .CONST 0x0004 ; Number of locals 01bb INIT_01b8: 01bb e011 | | Load 0x0,0x11 01bc 0322 | " | Declare_Variable Record 01bd 00d8 | | Load_Top At_Offset_0 01be 1c00 | | Execute_Immediate Run_Utility,0x0 01bf e005 | | Load 0x0,0x5 01c0 0322 | " | Declare_Variable Record 01c1 00d8 | | Load_Top At_Offset_0 01c2 1c00 | | Execute_Immediate Run_Utility,0x0 01c3 e004 | | Load 0x0,0x4 01c4 0322 | " | Declare_Variable Record 01c5 00d8 | | Load_Top At_Offset_0 01c6 1c00 | | Execute_Immediate Run_Utility,0x0 01c7 BODY_01b8: 01c7 00d9 | | Load_Top At_Offset_1 01c8 e5fc | | Load 0x2,-0x4 01c9 0a01 | | Execute_Immediate Plus,0x1 01ca 00d8 | | Load_Top At_Offset_0 01cb e01d | | Load 0x0,0x1d 01cc 0260 | ` | Execute Discrete,In_Type 01cd 7001 |p | Jump_Nonzero 0x1cf 01ce 0801 | | Execute_Immediate Raise,0x1 01cf 801a | | Call 0x0,0x1a 01d0 00d1 | | Pop_Control Pop_Count_1 01d1 00da | | Load_Top At_Offset_2 01d2 e5fd | | Load 0x2,-0x3 01d3 00ea | | Load_Encached Null_String_Cache 01d4 4800 |H | Short_Literal 0x0 01d5 e22d | - | Load 0x1,0x2d 01d6 801e | | Call 0x0,0x1e 01d7 00d1 | | Pop_Control Pop_Count_1 01d8 00d9 | | Load_Top At_Offset_1 01d9 4801 |H | Short_Literal 0x1 01da e402 | | Load 0x2,0x2 01db 8016 | | Call 0x0,0x16 01dc 00d1 | | Pop_Control Pop_Count_1 01dd 00d8 | | Load_Top At_Offset_0 01de 00da | | Load_Top At_Offset_2 01df e226 | & | Load 0x1,0x26 01e0 e22a | * | Load 0x1,0x2a 01e1 8007 | | Call 0x0,0x7 01e2 00d1 | | Pop_Control Pop_Count_1 01e3 00d8 | | Load_Top At_Offset_0 01e4 e228 | ( | Load 0x1,0x28 01e5 e227 | ' | Load 0x1,0x27 01e6 e5fe | | Load 0x2,-0x2 01e7 e5ff | | Load 0x2,-0x1 01e8 4800 |H | Short_Literal 0x0 01e9 8008 | | Call 0x0,0x8 01ea 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 01eb 0000 0000 | | .BLANK 0000[0x5] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01fb | | .CONST 0x01fb ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0003 | | .CONST 0x0003 ; Number of locals 01f3 INIT_01f0: 01f3 e005 | | Load 0x0,0x5 01f4 0322 | " | Declare_Variable Record 01f5 00d8 | | Load_Top At_Offset_0 01f6 1c00 | | Execute_Immediate Run_Utility,0x0 01f7 e004 | | Load 0x0,0x4 01f8 0322 | " | Declare_Variable Record 01f9 00d8 | | Load_Top At_Offset_0 01fa 1c00 | | Execute_Immediate Run_Utility,0x0 01fb BODY_01f0: 01fb e5fb | | Load 0x2,-0x5 01fc 8012 | | Call 0x0,0x12 01fd 00d9 | | Load_Top At_Offset_1 01fe 017d | } | Execute Record,Structure_Write 01ff 00d8 | | Load_Top At_Offset_0 0200 8013 | | Call 0x0,0x13 0201 00da | | Load_Top At_Offset_2 0202 017d | } | Execute Record,Structure_Write 0203 e5ff | | Load 0x2,-0x1 0204 00da | | Load_Top At_Offset_2 0205 801f | | Call 0x0,0x1f 0206 027d | } | Execute Discrete,Greater 0207 6802 |h | Jump_Zero 0x20a 0208 e225 | % | Load 0x1,0x25 0209 0257 | W | Execute Discrete,Raise 020a 00d9 | | Load_Top At_Offset_1 020b e5ff | | Load 0x2,-0x1 020c 0a01 | | Execute_Immediate Plus,0x1 020d 00d8 | | Load_Top At_Offset_0 020e e01d | | Load 0x0,0x1d 020f 0260 | ` | Execute Discrete,In_Type 0210 7001 |p | Jump_Nonzero 0x212 0211 0801 | | Execute_Immediate Raise,0x1 0212 e5fc | | Load 0x2,-0x4 0213 e5fe | | Load 0x2,-0x2 0214 4800 |H | Short_Literal 0x0 0215 e5fd | | Load 0x2,-0x3 0216 8020 | | Call 0x0,0x20 0217 8016 | | Call 0x0,0x16 0218 00d1 | | Pop_Control Pop_Count_1 0219 00d8 | | Load_Top At_Offset_0 021a 00da | | Load_Top At_Offset_2 021b 8017 | | Call 0x0,0x17 021c 00d1 | | Pop_Control Pop_Count_1 021d e5fb | | Load 0x2,-0x5 021e 00d9 | | Load_Top At_Offset_1 021f 8018 | | Call 0x0,0x18 0220 00d1 | | Pop_Control Pop_Count_1 0221 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0222 0000 0000 | | .BLANK 0000[0x6] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022b | + | .CONST 0x022b ; Address of begin 0229 0004 | | .CONST 0x0004 ; Address of exception handler 022a 0001 | | .CONST 0x0001 ; Number of locals 022b BODY_0228: 022b INIT_0228: 022b 4801 |H | Short_Literal 0x1 022c 00db | | Load_Top At_Offset_3 022d 8012 | | Call 0x0,0x12 022e 8013 | | Call 0x0,0x13 022f 8014 | | Call 0x0,0x14 0230 8009 | | Call 0x0,0x9 0231 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0232 0000 0000 | | .BLANK 0000[0x6] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023b | ; | .CONST 0x023b ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0001 | | .CONST 0x0001 ; Number of locals 023b BODY_0238: 023b INIT_0238: 023b 00da | | Load_Top At_Offset_2 023c 8012 | | Call 0x0,0x12 023d 8013 | | Call 0x0,0x13 023e 801f | | Call 0x0,0x1f 023f 0aff | | Execute_Immediate Plus,-0x1 0240 00d8 | | Load_Top At_Offset_0 0241 e01d | | Load 0x0,0x1d 0242 0260 | ` | Execute Discrete,In_Type 0243 7001 |p | Jump_Nonzero 0x245 0244 0801 | | Execute_Immediate Raise,0x1 0245 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0246 0000 0000 | | .XXX[0x2] 0248 ; -------------------------------------------------------------------------------------- 0248 ; SUBPROGRAM 0248 ; -------------------------------------------------------------------------------------- 0248 024f | O | .CONST 0x024f ; Address of begin 0249 0004 | | .CONST 0x0004 ; Address of exception handler 024a 0002 | | .CONST 0x0002 ; Number of locals 024b INIT_0248: 024b e005 | | Load 0x0,0x5 024c 0322 | " | Declare_Variable Record 024d 00d8 | | Load_Top At_Offset_0 024e 1c00 | | Execute_Immediate Run_Utility,0x0 024f BODY_0248: 024f 00db | | Load_Top At_Offset_3 0250 8012 | | Call 0x0,0x12 0251 8013 | | Call 0x0,0x13 0252 00d9 | | Load_Top At_Offset_1 0253 017d | } | Execute Record,Structure_Write 0254 e5fe | | Load 0x2,-0x2 0255 00d9 | | Load_Top At_Offset_1 0256 801f | | Call 0x0,0x1f 0257 027d | } | Execute Discrete,Greater 0258 6802 |h | Jump_Zero 0x25b 0259 e225 | % | Load 0x1,0x25 025a 0257 | W | Execute Discrete,Raise 025b e5fe | | Load 0x2,-0x2 025c 0a01 | | Execute_Immediate Plus,0x1 025d 00d8 | | Load_Top At_Offset_0 025e e01d | | Load 0x0,0x1d 025f 0260 | ` | Execute Discrete,In_Type 0260 7001 |p | Jump_Nonzero 0x262 0261 0801 | | Execute_Immediate Raise,0x1 0262 00d9 | | Load_Top At_Offset_1 0263 8014 | | Call 0x0,0x14 0264 800f | | Call 0x0,0xf 0265 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0266 0000 0000 | | .XXX[0x2] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026f | o | .CONST 0x026f ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0002 | | .CONST 0x0002 ; Number of locals 026b INIT_0268: 026b e005 | | Load 0x0,0x5 026c 0322 | " | Declare_Variable Record 026d 00d8 | | Load_Top At_Offset_0 026e 1c00 | | Execute_Immediate Run_Utility,0x0 026f BODY_0268: 026f 00db | | Load_Top At_Offset_3 0270 8012 | | Call 0x0,0x12 0271 8013 | | Call 0x0,0x13 0272 00d9 | | Load_Top At_Offset_1 0273 017d | } | Execute Record,Structure_Write 0274 e5fe | | Load 0x2,-0x2 0275 00d9 | | Load_Top At_Offset_1 0276 801f | | Call 0x0,0x1f 0277 027d | } | Execute Discrete,Greater 0278 6802 |h | Jump_Zero 0x27b 0279 e225 | % | Load 0x1,0x25 027a 0257 | W | Execute Discrete,Raise 027b e5fe | | Load 0x2,-0x2 027c 0a01 | | Execute_Immediate Plus,0x1 027d 00d8 | | Load_Top At_Offset_0 027e e01d | | Load 0x0,0x1d 027f 0260 | ` | Execute Discrete,In_Type 0280 7001 |p | Jump_Nonzero 0x282 0281 0801 | | Execute_Immediate Raise,0x1 0282 00d9 | | Load_Top At_Offset_1 0283 8014 | | Call 0x0,0x14 0284 8010 | | Call 0x0,0x10 0285 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0286 0000 0000 | | .XXX[0x2] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 028f | | .CONST 0x028f ; Address of begin 0289 0004 | | .CONST 0x0004 ; Address of exception handler 028a 0002 | | .CONST 0x0002 ; Number of locals 028b INIT_0288: 028b e005 | | Load 0x0,0x5 028c 0322 | " | Declare_Variable Record 028d 00d8 | | Load_Top At_Offset_0 028e 1c00 | | Execute_Immediate Run_Utility,0x0 028f BODY_0288: 028f 00db | | Load_Top At_Offset_3 0290 8012 | | Call 0x0,0x12 0291 8013 | | Call 0x0,0x13 0292 00d9 | | Load_Top At_Offset_1 0293 017d | } | Execute Record,Structure_Write 0294 e5fe | | Load 0x2,-0x2 0295 00d9 | | Load_Top At_Offset_1 0296 801f | | Call 0x0,0x1f 0297 027d | } | Execute Discrete,Greater 0298 6802 |h | Jump_Zero 0x29b 0299 e225 | % | Load 0x1,0x25 029a 0257 | W | Execute Discrete,Raise 029b e5fe | | Load 0x2,-0x2 029c 0a01 | | Execute_Immediate Plus,0x1 029d 00d8 | | Load_Top At_Offset_0 029e e01d | | Load 0x0,0x1d 029f 0260 | ` | Execute Discrete,In_Type 02a0 7001 |p | Jump_Nonzero 0x2a2 02a1 0801 | | Execute_Immediate Raise,0x1 02a2 00d9 | | Load_Top At_Offset_1 02a3 8014 | | Call 0x0,0x14 02a4 8009 | | Call 0x0,0x9 02a5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 02a6 0000 0000 | | .XXX[0x2] 02a8 ; -------------------------------------------------------------------------------------- 02a8 ; SUBPROGRAM 02a8 ; -------------------------------------------------------------------------------------- 02a8 02ab | | .CONST 0x02ab ; Address of begin 02a9 0004 | | .CONST 0x0004 ; Address of exception handler 02aa 0001 | | .CONST 0x0001 ; Number of locals 02ab BODY_02a8: 02ab INIT_02a8: 02ab 4801 |H | Short_Literal 0x1 02ac 00db | | Load_Top At_Offset_3 02ad 8012 | | Call 0x0,0x12 02ae 8021 | ! | Call 0x0,0x21 02af e22a | * | Load 0x1,0x2a 02b0 801c | | Call 0x0,0x1c 02b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02b2 0000 0000 | | .BLANK 0000[0x6] 02b8 ; -------------------------------------------------------------------------------------- 02b8 ; SUBPROGRAM 02b8 ; -------------------------------------------------------------------------------------- 02b8 02c3 | | .CONST 0x02c3 ; Address of begin 02b9 0004 | | .CONST 0x0004 ; Address of exception handler 02ba 0003 | | .CONST 0x0003 ; Number of locals 02bb INIT_02b8: 02bb e005 | | Load 0x0,0x5 02bc 0322 | " | Declare_Variable Record 02bd 00d8 | | Load_Top At_Offset_0 02be 1c00 | | Execute_Immediate Run_Utility,0x0 02bf e004 | | Load 0x0,0x4 02c0 0322 | " | Declare_Variable Record 02c1 00d8 | | Load_Top At_Offset_0 02c2 1c00 | | Execute_Immediate Run_Utility,0x0 02c3 BODY_02b8: 02c3 00d9 | | Load_Top At_Offset_1 02c4 e5fc | | Load 0x2,-0x4 02c5 00e0 | | Load_Encached Standard_Cache 02c6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 02c7 4800 |H | Short_Literal 0x0 02c8 00ea | | Load_Encached Null_String_Cache 02c9 e22c | , | Load 0x1,0x2c 02ca 800d | | Call 0x0,0xd 02cb 00d1 | | Pop_Control Pop_Count_1 02cc 00d8 | | Load_Top At_Offset_0 02cd 00da | | Load_Top At_Offset_2 02ce e226 | & | Load 0x1,0x26 02cf e22b | + | Load 0x1,0x2b 02d0 8007 | | Call 0x0,0x7 02d1 00d1 | | Pop_Control Pop_Count_1 02d2 00d8 | | Load_Top At_Offset_0 02d3 e228 | ( | Load 0x1,0x28 02d4 e5fd | | Load 0x2,-0x3 02d5 e5fe | | Load 0x2,-0x2 02d6 e5ff | | Load 0x2,-0x1 02d7 4800 |H | Short_Literal 0x0 02d8 8008 | | Call 0x0,0x8 02d9 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 02da 0000 0000 | | .BLANK 0000[0x6] 02e0 ; -------------------------------------------------------------------------------------- 02e0 ; SUBPROGRAM 02e0 ; -------------------------------------------------------------------------------------- 02e0 02e3 | | .CONST 0x02e3 ; Address of begin 02e1 0004 | | .CONST 0x0004 ; Address of exception handler 02e2 0001 | | .CONST 0x0001 ; Number of locals 02e3 BODY_02e0: 02e3 INIT_02e0: 02e3 00da | | Load_Top At_Offset_2 02e4 8012 | | Call 0x0,0x12 02e5 8013 | | Call 0x0,0x13 02e6 801f | | Call 0x0,0x1f 02e7 0e01 | | Execute_Immediate Not_Equal,0x1 02e8 6802 |h | Jump_Zero 0x2eb 02e9 e225 | % | Load 0x1,0x25 02ea 0257 | W | Execute Discrete,Raise 02eb 4801 |H | Short_Literal 0x1 02ec 00db | | Load_Top At_Offset_3 02ed 8012 | | Call 0x0,0x12 02ee 8013 | | Call 0x0,0x13 02ef 8014 | | Call 0x0,0x14 02f0 8009 | | Call 0x0,0x9 02f1 00e2 | | Load_Encached Integer_Cache 02f2 00e0 | | Load_Encached Standard_Cache 02f3 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02f4 00d8 | | Load_Top At_Offset_0 02f5 00e3 | | Load_Encached Natural_Cache 02f6 0260 | ` | Execute Discrete,In_Type 02f7 7001 |p | Jump_Nonzero 0x2f9 02f8 0801 | | Execute_Immediate Raise,0x1 02f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 02fa 0000 0000 | | .BLANK 0000[0x6] 0300 ; -------------------------------------------------------------------------------------- 0300 ; SUBPROGRAM 0300 ; -------------------------------------------------------------------------------------- 0300 0303 | | .CONST 0x0303 ; Address of begin 0301 0004 | | .CONST 0x0004 ; Address of exception handler 0302 0001 | | .CONST 0x0001 ; Number of locals 0303 BODY_0300: 0303 INIT_0300: 0303 4801 |H | Short_Literal 0x1 0304 00db | | Load_Top At_Offset_3 0305 8012 | | Call 0x0,0x12 0306 8021 | ! | Call 0x0,0x21 0307 e22b | + | Load 0x1,0x2b 0308 801c | | Call 0x0,0x1c 0309 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 030a 0000 0000 | | .BLANK 0000[0x6] 0310 ; -------------------------------------------------------------------------------------- 0310 ; SUBPROGRAM 0310 ; -------------------------------------------------------------------------------------- 0310 0317 | | .CONST 0x0317 ; Address of begin 0311 0004 | | .CONST 0x0004 ; Address of exception handler 0312 0002 | | .CONST 0x0002 ; Number of locals 0313 INIT_0310: 0313 e004 | | Load 0x0,0x4 0314 0322 | " | Declare_Variable Record 0315 00d8 | | Load_Top At_Offset_0 0316 1c00 | | Execute_Immediate Run_Utility,0x0 0317 BODY_0310: 0317 00db | | Load_Top At_Offset_3 0318 8022 | " | Call 0x0,0x22 0319 7012 |p | Jump_Nonzero 0x32c 031a 00db | | Load_Top At_Offset_3 031b 8012 | | Call 0x0,0x12 031c 00d9 | | Load_Top At_Offset_1 031d 017d | } | Execute Record,Structure_Write 031e 4801 |H | Short_Literal 0x1 031f e226 | & | Load 0x1,0x26 0320 00da | | Load_Top At_Offset_2 0321 801b | | Call 0x0,0x1b 0322 801c | | Call 0x0,0x1c 0323 6806 |h | Jump_Zero 0x32a 0324 4801 |H | Short_Literal 0x1 0325 e5fe | | Load 0x2,-0x2 0326 00da | | Load_Top At_Offset_2 0327 8021 | ! | Call 0x0,0x21 0328 801c | | Call 0x0,0x1c 0329 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 032a 4800 |H | Short_Literal 0x0 032b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 032c 4800 |H | Short_Literal 0x0 032d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 032e 0000 0000 | | .XXX[0x2] 0330 ; -------------------------------------------------------------------------------------- 0330 ; SUBPROGRAM 0330 ; -------------------------------------------------------------------------------------- 0330 0333 | 3 | .CONST 0x0333 ; Address of begin 0331 0004 | | .CONST 0x0004 ; Address of exception handler 0332 0001 | | .CONST 0x0001 ; Number of locals 0333 BODY_0330: 0333 INIT_0330: 0333 00db | | Load_Top At_Offset_3 0334 00d8 | | Load_Top At_Offset_0 0335 e01d | | Load 0x0,0x1d 0336 0260 | ` | Execute Discrete,In_Type 0337 7001 |p | Jump_Nonzero 0x339 0338 0801 | | Execute_Immediate Raise,0x1 0339 00db | | Load_Top At_Offset_3 033a 8012 | | Call 0x0,0x12 033b 8013 | | Call 0x0,0x13 033c 8014 | | Call 0x0,0x14 033d 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 033e 0000 0000 | | .XXX[0x2] 0340 ; -------------------------------------------------------------------------------------- 0340 ; SUBPROGRAM 0340 ; -------------------------------------------------------------------------------------- 0340 0364 | d | .CONST 0x0364 ; Address of begin 0341 0004 | | .CONST 0x0004 ; Address of exception handler 0342 0016 | | .CONST 0x0016 ; Number of locals 0343 INIT_0340: 0343 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated 0345 029a 039b | | Declare_Subprogram INIT_0398,For_Outer_Call,Visible,Unelaborated 0347 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated 0349 029a 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call,Visible,Unelaborated 034b 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated 034d 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated 034f 00bf | | Action Accept_Activation 0350 0092 0ae1 | | Action Push_String_Extended,0xae1 ; "Spy_Publication" 0352 0092 0ae2 | | Action Push_String_Extended,0xae2 ; "Spy_UnPublication" 0354 0092 0adf | | Action Push_String_Extended,0xadf ; "behavior_id" 0356 0092 0ae3 | | Action Push_String_Extended,0xae3 ; "spy_Id" 0358 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0359 00c7 | | Action Elaborate_Subprogram 035a 1d0e | | Execute_Immediate Reference_Lex_1,0xe 035b 00c7 | | Action Elaborate_Subprogram 035c 1d0f | | Execute_Immediate Reference_Lex_1,0xf 035d 00c7 | | Action Elaborate_Subprogram 035e 1d10 | | Execute_Immediate Reference_Lex_1,0x10 035f 00c7 | | Action Elaborate_Subprogram 0360 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0361 00c7 | | Action Elaborate_Subprogram 0362 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0363 00c7 | | Action Elaborate_Subprogram 0364 BODY_0340: 0364 00bc | | Action Signal_Activated 0365 00bb | | Action Signal_Completion 0366 0000 0000 | | .XXX[0x2] 0368 ; -------------------------------------------------------------------------------------- 0368 ; SUBPROGRAM 0368 ; -------------------------------------------------------------------------------------- 0368 0373 | s | .CONST 0x0373 ; Address of begin 0369 0004 | | .CONST 0x0004 ; Address of exception handler 036a 0003 | | .CONST 0x0003 ; Number of locals 036b INIT_0368: 036b e001 | | Load 0x0,0x1 036c 0322 | " | Declare_Variable Record 036d 00d8 | | Load_Top At_Offset_0 036e 1c00 | | Execute_Immediate Run_Utility,0x0 036f e002 | | Load 0x0,0x2 0370 0322 | " | Declare_Variable Record 0371 00d8 | | Load_Top At_Offset_0 0372 1c00 | | Execute_Immediate Run_Utility,0x0 0373 BODY_0368: 0373 00d9 | | Load_Top At_Offset_1 0374 e5fc | | Load 0x2,-0x4 0375 00e0 | | Load_Encached Standard_Cache 0376 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0377 4800 |H | Short_Literal 0x0 0378 00ea | | Load_Encached Null_String_Cache 0379 e216 | | Load 0x1,0x16 037a e5fd | | Load 0x2,-0x3 037b 00e0 | | Load_Encached Standard_Cache 037c 1818 | | Execute Package,Field_Execute,Field_Number 0x18 037d 4800 |H | Short_Literal 0x0 037e 00ea | | Load_Encached Null_String_Cache 037f e215 | | Load 0x1,0x15 0380 8003 | | Call 0x0,0x3 0381 00d1 | | Pop_Control Pop_Count_1 0382 00d8 | | Load_Top At_Offset_0 0383 00da | | Load_Top At_Offset_2 0384 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 0386 e213 | | Load 0x1,0x13 0387 8004 | | Call 0x0,0x4 0388 00d1 | | Pop_Control Pop_Count_1 0389 00d8 | | Load_Top At_Offset_0 038a e005 | | Load 0x0,0x5 038b e006 | | Load 0x0,0x6 038c e5fe | | Load 0x2,-0x2 038d e5ff | | Load 0x2,-0x1 038e 4800 |H | Short_Literal 0x0 038f 8007 | | Call 0x0,0x7 0390 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0391 0000 0000 | | .BLANK 0000[0x7] 0398 ; -------------------------------------------------------------------------------------- 0398 ; SUBPROGRAM 0398 ; -------------------------------------------------------------------------------------- 0398 039b | | .CONST 0x039b ; Address of begin 0399 0004 | | .CONST 0x0004 ; Address of exception handler 039a 0001 | | .CONST 0x0001 ; Number of locals 039b BODY_0398: 039b INIT_0398: 039b e213 | | Load 0x1,0x13 039c 00db | | Load_Top At_Offset_3 039d 8008 | | Call 0x0,0x8 039e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 039f 0000 | | .XXX[0x1] 03a0 ; -------------------------------------------------------------------------------------- 03a0 ; SUBPROGRAM 03a0 ; -------------------------------------------------------------------------------------- 03a0 03a3 | | .CONST 0x03a3 ; Address of begin 03a1 03b0 | | .CONST 0x03b0 ; Address of exception handler 03a2 0001 | | .CONST 0x0001 ; Number of locals 03a3 BODY_03a0: 03a3 INIT_03a0: 03a3 4801 |H | Short_Literal 0x1 03a4 00db | | Load_Top At_Offset_3 03a5 8009 | | Call 0x0,0x9 03a6 800a | | Call 0x0,0xa 03a7 00e2 | | Load_Encached Integer_Cache 03a8 00e0 | | Load_Encached Standard_Cache 03a9 1819 | | Execute Package,Field_Execute,Field_Number 0x19 03aa 00d8 | | Load_Top At_Offset_0 03ab 00e3 | | Load_Encached Natural_Cache 03ac 0260 | ` | Execute Discrete,In_Type 03ad 7001 |p | Jump_Nonzero 0x3af 03ae 0801 | | Execute_Immediate Raise,0x1 03af 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03b0 TRAP_03a0: 03b0 0007 | | Action Break_Optional 03b1 e00b | | Load 0x0,0xb 03b2 0257 | W | Execute Discrete,Raise 03b3 0000 0000 | | .BLANK 0000[0x5] 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03bb | | .CONST 0x03bb ; Address of begin 03b9 03c8 | | .CONST 0x03c8 ; Address of exception handler 03ba 0001 | | .CONST 0x0001 ; Number of locals 03bb BODY_03b8: 03bb INIT_03b8: 03bb 4802 |H | Short_Literal 0x2 03bc 00db | | Load_Top At_Offset_3 03bd 8009 | | Call 0x0,0x9 03be 800a | | Call 0x0,0xa 03bf 00e2 | | Load_Encached Integer_Cache 03c0 00e0 | | Load_Encached Standard_Cache 03c1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 03c2 00d8 | | Load_Top At_Offset_0 03c3 00e3 | | Load_Encached Natural_Cache 03c4 0260 | ` | Execute Discrete,In_Type 03c5 7001 |p | Jump_Nonzero 0x3c7 03c6 0801 | | Execute_Immediate Raise,0x1 03c7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 03c8 TRAP_03b8: 03c8 0007 | | Action Break_Optional 03c9 e00b | | Load 0x0,0xb 03ca 0257 | W | Execute Discrete,Raise 03cb 0000 0000 | | .BLANK 0000[0x5] 03d0 ; -------------------------------------------------------------------------------------- 03d0 ; SUBPROGRAM 03d0 ; -------------------------------------------------------------------------------------- 03d0 03db | | .CONST 0x03db ; Address of begin 03d1 0004 | | .CONST 0x0004 ; Address of exception handler 03d2 0003 | | .CONST 0x0003 ; Number of locals 03d3 INIT_03d0: 03d3 e001 | | Load 0x0,0x1 03d4 0322 | " | Declare_Variable Record 03d5 00d8 | | Load_Top At_Offset_0 03d6 1c00 | | Execute_Immediate Run_Utility,0x0 03d7 e002 | | Load 0x0,0x2 03d8 0322 | " | Declare_Variable Record 03d9 00d8 | | Load_Top At_Offset_0 03da 1c00 | | Execute_Immediate Run_Utility,0x0 03db BODY_03d0: 03db 00d9 | | Load_Top At_Offset_1 03dc e5fc | | Load 0x2,-0x4 03dd 00e0 | | Load_Encached Standard_Cache 03de 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03df 4800 |H | Short_Literal 0x0 03e0 00ea | | Load_Encached Null_String_Cache 03e1 e216 | | Load 0x1,0x16 03e2 e5fd | | Load 0x2,-0x3 03e3 00e0 | | Load_Encached Standard_Cache 03e4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 03e5 4800 |H | Short_Literal 0x0 03e6 00ea | | Load_Encached Null_String_Cache 03e7 e215 | | Load 0x1,0x15 03e8 8003 | | Call 0x0,0x3 03e9 00d1 | | Pop_Control Pop_Count_1 03ea 00d8 | | Load_Top At_Offset_0 03eb 00da | | Load_Top At_Offset_2 03ec 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 03ee e214 | | Load 0x1,0x14 03ef 8004 | | Call 0x0,0x4 03f0 00d1 | | Pop_Control Pop_Count_1 03f1 00d8 | | Load_Top At_Offset_0 03f2 e005 | | Load 0x0,0x5 03f3 e006 | | Load 0x0,0x6 03f4 e5fe | | Load 0x2,-0x2 03f5 e5ff | | Load 0x2,-0x1 03f6 4800 |H | Short_Literal 0x0 03f7 8007 | | Call 0x0,0x7 03f8 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 03f9 0000 0000 | | .BLANK 0000[0x7] 0400 ; -------------------------------------------------------------------------------------- 0400 ; SUBPROGRAM 0400 ; -------------------------------------------------------------------------------------- 0400 0403 | | .CONST 0x0403 ; Address of begin 0401 0004 | | .CONST 0x0004 ; Address of exception handler 0402 0001 | | .CONST 0x0001 ; Number of locals 0403 BODY_0400: 0403 INIT_0400: 0403 e214 | | Load 0x1,0x14 0404 00db | | Load_Top At_Offset_3 0405 8008 | | Call 0x0,0x8 0406 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0407 0000 | | .XXX[0x1] 0408 ; -------------------------------------------------------------------------------------- 0408 ; SUBPROGRAM 0408 ; -------------------------------------------------------------------------------------- 0408 0432 | 2 | .CONST 0x0432 ; Address of begin 0409 0004 | | .CONST 0x0004 ; Address of exception handler 040a 0018 | | .CONST 0x0018 ; Number of locals 040b INIT_0408: 040b 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated 040d 029a 046b | k| Declare_Subprogram INIT_0468,For_Outer_Call,Visible,Unelaborated 040f 029a 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Visible,Unelaborated 0411 029a 048b | | Declare_Subprogram INIT_0488,For_Outer_Call,Visible,Unelaborated 0413 029a 049b | | Declare_Subprogram INIT_0498,For_Outer_Call,Visible,Unelaborated 0415 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 0417 029a 04db | | Declare_Subprogram INIT_04d8,For_Outer_Call,Visible,Unelaborated 0419 00bf | | Action Accept_Activation 041a 0092 0ae4 | | Action Push_String_Extended,0xae4 ; "Notification_publication" 041c 0092 0ae5 | | Action Push_String_Extended,0xae5 ; "Notification_Unpublication" 041e 0092 0ae6 | | Action Push_String_Extended,0xae6 ; "Behavior_id" 0420 0092 0ae7 | | Action Push_String_Extended,0xae7 ; "Class" 0422 0092 0ae8 | | Action Push_String_Extended,0xae8 ; "method" 0424 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0425 00c7 | | Action Elaborate_Subprogram 0426 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0427 00c7 | | Action Elaborate_Subprogram 0428 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0429 00c7 | | Action Elaborate_Subprogram 042a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 042b 00c7 | | Action Elaborate_Subprogram 042c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 042d 00c7 | | Action Elaborate_Subprogram 042e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 042f 00c7 | | Action Elaborate_Subprogram 0430 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0431 00c7 | | Action Elaborate_Subprogram 0432 BODY_0408: 0432 00bc | | Action Signal_Activated 0433 00bb | | Action Signal_Completion 0434 0000 0000 | | .BLANK 0000[0x4] 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 0443 | C | .CONST 0x0443 ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0003 | | .CONST 0x0003 ; Number of locals 043b INIT_0438: 043b e001 | | Load 0x0,0x1 043c 0322 | " | Declare_Variable Record 043d 00d8 | | Load_Top At_Offset_0 043e 1c00 | | Execute_Immediate Run_Utility,0x0 043f e002 | | Load 0x0,0x2 0440 0322 | " | Declare_Variable Record 0441 00d8 | | Load_Top At_Offset_0 0442 1c00 | | Execute_Immediate Run_Utility,0x0 0443 BODY_0438: 0443 00d9 | | Load_Top At_Offset_1 0444 e5fb | | Load 0x2,-0x5 0445 4800 |H | Short_Literal 0x0 0446 00ea | | Load_Encached Null_String_Cache 0447 e218 | | Load 0x1,0x18 0448 e5fc | | Load 0x2,-0x4 0449 4800 |H | Short_Literal 0x0 044a 00ea | | Load_Encached Null_String_Cache 044b e217 | | Load 0x1,0x17 044c e5fd | | Load 0x2,-0x3 044d 00e0 | | Load_Encached Standard_Cache 044e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 044f 4800 |H | Short_Literal 0x0 0450 00ea | | Load_Encached Null_String_Cache 0451 e216 | | Load 0x1,0x16 0452 8003 | | Call 0x0,0x3 0453 00d1 | | Pop_Control Pop_Count_1 0454 00d8 | | Load_Top At_Offset_0 0455 00da | | Load_Top At_Offset_2 0456 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 0458 e214 | | Load 0x1,0x14 0459 8004 | | Call 0x0,0x4 045a 00d1 | | Pop_Control Pop_Count_1 045b 00d8 | | Load_Top At_Offset_0 045c e005 | | Load 0x0,0x5 045d e006 | | Load 0x0,0x6 045e e5fe | | Load 0x2,-0x2 045f e5ff | | Load 0x2,-0x1 0460 4800 |H | Short_Literal 0x0 0461 8007 | | Call 0x0,0x7 0462 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0463 0000 0000 | | .BLANK 0000[0x5] 0468 ; -------------------------------------------------------------------------------------- 0468 ; SUBPROGRAM 0468 ; -------------------------------------------------------------------------------------- 0468 046b | k | .CONST 0x046b ; Address of begin 0469 0004 | | .CONST 0x0004 ; Address of exception handler 046a 0001 | | .CONST 0x0001 ; Number of locals 046b BODY_0468: 046b INIT_0468: 046b e214 | | Load 0x1,0x14 046c 00db | | Load_Top At_Offset_3 046d 8008 | | Call 0x0,0x8 046e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 046f 0000 | | .XXX[0x1] 0470 ; -------------------------------------------------------------------------------------- 0470 ; SUBPROGRAM 0470 ; -------------------------------------------------------------------------------------- 0470 0473 | s | .CONST 0x0473 ; Address of begin 0471 0480 | | .CONST 0x0480 ; Address of exception handler 0472 0001 | | .CONST 0x0001 ; Number of locals 0473 BODY_0470: 0473 INIT_0470: 0473 4801 |H | Short_Literal 0x1 0474 00db | | Load_Top At_Offset_3 0475 8009 | | Call 0x0,0x9 0476 800a | | Call 0x0,0xa 0477 00e2 | | Load_Encached Integer_Cache 0478 00e0 | | Load_Encached Standard_Cache 0479 1819 | | Execute Package,Field_Execute,Field_Number 0x19 047a 00d8 | | Load_Top At_Offset_0 047b 00e3 | | Load_Encached Natural_Cache 047c 0260 | ` | Execute Discrete,In_Type 047d 7001 |p | Jump_Nonzero 0x47f 047e 0801 | | Execute_Immediate Raise,0x1 047f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0480 TRAP_0470: 0480 0007 | | Action Break_Optional 0481 e00b | | Load 0x0,0xb 0482 0257 | W | Execute Discrete,Raise 0483 0000 0000 | | .BLANK 0000[0x5] 0488 ; -------------------------------------------------------------------------------------- 0488 ; SUBPROGRAM 0488 ; -------------------------------------------------------------------------------------- 0488 048b | | .CONST 0x048b ; Address of begin 0489 0490 | | .CONST 0x0490 ; Address of exception handler 048a 0001 | | .CONST 0x0001 ; Number of locals 048b BODY_0488: 048b INIT_0488: 048b 4802 |H | Short_Literal 0x2 048c 00db | | Load_Top At_Offset_3 048d 8009 | | Call 0x0,0x9 048e 800a | | Call 0x0,0xa 048f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0490 TRAP_0488: 0490 0007 | | Action Break_Optional 0491 e00b | | Load 0x0,0xb 0492 0257 | W | Execute Discrete,Raise 0493 0000 0000 | | .BLANK 0000[0x5] 0498 ; -------------------------------------------------------------------------------------- 0498 ; SUBPROGRAM 0498 ; -------------------------------------------------------------------------------------- 0498 049b | | .CONST 0x049b ; Address of begin 0499 04a0 | | .CONST 0x04a0 ; Address of exception handler 049a 0001 | | .CONST 0x0001 ; Number of locals 049b BODY_0498: 049b INIT_0498: 049b 4803 |H | Short_Literal 0x3 049c 00db | | Load_Top At_Offset_3 049d 8009 | | Call 0x0,0x9 049e 800a | | Call 0x0,0xa 049f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04a0 TRAP_0498: 04a0 0007 | | Action Break_Optional 04a1 e00b | | Load 0x0,0xb 04a2 0257 | W | Execute Discrete,Raise 04a3 0000 0000 | | .BLANK 0000[0x5] 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04b3 | | .CONST 0x04b3 ; Address of begin 04a9 0004 | | .CONST 0x0004 ; Address of exception handler 04aa 0003 | | .CONST 0x0003 ; Number of locals 04ab INIT_04a8: 04ab e001 | | Load 0x0,0x1 04ac 0322 | " | Declare_Variable Record 04ad 00d8 | | Load_Top At_Offset_0 04ae 1c00 | | Execute_Immediate Run_Utility,0x0 04af e002 | | Load 0x0,0x2 04b0 0322 | " | Declare_Variable Record 04b1 00d8 | | Load_Top At_Offset_0 04b2 1c00 | | Execute_Immediate Run_Utility,0x0 04b3 BODY_04a8: 04b3 00d9 | | Load_Top At_Offset_1 04b4 e5fb | | Load 0x2,-0x5 04b5 4800 |H | Short_Literal 0x0 04b6 00ea | | Load_Encached Null_String_Cache 04b7 e218 | | Load 0x1,0x18 04b8 e5fc | | Load 0x2,-0x4 04b9 4800 |H | Short_Literal 0x0 04ba 00ea | | Load_Encached Null_String_Cache 04bb e217 | | Load 0x1,0x17 04bc e5fd | | Load 0x2,-0x3 04bd 00e0 | | Load_Encached Standard_Cache 04be 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04bf 4800 |H | Short_Literal 0x0 04c0 00ea | | Load_Encached Null_String_Cache 04c1 e216 | | Load 0x1,0x16 04c2 8003 | | Call 0x0,0x3 04c3 00d1 | | Pop_Control Pop_Count_1 04c4 00d8 | | Load_Top At_Offset_0 04c5 00da | | Load_Top At_Offset_2 04c6 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 04c8 e215 | | Load 0x1,0x15 04c9 8004 | | Call 0x0,0x4 04ca 00d1 | | Pop_Control Pop_Count_1 04cb 00d8 | | Load_Top At_Offset_0 04cc e005 | | Load 0x0,0x5 04cd e006 | | Load 0x0,0x6 04ce e5fe | | Load 0x2,-0x2 04cf e5ff | | Load 0x2,-0x1 04d0 4800 |H | Short_Literal 0x0 04d1 8007 | | Call 0x0,0x7 04d2 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 04d3 0000 0000 | | .BLANK 0000[0x5] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04db | | .CONST 0x04db ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0001 | | .CONST 0x0001 ; Number of locals 04db BODY_04d8: 04db INIT_04d8: 04db e215 | | Load 0x1,0x15 04dc 00db | | Load_Top At_Offset_3 04dd 8008 | | Call 0x0,0x8 04de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 04df 0000 | | .XXX[0x1] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 0504 | | .CONST 0x0504 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0016 | | .CONST 0x0016 ; Number of locals 04e3 INIT_04e0: 04e3 029a 050b | | Declare_Subprogram INIT_0508,For_Outer_Call,Visible,Unelaborated 04e5 029a 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call,Visible,Unelaborated 04e7 029a 0543 | C| Declare_Subprogram INIT_0540,For_Outer_Call,Visible,Unelaborated 04e9 029a 055b | [| Declare_Subprogram INIT_0558,For_Outer_Call,Visible,Unelaborated 04eb 029a 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call,Visible,Unelaborated 04ed 029a 059b | | Declare_Subprogram INIT_0598,For_Outer_Call,Visible,Unelaborated 04ef 00bf | | Action Accept_Activation 04f0 0092 0ae9 | | Action Push_String_Extended,0xae9 ; "Filter_publication" 04f2 0092 0aea | | Action Push_String_Extended,0xaea ; "Filter_Unpublication" 04f4 0092 0adf | | Action Push_String_Extended,0xadf ; "behavior_id" 04f6 0092 0aeb | | Action Push_String_Extended,0xaeb ; "filter_id" 04f8 1d0d | | Execute_Immediate Reference_Lex_1,0xd 04f9 00c7 | | Action Elaborate_Subprogram 04fa 1d0e | | Execute_Immediate Reference_Lex_1,0xe 04fb 00c7 | | Action Elaborate_Subprogram 04fc 1d0f | | Execute_Immediate Reference_Lex_1,0xf 04fd 00c7 | | Action Elaborate_Subprogram 04fe 1d10 | | Execute_Immediate Reference_Lex_1,0x10 04ff 00c7 | | Action Elaborate_Subprogram 0500 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0501 00c7 | | Action Elaborate_Subprogram 0502 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0503 00c7 | | Action Elaborate_Subprogram 0504 BODY_04e0: 0504 00bc | | Action Signal_Activated 0505 00bb | | Action Signal_Completion 0506 0000 0000 | | .XXX[0x2] 0508 ; -------------------------------------------------------------------------------------- 0508 ; SUBPROGRAM 0508 ; -------------------------------------------------------------------------------------- 0508 0513 | | .CONST 0x0513 ; Address of begin 0509 0004 | | .CONST 0x0004 ; Address of exception handler 050a 0003 | | .CONST 0x0003 ; Number of locals 050b INIT_0508: 050b e001 | | Load 0x0,0x1 050c 0322 | " | Declare_Variable Record 050d 00d8 | | Load_Top At_Offset_0 050e 1c00 | | Execute_Immediate Run_Utility,0x0 050f e002 | | Load 0x0,0x2 0510 0322 | " | Declare_Variable Record 0511 00d8 | | Load_Top At_Offset_0 0512 1c00 | | Execute_Immediate Run_Utility,0x0 0513 BODY_0508: 0513 00d9 | | Load_Top At_Offset_1 0514 e5fc | | Load 0x2,-0x4 0515 00e0 | | Load_Encached Standard_Cache 0516 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0517 4800 |H | Short_Literal 0x0 0518 00ea | | Load_Encached Null_String_Cache 0519 e216 | | Load 0x1,0x16 051a e5fd | | Load 0x2,-0x3 051b 00e0 | | Load_Encached Standard_Cache 051c 1818 | | Execute Package,Field_Execute,Field_Number 0x18 051d 4800 |H | Short_Literal 0x0 051e 00ea | | Load_Encached Null_String_Cache 051f e215 | | Load 0x1,0x15 0520 8003 | | Call 0x0,0x3 0521 00d1 | | Pop_Control Pop_Count_1 0522 00d8 | | Load_Top At_Offset_0 0523 00da | | Load_Top At_Offset_2 0524 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 0526 e213 | | Load 0x1,0x13 0527 8004 | | Call 0x0,0x4 0528 00d1 | | Pop_Control Pop_Count_1 0529 00d8 | | Load_Top At_Offset_0 052a e005 | | Load 0x0,0x5 052b e006 | | Load 0x0,0x6 052c e5fe | | Load 0x2,-0x2 052d e5ff | | Load 0x2,-0x1 052e 4800 |H | Short_Literal 0x0 052f 8007 | | Call 0x0,0x7 0530 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0531 0000 0000 | | .BLANK 0000[0x7] 0538 ; -------------------------------------------------------------------------------------- 0538 ; SUBPROGRAM 0538 ; -------------------------------------------------------------------------------------- 0538 053b | ; | .CONST 0x053b ; Address of begin 0539 0004 | | .CONST 0x0004 ; Address of exception handler 053a 0001 | | .CONST 0x0001 ; Number of locals 053b BODY_0538: 053b INIT_0538: 053b e213 | | Load 0x1,0x13 053c 00db | | Load_Top At_Offset_3 053d 8008 | | Call 0x0,0x8 053e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 053f 0000 | | .XXX[0x1] 0540 ; -------------------------------------------------------------------------------------- 0540 ; SUBPROGRAM 0540 ; -------------------------------------------------------------------------------------- 0540 0543 | C | .CONST 0x0543 ; Address of begin 0541 0550 | P | .CONST 0x0550 ; Address of exception handler 0542 0001 | | .CONST 0x0001 ; Number of locals 0543 BODY_0540: 0543 INIT_0540: 0543 4801 |H | Short_Literal 0x1 0544 00db | | Load_Top At_Offset_3 0545 8009 | | Call 0x0,0x9 0546 800a | | Call 0x0,0xa 0547 00e2 | | Load_Encached Integer_Cache 0548 00e0 | | Load_Encached Standard_Cache 0549 1819 | | Execute Package,Field_Execute,Field_Number 0x19 054a 00d8 | | Load_Top At_Offset_0 054b 00e3 | | Load_Encached Natural_Cache 054c 0260 | ` | Execute Discrete,In_Type 054d 7001 |p | Jump_Nonzero 0x54f 054e 0801 | | Execute_Immediate Raise,0x1 054f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0550 TRAP_0540: 0550 0007 | | Action Break_Optional 0551 e00b | | Load 0x0,0xb 0552 0257 | W | Execute Discrete,Raise 0553 0000 0000 | | .BLANK 0000[0x5] 0558 ; -------------------------------------------------------------------------------------- 0558 ; SUBPROGRAM 0558 ; -------------------------------------------------------------------------------------- 0558 055b | [ | .CONST 0x055b ; Address of begin 0559 0568 | h | .CONST 0x0568 ; Address of exception handler 055a 0001 | | .CONST 0x0001 ; Number of locals 055b BODY_0558: 055b INIT_0558: 055b 4802 |H | Short_Literal 0x2 055c 00db | | Load_Top At_Offset_3 055d 8009 | | Call 0x0,0x9 055e 800a | | Call 0x0,0xa 055f 00e2 | | Load_Encached Integer_Cache 0560 00e0 | | Load_Encached Standard_Cache 0561 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0562 00d8 | | Load_Top At_Offset_0 0563 00e3 | | Load_Encached Natural_Cache 0564 0260 | ` | Execute Discrete,In_Type 0565 7001 |p | Jump_Nonzero 0x567 0566 0801 | | Execute_Immediate Raise,0x1 0567 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0568 TRAP_0558: 0568 0007 | | Action Break_Optional 0569 e00b | | Load 0x0,0xb 056a 0257 | W | Execute Discrete,Raise 056b 0000 0000 | | .BLANK 0000[0x5] 0570 ; -------------------------------------------------------------------------------------- 0570 ; SUBPROGRAM 0570 ; -------------------------------------------------------------------------------------- 0570 057b | { | .CONST 0x057b ; Address of begin 0571 0004 | | .CONST 0x0004 ; Address of exception handler 0572 0003 | | .CONST 0x0003 ; Number of locals 0573 INIT_0570: 0573 e001 | | Load 0x0,0x1 0574 0322 | " | Declare_Variable Record 0575 00d8 | | Load_Top At_Offset_0 0576 1c00 | | Execute_Immediate Run_Utility,0x0 0577 e002 | | Load 0x0,0x2 0578 0322 | " | Declare_Variable Record 0579 00d8 | | Load_Top At_Offset_0 057a 1c00 | | Execute_Immediate Run_Utility,0x0 057b BODY_0570: 057b 00d9 | | Load_Top At_Offset_1 057c e5fd | | Load 0x2,-0x3 057d 00e0 | | Load_Encached Standard_Cache 057e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 057f 4800 |H | Short_Literal 0x0 0580 00ea | | Load_Encached Null_String_Cache 0581 e215 | | Load 0x1,0x15 0582 800c | | Call 0x0,0xc 0583 00d1 | | Pop_Control Pop_Count_1 0584 00d8 | | Load_Top At_Offset_0 0585 00da | | Load_Top At_Offset_2 0586 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 0588 e214 | | Load 0x1,0x14 0589 8004 | | Call 0x0,0x4 058a 00d1 | | Pop_Control Pop_Count_1 058b 00d8 | | Load_Top At_Offset_0 058c e005 | | Load 0x0,0x5 058d e006 | | Load 0x0,0x6 058e e5fe | | Load 0x2,-0x2 058f e5ff | | Load 0x2,-0x1 0590 4800 |H | Short_Literal 0x0 0591 8007 | | Call 0x0,0x7 0592 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 0593 0000 0000 | | .BLANK 0000[0x5] 0598 ; -------------------------------------------------------------------------------------- 0598 ; SUBPROGRAM 0598 ; -------------------------------------------------------------------------------------- 0598 059b | | .CONST 0x059b ; Address of begin 0599 0004 | | .CONST 0x0004 ; Address of exception handler 059a 0001 | | .CONST 0x0001 ; Number of locals 059b BODY_0598: 059b INIT_0598: 059b e214 | | Load 0x1,0x14 059c 00db | | Load_Top At_Offset_3 059d 8008 | | Call 0x0,0x8 059e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 059f 0000 | | .XXX[0x1] 05a0 ; -------------------------------------------------------------------------------------- 05a0 ; SUBPROGRAM 05a0 ; -------------------------------------------------------------------------------------- 05a0 05c4 | | .CONST 0x05c4 ; Address of begin 05a1 0004 | | .CONST 0x0004 ; Address of exception handler 05a2 0016 | | .CONST 0x0016 ; Number of locals 05a3 INIT_05a0: 05a3 029a 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call,Visible,Unelaborated 05a5 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated 05a7 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated 05a9 029a 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Visible,Unelaborated 05ab 029a 0623 | #| Declare_Subprogram INIT_0620,For_Outer_Call,Visible,Unelaborated 05ad 029a 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call,Visible,Unelaborated 05af 00bf | | Action Accept_Activation 05b0 0092 0aec | | Action Push_String_Extended,0xaec ; "Class_Publication" 05b2 0092 0aed | | Action Push_String_Extended,0xaed ; "Class_UnPublication" 05b4 0092 0ae6 | | Action Push_String_Extended,0xae6 ; "Behavior_id" 05b6 0092 0aee | | Action Push_String_Extended,0xaee ; "Behavior_class" 05b8 1d0d | | Execute_Immediate Reference_Lex_1,0xd 05b9 00c7 | | Action Elaborate_Subprogram 05ba 1d0e | | Execute_Immediate Reference_Lex_1,0xe 05bb 00c7 | | Action Elaborate_Subprogram 05bc 1d0f | | Execute_Immediate Reference_Lex_1,0xf 05bd 00c7 | | Action Elaborate_Subprogram 05be 1d10 | | Execute_Immediate Reference_Lex_1,0x10 05bf 00c7 | | Action Elaborate_Subprogram 05c0 1d11 | | Execute_Immediate Reference_Lex_1,0x11 05c1 00c7 | | Action Elaborate_Subprogram 05c2 1d12 | | Execute_Immediate Reference_Lex_1,0x12 05c3 00c7 | | Action Elaborate_Subprogram 05c4 BODY_05a0: 05c4 00bc | | Action Signal_Activated 05c5 00bb | | Action Signal_Completion 05c6 0000 0000 | | .XXX[0x2] 05c8 ; -------------------------------------------------------------------------------------- 05c8 ; SUBPROGRAM 05c8 ; -------------------------------------------------------------------------------------- 05c8 05d3 | | .CONST 0x05d3 ; Address of begin 05c9 0004 | | .CONST 0x0004 ; Address of exception handler 05ca 0003 | | .CONST 0x0003 ; Number of locals 05cb INIT_05c8: 05cb e001 | | Load 0x0,0x1 05cc 0322 | " | Declare_Variable Record 05cd 00d8 | | Load_Top At_Offset_0 05ce 1c00 | | Execute_Immediate Run_Utility,0x0 05cf e002 | | Load 0x0,0x2 05d0 0322 | " | Declare_Variable Record 05d1 00d8 | | Load_Top At_Offset_0 05d2 1c00 | | Execute_Immediate Run_Utility,0x0 05d3 BODY_05c8: 05d3 00d9 | | Load_Top At_Offset_1 05d4 e5fc | | Load 0x2,-0x4 05d5 4800 |H | Short_Literal 0x0 05d6 00ea | | Load_Encached Null_String_Cache 05d7 e216 | | Load 0x1,0x16 05d8 e5fd | | Load 0x2,-0x3 05d9 00e0 | | Load_Encached Standard_Cache 05da 1818 | | Execute Package,Field_Execute,Field_Number 0x18 05db 4800 |H | Short_Literal 0x0 05dc 00ea | | Load_Encached Null_String_Cache 05dd e215 | | Load 0x1,0x15 05de 8003 | | Call 0x0,0x3 05df 00d1 | | Pop_Control Pop_Count_1 05e0 00d8 | | Load_Top At_Offset_0 05e1 00da | | Load_Top At_Offset_2 05e2 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 05e4 e213 | | Load 0x1,0x13 05e5 8004 | | Call 0x0,0x4 05e6 00d1 | | Pop_Control Pop_Count_1 05e7 00d8 | | Load_Top At_Offset_0 05e8 e005 | | Load 0x0,0x5 05e9 e006 | | Load 0x0,0x6 05ea e5fe | | Load 0x2,-0x2 05eb e5ff | | Load 0x2,-0x1 05ec 4800 |H | Short_Literal 0x0 05ed 8007 | | Call 0x0,0x7 05ee 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 05ef 0000 | | .XXX[0x1] 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05f3 | | .CONST 0x05f3 ; Address of begin 05f1 0004 | | .CONST 0x0004 ; Address of exception handler 05f2 0001 | | .CONST 0x0001 ; Number of locals 05f3 BODY_05f0: 05f3 INIT_05f0: 05f3 e213 | | Load 0x1,0x13 05f4 00db | | Load_Top At_Offset_3 05f5 8008 | | Call 0x0,0x8 05f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 05f7 0000 | | .XXX[0x1] 05f8 ; -------------------------------------------------------------------------------------- 05f8 ; SUBPROGRAM 05f8 ; -------------------------------------------------------------------------------------- 05f8 05fb | | .CONST 0x05fb ; Address of begin 05f9 0608 | | .CONST 0x0608 ; Address of exception handler 05fa 0001 | | .CONST 0x0001 ; Number of locals 05fb BODY_05f8: 05fb INIT_05f8: 05fb 4801 |H | Short_Literal 0x1 05fc 00db | | Load_Top At_Offset_3 05fd 8009 | | Call 0x0,0x9 05fe 800a | | Call 0x0,0xa 05ff 00e2 | | Load_Encached Integer_Cache 0600 00e0 | | Load_Encached Standard_Cache 0601 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0602 00d8 | | Load_Top At_Offset_0 0603 00e3 | | Load_Encached Natural_Cache 0604 0260 | ` | Execute Discrete,In_Type 0605 7001 |p | Jump_Nonzero 0x607 0606 0801 | | Execute_Immediate Raise,0x1 0607 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0608 TRAP_05f8: 0608 0007 | | Action Break_Optional 0609 e00b | | Load 0x0,0xb 060a 0257 | W | Execute Discrete,Raise 060b 0000 0000 | | .BLANK 0000[0x5] 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0613 | | .CONST 0x0613 ; Address of begin 0611 0618 | | .CONST 0x0618 ; Address of exception handler 0612 0001 | | .CONST 0x0001 ; Number of locals 0613 BODY_0610: 0613 INIT_0610: 0613 4802 |H | Short_Literal 0x2 0614 00db | | Load_Top At_Offset_3 0615 8009 | | Call 0x0,0x9 0616 800a | | Call 0x0,0xa 0617 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0618 TRAP_0610: 0618 0007 | | Action Break_Optional 0619 e00b | | Load 0x0,0xb 061a 0257 | W | Execute Discrete,Raise 061b 0000 0000 | | .BLANK 0000[0x5] 0620 ; -------------------------------------------------------------------------------------- 0620 ; SUBPROGRAM 0620 ; -------------------------------------------------------------------------------------- 0620 062b | + | .CONST 0x062b ; Address of begin 0621 0004 | | .CONST 0x0004 ; Address of exception handler 0622 0003 | | .CONST 0x0003 ; Number of locals 0623 INIT_0620: 0623 e001 | | Load 0x0,0x1 0624 0322 | " | Declare_Variable Record 0625 00d8 | | Load_Top At_Offset_0 0626 1c00 | | Execute_Immediate Run_Utility,0x0 0627 e002 | | Load 0x0,0x2 0628 0322 | " | Declare_Variable Record 0629 00d8 | | Load_Top At_Offset_0 062a 1c00 | | Execute_Immediate Run_Utility,0x0 062b BODY_0620: 062b 00d9 | | Load_Top At_Offset_1 062c e5fc | | Load 0x2,-0x4 062d 4800 |H | Short_Literal 0x0 062e 00ea | | Load_Encached Null_String_Cache 062f e216 | | Load 0x1,0x16 0630 e5fd | | Load 0x2,-0x3 0631 00e0 | | Load_Encached Standard_Cache 0632 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0633 4800 |H | Short_Literal 0x0 0634 00ea | | Load_Encached Null_String_Cache 0635 e215 | | Load 0x1,0x15 0636 8003 | | Call 0x0,0x3 0637 00d1 | | Pop_Control Pop_Count_1 0638 00d8 | | Load_Top At_Offset_0 0639 00da | | Load_Top At_Offset_2 063a 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 063c e214 | | Load 0x1,0x14 063d 8004 | | Call 0x0,0x4 063e 00d1 | | Pop_Control Pop_Count_1 063f 00d8 | | Load_Top At_Offset_0 0640 e005 | | Load 0x0,0x5 0641 e006 | | Load 0x0,0x6 0642 e5fe | | Load 0x2,-0x2 0643 e5ff | | Load 0x2,-0x1 0644 4800 |H | Short_Literal 0x0 0645 8007 | | Call 0x0,0x7 0646 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0647 0000 | | .XXX[0x1] 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b e214 | | Load 0x1,0x14 064c 00db | | Load_Top At_Offset_3 064d 8008 | | Call 0x0,0x8 064e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 064f 0000 | | .XXX[0x1] 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 0680 | | .CONST 0x0680 ; Address of begin 0651 0004 | | .CONST 0x0004 ; Address of exception handler 0652 0019 | | .CONST 0x0019 ; Number of locals 0653 INIT_0650: 0653 029a 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Visible,Unelaborated 0655 029a 06bb | | Declare_Subprogram INIT_06b8,For_Outer_Call,Visible,Unelaborated 0657 029a 06c3 | | Declare_Subprogram INIT_06c0,For_Outer_Call,Visible,Unelaborated 0659 029a 06db | | Declare_Subprogram INIT_06d8,For_Outer_Call,Visible,Unelaborated 065b 029a 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call,Visible,Unelaborated 065d 029a 06fb | | Declare_Subprogram INIT_06f8,For_Outer_Call,Visible,Unelaborated 065f 029a 070b | | Declare_Subprogram INIT_0708,For_Outer_Call,Visible,Unelaborated 0661 029a 071b | | Declare_Subprogram INIT_0718,For_Outer_Call,Visible,Unelaborated 0663 029a 074b | K| Declare_Subprogram INIT_0748,For_Outer_Call,Visible,Unelaborated 0665 00bf | | Action Accept_Activation 0666 0092 0aef | | Action Push_String_Extended,0xaef ; "Class_Attribut_publication" 0668 0092 0af0 | | Action Push_String_Extended,0xaf0 ; "Class_Attribut_unpublication" 066a 0092 0adf | | Action Push_String_Extended,0xadf ; "behavior_id" 066c 0092 0ae0 | | Action Push_String_Extended,0xae0 ; "behavior_class" 066e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 066f 00c7 | | Action Elaborate_Subprogram 0670 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0671 00c7 | | Action Elaborate_Subprogram 0672 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0673 00c7 | | Action Elaborate_Subprogram 0674 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0675 00c7 | | Action Elaborate_Subprogram 0676 1d11 | | Execute_Immediate Reference_Lex_1,0x11 0677 00c7 | | Action Elaborate_Subprogram 0678 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0679 00c7 | | Action Elaborate_Subprogram 067a 1d13 | | Execute_Immediate Reference_Lex_1,0x13 067b 00c7 | | Action Elaborate_Subprogram 067c 1d14 | | Execute_Immediate Reference_Lex_1,0x14 067d 00c7 | | Action Elaborate_Subprogram 067e 1d15 | | Execute_Immediate Reference_Lex_1,0x15 067f 00c7 | | Action Elaborate_Subprogram 0680 BODY_0650: 0680 00bc | | Action Signal_Activated 0681 00bb | | Action Signal_Completion 0682 0000 0000 | | .BLANK 0000[0x6] 0688 ; -------------------------------------------------------------------------------------- 0688 ; SUBPROGRAM 0688 ; -------------------------------------------------------------------------------------- 0688 0693 | | .CONST 0x0693 ; Address of begin 0689 0004 | | .CONST 0x0004 ; Address of exception handler 068a 0003 | | .CONST 0x0003 ; Number of locals 068b INIT_0688: 068b e001 | | Load 0x0,0x1 068c 0322 | " | Declare_Variable Record 068d 00d8 | | Load_Top At_Offset_0 068e 1c00 | | Execute_Immediate Run_Utility,0x0 068f e002 | | Load 0x0,0x2 0690 0322 | " | Declare_Variable Record 0691 00d8 | | Load_Top At_Offset_0 0692 1c00 | | Execute_Immediate Run_Utility,0x0 0693 BODY_0688: 0693 00d8 | | Load_Top At_Offset_0 0694 e5f9 | | Load 0x2,-0x7 0695 4800 |H | Short_Literal 0x0 0696 e5fb | | Load 0x2,-0x5 0697 e5fa | | Load 0x2,-0x6 0698 e5fc | | Load 0x2,-0x4 0699 4800 |H | Short_Literal 0x0 069a 00ea | | Load_Encached Null_String_Cache 069b e219 | | Load 0x1,0x19 069c e5fd | | Load 0x2,-0x3 069d 00e0 | | Load_Encached Standard_Cache 069e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 069f 4800 |H | Short_Literal 0x0 06a0 00ea | | Load_Encached Null_String_Cache 06a1 e218 | | Load 0x1,0x18 06a2 8003 | | Call 0x0,0x3 06a3 00d1 | | Pop_Control Pop_Count_1 06a4 00d9 | | Load_Top At_Offset_1 06a5 00d9 | | Load_Top At_Offset_1 06a6 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 06a8 e216 | | Load 0x1,0x16 06a9 8004 | | Call 0x0,0x4 06aa 00d1 | | Pop_Control Pop_Count_1 06ab 00d9 | | Load_Top At_Offset_1 06ac e005 | | Load 0x0,0x5 06ad e006 | | Load 0x0,0x6 06ae e5fe | | Load 0x2,-0x2 06af e5ff | | Load 0x2,-0x1 06b0 4800 |H | Short_Literal 0x0 06b1 8007 | | Call 0x0,0x7 06b2 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 06b3 0000 0000 | | .BLANK 0000[0x5] 06b8 ; -------------------------------------------------------------------------------------- 06b8 ; SUBPROGRAM 06b8 ; -------------------------------------------------------------------------------------- 06b8 06bb | | .CONST 0x06bb ; Address of begin 06b9 0004 | | .CONST 0x0004 ; Address of exception handler 06ba 0001 | | .CONST 0x0001 ; Number of locals 06bb BODY_06b8: 06bb INIT_06b8: 06bb e216 | | Load 0x1,0x16 06bc 00db | | Load_Top At_Offset_3 06bd 8008 | | Call 0x0,0x8 06be 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06bf 0000 | | .XXX[0x1] 06c0 ; -------------------------------------------------------------------------------------- 06c0 ; SUBPROGRAM 06c0 ; -------------------------------------------------------------------------------------- 06c0 06c3 | | .CONST 0x06c3 ; Address of begin 06c1 06d0 | | .CONST 0x06d0 ; Address of exception handler 06c2 0001 | | .CONST 0x0001 ; Number of locals 06c3 BODY_06c0: 06c3 INIT_06c0: 06c3 4801 |H | Short_Literal 0x1 06c4 00db | | Load_Top At_Offset_3 06c5 8009 | | Call 0x0,0x9 06c6 800a | | Call 0x0,0xa 06c7 00e2 | | Load_Encached Integer_Cache 06c8 00e0 | | Load_Encached Standard_Cache 06c9 1819 | | Execute Package,Field_Execute,Field_Number 0x19 06ca 00d8 | | Load_Top At_Offset_0 06cb 00e3 | | Load_Encached Natural_Cache 06cc 0260 | ` | Execute Discrete,In_Type 06cd 7001 |p | Jump_Nonzero 0x6cf 06ce 0801 | | Execute_Immediate Raise,0x1 06cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06d0 TRAP_06c0: 06d0 0007 | | Action Break_Optional 06d1 e00b | | Load 0x0,0xb 06d2 0257 | W | Execute Discrete,Raise 06d3 0000 0000 | | .BLANK 0000[0x5] 06d8 ; -------------------------------------------------------------------------------------- 06d8 ; SUBPROGRAM 06d8 ; -------------------------------------------------------------------------------------- 06d8 06db | | .CONST 0x06db ; Address of begin 06d9 06e0 | | .CONST 0x06e0 ; Address of exception handler 06da 0001 | | .CONST 0x0001 ; Number of locals 06db BODY_06d8: 06db INIT_06d8: 06db 4802 |H | Short_Literal 0x2 06dc 00db | | Load_Top At_Offset_3 06dd 8009 | | Call 0x0,0x9 06de 800a | | Call 0x0,0xa 06df 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06e0 TRAP_06d8: 06e0 0007 | | Action Break_Optional 06e1 e00b | | Load 0x0,0xb 06e2 0257 | W | Execute Discrete,Raise 06e3 0000 0000 | | .BLANK 0000[0x5] 06e8 ; -------------------------------------------------------------------------------------- 06e8 ; SUBPROGRAM 06e8 ; -------------------------------------------------------------------------------------- 06e8 06eb | | .CONST 0x06eb ; Address of begin 06e9 06f0 | | .CONST 0x06f0 ; Address of exception handler 06ea 0001 | | .CONST 0x0001 ; Number of locals 06eb BODY_06e8: 06eb INIT_06e8: 06eb 4803 |H | Short_Literal 0x3 06ec 00db | | Load_Top At_Offset_3 06ed 8009 | | Call 0x0,0x9 06ee 800c | | Call 0x0,0xc 06ef 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 06f0 TRAP_06e8: 06f0 0007 | | Action Break_Optional 06f1 e00b | | Load 0x0,0xb 06f2 0257 | W | Execute Discrete,Raise 06f3 0000 0000 | | .BLANK 0000[0x5] 06f8 ; -------------------------------------------------------------------------------------- 06f8 ; SUBPROGRAM 06f8 ; -------------------------------------------------------------------------------------- 06f8 06fb | | .CONST 0x06fb ; Address of begin 06f9 0700 | | .CONST 0x0700 ; Address of exception handler 06fa 0001 | | .CONST 0x0001 ; Number of locals 06fb BODY_06f8: 06fb INIT_06f8: 06fb 4803 |H | Short_Literal 0x3 06fc 00db | | Load_Top At_Offset_3 06fd 8009 | | Call 0x0,0x9 06fe 800d | | Call 0x0,0xd 06ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0700 TRAP_06f8: 0700 0007 | | Action Break_Optional 0701 e00b | | Load 0x0,0xb 0702 0257 | W | Execute Discrete,Raise 0703 0000 0000 | | .BLANK 0000[0x5] 0708 ; -------------------------------------------------------------------------------------- 0708 ; SUBPROGRAM 0708 ; -------------------------------------------------------------------------------------- 0708 070b | | .CONST 0x070b ; Address of begin 0709 0710 | | .CONST 0x0710 ; Address of exception handler 070a 0001 | | .CONST 0x0001 ; Number of locals 070b BODY_0708: 070b INIT_0708: 070b 4803 |H | Short_Literal 0x3 070c 00db | | Load_Top At_Offset_3 070d 8009 | | Call 0x0,0x9 070e 800a | | Call 0x0,0xa 070f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0710 TRAP_0708: 0710 0007 | | Action Break_Optional 0711 e00b | | Load 0x0,0xb 0712 0257 | W | Execute Discrete,Raise 0713 0000 0000 | | .BLANK 0000[0x5] 0718 ; -------------------------------------------------------------------------------------- 0718 ; SUBPROGRAM 0718 ; -------------------------------------------------------------------------------------- 0718 0723 | # | .CONST 0x0723 ; Address of begin 0719 0004 | | .CONST 0x0004 ; Address of exception handler 071a 0003 | | .CONST 0x0003 ; Number of locals 071b INIT_0718: 071b e002 | | Load 0x0,0x2 071c 0322 | " | Declare_Variable Record 071d 00d8 | | Load_Top At_Offset_0 071e 1c00 | | Execute_Immediate Run_Utility,0x0 071f e001 | | Load 0x0,0x1 0720 0322 | " | Declare_Variable Record 0721 00d8 | | Load_Top At_Offset_0 0722 1c00 | | Execute_Immediate Run_Utility,0x0 0723 BODY_0718: 0723 00d9 | | Load_Top At_Offset_1 0724 00ea | | Load_Encached Null_String_Cache 0725 4800 |H | Short_Literal 0x0 0726 e5fa | | Load 0x2,-0x6 0727 e5fb | | Load 0x2,-0x5 0728 e5fc | | Load 0x2,-0x4 0729 4800 |H | Short_Literal 0x0 072a 00ea | | Load_Encached Null_String_Cache 072b e219 | | Load 0x1,0x19 072c e5fd | | Load 0x2,-0x3 072d 00e0 | | Load_Encached Standard_Cache 072e 1818 | | Execute Package,Field_Execute,Field_Number 0x18 072f 4800 |H | Short_Literal 0x0 0730 00ea | | Load_Encached Null_String_Cache 0731 e218 | | Load 0x1,0x18 0732 8003 | | Call 0x0,0x3 0733 00d1 | | Pop_Control Pop_Count_1 0734 00d8 | | Load_Top At_Offset_0 0735 00da | | Load_Top At_Offset_2 0736 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 0738 e217 | | Load 0x1,0x17 0739 8004 | | Call 0x0,0x4 073a 00d1 | | Pop_Control Pop_Count_1 073b 00d8 | | Load_Top At_Offset_0 073c e005 | | Load 0x0,0x5 073d e006 | | Load 0x0,0x6 073e e5fe | | Load 0x2,-0x2 073f e5ff | | Load 0x2,-0x1 0740 4800 |H | Short_Literal 0x0 0741 8007 | | Call 0x0,0x7 0742 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 0743 0000 0000 | | .BLANK 0000[0x5] 0748 ; -------------------------------------------------------------------------------------- 0748 ; SUBPROGRAM 0748 ; -------------------------------------------------------------------------------------- 0748 074b | K | .CONST 0x074b ; Address of begin 0749 0004 | | .CONST 0x0004 ; Address of exception handler 074a 0001 | | .CONST 0x0001 ; Number of locals 074b BODY_0748: 074b INIT_0748: 074b e217 | | Load 0x1,0x17 074c 00db | | Load_Top At_Offset_3 074d 8008 | | Call 0x0,0x8 074e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 074f 0000 | | .XXX[0x1] 0750 ; -------------------------------------------------------------------------------------- 0750 ; SUBPROGRAM 0750 ; -------------------------------------------------------------------------------------- 0750 0788 | | .CONST 0x0788 ; Address of begin 0751 0004 | | .CONST 0x0004 ; Address of exception handler 0752 001c | | .CONST 0x001c ; Number of locals 0753 INIT_0750: 0753 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated 0755 029a 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call,Visible,Unelaborated 0757 029a 07db | | Declare_Subprogram INIT_07d8,For_Outer_Call,Visible,Unelaborated 0759 029a 07f3 | | Declare_Subprogram INIT_07f0,For_Outer_Call,Visible,Unelaborated 075b 029a 081b | | Declare_Subprogram INIT_0818,For_Outer_Call,Visible,Unelaborated 075d 029a 0853 | S| Declare_Subprogram INIT_0850,For_Outer_Call,Visible,Unelaborated 075f 029a 088b | | Declare_Subprogram INIT_0888,For_Outer_Call,Visible,Unelaborated 0761 029a 08c3 | | Declare_Subprogram INIT_08c0,For_Outer_Call,Visible,Unelaborated 0763 029a 08eb | | Declare_Subprogram INIT_08e8,For_Outer_Call,Visible,Unelaborated 0765 029a 08f3 | | Declare_Subprogram INIT_08f0,For_Outer_Call,Visible,Unelaborated 0767 00bf | | Action Accept_Activation 0768 0092 0af1 | | Action Push_String_Extended,0xaf1 ; "Behavior_publication" 076a 0092 0af2 | | Action Push_String_Extended,0xaf2 ; "behavior_Unpublication" 076c 0092 0af3 | | Action Push_String_Extended,0xaf3 ; "Socket_id" 076e 0092 0af4 | | Action Push_String_Extended,0xaf4 ; "Internet_id" 0770 0092 0adf | | Action Push_String_Extended,0xadf ; "behavior_id" 0772 1d0d | | Execute_Immediate Reference_Lex_1,0xd 0773 00c7 | | Action Elaborate_Subprogram 0774 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0775 00c7 | | Action Elaborate_Subprogram 0776 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0777 00c7 | | Action Elaborate_Subprogram 0778 029d 090b | | Declare_Subprogram INIT_0908,For_Outer_Call 077a 1d10 | | Execute_Immediate Reference_Lex_1,0x10 077b 00c7 | | Action Elaborate_Subprogram 077c 1d11 | | Execute_Immediate Reference_Lex_1,0x11 077d 00c7 | | Action Elaborate_Subprogram 077e 1d12 | | Execute_Immediate Reference_Lex_1,0x12 077f 00c7 | | Action Elaborate_Subprogram 0780 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0781 00c7 | | Action Elaborate_Subprogram 0782 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0783 00c7 | | Action Elaborate_Subprogram 0784 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0785 00c7 | | Action Elaborate_Subprogram 0786 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0787 00c7 | | Action Elaborate_Subprogram 0788 BODY_0750: 0788 00bc | | Action Signal_Activated 0789 00bb | | Action Signal_Completion 078a 0000 0000 | | .BLANK 0000[0x6] 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 079b | | .CONST 0x079b ; Address of begin 0791 0004 | | .CONST 0x0004 ; Address of exception handler 0792 0003 | | .CONST 0x0003 ; Number of locals 0793 INIT_0790: 0793 e001 | | Load 0x0,0x1 0794 0322 | " | Declare_Variable Record 0795 00d8 | | Load_Top At_Offset_0 0796 1c00 | | Execute_Immediate Run_Utility,0x0 0797 e002 | | Load 0x0,0x2 0798 0322 | " | Declare_Variable Record 0799 00d8 | | Load_Top At_Offset_0 079a 1c00 | | Execute_Immediate Run_Utility,0x0 079b BODY_0790: 079b 00d8 | | Load_Top At_Offset_0 079c 482e |H. | Short_Literal 0x2e 079d 482e |H. | Short_Literal 0x2e 079e 482e |H. | Short_Literal 0x2e 079f e5fd | | Load 0x2,-0x3 07a0 00e0 | | Load_Encached Standard_Cache 07a1 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07a2 01cb | | Execute Vector,Append 07a3 e5fc | | Load 0x2,-0x4 07a4 00e0 | | Load_Encached Standard_Cache 07a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07a6 01cc | | Execute Vector,Catenate 07a7 01cb | | Execute Vector,Append 07a8 e5fb | | Load 0x2,-0x5 07a9 00e0 | | Load_Encached Standard_Cache 07aa 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07ab 01cc | | Execute Vector,Catenate 07ac 01cb | | Execute Vector,Append 07ad e5fa | | Load 0x2,-0x6 07ae 00e0 | | Load_Encached Standard_Cache 07af 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07b0 01cc | | Execute Vector,Catenate 07b1 4800 |H | Short_Literal 0x0 07b2 00ea | | Load_Encached Null_String_Cache 07b3 e21a | | Load 0x1,0x1a 07b4 e5fe | | Load 0x2,-0x2 07b5 00e0 | | Load_Encached Standard_Cache 07b6 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07b7 4800 |H | Short_Literal 0x0 07b8 00ea | | Load_Encached Null_String_Cache 07b9 e219 | | Load 0x1,0x19 07ba 8003 | | Call 0x0,0x3 07bb 00d1 | | Pop_Control Pop_Count_1 07bc 00d9 | | Load_Top At_Offset_1 07bd 00d9 | | Load_Top At_Offset_1 07be 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 07c0 e217 | | Load 0x1,0x17 07c1 8004 | | Call 0x0,0x4 07c2 00d1 | | Pop_Control Pop_Count_1 07c3 00d9 | | Load_Top At_Offset_1 07c4 e005 | | Load 0x0,0x5 07c5 e006 | | Load 0x0,0x6 07c6 00d8 | | Load_Top At_Offset_0 07c7 e5ff | | Load 0x2,-0x1 07c8 4800 |H | Short_Literal 0x0 07c9 8007 | | Call 0x0,0x7 07ca 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 07cb 0000 0000 | | .BLANK 0000[0x5] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07d3 | | .CONST 0x07d3 ; Address of begin 07d1 0004 | | .CONST 0x0004 ; Address of exception handler 07d2 0001 | | .CONST 0x0001 ; Number of locals 07d3 BODY_07d0: 07d3 INIT_07d0: 07d3 e217 | | Load 0x1,0x17 07d4 00db | | Load_Top At_Offset_3 07d5 8008 | | Call 0x0,0x8 07d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07d7 0000 | | .XXX[0x1] 07d8 ; -------------------------------------------------------------------------------------- 07d8 ; SUBPROGRAM 07d8 ; -------------------------------------------------------------------------------------- 07d8 07db | | .CONST 0x07db ; Address of begin 07d9 07e8 | | .CONST 0x07e8 ; Address of exception handler 07da 0001 | | .CONST 0x0001 ; Number of locals 07db BODY_07d8: 07db INIT_07d8: 07db 4801 |H | Short_Literal 0x1 07dc 00db | | Load_Top At_Offset_3 07dd 8009 | | Call 0x0,0x9 07de 800a | | Call 0x0,0xa 07df 00e2 | | Load_Encached Integer_Cache 07e0 00e0 | | Load_Encached Standard_Cache 07e1 1819 | | Execute Package,Field_Execute,Field_Number 0x19 07e2 00d8 | | Load_Top At_Offset_0 07e3 e00b | | Load 0x0,0xb 07e4 0260 | ` | Execute Discrete,In_Type 07e5 7001 |p | Jump_Nonzero 0x7e7 07e6 0801 | | Execute_Immediate Raise,0x1 07e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 07e8 TRAP_07d8: 07e8 0007 | | Action Break_Optional 07e9 e00c | | Load 0x0,0xc 07ea 0257 | W | Execute Discrete,Raise 07eb 0000 0000 | | .BLANK 0000[0x5] 07f0 ; -------------------------------------------------------------------------------------- 07f0 ; SUBPROGRAM 07f0 ; -------------------------------------------------------------------------------------- 07f0 07f6 | | .CONST 0x07f6 ; Address of begin 07f1 0810 | | .CONST 0x0810 ; Address of exception handler 07f2 0003 | | .CONST 0x0003 ; Number of locals 07f3 INIT_07f0: 07f3 00da | | Load_Top At_Offset_2 07f4 821c | | Call 0x1,0x1c 07f5 00e3 | | Load_Encached Natural_Cache 07f6 BODY_07f0: 07f6 4801 |H | Short_Literal 0x1 07f7 00da | | Load_Top At_Offset_2 07f8 482e |H. | Short_Literal 0x2e 07f9 800d | | Call 0x0,0xd 07fa 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1 07fb 00d8 | | Load_Top At_Offset_0 07fc 7002 |p | Jump_Nonzero 0x7ff 07fd e00c | | Load 0x0,0xc 07fe 0257 | W | Execute Discrete,Raise 07ff 00d9 | | Load_Top At_Offset_1 0800 01dd | | Execute Vector,First 0801 00d9 | | Load_Top At_Offset_1 0802 0aff | | Execute_Immediate Plus,-0x1 0803 00db | | Load_Top At_Offset_3 0804 01cf | | Execute Vector,Slice_Read 0805 00e2 | | Load_Encached Integer_Cache 0806 00e0 | | Load_Encached Standard_Cache 0807 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0808 e00e | | Load 0x0,0xe 0809 1b11 | | Execute Package,Field_Read,Field_Number 0x11 080a 00d9 | | Load_Top At_Offset_1 080b 00d0 | | Action Swap_Control 080c 0260 | ` | Execute Discrete,In_Type 080d 7001 |p | Jump_Nonzero 0x80f 080e 0801 | | Execute_Immediate Raise,0x1 080f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0810 TRAP_07f0: 0810 0007 | | Action Break_Optional 0811 e00c | | Load 0x0,0xc 0812 0257 | W | Execute Discrete,Raise 0813 0000 0000 | | .BLANK 0000[0x5] 0818 ; -------------------------------------------------------------------------------------- 0818 ; SUBPROGRAM 0818 ; -------------------------------------------------------------------------------------- 0818 081f | | .CONST 0x081f ; Address of begin 0819 084c | L | .CONST 0x084c ; Address of exception handler 081a 0004 | | .CONST 0x0004 ; Number of locals 081b INIT_0818: 081b 00e3 | | Load_Encached Natural_Cache 081c 00db | | Load_Top At_Offset_3 081d 821c | | Call 0x1,0x1c 081e 00e3 | | Load_Encached Natural_Cache 081f BODY_0818: 081f 00d9 | | Load_Top At_Offset_1 0820 01dd | | Execute Vector,First 0821 005b | [ | Store_Top Discrete,At_Offset_3 0822 00cf | | Action Mark_Auxiliary 0823 4802 |H | Short_Literal 0x2 0824 4801 |H | Short_Literal 0x1 0825 0007 | | Action Break_Optional 0826 4801 |H | Short_Literal 0x1 0827 e402 | | Load 0x2,0x2 0828 e403 | | Load 0x2,0x3 0829 01dc | | Execute Vector,Last 082a e403 | | Load 0x2,0x3 082b 01cf | | Execute Vector,Slice_Read 082c 482e |H. | Short_Literal 0x2e 082d 800d | | Call 0x0,0xd 082e a404 | | Store_Unchecked 0x2,0x4 082f 00db | | Load_Top At_Offset_3 0830 7002 |p | Jump_Nonzero 0x833 0831 e00c | | Load 0x0,0xc 0832 0257 | W | Execute Discrete,Raise 0833 00d8 | | Load_Top At_Offset_0 0834 0e02 | | Execute_Immediate Not_Equal,0x2 0835 6803 |h | Jump_Zero 0x839 0836 00db | | Load_Top At_Offset_3 0837 0a01 | | Execute_Immediate Plus,0x1 0838 c402 | | Store 0x2,0x2 0839 00c8 | | Action Pop_Auxiliary_Range 083a 3feb |? | Loop_Increasing 0x826 083b 00ce | | Action Pop_Auxiliary 083c 00da | | Load_Top At_Offset_2 083d 00d9 | | Load_Top At_Offset_1 083e 0aff | | Execute_Immediate Plus,-0x1 083f 00db | | Load_Top At_Offset_3 0840 01cf | | Execute Vector,Slice_Read 0841 00e2 | | Load_Encached Integer_Cache 0842 00e0 | | Load_Encached Standard_Cache 0843 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0844 e00e | | Load 0x0,0xe 0845 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0846 00d9 | | Load_Top At_Offset_1 0847 00d0 | | Action Swap_Control 0848 0260 | ` | Execute Discrete,In_Type 0849 7001 |p | Jump_Nonzero 0x84b 084a 0801 | | Execute_Immediate Raise,0x1 084b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 084c TRAP_0818: 084c 0007 | | Action Break_Optional 084d e00c | | Load 0x0,0xc 084e 0257 | W | Execute Discrete,Raise 084f 0000 | | .XXX[0x1] 0850 ; -------------------------------------------------------------------------------------- 0850 ; SUBPROGRAM 0850 ; -------------------------------------------------------------------------------------- 0850 0857 | W | .CONST 0x0857 ; Address of begin 0851 0884 | | .CONST 0x0884 ; Address of exception handler 0852 0004 | | .CONST 0x0004 ; Number of locals 0853 INIT_0850: 0853 00e3 | | Load_Encached Natural_Cache 0854 00db | | Load_Top At_Offset_3 0855 821c | | Call 0x1,0x1c 0856 00e3 | | Load_Encached Natural_Cache 0857 BODY_0850: 0857 00d9 | | Load_Top At_Offset_1 0858 01dd | | Execute Vector,First 0859 005b | [ | Store_Top Discrete,At_Offset_3 085a 00cf | | Action Mark_Auxiliary 085b 4803 |H | Short_Literal 0x3 085c 4801 |H | Short_Literal 0x1 085d 0007 | | Action Break_Optional 085e 4801 |H | Short_Literal 0x1 085f e402 | | Load 0x2,0x2 0860 e403 | | Load 0x2,0x3 0861 01dc | | Execute Vector,Last 0862 e403 | | Load 0x2,0x3 0863 01cf | | Execute Vector,Slice_Read 0864 482e |H. | Short_Literal 0x2e 0865 800d | | Call 0x0,0xd 0866 a404 | | Store_Unchecked 0x2,0x4 0867 00db | | Load_Top At_Offset_3 0868 7002 |p | Jump_Nonzero 0x86b 0869 e00c | | Load 0x0,0xc 086a 0257 | W | Execute Discrete,Raise 086b 00d8 | | Load_Top At_Offset_0 086c 0e03 | | Execute_Immediate Not_Equal,0x3 086d 6803 |h | Jump_Zero 0x871 086e 00db | | Load_Top At_Offset_3 086f 0a01 | | Execute_Immediate Plus,0x1 0870 c402 | | Store 0x2,0x2 0871 00c8 | | Action Pop_Auxiliary_Range 0872 3feb |? | Loop_Increasing 0x85e 0873 00ce | | Action Pop_Auxiliary 0874 00da | | Load_Top At_Offset_2 0875 00d9 | | Load_Top At_Offset_1 0876 0aff | | Execute_Immediate Plus,-0x1 0877 00db | | Load_Top At_Offset_3 0878 01cf | | Execute Vector,Slice_Read 0879 00e2 | | Load_Encached Integer_Cache 087a 00e0 | | Load_Encached Standard_Cache 087b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 087c e00e | | Load 0x0,0xe 087d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 087e 00d9 | | Load_Top At_Offset_1 087f 00d0 | | Action Swap_Control 0880 0260 | ` | Execute Discrete,In_Type 0881 7001 |p | Jump_Nonzero 0x883 0882 0801 | | Execute_Immediate Raise,0x1 0883 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0884 TRAP_0850: 0884 0007 | | Action Break_Optional 0885 e00c | | Load 0x0,0xc 0886 0257 | W | Execute Discrete,Raise 0887 0000 | | .XXX[0x1] 0888 ; -------------------------------------------------------------------------------------- 0888 ; SUBPROGRAM 0888 ; -------------------------------------------------------------------------------------- 0888 088f | | .CONST 0x088f ; Address of begin 0889 08b9 | | .CONST 0x08b9 ; Address of exception handler 088a 0004 | | .CONST 0x0004 ; Number of locals 088b INIT_0888: 088b 00e3 | | Load_Encached Natural_Cache 088c 00db | | Load_Top At_Offset_3 088d 821c | | Call 0x1,0x1c 088e 00e3 | | Load_Encached Natural_Cache 088f BODY_0888: 088f 00d9 | | Load_Top At_Offset_1 0890 01dd | | Execute Vector,First 0891 005b | [ | Store_Top Discrete,At_Offset_3 0892 00cf | | Action Mark_Auxiliary 0893 4803 |H | Short_Literal 0x3 0894 4801 |H | Short_Literal 0x1 0895 0007 | | Action Break_Optional 0896 4801 |H | Short_Literal 0x1 0897 e402 | | Load 0x2,0x2 0898 e403 | | Load 0x2,0x3 0899 01dc | | Execute Vector,Last 089a e403 | | Load 0x2,0x3 089b 01cf | | Execute Vector,Slice_Read 089c 482e |H. | Short_Literal 0x2e 089d 800d | | Call 0x0,0xd 089e a404 | | Store_Unchecked 0x2,0x4 089f 00db | | Load_Top At_Offset_3 08a0 7002 |p | Jump_Nonzero 0x8a3 08a1 e00c | | Load 0x0,0xc 08a2 0257 | W | Execute Discrete,Raise 08a3 00db | | Load_Top At_Offset_3 08a4 0a01 | | Execute_Immediate Plus,0x1 08a5 c402 | | Store 0x2,0x2 08a6 00c8 | | Action Pop_Auxiliary_Range 08a7 3fee |? | Loop_Increasing 0x896 08a8 00ce | | Action Pop_Auxiliary 08a9 00da | | Load_Top At_Offset_2 08aa 00da | | Load_Top At_Offset_2 08ab 01dc | | Execute Vector,Last 08ac 00db | | Load_Top At_Offset_3 08ad 01cf | | Execute Vector,Slice_Read 08ae 00e2 | | Load_Encached Integer_Cache 08af 00e0 | | Load_Encached Standard_Cache 08b0 1819 | | Execute Package,Field_Execute,Field_Number 0x19 08b1 e00e | | Load 0x0,0xe 08b2 1b11 | | Execute Package,Field_Read,Field_Number 0x11 08b3 00d9 | | Load_Top At_Offset_1 08b4 00d0 | | Action Swap_Control 08b5 0260 | ` | Execute Discrete,In_Type 08b6 7001 |p | Jump_Nonzero 0x8b8 08b7 0801 | | Execute_Immediate Raise,0x1 08b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08b9 TRAP_0888: 08b9 0007 | | Action Break_Optional 08ba e00c | | Load 0x0,0xc 08bb 0257 | W | Execute Discrete,Raise 08bc 0000 0000 | | .BLANK 0000[0x4] 08c0 ; -------------------------------------------------------------------------------------- 08c0 ; SUBPROGRAM 08c0 ; -------------------------------------------------------------------------------------- 08c0 08cb | | .CONST 0x08cb ; Address of begin 08c1 0004 | | .CONST 0x0004 ; Address of exception handler 08c2 0003 | | .CONST 0x0003 ; Number of locals 08c3 INIT_08c0: 08c3 e001 | | Load 0x0,0x1 08c4 0322 | " | Declare_Variable Record 08c5 00d8 | | Load_Top At_Offset_0 08c6 1c00 | | Execute_Immediate Run_Utility,0x0 08c7 e002 | | Load 0x0,0x2 08c8 0322 | " | Declare_Variable Record 08c9 00d8 | | Load_Top At_Offset_0 08ca 1c00 | | Execute_Immediate Run_Utility,0x0 08cb BODY_08c0: 08cb 00d8 | | Load_Top At_Offset_0 08cc e5fd | | Load 0x2,-0x3 08cd 00e0 | | Load_Encached Standard_Cache 08ce 1818 | | Execute Package,Field_Execute,Field_Number 0x18 08cf 4800 |H | Short_Literal 0x0 08d0 00ea | | Load_Encached Null_String_Cache 08d1 e21b | | Load 0x1,0x1b 08d2 800f | | Call 0x0,0xf 08d3 00d1 | | Pop_Control Pop_Count_1 08d4 00d9 | | Load_Top At_Offset_1 08d5 00d9 | | Load_Top At_Offset_1 08d6 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 08d8 e218 | | Load 0x1,0x18 08d9 8004 | | Call 0x0,0x4 08da 00d1 | | Pop_Control Pop_Count_1 08db 00d9 | | Load_Top At_Offset_1 08dc e005 | | Load 0x0,0x5 08dd e006 | | Load 0x0,0x6 08de e5fe | | Load 0x2,-0x2 08df e5ff | | Load 0x2,-0x1 08e0 4800 |H | Short_Literal 0x0 08e1 8007 | | Call 0x0,0x7 08e2 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 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 e218 | | Load 0x1,0x18 08ec 00db | | Load_Top At_Offset_3 08ed 8008 | | Call 0x0,0x8 08ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ef 0000 | | .XXX[0x1] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08f3 | | .CONST 0x08f3 ; Address of begin 08f1 0900 | | .CONST 0x0900 ; Address of exception handler 08f2 0001 | | .CONST 0x0001 ; Number of locals 08f3 BODY_08f0: 08f3 INIT_08f0: 08f3 4801 |H | Short_Literal 0x1 08f4 00db | | Load_Top At_Offset_3 08f5 8009 | | Call 0x0,0x9 08f6 800a | | Call 0x0,0xa 08f7 00e2 | | Load_Encached Integer_Cache 08f8 00e0 | | Load_Encached Standard_Cache 08f9 1819 | | Execute Package,Field_Execute,Field_Number 0x19 08fa 00d8 | | Load_Top At_Offset_0 08fb 00e3 | | Load_Encached Natural_Cache 08fc 0260 | ` | Execute Discrete,In_Type 08fd 7001 |p | Jump_Nonzero 0x8ff 08fe 0801 | | Execute_Immediate Raise,0x1 08ff 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0900 TRAP_08f0: 0900 0007 | | Action Break_Optional 0901 e00c | | Load 0x0,0xc 0902 0257 | W | Execute Discrete,Raise 0903 0000 0000 | | .BLANK 0000[0x5] 0908 ; -------------------------------------------------------------------------------------- 0908 ; SUBPROGRAM 0908 ; -------------------------------------------------------------------------------------- 0908 090b | | .CONST 0x090b ; Address of begin 0909 0004 | | .CONST 0x0004 ; Address of exception handler 090a 0001 | | .CONST 0x0001 ; Number of locals 090b BODY_0908: 090b INIT_0908: 090b 4802 |H | Short_Literal 0x2 090c 00db | | Load_Top At_Offset_3 090d 8009 | | Call 0x0,0x9 090e 800a | | Call 0x0,0xa 090f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0910 ; -------------------------------------------------------------------------------------- 0910 ; SUBPROGRAM 0910 ; -------------------------------------------------------------------------------------- 0910 094b | K | .CONST 0x094b ; Address of begin 0911 0004 | | .CONST 0x0004 ; Address of exception handler 0912 001c | | .CONST 0x001c ; Number of locals 0913 INIT_0910: 0913 4800 |H | Short_Literal 0x0 0914 4806 |H | Short_Literal 0x6 0915 029f 0953 | S| Declare_Subprogram INIT_0950,For_Call 0917 03fe | | Declare_Type Discrete,Defined,Visible 0918 029a 097b | {| Declare_Subprogram INIT_0978,For_Outer_Call,Visible,Unelaborated 091a 029a 09a3 | | Declare_Subprogram INIT_09a0,For_Outer_Call,Visible,Unelaborated 091c 029a 09ab | | Declare_Subprogram INIT_09a8,For_Outer_Call,Visible,Unelaborated 091e 029a 09f3 | | Declare_Subprogram INIT_09f0,For_Outer_Call,Visible,Unelaborated 0920 029a 09fb | | Declare_Subprogram INIT_09f8,For_Outer_Call,Visible,Unelaborated 0922 029a 0a2b | +| Declare_Subprogram INIT_0a28,For_Outer_Call,Visible,Unelaborated 0924 029a 0a73 | s| Declare_Subprogram INIT_0a70,For_Outer_Call,Visible,Unelaborated 0926 029a 0a8b | | Declare_Subprogram INIT_0a88,For_Outer_Call,Visible,Unelaborated 0928 029a 0aa3 | | Declare_Subprogram INIT_0aa0,For_Outer_Call,Visible,Unelaborated 092a 029a 0acb | | Declare_Subprogram INIT_0ac8,For_Outer_Call,Visible,Unelaborated 092c 00bf | | Action Accept_Activation 092d 0092 0af5 | | Action Push_String_Extended,0xaf5 ; "Dump" 092f 0092 0af6 | | Action Push_String_Extended,0xaf6 ; "Dump_Reply" 0931 0092 0af7 | | Action Push_String_Extended,0xaf7 ; "data_base name" 0933 0092 0af8 | | Action Push_String_Extended,0xaf8 ; "Tuple" 0935 0092 0af9 | | Action Push_String_Extended,0xaf9 ; "Dump_End" 0937 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0938 00c7 | | Action Elaborate_Subprogram 0939 1d0f | | Execute_Immediate Reference_Lex_1,0xf 093a 00c7 | | Action Elaborate_Subprogram 093b 1d10 | | Execute_Immediate Reference_Lex_1,0x10 093c 00c7 | | Action Elaborate_Subprogram 093d 1d11 | | Execute_Immediate Reference_Lex_1,0x11 093e 00c7 | | Action Elaborate_Subprogram 093f 1d12 | | Execute_Immediate Reference_Lex_1,0x12 0940 00c7 | | Action Elaborate_Subprogram 0941 1d13 | | Execute_Immediate Reference_Lex_1,0x13 0942 00c7 | | Action Elaborate_Subprogram 0943 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0944 00c7 | | Action Elaborate_Subprogram 0945 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0946 00c7 | | Action Elaborate_Subprogram 0947 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0948 00c7 | | Action Elaborate_Subprogram 0949 1d17 | | Execute_Immediate Reference_Lex_1,0x17 094a 00c7 | | Action Elaborate_Subprogram 094b BODY_0910: 094b 00bc | | Action Signal_Activated 094c 00bb | | Action Signal_Completion 094d 0000 0000 | | .XXX[0x3] 094f 0000 | | 0950 ; -------------------------------------------------------------------------------------- 0950 ; SUBPROGRAM 0950 ; -------------------------------------------------------------------------------------- 0950 0953 | S | .CONST 0x0953 ; Address of begin 0951 0004 | | .CONST 0x0004 ; Address of exception handler 0952 0001 | | .CONST 0x0001 ; Number of locals 0953 BODY_0950: 0953 INIT_0950: 0953 4607 |F | Jump_Case 0x8 0954 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0 0955 7807 |x | Jump 0x95d ; case 0x1 0956 780a |x | Jump 0x961 ; case 0x2 0957 780e |x | Jump 0x966 ; case 0x3 0958 7811 |x | Jump 0x96a ; case 0x4 0959 7812 |x | Jump 0x96c ; case 0x5 095a 7813 |x | Jump 0x96e ; case 0x6 095b 7816 |x | Jump 0x972 ; case 0x7 095c 4302 |C | .XXX[0x1] 095d 00da | | Load_Top At_Offset_2 095e 0091 0ad4 | | Action Push_String_Extended_Indexed,0xad4 ; "BEHAVIOR_DB" 0960 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 0961 00db | | Load_Top At_Offset_3 0962 00db | | Load_Top At_Offset_3 0963 00e0 | | Load_Encached Standard_Cache 0964 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0965 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0966 00da | | Load_Top At_Offset_2 0967 00e0 | | Load_Encached Standard_Cache 0968 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0969 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1 096a 00db | | Load_Top At_Offset_3 096b 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 096c 00db | | Load_Top At_Offset_3 096d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 096e e20d | | Load 0x1,0xd 096f 00dc | | Load_Top At_Offset_4 0970 0267 | g | Execute Discrete,Predecessor 0971 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0972 e20d | | Load 0x1,0xd 0973 00dc | | Load_Top At_Offset_4 0974 0268 | h | Execute Discrete,Successor 0975 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2 0976 0000 0000 | | .XXX[0x2] 0978 ; -------------------------------------------------------------------------------------- 0978 ; SUBPROGRAM 0978 ; -------------------------------------------------------------------------------------- 0978 0983 | | .CONST 0x0983 ; Address of begin 0979 0004 | | .CONST 0x0004 ; Address of exception handler 097a 0003 | | .CONST 0x0003 ; Number of locals 097b INIT_0978: 097b e001 | | Load 0x0,0x1 097c 0322 | " | Declare_Variable Record 097d 00d8 | | Load_Top At_Offset_0 097e 1c00 | | Execute_Immediate Run_Utility,0x0 097f e002 | | Load 0x0,0x2 0980 0322 | " | Declare_Variable Record 0981 00d8 | | Load_Top At_Offset_0 0982 1c00 | | Execute_Immediate Run_Utility,0x0 0983 BODY_0978: 0983 00d9 | | Load_Top At_Offset_1 0984 e5fd | | Load 0x2,-0x3 0985 e20d | | Load 0x1,0xd 0986 011c | | Execute Any,Convert_Unchecked 0987 1c01 | | Execute_Immediate Run_Utility,0x1 0988 4800 |H | Short_Literal 0x0 0989 00ea | | Load_Encached Null_String_Cache 098a e21a | | Load 0x1,0x1a 098b 8003 | | Call 0x0,0x3 098c 00d1 | | Pop_Control Pop_Count_1 098d 00d8 | | Load_Top At_Offset_0 098e 00da | | Load_Top At_Offset_2 098f 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 0991 e218 | | Load 0x1,0x18 0992 8004 | | Call 0x0,0x4 0993 00d1 | | Pop_Control Pop_Count_1 0994 00d8 | | Load_Top At_Offset_0 0995 e005 | | Load 0x0,0x5 0996 e006 | | Load 0x0,0x6 0997 e5fe | | Load 0x2,-0x2 0998 e5ff | | Load 0x2,-0x1 0999 4800 |H | Short_Literal 0x0 099a 8007 | | Call 0x0,0x7 099b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 099c 0000 0000 | | .BLANK 0000[0x4] 09a0 ; -------------------------------------------------------------------------------------- 09a0 ; SUBPROGRAM 09a0 ; -------------------------------------------------------------------------------------- 09a0 09a3 | | .CONST 0x09a3 ; Address of begin 09a1 0004 | | .CONST 0x0004 ; Address of exception handler 09a2 0001 | | .CONST 0x0001 ; Number of locals 09a3 BODY_09a0: 09a3 INIT_09a0: 09a3 e218 | | Load 0x1,0x18 09a4 00db | | Load_Top At_Offset_3 09a5 8008 | | Call 0x0,0x8 09a6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09a7 0000 | | .XXX[0x1] 09a8 ; -------------------------------------------------------------------------------------- 09a8 ; SUBPROGRAM 09a8 ; -------------------------------------------------------------------------------------- 09a8 09b3 | | .CONST 0x09b3 ; Address of begin 09a9 0004 | | .CONST 0x0004 ; Address of exception handler 09aa 0003 | | .CONST 0x0003 ; Number of locals 09ab INIT_09a8: 09ab e001 | | Load 0x0,0x1 09ac 0322 | " | Declare_Variable Record 09ad 00d8 | | Load_Top At_Offset_0 09ae 1c00 | | Execute_Immediate Run_Utility,0x0 09af e002 | | Load 0x0,0x2 09b0 0322 | " | Declare_Variable Record 09b1 00d8 | | Load_Top At_Offset_0 09b2 1c00 | | Execute_Immediate Run_Utility,0x0 09b3 BODY_09a8: 09b3 e5fb | | Load 0x2,-0x5 09b4 01db | | Execute Vector,Length 09b5 0c65 | e | Execute_Immediate Greater_Equal,0x65 09b6 681a |h | Jump_Zero 0x9d1 09b7 00d9 | | Load_Top At_Offset_1 09b8 e5fb | | Load 0x2,-0x5 09b9 01dd | | Execute Vector,First 09ba e5fb | | Load 0x2,-0x5 09bb 01dd | | Execute Vector,First 09bc 0a63 | c | Execute_Immediate Plus,0x63 09bd 00d8 | | Load_Top At_Offset_0 09be 00e2 | | Load_Encached Integer_Cache 09bf 0260 | ` | Execute Discrete,In_Type 09c0 7001 |p | Jump_Nonzero 0x9c2 09c1 0801 | | Execute_Immediate Raise,0x1 09c2 e5fb | | Load 0x2,-0x5 09c3 01cf | | Execute Vector,Slice_Read 09c4 4800 |H | Short_Literal 0x0 09c5 00ea | | Load_Encached Null_String_Cache 09c6 e21b | | Load 0x1,0x1b 09c7 e5fc | | Load 0x2,-0x4 09c8 e20d | | Load 0x1,0xd 09c9 011c | | Execute Any,Convert_Unchecked 09ca 1c01 | | Execute_Immediate Run_Utility,0x1 09cb 4800 |H | Short_Literal 0x0 09cc 00ea | | Load_Encached Null_String_Cache 09cd e21a | | Load 0x1,0x1a 09ce 8009 | | Call 0x0,0x9 09cf 00d1 | | Pop_Control Pop_Count_1 09d0 780e |x | Jump 0x9df 09d1 00d9 | | Load_Top At_Offset_1 09d2 e5fb | | Load 0x2,-0x5 09d3 4800 |H | Short_Literal 0x0 09d4 00ea | | Load_Encached Null_String_Cache 09d5 e21b | | Load 0x1,0x1b 09d6 e5fc | | Load 0x2,-0x4 09d7 e20d | | Load 0x1,0xd 09d8 011c | | Execute Any,Convert_Unchecked 09d9 1c01 | | Execute_Immediate Run_Utility,0x1 09da 4800 |H | Short_Literal 0x0 09db 00ea | | Load_Encached Null_String_Cache 09dc e21a | | Load 0x1,0x1a 09dd 8009 | | Call 0x0,0x9 09de 00d1 | | Pop_Control Pop_Count_1 09df 00d8 | | Load_Top At_Offset_0 09e0 00da | | Load_Top At_Offset_2 09e1 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 09e3 e219 | | Load 0x1,0x19 09e4 8004 | | Call 0x0,0x4 09e5 00d1 | | Pop_Control Pop_Count_1 09e6 00d8 | | Load_Top At_Offset_0 09e7 e005 | | Load 0x0,0x5 09e8 e5fd | | Load 0x2,-0x3 09e9 e5fe | | Load 0x2,-0x2 09ea e5ff | | Load 0x2,-0x1 09eb 4800 |H | Short_Literal 0x0 09ec 8007 | | Call 0x0,0x7 09ed 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 09ee 0000 0000 | | .XXX[0x2] 09f0 ; -------------------------------------------------------------------------------------- 09f0 ; SUBPROGRAM 09f0 ; -------------------------------------------------------------------------------------- 09f0 09f3 | | .CONST 0x09f3 ; Address of begin 09f1 0004 | | .CONST 0x0004 ; Address of exception handler 09f2 0001 | | .CONST 0x0001 ; Number of locals 09f3 BODY_09f0: 09f3 INIT_09f0: 09f3 e219 | | Load 0x1,0x19 09f4 00db | | Load_Top At_Offset_3 09f5 8008 | | Call 0x0,0x8 09f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 09f7 0000 | | .XXX[0x1] 09f8 ; -------------------------------------------------------------------------------------- 09f8 ; SUBPROGRAM 09f8 ; -------------------------------------------------------------------------------------- 09f8 0a07 | | .CONST 0x0a07 ; Address of begin 09f9 0004 | | .CONST 0x0004 ; Address of exception handler 09fa 0004 | | .CONST 0x0004 ; Number of locals 09fb INIT_09f8: 09fb e00a | | Load 0x0,0xa 09fc 0322 | " | Declare_Variable Record 09fd 00d8 | | Load_Top At_Offset_0 09fe 1c00 | | Execute_Immediate Run_Utility,0x0 09ff e001 | | Load 0x0,0x1 0a00 0322 | " | Declare_Variable Record 0a01 00d8 | | Load_Top At_Offset_0 0a02 1c00 | | Execute_Immediate Run_Utility,0x0 0a03 e002 | | Load 0x0,0x2 0a04 0322 | " | Declare_Variable Record 0a05 00d8 | | Load_Top At_Offset_0 0a06 1c00 | | Execute_Immediate Run_Utility,0x0 0a07 BODY_09f8: 0a07 e5fe | | Load 0x2,-0x2 0a08 800b | | Call 0x0,0xb 0a09 00d9 | | Load_Top At_Offset_1 0a0a 017d | } | Execute Record,Structure_Write 0a0b 00d8 | | Load_Top At_Offset_0 0a0c 800c | | Call 0x0,0xc 0a0d 00da | | Load_Top At_Offset_2 0a0e 017d | } | Execute Record,Structure_Write 0a0f 4801 |H | Short_Literal 0x1 0a10 00da | | Load_Top At_Offset_2 0a11 800d | | Call 0x0,0xd 0a12 00db | | Load_Top At_Offset_3 0a13 017d | } | Execute Record,Structure_Write 0a14 00da | | Load_Top At_Offset_2 0a15 e5ff | | Load 0x2,-0x1 0a16 e20d | | Load 0x1,0xd 0a17 011c | | Execute Any,Convert_Unchecked 0a18 1c01 | | Execute_Immediate Run_Utility,0x1 0a19 800e | | Call 0x0,0xe 0a1a 00d1 | | Pop_Control Pop_Count_1 0a1b 00d9 | | Load_Top At_Offset_1 0a1c 4801 |H | Short_Literal 0x1 0a1d e402 | | Load 0x2,0x2 0a1e 800f | | Call 0x0,0xf 0a1f 00d1 | | Pop_Control Pop_Count_1 0a20 00d8 | | Load_Top At_Offset_0 0a21 00da | | Load_Top At_Offset_2 0a22 8010 | | Call 0x0,0x10 0a23 00d1 | | Pop_Control Pop_Count_1 0a24 e5fe | | Load 0x2,-0x2 0a25 00d9 | | Load_Top At_Offset_1 0a26 8011 | | Call 0x0,0x11 0a27 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a28 ; -------------------------------------------------------------------------------------- 0a28 ; SUBPROGRAM 0a28 ; -------------------------------------------------------------------------------------- 0a28 0a37 | 7 | .CONST 0x0a37 ; Address of begin 0a29 0004 | | .CONST 0x0004 ; Address of exception handler 0a2a 0004 | | .CONST 0x0004 ; Number of locals 0a2b INIT_0a28: 0a2b e00a | | Load 0x0,0xa 0a2c 0322 | " | Declare_Variable Record 0a2d 00d8 | | Load_Top At_Offset_0 0a2e 1c00 | | Execute_Immediate Run_Utility,0x0 0a2f e001 | | Load 0x0,0x1 0a30 0322 | " | Declare_Variable Record 0a31 00d8 | | Load_Top At_Offset_0 0a32 1c00 | | Execute_Immediate Run_Utility,0x0 0a33 e002 | | Load 0x0,0x2 0a34 0322 | " | Declare_Variable Record 0a35 00d8 | | Load_Top At_Offset_0 0a36 1c00 | | Execute_Immediate Run_Utility,0x0 0a37 BODY_0a28: 0a37 e5fe | | Load 0x2,-0x2 0a38 800b | | Call 0x0,0xb 0a39 00d9 | | Load_Top At_Offset_1 0a3a 017d | } | Execute Record,Structure_Write 0a3b 00d8 | | Load_Top At_Offset_0 0a3c 800c | | Call 0x0,0xc 0a3d 00da | | Load_Top At_Offset_2 0a3e 017d | } | Execute Record,Structure_Write 0a3f 4802 |H | Short_Literal 0x2 0a40 00da | | Load_Top At_Offset_2 0a41 800d | | Call 0x0,0xd 0a42 00db | | Load_Top At_Offset_3 0a43 017d | } | Execute Record,Structure_Write 0a44 e5ff | | Load 0x2,-0x1 0a45 01db | | Execute Vector,Length 0a46 0c65 | e | Execute_Immediate Greater_Equal,0x65 0a47 6810 |h | Jump_Zero 0xa58 0a48 00da | | Load_Top At_Offset_2 0a49 e5ff | | Load 0x2,-0x1 0a4a 01dd | | Execute Vector,First 0a4b e5ff | | Load 0x2,-0x1 0a4c 01dd | | Execute Vector,First 0a4d 0a63 | c | Execute_Immediate Plus,0x63 0a4e 00d8 | | Load_Top At_Offset_0 0a4f 00e2 | | Load_Encached Integer_Cache 0a50 0260 | ` | Execute Discrete,In_Type 0a51 7001 |p | Jump_Nonzero 0xa53 0a52 0801 | | Execute_Immediate Raise,0x1 0a53 e5ff | | Load 0x2,-0x1 0a54 01cf | | Execute Vector,Slice_Read 0a55 800e | | Call 0x0,0xe 0a56 00d1 | | Pop_Control Pop_Count_1 0a57 7804 |x | Jump 0xa5c 0a58 00da | | Load_Top At_Offset_2 0a59 e5ff | | Load 0x2,-0x1 0a5a 800e | | Call 0x0,0xe 0a5b 00d1 | | Pop_Control Pop_Count_1 0a5c 00d9 | | Load_Top At_Offset_1 0a5d 4802 |H | Short_Literal 0x2 0a5e e402 | | Load 0x2,0x2 0a5f 800f | | Call 0x0,0xf 0a60 00d1 | | Pop_Control Pop_Count_1 0a61 00d8 | | Load_Top At_Offset_0 0a62 00da | | Load_Top At_Offset_2 0a63 8010 | | Call 0x0,0x10 0a64 00d1 | | Pop_Control Pop_Count_1 0a65 e5fe | | Load 0x2,-0x2 0a66 00d9 | | Load_Top At_Offset_1 0a67 8011 | | Call 0x0,0x11 0a68 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0a69 0000 0000 | | .BLANK 0000[0x7] 0a70 ; -------------------------------------------------------------------------------------- 0a70 ; SUBPROGRAM 0a70 ; -------------------------------------------------------------------------------------- 0a70 0a77 | w | .CONST 0x0a77 ; Address of begin 0a71 0a83 | | .CONST 0x0a83 ; Address of exception handler 0a72 0002 | | .CONST 0x0002 ; Number of locals 0a73 INIT_0a70: 0a73 e00a | | Load 0x0,0xa 0a74 0322 | " | Declare_Variable Record 0a75 00d8 | | Load_Top At_Offset_0 0a76 1c00 | | Execute_Immediate Run_Utility,0x0 0a77 BODY_0a70: 0a77 4801 |H | Short_Literal 0x1 0a78 e5ff | | Load 0x2,-0x1 0a79 800b | | Call 0x0,0xb 0a7a 800c | | Call 0x0,0xc 0a7b 800d | | Call 0x0,0xd 0a7c 00d9 | | Load_Top At_Offset_1 0a7d 017d | } | Execute Record,Structure_Write 0a7e 00d8 | | Load_Top At_Offset_0 0a7f 8012 | | Call 0x0,0x12 0a80 e20d | | Load 0x1,0xd 0a81 1c02 | | Execute_Immediate Run_Utility,0x2 0a82 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a83 TRAP_0a70: 0a83 0007 | | Action Break_Optional 0a84 e013 | | Load 0x0,0x13 0a85 0257 | W | Execute Discrete,Raise 0a86 0000 0000 | | .XXX[0x2] 0a88 ; -------------------------------------------------------------------------------------- 0a88 ; SUBPROGRAM 0a88 ; -------------------------------------------------------------------------------------- 0a88 0a8f | | .CONST 0x0a8f ; Address of begin 0a89 0a99 | | .CONST 0x0a99 ; Address of exception handler 0a8a 0002 | | .CONST 0x0002 ; Number of locals 0a8b INIT_0a88: 0a8b e00a | | Load 0x0,0xa 0a8c 0322 | " | Declare_Variable Record 0a8d 00d8 | | Load_Top At_Offset_0 0a8e 1c00 | | Execute_Immediate Run_Utility,0x0 0a8f BODY_0a88: 0a8f 4802 |H | Short_Literal 0x2 0a90 e5ff | | Load 0x2,-0x1 0a91 800b | | Call 0x0,0xb 0a92 800c | | Call 0x0,0xc 0a93 800d | | Call 0x0,0xd 0a94 00d9 | | Load_Top At_Offset_1 0a95 017d | } | Execute Record,Structure_Write 0a96 00d8 | | Load_Top At_Offset_0 0a97 8012 | | Call 0x0,0x12 0a98 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0a99 TRAP_0a88: 0a99 0007 | | Action Break_Optional 0a9a e013 | | Load 0x0,0x13 0a9b 0257 | W | Execute Discrete,Raise 0a9c 0000 0000 | | .BLANK 0000[0x4] 0aa0 ; -------------------------------------------------------------------------------------- 0aa0 ; SUBPROGRAM 0aa0 ; -------------------------------------------------------------------------------------- 0aa0 0aaf | | .CONST 0x0aaf ; Address of begin 0aa1 0004 | | .CONST 0x0004 ; Address of exception handler 0aa2 0004 | | .CONST 0x0004 ; Number of locals 0aa3 INIT_0aa0: 0aa3 e014 | | Load 0x0,0x14 0aa4 0322 | " | Declare_Variable Record 0aa5 00d8 | | Load_Top At_Offset_0 0aa6 1c00 | | Execute_Immediate Run_Utility,0x0 0aa7 e002 | | Load 0x0,0x2 0aa8 0322 | " | Declare_Variable Record 0aa9 00d8 | | Load_Top At_Offset_0 0aaa 1c00 | | Execute_Immediate Run_Utility,0x0 0aab e001 | | Load 0x0,0x1 0aac 0322 | " | Declare_Variable Record 0aad 00d8 | | Load_Top At_Offset_0 0aae 1c00 | | Execute_Immediate Run_Utility,0x0 0aaf BODY_0aa0: 0aaf 00d8 | | Load_Top At_Offset_0 0ab0 4800 |H | Short_Literal 0x0 0ab1 8015 | | Call 0x0,0x15 0ab2 00d1 | | Pop_Control Pop_Count_1 0ab3 00d9 | | Load_Top At_Offset_1 0ab4 00d9 | | Load_Top At_Offset_1 0ab5 0092 0adb | | Action Push_String_Extended,0xadb ; "Orb" 0ab7 e21c | | Load 0x1,0x1c 0ab8 8004 | | Call 0x0,0x4 0ab9 00d1 | | Pop_Control Pop_Count_1 0aba 00d9 | | Load_Top At_Offset_1 0abb e005 | | Load 0x0,0x5 0abc e5fd | | Load 0x2,-0x3 0abd e5fe | | Load 0x2,-0x2 0abe e5ff | | Load 0x2,-0x1 0abf 4800 |H | Short_Literal 0x0 0ac0 8007 | | Call 0x0,0x7 0ac1 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 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 00da | | Load_Top At_Offset_2 0acc 8016 | | Call 0x0,0x16 0acd 6804 |h | Jump_Zero 0xad2 0ace e21c | | Load 0x1,0x1c 0acf 00db | | Load_Top At_Offset_3 0ad0 8008 | | Call 0x0,0x8 0ad1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ad2 4800 |H | Short_Literal 0x0 0ad3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0ad4 ; -------------------------------------------------------------------------------------- 0ad4 ; STRING TABLE 0ad4 ; -------------------------------------------------------------------------------------- 0ad4 004e | N | .STRTAB 0x004e->0x0afb ; "BEHAVIOR_DB" 0ad5 0057 | W | .STRTAB 0x0057->0x0b00 ; "SPY_DB" 0ad6 005b | [ | .STRTAB 0x005b->0x0b03 ; "FILTER_DB" 0ad7 0062 | b | .STRTAB 0x0062->0x0b08 ; "NOTIFICATION_DB" 0ad8 006f | o | .STRTAB 0x006f->0x0b0f ; "CLASS_DB" 0ad9 0075 | u | .STRTAB 0x0075->0x0b13 ; "CLASS_ATTRIBUT_DB" 0ada 0084 | | .STRTAB 0x0084->0x0b1c ; "ALL_DB" 0adb 0088 | | .STRTAB 0x0088->0x0b1f ; "Orb" 0adc 0089 | | .STRTAB 0x0089->0x0b20 ; "Shut_down" 0add 0090 | | .STRTAB 0x0090->0x0b25 ; "Query" 0ade 0093 | | .STRTAB 0x0093->0x0b27 ; "Query_reply" 0adf 009c | | .STRTAB 0x009c->0x0b2d ; "behavior_id" 0ae0 00a5 | | .STRTAB 0x00a5->0x0b32 ; "behavior_class" 0ae1 00b1 | | .STRTAB 0x00b1->0x0b39 ; "Spy_Publication" 0ae2 00be | | .STRTAB 0x00be->0x0b41 ; "Spy_UnPublication" 0ae3 00cd | | .STRTAB 0x00cd->0x0b49 ; "spy_Id" 0ae4 00d1 | | .STRTAB 0x00d1->0x0b4c ; "Notification_publication" 0ae5 00e7 | | .STRTAB 0x00e7->0x0b58 ; "Notification_Unpublication" 0ae6 00ff | | .STRTAB 0x00ff->0x0b65 ; "Behavior_id" 0ae7 0108 | | .STRTAB 0x0108->0x0b6b ; "Class" 0ae8 010b | | .STRTAB 0x010b->0x0b6d ; "method" 0ae9 010f | | .STRTAB 0x010f->0x0b70 ; "Filter_publication" 0aea 011f | | .STRTAB 0x011f->0x0b79 ; "Filter_Unpublication" 0aeb 0131 | 1 | .STRTAB 0x0131->0x0b83 ; "filter_id" 0aec 0138 | 8 | .STRTAB 0x0138->0x0b88 ; "Class_Publication" 0aed 0147 | G | .STRTAB 0x0147->0x0b90 ; "Class_UnPublication" 0aee 0158 | X | .STRTAB 0x0158->0x0b9a ; "Behavior_class" 0aef 0164 | d | .STRTAB 0x0164->0x0ba1 ; "Class_Attribut_publication" 0af0 017c | | | .STRTAB 0x017c->0x0bae ; "Class_Attribut_unpublication" 0af1 0196 | | .STRTAB 0x0196->0x0bbc ; "Behavior_publication" 0af2 01a8 | | .STRTAB 0x01a8->0x0bc6 ; "behavior_Unpublication" 0af3 01bc | | .STRTAB 0x01bc->0x0bd1 ; "Socket_id" 0af4 01c3 | | .STRTAB 0x01c3->0x0bd5 ; "Internet_id" 0af5 01cc | | .STRTAB 0x01cc->0x0bdb ; "Dump" 0af6 01ce | | .STRTAB 0x01ce->0x0bdd ; "Dump_Reply" 0af7 01d6 | | .STRTAB 0x01d6->0x0be2 ; "data_base name" 0af8 01e2 | | .STRTAB 0x01e2->0x0be9 ; "Tuple" 0af9 01e5 | | .STRTAB 0x01e5->0x0beb ; "Dump_End" 0afa 01eb | | .STREND 0x01eb->0x0bef 0afb 4245 4841 |BEHA| .STRTAB_STRINGS 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 ; Debug Table 0bf0 ; -------------------------------------------------------------------------------------- 0bf0 0004 0002 | | .DEBUG4 0x0004,0x0002,0xd16c,0x0000,0x0001,0x0000 0bf6 9480 e880 | | .XXX[0xa] 0bf8 8080 8081 | | 0bfa 19a5 b195 | | 0bfc 7d51 e5c1 |}Q | 0bfe 94ec 2880 | ( |