|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_ccb0b3
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 05d8 | | .CONST 0x05d8 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00b2 | | .CONST 0x00b2 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0032 | 2 | .CONST 0x0032 ; Number of locals
000b INIT_0008:
000b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
000c 00e3 | | Load_Encached Natural_Cache
000d 0266 | f | Execute Discrete,Bounds
000e 00da | | Load_Top At_Offset_2
000f 02a0 | | Declare_Subprogram Null_Subprogram
0010 4801 |H | Short_Literal 0x1
0011 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0012 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible
0013 00c4 | | Action Make_Default
0014 e001 | | Load 0x0,0x1
0015 0129 | ) | Execute Any,Make_Visible
0016 e002 | | Load 0x0,0x2
0017 0129 | ) | Execute Any,Make_Visible
0018 e003 | | Load 0x0,0x3
0019 0129 | ) | Execute Any,Make_Visible
001a 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated
001c 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated
001e 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
0020 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated
0022 029a 01bb | | Declare_Subprogram INIT_01b8,For_Outer_Call,Visible,Unelaborated
0024 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated
0026 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated
0028 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated
002a 029a 023b | ;| Declare_Subprogram INIT_0238,For_Outer_Call,Visible,Unelaborated
002c 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated
002e 029a 0283 | | Declare_Subprogram INIT_0280,For_Outer_Call,Visible,Unelaborated
0030 029a 02a3 | | Declare_Subprogram INIT_02a0,For_Outer_Call,Visible,Unelaborated
0032 029a 02cb | | Declare_Subprogram INIT_02c8,For_Outer_Call,Visible,Unelaborated
0034 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated
0036 029a 030b | | Declare_Subprogram INIT_0308,For_Outer_Call,Visible,Unelaborated
0038 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated
003a 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated
003c 029a 036b | k| Declare_Subprogram INIT_0368,For_Outer_Call,Visible,Unelaborated
003e 029a 038b | | Declare_Subprogram INIT_0388,For_Outer_Call,Visible,Unelaborated
0040 029a 03ab | | Declare_Subprogram INIT_03a8,For_Outer_Call,Visible,Unelaborated
0042 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated
0044 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated
0046 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated
0048 00e9 | | Load_Encached String_Cache
0049 02a0 | | Declare_Subprogram Null_Subprogram
004a 03ad | | Declare_Type Heap_Access,Defined
004b 00e2 | | Load_Encached Integer_Cache
004c 00e9 | | Load_Encached String_Cache
004d 029f 044b | K| Declare_Subprogram INIT_0448,For_Call
004f 4800 |H | Short_Literal 0x0
0050 4801 |H | Short_Literal 0x1
0051 4800 |H | Short_Literal 0x0
0052 4800 |H | Short_Literal 0x0
0053 4801 |H | Short_Literal 0x1
0054 4801 |H | Short_Literal 0x1
0055 031d | | Declare_Type Variant_Record,Defined
0056 00d8 | | Load_Top At_Offset_0
0057 02a0 | | Declare_Subprogram Null_Subprogram
0058 e20d | | Load 0x1,0xd
0059 03a3 | | Complete_Type Heap_Access,By_Defining
005a e20d | | Load 0x1,0xd
005b 0007 | | Action Break_Optional
005c e20e | | Load 0x1,0xe
005d 02a0 | | Declare_Subprogram Null_Subprogram
005e 03ad | | Declare_Type Heap_Access,Defined
005f 00d8 | | Load_Top At_Offset_0
0060 0007 | | Action Break_Optional
0061 e22b | + | Load 0x1,0x2b
0062 00d8 | | Load_Top At_Offset_0
0063 e22b | + | Load 0x1,0x2b
0064 00d8 | | Load_Top At_Offset_0
0065 e22b | + | Load 0x1,0x2b
0066 00d8 | | Load_Top At_Offset_0
0067 e22b | + | Load 0x1,0x2b
0068 00d8 | | Load_Top At_Offset_0
0069 e22b | + | Load 0x1,0x2b
006a 00e1 | | Load_Encached Boolean_Cache
006b e22b | + | Load 0x1,0x2b
006c 00e2 | | Load_Encached Integer_Cache
006d 00e2 | | Load_Encached Integer_Cache
006e e22b | + | Load 0x1,0x2b
006f 00d8 | | Load_Top At_Offset_0
0070 e22b | + | Load 0x1,0x2b
0071 00d8 | | Load_Top At_Offset_0
0072 e22e | . | Load 0x1,0x2e
0073 00d8 | | Load_Top At_Offset_0
0074 00e1 | | Load_Encached Boolean_Cache
0075 02a0 | | Declare_Subprogram Null_Subprogram
0076 4814 |H | Short_Literal 0x14
0077 032d | - | Declare_Type Record,Defined
0078 00d8 | | Load_Top At_Offset_0
0079 02a0 | | Declare_Subprogram Null_Subprogram
007a e20f | | Load 0x1,0xf
007b 03a3 | | Complete_Type Heap_Access,By_Defining
007c e20f | | Load 0x1,0xf
007d 0129 | ) | Execute Any,Make_Visible
007e c210 | | Store 0x1,0x10
007f 00bf | | Action Accept_Activation
0080 029d 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call
0082 029d 0443 | C| Declare_Subprogram INIT_0440,For_Outer_Call
0084 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0085 00c7 | | Action Elaborate_Subprogram
0086 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0087 00c7 | | Action Elaborate_Subprogram
0088 1d16 | | Execute_Immediate Reference_Lex_1,0x16
0089 00c7 | | Action Elaborate_Subprogram
008a 1d17 | | Execute_Immediate Reference_Lex_1,0x17
008b 00c7 | | Action Elaborate_Subprogram
008c 1d18 | | Execute_Immediate Reference_Lex_1,0x18
008d 00c7 | | Action Elaborate_Subprogram
008e 1d19 | | Execute_Immediate Reference_Lex_1,0x19
008f 00c7 | | Action Elaborate_Subprogram
0090 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0091 00c7 | | Action Elaborate_Subprogram
0092 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0093 00c7 | | Action Elaborate_Subprogram
0094 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0095 00c7 | | Action Elaborate_Subprogram
0096 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
0097 00c7 | | Action Elaborate_Subprogram
0098 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0099 00c7 | | Action Elaborate_Subprogram
009a 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
009b 00c7 | | Action Elaborate_Subprogram
009c 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
009d 00c7 | | Action Elaborate_Subprogram
009e 1d20 | | Execute_Immediate Reference_Lex_1,0x20
009f 00c7 | | Action Elaborate_Subprogram
00a0 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00a1 00c7 | | Action Elaborate_Subprogram
00a2 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00a3 00c7 | | Action Elaborate_Subprogram
00a4 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00a5 00c7 | | Action Elaborate_Subprogram
00a6 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00a7 00c7 | | Action Elaborate_Subprogram
00a8 1d25 | % | Execute_Immediate Reference_Lex_1,0x25
00a9 00c7 | | Action Elaborate_Subprogram
00aa 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
00ab 00c7 | | Action Elaborate_Subprogram
00ac 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00ad 00c7 | | Action Elaborate_Subprogram
00ae 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
00af 00c7 | | Action Elaborate_Subprogram
00b0 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
00b1 00c7 | | Action Elaborate_Subprogram
00b2 BODY_0008:
00b2 00bc | | Action Signal_Activated
00b3 00bb | | Action Signal_Completion
00b4 0000 0000 | | .BLANK 0000[0x4]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bf | | .CONST 0x00bf ; Address of begin
00b9 00d6 | | .CONST 0x00d6 ; Address of exception handler
00ba 0003 | | .CONST 0x0003 ; Number of locals
00bb INIT_00b8:
00bb e004 | | Load 0x0,0x4
00bc 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
00bd e20d | | Load 0x1,0xd
00be 0007 | | Action Break_Optional
00bf BODY_00b8:
00bf e5ff | | Load 0x2,-0x1
00c0 01db | | Execute Vector,Length
00c1 7002 |p | Jump_Nonzero 0xc4
00c2 e20d | | Load 0x1,0xd
00c3 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c4 e5fe | | Load 0x2,-0x2
00c5 e005 | | Load 0x0,0x5
00c6 180f | | Execute Package,Field_Execute,Field_Number 0xf
00c7 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00c8 e5ff | | Load 0x2,-0x1
00c9 01db | | Execute Vector,Length
00ca e22c | , | Load 0x1,0x2c
00cb 1c08 | | Execute_Immediate Run_Utility,0x8
00cc e20d | | Load 0x1,0xd
00cd 00db | | Load_Top At_Offset_3
00ce 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
00cf 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00d0 e5ff | | Load 0x2,-0x1
00d1 00d9 | | Load_Top At_Offset_1
00d2 0217 | | Execute Heap_Access,All_Reference
00d3 2902 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x2
00d4 00d8 | | Load_Top At_Offset_0
00d5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00d6 TRAP_00b8:
00d6 e005 | | Load 0x0,0x5
00d7 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00d8 010f | | Execute Exception,Equal
00d9 6802 |h | Jump_Zero 0xdc
00da e212 | | Load 0x1,0x12
00db 0257 | W | Execute Discrete,Raise
00dc e005 | | Load 0x0,0x5
00dd 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00de 010f | | Execute Exception,Equal
00df 6802 |h | Jump_Zero 0xe2
00e0 e211 | | Load 0x1,0x11
00e1 0257 | W | Execute Discrete,Raise
00e2 e006 | | Load 0x0,0x6
00e3 180e | | Execute Package,Field_Execute,Field_Number 0xe
00e4 4802 |H | Short_Literal 0x2
00e5 0092 0469 | i| Action Push_String_Extended,0x469 ; "Exception in Build1 "
00e7 4800 |H | Short_Literal 0x0
00e8 4801 |H | Short_Literal 0x1
00e9 e007 | | Load 0x0,0x7
00ea 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00eb 01cc | | Execute Vector,Catenate
00ec e008 | | Load 0x0,0x8
00ed 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00ee 00d8 | | Load_Top At_Offset_0
00ef 0101 | | Execute Exception,Reraise
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00fb | | .CONST 0x00fb ; Address of begin
00f1 018b | | .CONST 0x018b ; Address of exception handler
00f2 0005 | | .CONST 0x0005 ; Number of locals
00f3 INIT_00f0:
00f3 e22e | . | Load 0x1,0x2e
00f4 0007 | | Action Break_Optional
00f5 00d8 | | Load_Top At_Offset_0
00f6 0007 | | Action Break_Optional
00f7 e20f | | Load 0x1,0xf
00f8 0007 | | Action Break_Optional
00f9 e004 | | Load 0x0,0x4
00fa 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
00fb BODY_00f0:
00fb e5ee | | Load 0x2,-0x12
00fc 01db | | Execute Vector,Length
00fd 7003 |p | Jump_Nonzero 0x101
00fe e22e | . | Load 0x1,0x2e
00ff a402 | | Store_Unchecked 0x2,0x2
0100 7809 |x | Jump 0x10a
0101 e5eb | | Load 0x2,-0x15
0102 e005 | | Load 0x0,0x5
0103 180f | | Execute Package,Field_Execute,Field_Number 0xf
0104 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0105 e5ee | | Load 0x2,-0x12
0106 e22e | . | Load 0x1,0x2e
0107 00da | | Load_Top At_Offset_2
0108 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0109 a402 | | Store_Unchecked 0x2,0x2
010a e5ed | | Load 0x2,-0x13
010b 01db | | Execute Vector,Length
010c 7003 |p | Jump_Nonzero 0x110
010d e22e | . | Load 0x1,0x2e
010e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
010f 7809 |x | Jump 0x119
0110 e5eb | | Load 0x2,-0x15
0111 e005 | | Load 0x0,0x5
0112 180f | | Execute Package,Field_Execute,Field_Number 0xf
0113 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0114 e5ed | | Load 0x2,-0x13
0115 e22e | . | Load 0x1,0x2e
0116 00da | | Load_Top At_Offset_2
0117 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0118 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0119 e20f | | Load 0x1,0xf
011a 00d9 | | Load_Top At_Offset_1
011b 039c | | Declare_Variable Heap_Access,By_Allocation
011c 0032 | 2 | Store_Top Heap_Access,At_Offset_2
011d 00d8 | | Load_Top At_Offset_0
011e e5ff | | Load 0x2,-0x1
011f 8231 | 1 | Call 0x1,0x31
0120 00da | | Load_Top At_Offset_2
0121 0217 | | Execute Heap_Access,All_Reference
0122 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0123 00d8 | | Load_Top At_Offset_0
0124 e5fe | | Load 0x2,-0x2
0125 8231 | 1 | Call 0x1,0x31
0126 00da | | Load_Top At_Offset_2
0127 0217 | | Execute Heap_Access,All_Reference
0128 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0129 00d8 | | Load_Top At_Offset_0
012a e5fd | | Load 0x2,-0x3
012b 8231 | 1 | Call 0x1,0x31
012c 00da | | Load_Top At_Offset_2
012d 0217 | | Execute Heap_Access,All_Reference
012e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
012f 00d8 | | Load_Top At_Offset_0
0130 e5fc | | Load 0x2,-0x4
0131 8231 | 1 | Call 0x1,0x31
0132 00da | | Load_Top At_Offset_2
0133 0217 | | Execute Heap_Access,All_Reference
0134 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0135 00d8 | | Load_Top At_Offset_0
0136 e5fb | | Load 0x2,-0x5
0137 8231 | 1 | Call 0x1,0x31
0138 00da | | Load_Top At_Offset_2
0139 0217 | | Execute Heap_Access,All_Reference
013a 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
013b 00d8 | | Load_Top At_Offset_0
013c e5fa | | Load 0x2,-0x6
013d 8231 | 1 | Call 0x1,0x31
013e 00da | | Load_Top At_Offset_2
013f 0217 | | Execute Heap_Access,All_Reference
0140 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
0141 00d8 | | Load_Top At_Offset_0
0142 e5f9 | | Load 0x2,-0x7
0143 8231 | 1 | Call 0x1,0x31
0144 00da | | Load_Top At_Offset_2
0145 0217 | | Execute Heap_Access,All_Reference
0146 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0147 00d8 | | Load_Top At_Offset_0
0148 e5f8 | | Load 0x2,-0x8
0149 8231 | 1 | Call 0x1,0x31
014a 00da | | Load_Top At_Offset_2
014b 0217 | | Execute Heap_Access,All_Reference
014c 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
014d 00d8 | | Load_Top At_Offset_0
014e e5f7 | | Load 0x2,-0x9
014f 8231 | 1 | Call 0x1,0x31
0150 00da | | Load_Top At_Offset_2
0151 0217 | | Execute Heap_Access,All_Reference
0152 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0153 e5f6 | | Load 0x2,-0xa
0154 00da | | Load_Top At_Offset_2
0155 0217 | | Execute Heap_Access,All_Reference
0156 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
0157 00d8 | | Load_Top At_Offset_0
0158 e5f5 | | Load 0x2,-0xb
0159 8231 | 1 | Call 0x1,0x31
015a 00da | | Load_Top At_Offset_2
015b 0217 | | Execute Heap_Access,All_Reference
015c 380a |8 | Execute Record,Field_Write,Field_Number 0xa
015d e5f4 | | Load 0x2,-0xc
015e 00da | | Load_Top At_Offset_2
015f 0217 | | Execute Heap_Access,All_Reference
0160 380b |8 | Execute Record,Field_Write,Field_Number 0xb
0161 e5f3 | | Load 0x2,-0xd
0162 00da | | Load_Top At_Offset_2
0163 0217 | | Execute Heap_Access,All_Reference
0164 380c |8 | Execute Record,Field_Write,Field_Number 0xc
0165 00d8 | | Load_Top At_Offset_0
0166 e5f2 | | Load 0x2,-0xe
0167 8231 | 1 | Call 0x1,0x31
0168 00da | | Load_Top At_Offset_2
0169 0217 | | Execute Heap_Access,All_Reference
016a 380d |8 | Execute Record,Field_Write,Field_Number 0xd
016b 00d8 | | Load_Top At_Offset_0
016c e5f1 | | Load 0x2,-0xf
016d 8231 | 1 | Call 0x1,0x31
016e 00da | | Load_Top At_Offset_2
016f 0217 | | Execute Heap_Access,All_Reference
0170 380e |8 | Execute Record,Field_Write,Field_Number 0xe
0171 00d8 | | Load_Top At_Offset_0
0172 e5f0 | | Load 0x2,-0x10
0173 8231 | 1 | Call 0x1,0x31
0174 00da | | Load_Top At_Offset_2
0175 0217 | | Execute Heap_Access,All_Reference
0176 380f |8 | Execute Record,Field_Write,Field_Number 0xf
0177 00d8 | | Load_Top At_Offset_0
0178 e5ef | | Load 0x2,-0x11
0179 8231 | 1 | Call 0x1,0x31
017a 00da | | Load_Top At_Offset_2
017b 0217 | | Execute Heap_Access,All_Reference
017c 3810 |8 | Execute Record,Field_Write,Field_Number 0x10
017d 00db | | Load_Top At_Offset_3
017e 00da | | Load_Top At_Offset_2
017f 0217 | | Execute Heap_Access,All_Reference
0180 3811 |8 | Execute Record,Field_Write,Field_Number 0x11
0181 00da | | Load_Top At_Offset_2
0182 00da | | Load_Top At_Offset_2
0183 0217 | | Execute Heap_Access,All_Reference
0184 3812 |8 | Execute Record,Field_Write,Field_Number 0x12
0185 e5ec | | Load 0x2,-0x14
0186 00da | | Load_Top At_Offset_2
0187 0217 | | Execute Heap_Access,All_Reference
0188 3813 |8 | Execute Record,Field_Write,Field_Number 0x13
0189 00d9 | | Load_Top At_Offset_1
018a 4415 |D | Exit_Subprogram With_Value,New_Top_Offset 0x15
018b TRAP_00f0:
018b e005 | | Load 0x0,0x5
018c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
018d 010f | | Execute Exception,Equal
018e 6802 |h | Jump_Zero 0x191
018f e212 | | Load 0x1,0x12
0190 0257 | W | Execute Discrete,Raise
0191 e005 | | Load 0x0,0x5
0192 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0193 010f | | Execute Exception,Equal
0194 6802 |h | Jump_Zero 0x197
0195 e211 | | Load 0x1,0x11
0196 0257 | W | Execute Discrete,Raise
0197 e006 | | Load 0x0,0x6
0198 180e | | Execute Package,Field_Execute,Field_Number 0xe
0199 4802 |H | Short_Literal 0x2
019a 0092 046a | j| Action Push_String_Extended,0x46a ; "Exception in build2 "
019c 4800 |H | Short_Literal 0x0
019d 4801 |H | Short_Literal 0x1
019e e007 | | Load 0x0,0x7
019f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01a0 01cc | | Execute Vector,Catenate
01a1 e008 | | Load 0x0,0x8
01a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a3 00d8 | | Load_Top At_Offset_0
01a4 0101 | | Execute Exception,Reraise
01a5 0000 0000 | | .XXX[0x3]
01a7 0000 | |
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab 00db | | Load_Top At_Offset_3
01ac e009 | | Load 0x0,0x9
01ad 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ae c5fe | | Store 0x2,-0x2
01af 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01b3 | | .CONST 0x01b3 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0001 | | .CONST 0x0001 ; Number of locals
01b3 BODY_01b0:
01b3 INIT_01b0:
01b3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01b4 0000 0000 | | .BLANK 0000[0x4]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 01c7 | | .CONST 0x01c7 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 00da | | Load_Top At_Offset_2
01bc 8232 | 2 | Call 0x1,0x32
01bd 6802 |h | Jump_Zero 0x1c0
01be e213 | | Load 0x1,0x13
01bf 0257 | W | Execute Discrete,Raise
01c0 00da | | Load_Top At_Offset_2
01c1 0217 | | Execute Heap_Access,All_Reference
01c2 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01c3 0217 | | Execute Heap_Access,All_Reference
01c4 0335 | 5 | Declare_Variable Array,Duplicate
01c5 00cd | | Action Spare6_Action
01c6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01c7 TRAP_01b8:
01c7 0007 | | Action Break_Optional
01c8 e006 | | Load 0x0,0x6
01c9 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ca 4802 |H | Short_Literal 0x2
01cb 0092 046b | k| Action Push_String_Extended,0x46b ; "Exception in get_user_name_prompt "
01cd 4800 |H | Short_Literal 0x0
01ce 4801 |H | Short_Literal 0x1
01cf e007 | | Load 0x0,0x7
01d0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01d1 01cc | | Execute Vector,Catenate
01d2 e008 | | Load 0x0,0x8
01d3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01d4 00d8 | | Load_Top At_Offset_0
01d5 0101 | | Execute Exception,Reraise
01d6 0000 0000 | | .XXX[0x2]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db | | .CONST 0x01db ; Address of begin
01d9 01e7 | | .CONST 0x01e7 ; Address of exception handler
01da 0001 | | .CONST 0x0001 ; Number of locals
01db BODY_01d8:
01db INIT_01d8:
01db 00da | | Load_Top At_Offset_2
01dc 8232 | 2 | Call 0x1,0x32
01dd 6802 |h | Jump_Zero 0x1e0
01de e213 | | Load 0x1,0x13
01df 0257 | W | Execute Discrete,Raise
01e0 00da | | Load_Top At_Offset_2
01e1 0217 | | Execute Heap_Access,All_Reference
01e2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01e3 0217 | | Execute Heap_Access,All_Reference
01e4 0335 | 5 | Declare_Variable Array,Duplicate
01e5 00cd | | Action Spare6_Action
01e6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e7 TRAP_01d8:
01e7 0007 | | Action Break_Optional
01e8 e006 | | Load 0x0,0x6
01e9 180e | | Execute Package,Field_Execute,Field_Number 0xe
01ea 4802 |H | Short_Literal 0x2
01eb 0092 046c | l| Action Push_String_Extended,0x46c ; "Exception in get_password_prompt "
01ed 4800 |H | Short_Literal 0x0
01ee 4801 |H | Short_Literal 0x1
01ef e007 | | Load 0x0,0x7
01f0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01f1 01cc | | Execute Vector,Catenate
01f2 e008 | | Load 0x0,0x8
01f3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01f4 00d8 | | Load_Top At_Offset_0
01f5 0101 | | Execute Exception,Reraise
01f6 0000 0000 | | .XXX[0x2]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0207 | | .CONST 0x0207 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb 00da | | Load_Top At_Offset_2
01fc 8232 | 2 | Call 0x1,0x32
01fd 6802 |h | Jump_Zero 0x200
01fe e213 | | Load 0x1,0x13
01ff 0257 | W | Execute Discrete,Raise
0200 00da | | Load_Top At_Offset_2
0201 0217 | | Execute Heap_Access,All_Reference
0202 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0203 0217 | | Execute Heap_Access,All_Reference
0204 0335 | 5 | Declare_Variable Array,Duplicate
0205 00cd | | Action Spare6_Action
0206 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0207 TRAP_01f8:
0207 0007 | | Action Break_Optional
0208 e006 | | Load 0x0,0x6
0209 180e | | Execute Package,Field_Execute,Field_Number 0xe
020a 4802 |H | Short_Literal 0x2
020b 0092 046d | m| Action Push_String_Extended,0x46d ; "Exception in get_command_prompt "
020d 4800 |H | Short_Literal 0x0
020e 4801 |H | Short_Literal 0x1
020f e007 | | Load 0x0,0x7
0210 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0211 01cc | | Execute Vector,Catenate
0212 e008 | | Load 0x0,0x8
0213 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0214 00d8 | | Load_Top At_Offset_0
0215 0101 | | Execute Exception,Reraise
0216 0000 0000 | | .XXX[0x2]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0227 | ' | .CONST 0x0227 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 00da | | Load_Top At_Offset_2
021c 8232 | 2 | Call 0x1,0x32
021d 6802 |h | Jump_Zero 0x220
021e e213 | | Load 0x1,0x13
021f 0257 | W | Execute Discrete,Raise
0220 00da | | Load_Top At_Offset_2
0221 0217 | | Execute Heap_Access,All_Reference
0222 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0223 0217 | | Execute Heap_Access,All_Reference
0224 0335 | 5 | Declare_Variable Array,Duplicate
0225 00cd | | Action Spare6_Action
0226 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0227 TRAP_0218:
0227 0007 | | Action Break_Optional
0228 e006 | | Load 0x0,0x6
0229 180e | | Execute Package,Field_Execute,Field_Number 0xe
022a 4802 |H | Short_Literal 0x2
022b 0092 046e | n| Action Push_String_Extended,0x46e ; "Exception in get_password_failure "
022d 4800 |H | Short_Literal 0x0
022e 4801 |H | Short_Literal 0x1
022f e007 | | Load 0x0,0x7
0230 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0231 01cc | | Execute Vector,Catenate
0232 e008 | | Load 0x0,0x8
0233 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0234 00d8 | | Load_Top At_Offset_0
0235 0101 | | Execute Exception,Reraise
0236 0000 0000 | | .XXX[0x2]
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b | ; | .CONST 0x023b ; Address of begin
0239 0247 | G | .CONST 0x0247 ; 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 8232 | 2 | Call 0x1,0x32
023d 6802 |h | Jump_Zero 0x240
023e e213 | | Load 0x1,0x13
023f 0257 | W | Execute Discrete,Raise
0240 00da | | Load_Top At_Offset_2
0241 0217 | | Execute Heap_Access,All_Reference
0242 3c11 |< | Execute Record,Field_Read,Field_Number 0x11
0243 0217 | | Execute Heap_Access,All_Reference
0244 0335 | 5 | Declare_Variable Array,Duplicate
0245 00cd | | Action Spare6_Action
0246 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0247 TRAP_0238:
0247 0007 | | Action Break_Optional
0248 e006 | | Load 0x0,0x6
0249 180e | | Execute Package,Field_Execute,Field_Number 0xe
024a 4802 |H | Short_Literal 0x2
024b 0092 046f | o| Action Push_String_Extended,0x46f ; "Exception in get_error_patterns "
024d 4800 |H | Short_Literal 0x0
024e 4801 |H | Short_Literal 0x1
024f e007 | | Load 0x0,0x7
0250 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0251 01cc | | Execute Vector,Catenate
0252 e008 | | Load 0x0,0x8
0253 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0254 00d8 | | Load_Top At_Offset_0
0255 0101 | | Execute Exception,Reraise
0256 0000 0000 | | .XXX[0x2]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0271 | q | .CONST 0x0271 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b 00da | | Load_Top At_Offset_2
025c 8232 | 2 | Call 0x1,0x32
025d 6802 |h | Jump_Zero 0x260
025e e213 | | Load 0x1,0x13
025f 0257 | W | Execute Discrete,Raise
0260 00da | | Load_Top At_Offset_2
0261 0217 | | Execute Heap_Access,All_Reference
0262 3c11 |< | Execute Record,Field_Read,Field_Number 0x11
0263 7002 |p | Jump_Nonzero 0x266
0264 4800 |H | Short_Literal 0x0
0265 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0266 00da | | Load_Top At_Offset_2
0267 0217 | | Execute Heap_Access,All_Reference
0268 3c11 |< | Execute Record,Field_Read,Field_Number 0x11
0269 0217 | | Execute Heap_Access,All_Reference
026a 01db | | Execute Vector,Length
026b 00d8 | | Load_Top At_Offset_0
026c 00e2 | | Load_Encached Integer_Cache
026d 0260 | ` | Execute Discrete,In_Type
026e 7001 |p | Jump_Nonzero 0x270
026f 0801 | | Execute_Immediate Raise,0x1
0270 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0271 TRAP_0258:
0271 0007 | | Action Break_Optional
0272 e006 | | Load 0x0,0x6
0273 180e | | Execute Package,Field_Execute,Field_Number 0xe
0274 4802 |H | Short_Literal 0x2
0275 0092 0470 | p| Action Push_String_Extended,0x470 ; "Exception in get_error_patterns_count "
0277 4800 |H | Short_Literal 0x0
0278 4801 |H | Short_Literal 0x1
0279 e007 | | Load 0x0,0x7
027a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
027b 01cc | | Execute Vector,Catenate
027c e008 | | Load 0x0,0x8
027d 1813 | | Execute Package,Field_Execute,Field_Number 0x13
027e 00d8 | | Load_Top At_Offset_0
027f 0101 | | Execute Exception,Reraise
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 028f | | .CONST 0x028f ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 00da | | Load_Top At_Offset_2
0284 8232 | 2 | Call 0x1,0x32
0285 6802 |h | Jump_Zero 0x288
0286 e213 | | Load 0x1,0x13
0287 0257 | W | Execute Discrete,Raise
0288 00da | | Load_Top At_Offset_2
0289 0217 | | Execute Heap_Access,All_Reference
028a 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
028b 0217 | | Execute Heap_Access,All_Reference
028c 0335 | 5 | Declare_Variable Array,Duplicate
028d 00cd | | Action Spare6_Action
028e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
028f TRAP_0280:
028f 0007 | | Action Break_Optional
0290 e006 | | Load 0x0,0x6
0291 180e | | Execute Package,Field_Execute,Field_Number 0xe
0292 4802 |H | Short_Literal 0x2
0293 0092 0471 | q| Action Push_String_Extended,0x471 ; "Exception in get_warning_patterns "
0295 4800 |H | Short_Literal 0x0
0296 4801 |H | Short_Literal 0x1
0297 e007 | | Load 0x0,0x7
0298 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0299 01cc | | Execute Vector,Catenate
029a e008 | | Load 0x0,0x8
029b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
029c 00d8 | | Load_Top At_Offset_0
029d 0101 | | Execute Exception,Reraise
029e 0000 0000 | | .XXX[0x2]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 02b9 | | .CONST 0x02b9 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 00da | | Load_Top At_Offset_2
02a4 8232 | 2 | Call 0x1,0x32
02a5 6802 |h | Jump_Zero 0x2a8
02a6 e213 | | Load 0x1,0x13
02a7 0257 | W | Execute Discrete,Raise
02a8 00da | | Load_Top At_Offset_2
02a9 0217 | | Execute Heap_Access,All_Reference
02aa 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
02ab 7002 |p | Jump_Nonzero 0x2ae
02ac 4800 |H | Short_Literal 0x0
02ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02ae 00da | | Load_Top At_Offset_2
02af 0217 | | Execute Heap_Access,All_Reference
02b0 3c12 |< | Execute Record,Field_Read,Field_Number 0x12
02b1 0217 | | Execute Heap_Access,All_Reference
02b2 01db | | Execute Vector,Length
02b3 00d8 | | Load_Top At_Offset_0
02b4 00e2 | | Load_Encached Integer_Cache
02b5 0260 | ` | Execute Discrete,In_Type
02b6 7001 |p | Jump_Nonzero 0x2b8
02b7 0801 | | Execute_Immediate Raise,0x1
02b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02b9 TRAP_02a0:
02b9 0007 | | Action Break_Optional
02ba e006 | | Load 0x0,0x6
02bb 180e | | Execute Package,Field_Execute,Field_Number 0xe
02bc 4802 |H | Short_Literal 0x2
02bd 0092 0472 | r| Action Push_String_Extended,0x472 ; "Exception in get_warning_patterns_count "
02bf 4800 |H | Short_Literal 0x0
02c0 4801 |H | Short_Literal 0x1
02c1 e007 | | Load 0x0,0x7
02c2 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02c3 01cc | | Execute Vector,Catenate
02c4 e008 | | Load 0x0,0x8
02c5 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02c6 00d8 | | Load_Top At_Offset_0
02c7 0101 | | Execute Exception,Reraise
02c8 ; --------------------------------------------------------------------------------------
02c8 ; SUBPROGRAM
02c8 ; --------------------------------------------------------------------------------------
02c8 02cb | | .CONST 0x02cb ; Address of begin
02c9 02d7 | | .CONST 0x02d7 ; Address of exception handler
02ca 0001 | | .CONST 0x0001 ; Number of locals
02cb BODY_02c8:
02cb INIT_02c8:
02cb 00da | | Load_Top At_Offset_2
02cc 8232 | 2 | Call 0x1,0x32
02cd 6802 |h | Jump_Zero 0x2d0
02ce e213 | | Load 0x1,0x13
02cf 0257 | W | Execute Discrete,Raise
02d0 00da | | Load_Top At_Offset_2
02d1 0217 | | Execute Heap_Access,All_Reference
02d2 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
02d3 0217 | | Execute Heap_Access,All_Reference
02d4 0335 | 5 | Declare_Variable Array,Duplicate
02d5 00cd | | Action Spare6_Action
02d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02d7 TRAP_02c8:
02d7 0007 | | Action Break_Optional
02d8 e006 | | Load 0x0,0x6
02d9 180e | | Execute Package,Field_Execute,Field_Number 0xe
02da 4802 |H | Short_Literal 0x2
02db 0092 0473 | s| Action Push_String_Extended,0x473 ; "Exception in get_status_command "
02dd 4800 |H | Short_Literal 0x0
02de 4801 |H | Short_Literal 0x1
02df e007 | | Load 0x0,0x7
02e0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02e1 01cc | | Execute Vector,Catenate
02e2 e008 | | Load 0x0,0x8
02e3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02e4 00d8 | | Load_Top At_Offset_0
02e5 0101 | | Execute Exception,Reraise
02e6 0000 0000 | | .XXX[0x2]
02e8 ; --------------------------------------------------------------------------------------
02e8 ; SUBPROGRAM
02e8 ; --------------------------------------------------------------------------------------
02e8 02eb | | .CONST 0x02eb ; Address of begin
02e9 02f4 | | .CONST 0x02f4 ; Address of exception handler
02ea 0001 | | .CONST 0x0001 ; Number of locals
02eb BODY_02e8:
02eb INIT_02e8:
02eb 00da | | Load_Top At_Offset_2
02ec 8232 | 2 | Call 0x1,0x32
02ed 6802 |h | Jump_Zero 0x2f0
02ee e213 | | Load 0x1,0x13
02ef 0257 | W | Execute Discrete,Raise
02f0 00da | | Load_Top At_Offset_2
02f1 0217 | | Execute Heap_Access,All_Reference
02f2 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
02f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02f4 TRAP_02e8:
02f4 0007 | | Action Break_Optional
02f5 e006 | | Load 0x0,0x6
02f6 180e | | Execute Package,Field_Execute,Field_Number 0xe
02f7 4802 |H | Short_Literal 0x2
02f8 0092 0474 | t| Action Push_String_Extended,0x474 ; "Exception in get_status_code_start "
02fa 4800 |H | Short_Literal 0x0
02fb 4801 |H | Short_Literal 0x1
02fc e007 | | Load 0x0,0x7
02fd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02fe 01cc | | Execute Vector,Catenate
02ff e008 | | Load 0x0,0x8
0300 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0301 00d8 | | Load_Top At_Offset_0
0302 0101 | | Execute Exception,Reraise
0303 0000 0000 | | .BLANK 0000[0x5]
0308 ; --------------------------------------------------------------------------------------
0308 ; SUBPROGRAM
0308 ; --------------------------------------------------------------------------------------
0308 030b | | .CONST 0x030b ; Address of begin
0309 0314 | | .CONST 0x0314 ; Address of exception handler
030a 0001 | | .CONST 0x0001 ; Number of locals
030b BODY_0308:
030b INIT_0308:
030b 00da | | Load_Top At_Offset_2
030c 8232 | 2 | Call 0x1,0x32
030d 6802 |h | Jump_Zero 0x310
030e e213 | | Load 0x1,0x13
030f 0257 | W | Execute Discrete,Raise
0310 00da | | Load_Top At_Offset_2
0311 0217 | | Execute Heap_Access,All_Reference
0312 3c0c |< | Execute Record,Field_Read,Field_Number 0xc
0313 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0314 TRAP_0308:
0314 0007 | | Action Break_Optional
0315 e006 | | Load 0x0,0x6
0316 180e | | Execute Package,Field_Execute,Field_Number 0xe
0317 4802 |H | Short_Literal 0x2
0318 0092 0475 | u| Action Push_String_Extended,0x475 ; "Exception in get_status_code_length "
031a 4800 |H | Short_Literal 0x0
031b 4801 |H | Short_Literal 0x1
031c e007 | | Load 0x0,0x7
031d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
031e 01cc | | Execute Vector,Catenate
031f e008 | | Load 0x0,0x8
0320 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0321 00d8 | | Load_Top At_Offset_0
0322 0101 | | Execute Exception,Reraise
0323 0000 0000 | | .BLANK 0000[0x5]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 032b | + | .CONST 0x032b ; Address of begin
0329 0337 | 7 | .CONST 0x0337 ; Address of exception handler
032a 0001 | | .CONST 0x0001 ; Number of locals
032b BODY_0328:
032b INIT_0328:
032b 00da | | Load_Top At_Offset_2
032c 8232 | 2 | Call 0x1,0x32
032d 6802 |h | Jump_Zero 0x330
032e e213 | | Load 0x1,0x13
032f 0257 | W | Execute Discrete,Raise
0330 00da | | Load_Top At_Offset_2
0331 0217 | | Execute Heap_Access,All_Reference
0332 3c0d |< | Execute Record,Field_Read,Field_Number 0xd
0333 0217 | | Execute Heap_Access,All_Reference
0334 0335 | 5 | Declare_Variable Array,Duplicate
0335 00cd | | Action Spare6_Action
0336 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0337 TRAP_0328:
0337 0007 | | Action Break_Optional
0338 e006 | | Load 0x0,0x6
0339 180e | | Execute Package,Field_Execute,Field_Number 0xe
033a 4802 |H | Short_Literal 0x2
033b 0092 0476 | v| Action Push_String_Extended,0x476 ; "Exception in get_dir_command "
033d 4800 |H | Short_Literal 0x0
033e 4801 |H | Short_Literal 0x1
033f e007 | | Load 0x0,0x7
0340 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0341 01cc | | Execute Vector,Catenate
0342 e008 | | Load 0x0,0x8
0343 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0344 00d8 | | Load_Top At_Offset_0
0345 0101 | | Execute Exception,Reraise
0346 0000 0000 | | .XXX[0x2]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 034b | K | .CONST 0x034b ; Address of begin
0349 0357 | W | .CONST 0x0357 ; Address of exception handler
034a 0001 | | .CONST 0x0001 ; Number of locals
034b BODY_0348:
034b INIT_0348:
034b 00da | | Load_Top At_Offset_2
034c 8232 | 2 | Call 0x1,0x32
034d 6802 |h | Jump_Zero 0x350
034e e213 | | Load 0x1,0x13
034f 0257 | W | Execute Discrete,Raise
0350 00da | | Load_Top At_Offset_2
0351 0217 | | Execute Heap_Access,All_Reference
0352 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
0353 0217 | | Execute Heap_Access,All_Reference
0354 01db | | Execute Vector,Length
0355 0e00 | | Execute_Immediate Not_Equal,0x0
0356 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0357 TRAP_0348:
0357 0007 | | Action Break_Optional
0358 e006 | | Load 0x0,0x6
0359 180e | | Execute Package,Field_Execute,Field_Number 0xe
035a 4802 |H | Short_Literal 0x2
035b 0092 0477 | w| Action Push_String_Extended,0x477 ; "Exception in initial_comamnd_specified "
035d 4800 |H | Short_Literal 0x0
035e 4801 |H | Short_Literal 0x1
035f e007 | | Load 0x0,0x7
0360 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0361 01cc | | Execute Vector,Catenate
0362 e008 | | Load 0x0,0x8
0363 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0364 00d8 | | Load_Top At_Offset_0
0365 0101 | | Execute Exception,Reraise
0366 0000 0000 | | .XXX[0x2]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b | k | .CONST 0x036b ; Address of begin
0369 0377 | w | .CONST 0x0377 ; Address of exception handler
036a 0001 | | .CONST 0x0001 ; Number of locals
036b BODY_0368:
036b INIT_0368:
036b 00da | | Load_Top At_Offset_2
036c 8232 | 2 | Call 0x1,0x32
036d 6802 |h | Jump_Zero 0x370
036e e213 | | Load 0x1,0x13
036f 0257 | W | Execute Discrete,Raise
0370 00da | | Load_Top At_Offset_2
0371 0217 | | Execute Heap_Access,All_Reference
0372 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
0373 0217 | | Execute Heap_Access,All_Reference
0374 0335 | 5 | Declare_Variable Array,Duplicate
0375 00cd | | Action Spare6_Action
0376 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0377 TRAP_0368:
0377 0007 | | Action Break_Optional
0378 e006 | | Load 0x0,0x6
0379 180e | | Execute Package,Field_Execute,Field_Number 0xe
037a 4802 |H | Short_Literal 0x2
037b 0092 0478 | x| Action Push_String_Extended,0x478 ; "Exception in get_initial_command "
037d 4800 |H | Short_Literal 0x0
037e 4801 |H | Short_Literal 0x1
037f e007 | | Load 0x0,0x7
0380 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0381 01cc | | Execute Vector,Catenate
0382 e008 | | Load 0x0,0x8
0383 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0384 00d8 | | Load_Top At_Offset_0
0385 0101 | | Execute Exception,Reraise
0386 0000 0000 | | .XXX[0x2]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0394 | | .CONST 0x0394 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 00da | | Load_Top At_Offset_2
038c 8232 | 2 | Call 0x1,0x32
038d 6802 |h | Jump_Zero 0x390
038e e213 | | Load 0x1,0x13
038f 0257 | W | Execute Discrete,Raise
0390 00da | | Load_Top At_Offset_2
0391 0217 | | Execute Heap_Access,All_Reference
0392 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0393 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0394 TRAP_0388:
0394 0007 | | Action Break_Optional
0395 e006 | | Load 0x0,0x6
0396 180e | | Execute Package,Field_Execute,Field_Number 0xe
0397 4802 |H | Short_Literal 0x2
0398 0092 0479 | y| Action Push_String_Extended,0x479 ; "Exception in check_command_status "
039a 4800 |H | Short_Literal 0x0
039b 4801 |H | Short_Literal 0x1
039c e007 | | Load 0x0,0x7
039d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
039e 01cc | | Execute Vector,Catenate
039f e008 | | Load 0x0,0x8
03a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03a1 00d8 | | Load_Top At_Offset_0
03a2 0101 | | Execute Exception,Reraise
03a3 0000 0000 | | .BLANK 0000[0x5]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 03b7 | | .CONST 0x03b7 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 00da | | Load_Top At_Offset_2
03ac 8232 | 2 | Call 0x1,0x32
03ad 6802 |h | Jump_Zero 0x3b0
03ae e213 | | Load 0x1,0x13
03af 0257 | W | Execute Discrete,Raise
03b0 00da | | Load_Top At_Offset_2
03b1 0217 | | Execute Heap_Access,All_Reference
03b2 3c0f |< | Execute Record,Field_Read,Field_Number 0xf
03b3 0217 | | Execute Heap_Access,All_Reference
03b4 0335 | 5 | Declare_Variable Array,Duplicate
03b5 00cd | | Action Spare6_Action
03b6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03b7 TRAP_03a8:
03b7 0007 | | Action Break_Optional
03b8 e006 | | Load 0x0,0x6
03b9 180e | | Execute Package,Field_Execute,Field_Number 0xe
03ba 4802 |H | Short_Literal 0x2
03bb 0092 047a | z| Action Push_String_Extended,0x47a ; "Exception in get_transmit_before_login "
03bd 4800 |H | Short_Literal 0x0
03be 4801 |H | Short_Literal 0x1
03bf e007 | | Load 0x0,0x7
03c0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03c1 01cc | | Execute Vector,Catenate
03c2 e008 | | Load 0x0,0x8
03c3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03c4 00d8 | | Load_Top At_Offset_0
03c5 0101 | | Execute Exception,Reraise
03c6 0000 0000 | | .XXX[0x2]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 03d7 | | .CONST 0x03d7 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 00da | | Load_Top At_Offset_2
03cc 8232 | 2 | Call 0x1,0x32
03cd 6802 |h | Jump_Zero 0x3d0
03ce e213 | | Load 0x1,0x13
03cf 0257 | W | Execute Discrete,Raise
03d0 00da | | Load_Top At_Offset_2
03d1 0217 | | Execute Heap_Access,All_Reference
03d2 3c10 |< | Execute Record,Field_Read,Field_Number 0x10
03d3 0217 | | Execute Heap_Access,All_Reference
03d4 0335 | 5 | Declare_Variable Array,Duplicate
03d5 00cd | | Action Spare6_Action
03d6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03d7 TRAP_03c8:
03d7 0007 | | Action Break_Optional
03d8 e006 | | Load 0x0,0x6
03d9 180e | | Execute Package,Field_Execute,Field_Number 0xe
03da 4802 |H | Short_Literal 0x2
03db 0092 047b | {| Action Push_String_Extended,0x47b ; "Exception in get_transmit_after_login "
03dd 4800 |H | Short_Literal 0x0
03de 4801 |H | Short_Literal 0x1
03df e007 | | Load 0x0,0x7
03e0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03e1 01cc | | Execute Vector,Catenate
03e2 e008 | | Load 0x0,0x8
03e3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03e4 00d8 | | Load_Top At_Offset_0
03e5 0101 | | Execute Exception,Reraise
03e6 0000 0000 | | .XXX[0x2]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 03f1 | | .CONST 0x03f1 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb 00da | | Load_Top At_Offset_2
03ec 0217 | | Execute Heap_Access,All_Reference
03ed 2502 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x2
03ee 0335 | 5 | Declare_Variable Array,Duplicate
03ef 00cd | | Action Spare6_Action
03f0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03f1 TRAP_03e8:
03f1 0007 | | Action Break_Optional
03f2 e006 | | Load 0x0,0x6
03f3 180e | | Execute Package,Field_Execute,Field_Number 0xe
03f4 4802 |H | Short_Literal 0x2
03f5 0092 047c | || Action Push_String_Extended,0x47c ; "Exception in get_patterns "
03f7 4800 |H | Short_Literal 0x0
03f8 4801 |H | Short_Literal 0x1
03f9 e007 | | Load 0x0,0x7
03fa 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03fb 01cc | | Execute Vector,Catenate
03fc e008 | | Load 0x0,0x8
03fd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03fe 00d8 | | Load_Top At_Offset_0
03ff 0101 | | Execute Exception,Reraise
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403 | | .CONST 0x0403 ; Address of begin
0401 040c | | .CONST 0x040c ; Address of exception handler
0402 0001 | | .CONST 0x0001 ; Number of locals
0403 BODY_0400:
0403 INIT_0400:
0403 00da | | Load_Top At_Offset_2
0404 8232 | 2 | Call 0x1,0x32
0405 6802 |h | Jump_Zero 0x408
0406 e213 | | Load 0x1,0x13
0407 0257 | W | Execute Discrete,Raise
0408 00da | | Load_Top At_Offset_2
0409 0217 | | Execute Heap_Access,All_Reference
040a 3c13 |< | Execute Record,Field_Read,Field_Number 0x13
040b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
040c TRAP_0400:
040c 0007 | | Action Break_Optional
040d e006 | | Load 0x0,0x6
040e 180e | | Execute Package,Field_Execute,Field_Number 0xe
040f 4802 |H | Short_Literal 0x2
0410 0092 047b | {| Action Push_String_Extended,0x47b ; "Exception in get_transmit_after_login "
0412 4800 |H | Short_Literal 0x0
0413 4801 |H | Short_Literal 0x1
0414 e007 | | Load 0x0,0x7
0415 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0416 01cc | | Execute Vector,Catenate
0417 e008 | | Load 0x0,0x8
0418 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0419 00d8 | | Load_Top At_Offset_0
041a 0101 | | Execute Exception,Reraise
041b 0000 0000 | | .BLANK 0000[0x5]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0425 | % | .CONST 0x0425 ; Address of begin
0421 042c | , | .CONST 0x042c ; Address of exception handler
0422 0002 | | .CONST 0x0002 ; Number of locals
0423 INIT_0420:
0423 e22b | + | Load 0x1,0x2b
0424 0007 | | Action Break_Optional
0425 BODY_0420:
0425 00db | | Load_Top At_Offset_3
0426 e22b | + | Load 0x1,0x2b
0427 e5fe | | Load 0x2,-0x2
0428 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0429 0031 | 1 | Store_Top Heap_Access,At_Offset_1
042a 00d8 | | Load_Top At_Offset_0
042b 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
042c TRAP_0420:
042c 0007 | | Action Break_Optional
042d e006 | | Load 0x0,0x6
042e 180e | | Execute Package,Field_Execute,Field_Number 0xe
042f 4802 |H | Short_Literal 0x2
0430 0092 047d | }| Action Push_String_Extended,0x47d ; "Exception in new_string "
0432 4800 |H | Short_Literal 0x0
0433 4801 |H | Short_Literal 0x1
0434 e007 | | Load 0x0,0x7
0435 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0436 01cc | | Execute Vector,Catenate
0437 e008 | | Load 0x0,0x8
0438 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0439 00d8 | | Load_Top At_Offset_0
043a 0101 | | Execute Exception,Reraise
043b 0000 0000 | | .BLANK 0000[0x5]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443 | C | .CONST 0x0443 ; Address of begin
0441 0004 | | .CONST 0x0004 ; Address of exception handler
0442 0001 | | .CONST 0x0001 ; Number of locals
0443 BODY_0440:
0443 INIT_0440:
0443 00da | | Load_Top At_Offset_2
0444 021d | | Execute Heap_Access,Is_Null
0445 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0446 0000 0000 | | .XXX[0x2]
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b | K | .CONST 0x044b ; Address of begin
0449 0004 | | .CONST 0x0004 ; Address of exception handler
044a 0001 | | .CONST 0x0001 ; Number of locals
044b BODY_0448:
044b INIT_0448:
044b 4608 |F | Jump_Case 0x9
044c 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
044d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
044e 7819 |x | Jump 0x468 ; case 0x2
044f 7818 |x | Jump 0x468 ; case 0x3
0450 7817 |x | Jump 0x468 ; case 0x4
0451 7816 |x | Jump 0x468 ; case 0x5
0452 7815 |x | Jump 0x468 ; case 0x6
0453 7801 |x | Jump 0x455 ; case 0x7
0454 7809 |x | Jump 0x45e ; case 0x8
0455 00db | | Load_Top At_Offset_3
0456 4801 |H | Short_Literal 0x1
0457 e5fe | | Load 0x2,-0x2
0458 00e9 | | Load_Encached String_Cache
0459 035b | [ | Declare_Type Array,Constrained
045a 4801 |H | Short_Literal 0x1
045b e5ff | | Load 0x2,-0x1
045c 031b | | Declare_Type Variant_Record,Constrained
045d 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
045e 00db | | Load_Top At_Offset_3
045f 00db | | Load_Top At_Offset_3
0460 02fc | | Declare_Variable Variant_Record,With_Constraint
0461 4801 |H | Short_Literal 0x1
0462 e5fe | | Load 0x2,-0x2
0463 00e9 | | Load_Encached String_Cache
0464 0334 | 4 | Declare_Variable Array,With_Constraint
0465 2d02 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x2
0466 016a | j | QQ_execute Variant_Record,XXX
0467 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0468 0869 | i | Execute_Immediate Raise,0x69
0469 ; --------------------------------------------------------------------------------------
0469 ; STRING TABLE
0469 ; --------------------------------------------------------------------------------------
0469 002c | , | .STRTAB 0x002c->0x047f ; "Exception in Build1 "
046a 003e | > | .STRTAB 0x003e->0x0489 ; "Exception in build2 "
046b 0050 | P | .STRTAB 0x0050->0x0493 ; "Exception in get_user_name_prompt "
046c 0070 | p | .STRTAB 0x0070->0x04a4 ; "Exception in get_password_prompt "
046d 008f | | .STRTAB 0x008f->0x04b4 ; "Exception in get_command_prompt "
046e 00ad | | .STRTAB 0x00ad->0x04c4 ; "Exception in get_password_failure "
046f 00cd | | .STRTAB 0x00cd->0x04d5 ; "Exception in get_error_patterns "
0470 00eb | | .STRTAB 0x00eb->0x04e5 ; "Exception in get_error_patterns_count "
0471 010f | | .STRTAB 0x010f->0x04f8 ; "Exception in get_warning_patterns "
0472 012f | / | .STRTAB 0x012f->0x0509 ; "Exception in get_warning_patterns_count "
0473 0155 | U | .STRTAB 0x0155->0x051d ; "Exception in get_status_command "
0474 0173 | s | .STRTAB 0x0173->0x052d ; "Exception in get_status_code_start "
0475 0194 | | .STRTAB 0x0194->0x053f ; "Exception in get_status_code_length "
0476 01b6 | | .STRTAB 0x01b6->0x0551 ; "Exception in get_dir_command "
0477 01d1 | | .STRTAB 0x01d1->0x055f ; "Exception in initial_comamnd_specified "
0478 01f6 | | .STRTAB 0x01f6->0x0573 ; "Exception in get_initial_command "
0479 0215 | | .STRTAB 0x0215->0x0583 ; "Exception in check_command_status "
047a 0235 | 5 | .STRTAB 0x0235->0x0594 ; "Exception in get_transmit_before_login "
047b 025a | Z | .STRTAB 0x025a->0x05a8 ; "Exception in get_transmit_after_login "
047c 027e | ~ | .STRTAB 0x027e->0x05bb ; "Exception in get_patterns "
047d 0296 | | .STRTAB 0x0296->0x05c8 ; "Exception in new_string "
047e 02ad | | .STREND 0x02ad->0x05d4
047f 4578 6365 |Exce| .STRTAB_STRINGS
05d5 0000 0000 | | .XXX[0x3]
05d7 0000 | |
05d8 ; --------------------------------------------------------------------------------------
05d8 ; Debug Table
05d8 ; --------------------------------------------------------------------------------------
05d8 0004 000e | | .DEBUG4 0x0004,0x000e,0x9264,0x0000,0x0001,0x0000
05de 0000 0000 | | .BLANK 0000[0x22]