|
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: 9216 (0x2400)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0cb0 | | .CONST 0x0cb0 ; 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 0008 | | .CONST 0x0008 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 006c | l | .CONST 0x006c ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0024 | $ | .CONST 0x0024 ; Number of locals
000b INIT_0008:
000b 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0d82,0x0000,0x0000,0x0055,0xe795,0x0000,0x0b41
; Debug Table 0x0.0x0 = 0xb,0xffff
; Debug Table 0x0.0x1 = 0xb,0xfffe
000d 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 029a 010b | | Declare_Subprogram INIT_0108,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xf,0xfffc
0011 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x11,0xfffb
0013 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x15,0xfff9
0017 029a 0203 | | Declare_Subprogram INIT_0200,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x17,0xfff8
0019 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x19,0xfff7
001b 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1b,0xfff6
001d 029a 032b | +| Declare_Subprogram INIT_0328,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1d,0xfff5
001f 029a 040b | | Declare_Subprogram INIT_0408,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x1f,0xfff4
0021 029a 04eb | | Declare_Subprogram INIT_04e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x21,0xfff3
0023 029a 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x23,0xfff2
0025 029a 06cb | | Declare_Subprogram INIT_06c8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x25,0xfff1
0027 029a 06eb | | Declare_Subprogram INIT_06e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x27,0xfff0
0029 029a 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x10 = 0x29,0xffef
002b 029a 07b3 | | Declare_Subprogram INIT_07b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x2b,0xffee
002d 029a 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x2d,0xffed
002f 029a 0833 | 3| Declare_Subprogram INIT_0830,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x13 = 0x2f,0xffec
0031 029a 08fb | | Declare_Subprogram INIT_08f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x14 = 0x31,0xffeb
0033 029a 091b | | Declare_Subprogram INIT_0918,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x15 = 0x33,0xffea
0035 029a 093b | ;| Declare_Subprogram INIT_0938,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x16 = 0x35,0xffe9
0037 029a 09ab | | Declare_Subprogram INIT_09a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x17 = 0x37,0xffe8
0039 029a 0a23 | #| Declare_Subprogram INIT_0a20,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x18 = 0x39,0xffe7
003b 00bf | | Action Accept_Activation
003c 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1 = .DEBUG 0x003c,0x0db6,0x0000,0x0000,0x0057,0x7dd5,0x0000,0x000a
; Debug Table 0x1.0x0 = 0x3c,0xffff
; Debug Table 0x1.0x1 = 0x3c,0xfffe
; Debug Table 0x1.0x2 = 0x3c,0xfffd
; Debug Table 0x1.0x3 = 0x3c,0xfffc
003d 00c7 | | Action Elaborate_Subprogram
003e 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x4 = 0x3e,0xfffb
003f 00c7 | | Action Elaborate_Subprogram
0040 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x5 = 0x40,0xfffa
0041 00c7 | | Action Elaborate_Subprogram
0042 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x6 = 0x42,0xfff9
0043 00c7 | | Action Elaborate_Subprogram
0044 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x7 = 0x44,0xfff8
0045 00c7 | | Action Elaborate_Subprogram
0046 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x8 = 0x46,0xfff7
0047 00c7 | | Action Elaborate_Subprogram
0048 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x9 = 0x48,0xfff6
0049 00c7 | | Action Elaborate_Subprogram
004a 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xa = 0x4a,0xfff5
004b 00c7 | | Action Elaborate_Subprogram
004c 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xb = 0x4c,0xfff4
004d 00c7 | | Action Elaborate_Subprogram
004e 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xc = 0x4e,0xfff3
004f 00c7 | | Action Elaborate_Subprogram
0050 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0xd = 0x50,0xfff2
0051 00c7 | | Action Elaborate_Subprogram
0052 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0xe = 0x52,0xfff1
0053 00c7 | | Action Elaborate_Subprogram
0054 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xf = 0x54,0xfff0
0055 00c7 | | Action Elaborate_Subprogram
0056 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x10 = 0x56,0xffef
0057 00c7 | | Action Elaborate_Subprogram
0058 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x11 = 0x58,0xffee
0059 00c7 | | Action Elaborate_Subprogram
005a 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x12 = 0x5a,0xffed
005b 00c7 | | Action Elaborate_Subprogram
005c 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x13 = 0x5c,0xffec
005d 00c7 | | Action Elaborate_Subprogram
005e 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x14 = 0x5e,0xffeb
005f 00c7 | | Action Elaborate_Subprogram
0060 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0x15 = 0x60,0xffea
0061 00c7 | | Action Elaborate_Subprogram
0062 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x1.0x16 = 0x62,0xffe9
0063 00c7 | | Action Elaborate_Subprogram
0064 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 ; Debug Table 0x1.0x17 = 0x64,0xffe8
0065 00c7 | | Action Elaborate_Subprogram
0066 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 ; Debug Table 0x1.0x18 = 0x66,0xffe7
0067 00c7 | | Action Elaborate_Subprogram
0068 1d23 | # | Execute_Immediate Reference_Lex_1,0x23 ; Debug Table 0x1.0x19 = 0x68,0xffe6
0069 00c7 | | Action Elaborate_Subprogram
006a 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24 ; Debug Table 0x1.0x1a = 0x6a,0xffe5
006b 00c7 | | Action Elaborate_Subprogram
006c BODY_0008:
006c 00bc | | Action Signal_Activated
006d 00bb | | Action Signal_Completion
006e 0000 0000 | | .XXX[0x2]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 007b | { | .CONST 0x007b ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0004 | | .CONST 0x0004 ; Number of locals
0073 INIT_0070:
0073 e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x0073,0x0dee,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b49
; Debug Table 0x2.0x0 = 0x73,0xffff
0074 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0075 02c7 | | Declare_Variable Any
0076 00d8 | | Load_Top At_Offset_0
0077 1c00 | | Execute_Immediate Run_Utility,0x0
0078 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x2.0x1 = 0x78,0xfffe
0079 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x2 = 0x79,0xfffd
007a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007b BODY_0070:
007b e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x3 = 0x7b,0x1
007c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007d 00db | | Load_Top At_Offset_3
007e 0120 | | Execute Any,Is_Value
007f 6803 |h | Jump_Zero 0x83
0080 e001 | | Load 0x0,0x1
0081 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0082 7801 |x | Jump 0x84
0083 00db | | Load_Top At_Offset_3
0084 e5ff | | Load 0x2,-0x1
0085 e002 | | Load 0x0,0x2
0086 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0087 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0088 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0089 c402 | | Store 0x2,0x2
008a 0059 | Y | Store_Top Discrete,At_Offset_1
008b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x4 = 0x8b,0x2
008c 6802 |h | Jump_Zero 0x8f
008d 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x5 = 0x8d,0x3
008e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
008f 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x6 = 0x8f,0x4
0090 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0091 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x7 = 0x91,0x5
0092 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0093 00e3 | | Load_Encached Natural_Cache
0094 636f |co | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
0095 e5ff | | Load 0x2,-0x1
0096 e002 | | Load 0x0,0x2
0097 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0098 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0099 1818 | | Execute Package,Field_Execute,Field_Number 0x18
009a e402 | | Load 0x2,0x2
009b e001 | | Load 0x0,0x1
009c 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
009d 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
009e 005b | [ | Store_Top Discrete,At_Offset_3
009f 0059 | Y | Store_Top Discrete,At_Offset_1
00a0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x8 = 0xa0,0x6
00a1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00a2 0000 0000 | | .BLANK 0000[0x6]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00b2 | | .CONST 0x00b2 ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0003 | | .CONST 0x0003 ; Number of locals
00ab INIT_00a8:
00ab e001 | | Load 0x0,0x1 ; Debug Table 0x3 = .DEBUG 0x00ab,0x0e02,0x0001,0x0000,0x0055,0xe795,0x0000,0x0b54
; Debug Table 0x3.0x0 = 0xab,0xffff
00ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00ad 02c7 | | Declare_Variable Any
00ae 00d8 | | Load_Top At_Offset_0
00af 1c00 | | Execute_Immediate Run_Utility,0x0
00b0 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x1 = 0xb0,0xfffe
00b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b2 BODY_00a8:
00b2 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x2 = 0xb2,0x1
00b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00b4 00da | | Load_Top At_Offset_2
00b5 0120 | | Execute Any,Is_Value
00b6 6803 |h | Jump_Zero 0xba
00b7 e001 | | Load 0x0,0x1
00b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00b9 7801 |x | Jump 0xbb
00ba 00da | | Load_Top At_Offset_2
00bb e5ff | | Load 0x2,-0x1
00bc e002 | | Load 0x0,0x2
00bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00be 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
00bf 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00c0 c402 | | Store 0x2,0x2
00c1 0059 | Y | Store_Top Discrete,At_Offset_1
00c2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x3 = 0xc2,0x2
00c3 6815 |h | Jump_Zero 0xd9
00c4 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x4 = 0xc4,0x3
00c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c6 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
00c7 e002 | | Load 0x0,0x2
00c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c9 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
00ca e002 | | Load 0x0,0x2
00cb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00cc 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00cd 0092 0a8e | | Action Push_String_Extended,0xa8e ; "Set_retention_count: bad object handle"
00cf e403 | | Load 0x2,0x3
00d0 e002 | | Load 0x0,0x2
00d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d2 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
00d3 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
00d4 e002 | | Load 0x0,0x2
00d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d6 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
00d7 a5fd | | Store_Unchecked 0x2,-0x3
00d8 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x3.0x5 = 0xd8,0x4
00d9 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x6 = 0xd9,0x5
00da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00db 6328 |c( | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
00dc e5ff | | Load 0x2,-0x1
00dd e002 | | Load 0x0,0x2
00de 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00df 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
00e0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00e1 e5fe | | Load 0x2,-0x2
00e2 e402 | | Load 0x2,0x2
00e3 e001 | | Load 0x0,0x1
00e4 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
00e5 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00e6 0059 | Y | Store_Top Discrete,At_Offset_1
00e7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x7 = 0xe7,0x6
00e8 6815 |h | Jump_Zero 0xfe
00e9 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x8 = 0xe9,0x7
00ea 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00eb 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
00ec e002 | | Load 0x0,0x2
00ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00ee 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
00ef e002 | | Load 0x0,0x2
00f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f1 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
00f2 0092 0a8f | | Action Push_String_Extended,0xa8f ; "Set_retention_count failed"
00f4 e403 | | Load 0x2,0x3
00f5 e002 | | Load 0x0,0x2
00f6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00f7 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
00f8 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
00f9 e002 | | Load 0x0,0x2
00fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00fb 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
00fc a5fd | | Store_Unchecked 0x2,-0x3
00fd 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x3.0x9 = 0xfd,0x8
00fe e002 | | Load 0x0,0x2 ; Debug Table 0x3.0xa = 0xfe,0x9
00ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0100 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0101 a5fd | | Store_Unchecked 0x2,-0x3
0102 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0103 0000 0000 | | .BLANK 0000[0x5]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 0119 | | .CONST 0x0119 ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0005 | | .CONST 0x0005 ; Number of locals
010b INIT_0108:
010b e001 | | Load 0x0,0x1 ; Debug Table 0x4 = .DEBUG 0x010b,0x0e1a,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b69
; Debug Table 0x4.0x0 = 0x10b,0xffff
010c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
010d 02c7 | | Declare_Variable Any
010e 00d8 | | Load_Top At_Offset_0
010f 1c00 | | Execute_Immediate Run_Utility,0x0
0110 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x1 = 0x110,0xfffe
0111 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0112 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x2 = 0x112,0xfffd
0113 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0114 02ff | | Declare_Variable Variant_Record
0115 00d8 | | Load_Top At_Offset_0
0116 1c00 | | Execute_Immediate Run_Utility,0x0
0117 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x3 = 0x117,0xfffc
0118 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0119 BODY_0108:
0119 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x4 = 0x119,0x1
011a e002 | | Load 0x0,0x2
011b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011c 180f | | Execute Package,Field_Execute,Field_Number 0xf
011d 6802 |h | Jump_Zero 0x120
011e 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x5 = 0x11e,0x2
011f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0120 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x6 = 0x120,0x3
0121 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0122 e402 | | Load 0x2,0x2
0123 0120 | | Execute Any,Is_Value
0124 6803 |h | Jump_Zero 0x128
0125 e001 | | Load 0x0,0x1
0126 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0127 7801 |x | Jump 0x129
0128 e402 | | Load 0x2,0x2
0129 e5ff | | Load 0x2,-0x1
012a e002 | | Load 0x0,0x2
012b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
012c 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
012d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
012e c402 | | Store 0x2,0x2
012f 005b | [ | Store_Top Discrete,At_Offset_3
0130 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x7 = 0x130,0x4
0131 682c |h, | Jump_Zero 0x15e
0132 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x8 = 0x132,0x5
0133 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0134 e001 | | Load 0x0,0x1
0135 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0136 62cd |b | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
0137 e003 | | Load 0x0,0x3
0138 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0139 e5ff | | Load 0x2,-0x1
013a e002 | | Load 0x0,0x2
013b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
013c 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
013d 180f | | Execute Package,Field_Execute,Field_Number 0xf
013e 0032 | 2 | Store_Top Heap_Access,At_Offset_2
013f 005b | [ | Store_Top Discrete,At_Offset_3
0140 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x9 = 0x140,0x6
0141 681a |h | Jump_Zero 0x15c
0142 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0xa = 0x142,0x7
0143 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0144 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0145 e002 | | Load 0x0,0x2
0146 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0147 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0148 e002 | | Load 0x0,0x2
0149 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014a 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
014b 0092 0a90 | | Action Push_String_Extended,0xa90 ; "Is_Visible: bad object handle"
014d e403 | | Load 0x2,0x3
014e e002 | | Load 0x0,0x2
014f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0150 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0151 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0152 e002 | | Load 0x0,0x2
0153 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0154 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0155 e5ff | | Load 0x2,-0x1
0156 e002 | | Load 0x0,0x2
0157 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0158 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0159 181d | | Execute Package,Field_Execute,Field_Number 0x1d
015a 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xb = 0x15a,0x8
015b 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
015c 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0xc = 0x15c,0x9
015d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
015e e001 | | Load 0x0,0x1 ; Debug Table 0x4.0xd = 0x15e,0xa
015f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0160 00da | | Load_Top At_Offset_2
0161 62a2 |b | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
0162 e5ff | | Load 0x2,-0x1
0163 e002 | | Load 0x0,0x2
0164 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0165 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0166 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0167 4800 |H | Short_Literal 0x0
0168 e402 | | Load 0x2,0x2
0169 e001 | | Load 0x0,0x1
016a 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
016b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
016c 00d1 | | Pop_Control Pop_Count_1
016d 005b | [ | Store_Top Discrete,At_Offset_3
016e 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xe = 0x16e,0xb
016f 7002 |p | Jump_Nonzero 0x172
0170 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0xf = 0x170,0xc
0171 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0172 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x10 = 0x172,0xd
0173 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0174 0000 0000 | | .BLANK 0000[0x4]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017e | ~ | .CONST 0x017e ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0002 | | .CONST 0x0002 ; Number of locals
017b INIT_0178:
017b e002 | | Load 0x0,0x2 ; Debug Table 0x5 = .DEBUG 0x017b,0x0e3e,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b74
; Debug Table 0x5.0x0 = 0x17b,0xffff
017c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
017e BODY_0178:
017e 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x1 = 0x17e,0x1
017f e002 | | Load 0x0,0x2
0180 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0181 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0182 e5ff | | Load 0x2,-0x1
0183 e002 | | Load 0x0,0x2
0184 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0185 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0186 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0187 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x2 = 0x187,0x2
0188 820f | | Call 0x1,0xf
0189 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
018a 0000 0000 | | .BLANK 0000[0x6]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 019f | | .CONST 0x019f ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0004 | | .CONST 0x0004 ; Number of locals
0193 INIT_0190:
0193 e001 | | Load 0x0,0x1 ; Debug Table 0x6 = .DEBUG 0x0193,0x0e46,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b7f
; Debug Table 0x6.0x0 = 0x193,0xffff
0194 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0195 02c7 | | Declare_Variable Any
0196 00d8 | | Load_Top At_Offset_0
0197 1c00 | | Execute_Immediate Run_Utility,0x0
0198 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x1 = 0x198,0xfffe
0199 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019a e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x2 = 0x19a,0xfffd
019b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
019c 02ff | | Declare_Variable Variant_Record
019d 00d8 | | Load_Top At_Offset_0
019e 1c00 | | Execute_Immediate Run_Utility,0x0
019f BODY_0190:
019f e5ff | | Load 0x2,-0x1 ; Debug Table 0x6.0x3 = 0x19f,0x1
01a0 e002 | | Load 0x0,0x2
01a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a2 180f | | Execute Package,Field_Execute,Field_Number 0xf
01a3 6802 |h | Jump_Zero 0x1a6
01a4 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x4 = 0x1a4,0x2
01a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01a6 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x5 = 0x1a6,0x3
01a7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01a8 00db | | Load_Top At_Offset_3
01a9 0120 | | Execute Any,Is_Value
01aa 6803 |h | Jump_Zero 0x1ae
01ab e001 | | Load 0x0,0x1
01ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01ad 7801 |x | Jump 0x1af
01ae 00db | | Load_Top At_Offset_3
01af e5ff | | Load 0x2,-0x1
01b0 e002 | | Load 0x0,0x2
01b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b2 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01b3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b4 c402 | | Store 0x2,0x2
01b5 005a | Z | Store_Top Discrete,At_Offset_2
01b6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x6 = 0x1b6,0x4
01b7 681a |h | Jump_Zero 0x1d2
01b8 e002 | | Load 0x0,0x2 ; Debug Table 0x6.0x7 = 0x1b8,0x5
01b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ba 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
01bb e002 | | Load 0x0,0x2
01bc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01bd 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
01be e002 | | Load 0x0,0x2
01bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c0 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
01c1 0092 0a91 | | Action Push_String_Extended,0xa91 ; "Has_Versions: bad object handle"
01c3 e403 | | Load 0x2,0x3
01c4 e002 | | Load 0x0,0x2
01c5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c6 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01c7 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
01c8 e002 | | Load 0x0,0x2
01c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ca 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
01cb e5ff | | Load 0x2,-0x1
01cc e002 | | Load 0x0,0x2
01cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ce 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01cf 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01d0 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x8 = 0x1d0,0x6
01d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01d2 e001 | | Load 0x0,0x1 ; Debug Table 0x6.0x9 = 0x1d2,0x7
01d3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d4 00d9 | | Load_Top At_Offset_1
01d5 622e |b. | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
01d6 e5ff | | Load 0x2,-0x1
01d7 e002 | | Load 0x0,0x2
01d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d9 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01da 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01db 4ffe |O | Short_Literal -0x2
01dc e402 | | Load 0x2,0x2
01dd e001 | | Load 0x0,0x1
01de 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
01df 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01e0 00d1 | | Pop_Control Pop_Count_1
01e1 005a | Z | Store_Top Discrete,At_Offset_2
01e2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0xa = 0x1e2,0x8
01e3 6802 |h | Jump_Zero 0x1e6
01e4 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0xb = 0x1e4,0x9
01e5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e6 4801 |H | Short_Literal 0x1 ; Debug Table 0x6.0xc = 0x1e6,0xa
01e7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01ee | | .CONST 0x01ee ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0002 | | .CONST 0x0002 ; Number of locals
01eb INIT_01e8:
01eb e002 | | Load 0x0,0x2 ; Debug Table 0x7 = .DEBUG 0x01eb,0x0e62,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b8a
; Debug Table 0x7.0x0 = 0x1eb,0xffff
01ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ee BODY_01e8:
01ee 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x1 = 0x1ee,0x1
01ef e002 | | Load 0x0,0x2
01f0 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01f2 e5ff | | Load 0x2,-0x1
01f3 e002 | | Load 0x0,0x2
01f4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01f5 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01f6 0031 | 1 | Store_Top Heap_Access,At_Offset_1
01f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x2 = 0x1f7,0x2
01f8 8211 | | Call 0x1,0x11
01f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01fa 0000 0000 | | .BLANK 0000[0x6]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 020f | | .CONST 0x020f ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0004 | | .CONST 0x0004 ; Number of locals
0203 INIT_0200:
0203 e001 | | Load 0x0,0x1 ; Debug Table 0x8 = .DEBUG 0x0203,0x0e6a,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b95
; Debug Table 0x8.0x0 = 0x203,0xffff
0204 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0205 02c7 | | Declare_Variable Any
0206 00d8 | | Load_Top At_Offset_0
0207 1c00 | | Execute_Immediate Run_Utility,0x0
0208 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x1 = 0x208,0xfffe
0209 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020a e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x2 = 0x20a,0xfffd
020b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
020c 02ff | | Declare_Variable Variant_Record
020d 00d8 | | Load_Top At_Offset_0
020e 1c00 | | Execute_Immediate Run_Utility,0x0
020f BODY_0200:
020f e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x3 = 0x20f,0x1
0210 e002 | | Load 0x0,0x2
0211 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0212 180f | | Execute Package,Field_Execute,Field_Number 0xf
0213 6802 |h | Jump_Zero 0x216
0214 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x4 = 0x214,0x2
0215 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0216 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x5 = 0x216,0x3
0217 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0218 00db | | Load_Top At_Offset_3
0219 0120 | | Execute Any,Is_Value
021a 6803 |h | Jump_Zero 0x21e
021b e001 | | Load 0x0,0x1
021c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
021d 7801 |x | Jump 0x21f
021e 00db | | Load_Top At_Offset_3
021f e5ff | | Load 0x2,-0x1
0220 e002 | | Load 0x0,0x2
0221 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0222 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0223 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0224 c402 | | Store 0x2,0x2
0225 005a | Z | Store_Top Discrete,At_Offset_2
0226 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x6 = 0x226,0x4
0227 681a |h | Jump_Zero 0x242
0228 e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x7 = 0x228,0x5
0229 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
022b e002 | | Load 0x0,0x2
022c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022d 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
022e e002 | | Load 0x0,0x2
022f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0230 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0231 0092 0a92 | | Action Push_String_Extended,0xa92 ; "Has_Default_Version: bad object handle"
0233 e403 | | Load 0x2,0x3
0234 e002 | | Load 0x0,0x2
0235 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0236 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0237 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0238 e002 | | Load 0x0,0x2
0239 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023a 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
023b e5ff | | Load 0x2,-0x1
023c e002 | | Load 0x0,0x2
023d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
023e 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
023f 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0240 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0x8 = 0x240,0x6
0241 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0242 e001 | | Load 0x0,0x1 ; Debug Table 0x8.0x9 = 0x242,0x7
0243 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0244 00d9 | | Load_Top At_Offset_1
0245 61be |a | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
0246 e5ff | | Load 0x2,-0x1
0247 e002 | | Load 0x0,0x2
0248 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0249 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
024a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
024b 4800 |H | Short_Literal 0x0
024c e402 | | Load 0x2,0x2
024d e001 | | Load 0x0,0x1
024e 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
024f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0250 00d1 | | Pop_Control Pop_Count_1
0251 005a | Z | Store_Top Discrete,At_Offset_2
0252 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0xa = 0x252,0x8
0253 6802 |h | Jump_Zero 0x256
0254 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xb = 0x254,0x9
0255 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0256 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0xc = 0x256,0xa
0257 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025e | ^ | .CONST 0x025e ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0002 | | .CONST 0x0002 ; Number of locals
025b INIT_0258:
025b e002 | | Load 0x0,0x2 ; Debug Table 0x9 = .DEBUG 0x025b,0x0e86,0x0002,0x0000,0x0055,0xe795,0x0000,0x0ba0
; Debug Table 0x9.0x0 = 0x25b,0xffff
025c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
025d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
025e BODY_0258:
025e 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x1 = 0x25e,0x1
025f e002 | | Load 0x0,0x2
0260 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0261 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0262 e5ff | | Load 0x2,-0x1
0263 e002 | | Load 0x0,0x2
0264 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0265 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0266 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0267 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x2 = 0x267,0x2
0268 8213 | | Call 0x1,0x13
0269 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
026a 0000 0000 | | .BLANK 0000[0x6]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0292 | | .CONST 0x0292 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 000a | | .CONST 0x000a ; Number of locals
0273 INIT_0270:
0273 e001 | | Load 0x0,0x1 ; Debug Table 0xa = .DEBUG 0x0273,0x0e8e,0x0001,0x0000,0x0055,0xe795,0x0000,0x0bab
; Debug Table 0xa.0x0 = 0x273,0xffff
0274 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0275 02c7 | | Declare_Variable Any
0276 00d8 | | Load_Top At_Offset_0
0277 1c00 | | Execute_Immediate Run_Utility,0x0
0278 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x1 = 0x278,0xfffe
0279 1b0d | | Execute Package,Field_Read,Field_Number 0xd
027a e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x2 = 0x27a,0xfffd
027b 1b14 | | Execute Package,Field_Read,Field_Number 0x14
027c 02ff | | Declare_Variable Variant_Record
027d 00d8 | | Load_Top At_Offset_0
027e 1c00 | | Execute_Immediate Run_Utility,0x0
027f e003 | | Load 0x0,0x3 ; Debug Table 0xa.0x3 = 0x27f,0xfffc
0280 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0281 02c7 | | Declare_Variable Any
0282 00d8 | | Load_Top At_Offset_0
0283 1c00 | | Execute_Immediate Run_Utility,0x0
0284 e004 | | Load 0x0,0x4 ; Debug Table 0xa.0x4 = 0x284,0xfffb
0285 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0286 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x5 = 0x286,0xfffa
0287 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0288 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0289 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xa.0x6 = 0x289,0xfff9
028a e005 | | Load 0x0,0x5 ; Debug Table 0xa.0x7 = 0x28a,0xfff8
028b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
028c 02c7 | | Declare_Variable Any
028d 00d8 | | Load_Top At_Offset_0
028e 1c00 | | Execute_Immediate Run_Utility,0x0
028f e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x8 = 0x28f,0xfff7
0290 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0291 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0292 BODY_0270:
0292 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x9 = 0x292,0x1
0293 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0294 180e | | Execute Package,Field_Execute,Field_Number 0xe
0295 a5fe | | Store_Unchecked 0x2,-0x2
0296 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0xa = 0x296,0x2
0297 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0298 e402 | | Load 0x2,0x2
0299 0120 | | Execute Any,Is_Value
029a 6803 |h | Jump_Zero 0x29e
029b e001 | | Load 0x0,0x1
029c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
029d 7801 |x | Jump 0x29f
029e e402 | | Load 0x2,0x2
029f e5ff | | Load 0x2,-0x1
02a0 e002 | | Load 0x0,0x2
02a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02a2 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
02a3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02a4 c402 | | Store 0x2,0x2
02a5 c403 | | Store 0x2,0x3
02a6 e403 | | Load 0x2,0x3 ; Debug Table 0xa.0xb = 0x2a6,0x3
02a7 6815 |h | Jump_Zero 0x2bd
02a8 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0xc = 0x2a8,0x4
02a9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02aa 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
02ab e002 | | Load 0x0,0x2
02ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ad 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
02ae e002 | | Load 0x0,0x2
02af 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b0 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
02b1 0092 0a93 | | Action Push_String_Extended,0xa93 ; "create: bad object handle"
02b3 e403 | | Load 0x2,0x3
02b4 e002 | | Load 0x0,0x2
02b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b6 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
02b7 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
02b8 e002 | | Load 0x0,0x2
02b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ba 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
02bb a5fd | | Store_Unchecked 0x2,-0x3
02bc 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0xa.0xd = 0x2bc,0x5
02bd e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0xe = 0x2bd,0x6
02be e002 | | Load 0x0,0x2
02bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c0 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
02c1 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02c2 c405 | | Store 0x2,0x5
02c3 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0xf = 0x2c3,0x7
02c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c5 00f1 | | Load_Encached Diana_Temp_Seq
02c6 e001 | | Load 0x0,0x1
02c7 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02c8 1b17 | | Execute Package,Field_Read,Field_Number 0x17
02c9 e409 | | Load 0x2,0x9
02ca 0120 | | Execute Any,Is_Value
02cb 6803 |h | Jump_Zero 0x2cf
02cc e005 | | Load 0x0,0x5
02cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02ce 7801 |x | Jump 0x2d0
02cf e409 | | Load 0x2,0x9
02d0 e404 | | Load 0x2,0x4
02d1 6132 |a2 | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
02d2 e405 | | Load 0x2,0x5
02d3 4800 |H | Short_Literal 0x0
02d4 e001 | | Load 0x0,0x1
02d5 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
02d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d7 e001 | | Load 0x0,0x1
02d8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02d9 4ffc |O | Short_Literal -0x4
02da 4ffd |O | Short_Literal -0x3
02db e402 | | Load 0x2,0x2
02dc e001 | | Load 0x0,0x1
02dd 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
02de 180d | | Execute Package,Field_Execute,Field_Number 0xd
02df 00d1 | | Pop_Control Pop_Count_1
02e0 c409 | | Store 0x2,0x9
02e1 c407 | | Store 0x2,0x7
02e2 c408 | | Store 0x2,0x8
02e3 c403 | | Store 0x2,0x3
02e4 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x10 = 0x2e4,0x8
02e5 e002 | | Load 0x0,0x2
02e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02e7 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
02e8 1817 | | Execute Package,Field_Execute,Field_Number 0x17
02e9 a406 | | Store_Unchecked 0x2,0x6
02ea e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x11 = 0x2ea,0x9
02eb 681c |h | Jump_Zero 0x308
02ec 0092 0a94 | | Action Push_String_Extended,0xa94 ; "Create: Could not create version"
; Debug Table 0xa.0x12 = 0x2ec,0xa
02ee e403 | | Load 0x2,0x3
02ef e408 | | Load 0x2,0x8
02f0 e407 | | Load 0x2,0x7
02f1 e409 | | Load 0x2,0x9
02f2 8006 | | Call 0x0,0x6
02f3 0031 | 1 | Store_Top Heap_Access,At_Offset_1
02f4 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x13 = 0x2f4,0xb
02f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02f6 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
02f7 180e | | Execute Package,Field_Execute,Field_Number 0xe
02f8 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x14 = 0x2f8,0x401
02f9 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x15 = 0x2f9,0xb
; Debug Table 0xa.0x16 = 0x2f9,0x801
02fa e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x17 = 0x2fa,0x401
02fb 181e | | Execute Package,Field_Execute,Field_Number 0x1e
02fc e001 | | Load 0x0,0x1
02fd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02fe e001 | | Load 0x0,0x1
02ff 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0300 e406 | | Load 0x2,0x6
0301 e40a | | Load 0x2,0xa
0302 e002 | | Load 0x0,0x2
0303 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0304 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0305 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0306 a5fe | | Store_Unchecked 0x2,-0x2
0307 7816 |x | Jump 0x31e
0308 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xa.0x18 = 0x308,0xc
0309 e403 | | Load 0x2,0x3
030a e408 | | Load 0x2,0x8
030b e407 | | Load 0x2,0x7
030c e409 | | Load 0x2,0x9
030d 8006 | | Call 0x0,0x6
030e 0031 | 1 | Store_Top Heap_Access,At_Offset_1
030f e405 | | Load 0x2,0x5 ; Debug Table 0xa.0x19 = 0x30f,0xd
0310 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x1a = 0x310,0xc01
0311 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa.0x1b = 0x311,0xd
; Debug Table 0xa.0x1c = 0x311,0x1001
0312 e001 | | Load 0x0,0x1 ; Debug Table 0xa.0x1d = 0x312,0xc01
0313 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0314 e404 | | Load 0x2,0x4
0315 e001 | | Load 0x0,0x1
0316 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0317 e406 | | Load 0x2,0x6
0318 e40a | | Load 0x2,0xa
0319 e002 | | Load 0x0,0x2
031a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
031b 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
031c 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
031d a5fe | | Store_Unchecked 0x2,-0x2
031e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x1e = 0x31e,0xe
031f a5fd | | Store_Unchecked 0x2,-0x3
0320 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0321 0000 0000 | | .BLANK 0000[0x7]
0328 ; --------------------------------------------------------------------------------------
0328 ; SUBPROGRAM
0328 ; --------------------------------------------------------------------------------------
0328 034a | J | .CONST 0x034a ; Address of begin
0329 0004 | | .CONST 0x0004 ; Address of exception handler
032a 000a | | .CONST 0x000a ; Number of locals
032b INIT_0328:
032b e001 | | Load 0x0,0x1 ; Debug Table 0xb = .DEBUG 0x032b,0x0ece,0x0001,0x0000,0x0055,0xe795,0x0000,0x0bc1
; Debug Table 0xb.0x0 = 0x32b,0xffff
032c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
032d e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x1 = 0x32d,0xfffe
032e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
032f 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0330 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x2 = 0x330,0xfffd
0331 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0332 02c7 | | Declare_Variable Any
0333 00d8 | | Load_Top At_Offset_0
0334 1c00 | | Execute_Immediate Run_Utility,0x0
0335 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x3 = 0x335,0xfffc
0336 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0337 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x4 = 0x337,0xfffb
0338 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0339 02ff | | Declare_Variable Variant_Record
033a 00d8 | | Load_Top At_Offset_0
033b 1c00 | | Execute_Immediate Run_Utility,0x0
033c e003 | | Load 0x0,0x3 ; Debug Table 0xb.0x5 = 0x33c,0xfffa
033d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
033e 02c7 | | Declare_Variable Any
033f 00d8 | | Load_Top At_Offset_0
0340 1c00 | | Execute_Immediate Run_Utility,0x0
0341 e005 | | Load 0x0,0x5 ; Debug Table 0xb.0x6 = 0x341,0xfff9
0342 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0343 02c7 | | Declare_Variable Any
0344 00d8 | | Load_Top At_Offset_0
0345 1c00 | | Execute_Immediate Run_Utility,0x0
0346 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x7 = 0x346,0xfff8
0347 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0348 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0349 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xb.0x8 = 0x349,0xfff7
034a BODY_0328:
034a e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x9 = 0x34a,0x1
034b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
034c 180e | | Execute Package,Field_Execute,Field_Number 0xe
034d a5fa | | Store_Unchecked 0x2,-0x6
034e e5fd | | Load 0x2,-0x3 ; Debug Table 0xb.0xa = 0x34e,0x2
034f e007 | | Load 0x0,0x7
0350 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0351 a403 | | Store_Unchecked 0x2,0x3
0352 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0xb = 0x352,0x3
0353 e002 | | Load 0x0,0x2
0354 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0355 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0356 6803 |h | Jump_Zero 0x35a
0357 e403 | | Load 0x2,0x3 ; Debug Table 0xb.0xc = 0x357,0x4
0358 a5f9 | | Store_Unchecked 0x2,-0x7
0359 4506 |E | Exit_Suprogram New_Top_Offset 0x6 ; Debug Table 0xb.0xd = 0x359,0x5
035a e007 | | Load 0x0,0x7 ; Debug Table 0xb.0xe = 0x35a,0x6
035b 180f | | Execute Package,Field_Execute,Field_Number 0xf
035c 0217 | | Execute Heap_Access,All_Reference
035d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
035e a402 | | Store_Unchecked 0x2,0x2
035f e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0xf = 0x35f,0x7
0360 0b02 | | Execute_Immediate Case_Compare,0x2
0361 7010 |p | Jump_Nonzero 0x372
0362 0b01 | | Execute_Immediate Case_Compare,0x1
0363 7012 |p | Jump_Nonzero 0x376
0364 0b03 | | Execute_Immediate Case_Compare,0x3
0365 7021 |p! | Jump_Nonzero 0x387
0366 0b04 | | Execute_Immediate Case_Compare,0x4
0367 7023 |p# | Jump_Nonzero 0x38b
0368 0b05 | | Execute_Immediate Case_Compare,0x5
0369 7025 |p% | Jump_Nonzero 0x38f
036a 0b06 | | Execute_Immediate Case_Compare,0x6
036b 7027 |p' | Jump_Nonzero 0x393
036c 0b08 | | Execute_Immediate Case_Compare,0x8
036d 7029 |p) | Jump_Nonzero 0x397
036e e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x10 = 0x36e,0x10
036f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0370 c404 | | Store 0x2,0x4
0371 7828 |x( | Jump 0x39a
0372 e008 | | Load 0x0,0x8 ; Debug Table 0xb.0x11 = 0x372,0x8
0373 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0374 c404 | | Store 0x2,0x4
0375 7824 |x$ | Jump 0x39a
0376 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x12 = 0x376,0x9
0377 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0378 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0379 e002 | | Load 0x0,0x2
037a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
037b 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
037c e002 | | Load 0x0,0x2
037d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
037e 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
037f 0092 0a95 | | Action Push_String_Extended,0xa95 ; "Libraries are made only with library_object.create"
0381 4811 |H | Short_Literal 0x11
0382 e002 | | Load 0x0,0x2
0383 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0384 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0385 a5f9 | | Store_Unchecked 0x2,-0x7
0386 4506 |E | Exit_Suprogram New_Top_Offset 0x6 ; Debug Table 0xb.0x13 = 0x386,0xa
0387 e008 | | Load 0x0,0x8 ; Debug Table 0xb.0x14 = 0x387,0xb
0388 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0389 c404 | | Store 0x2,0x4
038a 780f |x | Jump 0x39a
038b e008 | | Load 0x0,0x8 ; Debug Table 0xb.0x15 = 0x38b,0xc
038c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
038d c404 | | Store 0x2,0x4
038e 780b |x | Jump 0x39a
038f e008 | | Load 0x0,0x8 ; Debug Table 0xb.0x16 = 0x38f,0xd
0390 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0391 c404 | | Store 0x2,0x4
0392 7807 |x | Jump 0x39a
0393 e008 | | Load 0x0,0x8 ; Debug Table 0xb.0x17 = 0x393,0xe
0394 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0395 c404 | | Store 0x2,0x4
0396 7803 |x | Jump 0x39a
0397 e008 | | Load 0x0,0x8 ; Debug Table 0xb.0x18 = 0x397,0xf
0398 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0399 c404 | | Store 0x2,0x4
039a 00d1 | | Pop_Control Pop_Count_1
039b e5fd | | Load 0x2,-0x3 ; Debug Table 0xb.0x19 = 0x39b,0x11
039c e002 | | Load 0x0,0x2
039d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
039e 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
039f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
03a0 c407 | | Store 0x2,0x7
03a1 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x1a = 0x3a1,0x12
03a2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03a3 00f1 | | Load_Encached Diana_Temp_Seq
03a4 e001 | | Load 0x0,0x1
03a5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
03a6 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03a7 e408 | | Load 0x2,0x8
03a8 0120 | | Execute Any,Is_Value
03a9 6803 |h | Jump_Zero 0x3ad
03aa e005 | | Load 0x0,0x5
03ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ac 7801 |x | Jump 0x3ae
03ad e408 | | Load 0x2,0x8
03ae e406 | | Load 0x2,0x6
03af 6054 |`T | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
03b0 e407 | | Load 0x2,0x7
03b1 4800 |H | Short_Literal 0x0
03b2 e001 | | Load 0x0,0x1
03b3 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
03b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03b5 e001 | | Load 0x0,0x1
03b6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03b7 e5fc | | Load 0x2,-0x4
03b8 4ffc |O | Short_Literal -0x4
03b9 4ffd |O | Short_Literal -0x3
03ba e402 | | Load 0x2,0x2
03bb e5fb | | Load 0x2,-0x5
03bc e002 | | Load 0x0,0x2
03bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03be 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
03bf 1814 | | Execute Package,Field_Execute,Field_Number 0x14
03c0 e404 | | Load 0x2,0x4
03c1 e5ff | | Load 0x2,-0x1
03c2 e001 | | Load 0x0,0x1
03c3 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
03c4 180f | | Execute Package,Field_Execute,Field_Number 0xf
03c5 00d1 | | Pop_Control Pop_Count_1
03c6 c408 | | Store 0x2,0x8
03c7 c409 | | Store 0x2,0x9
03c8 0032 | 2 | Store_Top Heap_Access,At_Offset_2
03c9 c405 | | Store 0x2,0x5
03ca e405 | | Load 0x2,0x5 ; Debug Table 0xb.0x1b = 0x3ca,0x13
03cb 681c |h | Jump_Zero 0x3e8
03cc 0092 0a96 | | Action Push_String_Extended,0xa96 ; "Any_Object.Create failed"
; Debug Table 0xb.0x1c = 0x3cc,0x14
03ce e405 | | Load 0x2,0x5
03cf 00da | | Load_Top At_Offset_2
03d0 e409 | | Load 0x2,0x9
03d1 e408 | | Load 0x2,0x8
03d2 8006 | | Call 0x0,0x6
03d3 a403 | | Store_Unchecked 0x2,0x3
03d4 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x1d = 0x3d4,0x15
03d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03d6 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
03d7 180e | | Execute Package,Field_Execute,Field_Number 0xe
03d8 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x1e = 0x3d8,0x401
03d9 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x1f = 0x3d9,0x15
; Debug Table 0xb.0x20 = 0x3d9,0x801
03da e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x21 = 0x3da,0x401
03db 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03dc e001 | | Load 0x0,0x1
03dd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03de e001 | | Load 0x0,0x1
03df 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03e0 e5ff | | Load 0x2,-0x1
03e1 e403 | | Load 0x2,0x3
03e2 e002 | | Load 0x0,0x2
03e3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03e4 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
03e5 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03e6 a5fa | | Store_Unchecked 0x2,-0x6
03e7 7816 |x | Jump 0x3fe
03e8 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xb.0x22 = 0x3e8,0x16
03e9 e405 | | Load 0x2,0x5
03ea 00da | | Load_Top At_Offset_2
03eb e409 | | Load 0x2,0x9
03ec e408 | | Load 0x2,0x8
03ed 8006 | | Call 0x0,0x6
03ee a403 | | Store_Unchecked 0x2,0x3
03ef 00db | | Load_Top At_Offset_3 ; Debug Table 0xb.0x23 = 0x3ef,0x17
03f0 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x24 = 0x3f0,0xc01
03f1 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x25 = 0x3f1,0x17
; Debug Table 0xb.0x26 = 0x3f1,0x1001
03f2 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x27 = 0x3f2,0xc01
03f3 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03f4 e406 | | Load 0x2,0x6
03f5 e001 | | Load 0x0,0x1
03f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03f7 e5ff | | Load 0x2,-0x1
03f8 e403 | | Load 0x2,0x3
03f9 e002 | | Load 0x0,0x2
03fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03fb 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
03fc 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
03fd a5fa | | Store_Unchecked 0x2,-0x6
03fe e403 | | Load 0x2,0x3 ; Debug Table 0xb.0x28 = 0x3fe,0x18
03ff a5f9 | | Store_Unchecked 0x2,-0x7
0400 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0401 0000 0000 | | .XXX[0x3]
0403 0000 | |
0404 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0408 ; --------------------------------------------------------------------------------------
0408 ; SUBPROGRAM
0408 ; --------------------------------------------------------------------------------------
0408 042a | * | .CONST 0x042a ; Address of begin
0409 0004 | | .CONST 0x0004 ; Address of exception handler
040a 000a | | .CONST 0x000a ; Number of locals
040b INIT_0408:
040b e001 | | Load 0x0,0x1 ; Debug Table 0xc = .DEBUG 0x040b,0x0f22,0x0001,0x0000,0x0055,0xe795,0x0000,0x0bf9
; Debug Table 0xc.0x0 = 0x40b,0xffff
040c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
040d 02c7 | | Declare_Variable Any
040e 00d8 | | Load_Top At_Offset_0
040f 1c00 | | Execute_Immediate Run_Utility,0x0
0410 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x1 = 0x410,0xfffe
0411 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0412 02c7 | | Declare_Variable Any
0413 00d8 | | Load_Top At_Offset_0
0414 1c00 | | Execute_Immediate Run_Utility,0x0
0415 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x2 = 0x415,0xfffd
0416 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0417 e005 | | Load 0x0,0x5 ; Debug Table 0xc.0x3 = 0x417,0xfffc
0418 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0419 02c7 | | Declare_Variable Any
041a 00d8 | | Load_Top At_Offset_0
041b 1c00 | | Execute_Immediate Run_Utility,0x0
041c e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x4 = 0x41c,0xfffb
041d 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
041e 1b17 | | Execute Package,Field_Read,Field_Number 0x17
041f 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xc.0x5 = 0x41f,0xfffa
0420 e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x6 = 0x420,0xfff9
0421 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0422 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0423 e003 | | Load 0x0,0x3 ; Debug Table 0xc.0x7 = 0x423,0xfff8
0424 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0425 02c7 | | Declare_Variable Any
0426 00d8 | | Load_Top At_Offset_0
0427 1c00 | | Execute_Immediate Run_Utility,0x0
0428 e004 | | Load 0x0,0x4 ; Debug Table 0xc.0x8 = 0x428,0xfff7
0429 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042a BODY_0408:
042a e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x9 = 0x42a,0x1
042b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042c e402 | | Load 0x2,0x2
042d 0120 | | Execute Any,Is_Value
042e 6803 |h | Jump_Zero 0x432
042f e001 | | Load 0x0,0x1
0430 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0431 7801 |x | Jump 0x433
0432 e402 | | Load 0x2,0x2
0433 e5ff | | Load 0x2,-0x1
0434 e002 | | Load 0x0,0x2
0435 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0436 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0437 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0438 c402 | | Store 0x2,0x2
0439 c404 | | Store 0x2,0x4
043a e404 | | Load 0x2,0x4 ; Debug Table 0xc.0xa = 0x43a,0x2
043b 6815 |h | Jump_Zero 0x451
043c e002 | | Load 0x0,0x2 ; Debug Table 0xc.0xb = 0x43c,0x3
043d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
043e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
043f e002 | | Load 0x0,0x2
0440 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0441 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0442 e002 | | Load 0x0,0x2
0443 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0444 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0445 0092 0a97 | | Action Push_String_Extended,0xa97 ; "copy: bad source object handle"
0447 e404 | | Load 0x2,0x4
0448 e002 | | Load 0x0,0x2
0449 1b0d | | Execute Package,Field_Read,Field_Number 0xd
044a 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
044b 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
044c e002 | | Load 0x0,0x2
044d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
044e 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
044f a5fc | | Store_Unchecked 0x2,-0x4
0450 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xc.0xc = 0x450,0x4
0451 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0xd = 0x451,0x5
0452 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0453 e403 | | Load 0x2,0x3
0454 0120 | | Execute Any,Is_Value
0455 6803 |h | Jump_Zero 0x459
0456 e001 | | Load 0x0,0x1
0457 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0458 7801 |x | Jump 0x45a
0459 e403 | | Load 0x2,0x3
045a e5fe | | Load 0x2,-0x2
045b e002 | | Load 0x0,0x2
045c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
045d 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
045e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
045f c403 | | Store 0x2,0x3
0460 c404 | | Store 0x2,0x4
0461 e404 | | Load 0x2,0x4 ; Debug Table 0xc.0xe = 0x461,0x6
0462 6815 |h | Jump_Zero 0x478
0463 e002 | | Load 0x0,0x2 ; Debug Table 0xc.0xf = 0x463,0x7
0464 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0465 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0466 e002 | | Load 0x0,0x2
0467 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0468 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0469 e002 | | Load 0x0,0x2
046a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046b 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
046c 0092 0a98 | | Action Push_String_Extended,0xa98 ; "copy: bad destination object handle"
046e e404 | | Load 0x2,0x4
046f e002 | | Load 0x0,0x2
0470 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0471 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0472 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0473 e002 | | Load 0x0,0x2
0474 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0475 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0476 a5fc | | Store_Unchecked 0x2,-0x4
0477 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xc.0x10 = 0x477,0x8
0478 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x11 = 0x478,0x9
0479 e002 | | Load 0x0,0x2
047a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
047b 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
047c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
047d c409 | | Store 0x2,0x9
047e e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x12 = 0x47e,0xa
047f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0480 00f1 | | Load_Encached Diana_Temp_Seq
0481 e001 | | Load 0x0,0x1
0482 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0483 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0484 e405 | | Load 0x2,0x5
0485 0120 | | Execute Any,Is_Value
0486 6803 |h | Jump_Zero 0x48a
0487 e005 | | Load 0x0,0x5
0488 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0489 7801 |x | Jump 0x48b
048a e405 | | Load 0x2,0x5
048b 6778 |gx | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
048c e409 | | Load 0x2,0x9
048d 4800 |H | Short_Literal 0x0
048e e001 | | Load 0x0,0x1
048f 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0490 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0491 e001 | | Load 0x0,0x1
0492 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0493 4801 |H | Short_Literal 0x1
0494 4ffc |O | Short_Literal -0x4
0495 4800 |H | Short_Literal 0x0
0496 e403 | | Load 0x2,0x3
0497 e402 | | Load 0x2,0x2
0498 e001 | | Load 0x0,0x1
0499 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
049a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
049b c405 | | Store 0x2,0x5
049c c406 | | Store 0x2,0x6
049d c407 | | Store 0x2,0x7
049e c404 | | Store 0x2,0x4
049f e404 | | Load 0x2,0x4 ; Debug Table 0xc.0x13 = 0x49f,0xb
04a0 6822 |h" | Jump_Zero 0x4c3
04a1 0092 0a99 | | Action Push_String_Extended,0xa99 ; "any_object.copy failed"
; Debug Table 0xc.0x14 = 0x4a1,0xc
04a3 e404 | | Load 0x2,0x4
04a4 e407 | | Load 0x2,0x7
04a5 e406 | | Load 0x2,0x6
04a6 e405 | | Load 0x2,0x5
04a7 8006 | | Call 0x0,0x6
04a8 0033 | 3 | Store_Top Heap_Access,At_Offset_3
04a9 e5ff | | Load 0x2,-0x1 ; Debug Table 0xc.0x15 = 0x4a9,0xd
04aa e002 | | Load 0x0,0x2
04ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ac 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
04ad 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04ae 0031 | 1 | Store_Top Heap_Access,At_Offset_1
04af e002 | | Load 0x0,0x2 ; Debug Table 0xc.0x16 = 0x4af,0xe
04b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04b1 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
04b2 180e | | Execute Package,Field_Execute,Field_Number 0xe
04b3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x17 = 0x4b3,0x401
04b4 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x18 = 0x4b4,0xe
; Debug Table 0xc.0x19 = 0x4b4,0x801
04b5 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x1a = 0x4b5,0x401
04b6 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04b7 e001 | | Load 0x0,0x1
04b8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04b9 e001 | | Load 0x0,0x1
04ba 1810 | | Execute Package,Field_Execute,Field_Number 0x10
04bb e40a | | Load 0x2,0xa
04bc e408 | | Load 0x2,0x8
04bd e002 | | Load 0x0,0x2
04be 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04bf 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
04c0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
04c1 a5fd | | Store_Unchecked 0x2,-0x3
04c2 781c |x | Jump 0x4df
04c3 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xc.0x1b = 0x4c3,0xf
04c4 e404 | | Load 0x2,0x4
04c5 e407 | | Load 0x2,0x7
04c6 e406 | | Load 0x2,0x6
04c7 e405 | | Load 0x2,0x5
04c8 8006 | | Call 0x0,0x6
04c9 0033 | 3 | Store_Top Heap_Access,At_Offset_3
04ca e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x1c = 0x4ca,0x10
04cb e002 | | Load 0x0,0x2
04cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04cd 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
04ce 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04cf 0031 | 1 | Store_Top Heap_Access,At_Offset_1
04d0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x1d = 0x4d0,0x11
04d1 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x1e = 0x4d1,0xc01
04d2 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xc.0x1f = 0x4d2,0x11
; Debug Table 0xc.0x20 = 0x4d2,0x1001
04d3 e001 | | Load 0x0,0x1 ; Debug Table 0xc.0x21 = 0x4d3,0xc01
04d4 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04d5 e001 | | Load 0x0,0x1
04d6 1815 | | Execute Package,Field_Execute,Field_Number 0x15
04d7 e403 | | Load 0x2,0x3
04d8 e40a | | Load 0x2,0xa
04d9 e408 | | Load 0x2,0x8
04da e002 | | Load 0x0,0x2
04db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04dc 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
04dd 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
04de a5fd | | Store_Unchecked 0x2,-0x3
04df 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x22 = 0x4df,0x12
04e0 a5fc | | Store_Unchecked 0x2,-0x4
04e1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04e2 0000 0000 | | .BLANK 0000[0x6]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; SUBPROGRAM
04e8 ; --------------------------------------------------------------------------------------
04e8 0509 | | .CONST 0x0509 ; Address of begin
04e9 0004 | | .CONST 0x0004 ; Address of exception handler
04ea 000a | | .CONST 0x000a ; Number of locals
04eb INIT_04e8:
04eb e001 | | Load 0x0,0x1 ; Debug Table 0xd = .DEBUG 0x04eb,0x0f6a,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c15
; Debug Table 0xd.0x0 = 0x4eb,0xffff
04ec 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04ed 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04ee e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x1 = 0x4ee,0xfffe
04ef 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04f0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
04f1 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x2 = 0x4f1,0xfffd
04f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f3 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x3 = 0x4f3,0xfffc
04f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04f5 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
04f6 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x4 = 0x4f6,0xfffb
04f7 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04f8 02c7 | | Declare_Variable Any
04f9 00d8 | | Load_Top At_Offset_0
04fa 1c00 | | Execute_Immediate Run_Utility,0x0
04fb e003 | | Load 0x0,0x3 ; Debug Table 0xd.0x5 = 0x4fb,0xfffa
04fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04fd 02c7 | | Declare_Variable Any
04fe 00d8 | | Load_Top At_Offset_0
04ff 1c00 | | Execute_Immediate Run_Utility,0x0
0500 e005 | | Load 0x0,0x5 ; Debug Table 0xd.0x6 = 0x500,0xfff9
0501 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0502 02c7 | | Declare_Variable Any
0503 00d8 | | Load_Top At_Offset_0
0504 1c00 | | Execute_Immediate Run_Utility,0x0
0505 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x7 = 0x505,0xfff8
0506 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0507 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0508 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xd.0x8 = 0x508,0xfff7
0509 BODY_04e8:
0509 e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x9 = 0x509,0x1
050a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
050b 180e | | Execute Package,Field_Execute,Field_Number 0xe
050c a5f9 | | Store_Unchecked 0x2,-0x7
050d e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0xa = 0x50d,0x2
050e e007 | | Load 0x0,0x7
050f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0510 a405 | | Store_Unchecked 0x2,0x5
0511 e405 | | Load 0x2,0x5 ; Debug Table 0xd.0xb = 0x511,0x3
0512 e002 | | Load 0x0,0x2
0513 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0514 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0515 6803 |h | Jump_Zero 0x519
0516 e405 | | Load 0x2,0x5 ; Debug Table 0xd.0xc = 0x516,0x4
0517 a5f8 | | Store_Unchecked 0x2,-0x8
0518 4507 |E | Exit_Suprogram New_Top_Offset 0x7 ; Debug Table 0xd.0xd = 0x518,0x5
0519 e007 | | Load 0x0,0x7 ; Debug Table 0xd.0xe = 0x519,0x6
051a 180f | | Execute Package,Field_Execute,Field_Number 0xf
051b 0217 | | Execute Heap_Access,All_Reference
051c 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
051d a402 | | Store_Unchecked 0x2,0x2
051e e5fc | | Load 0x2,-0x4 ; Debug Table 0xd.0xf = 0x51e,0x7
051f e007 | | Load 0x0,0x7
0520 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0521 a405 | | Store_Unchecked 0x2,0x5
0522 e405 | | Load 0x2,0x5 ; Debug Table 0xd.0x10 = 0x522,0x8
0523 e002 | | Load 0x0,0x2
0524 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0525 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
0526 6803 |h | Jump_Zero 0x52a
0527 e405 | | Load 0x2,0x5 ; Debug Table 0xd.0x11 = 0x527,0x9
0528 a5f8 | | Store_Unchecked 0x2,-0x8
0529 4507 |E | Exit_Suprogram New_Top_Offset 0x7 ; Debug Table 0xd.0x12 = 0x529,0xa
052a e007 | | Load 0x0,0x7 ; Debug Table 0xd.0x13 = 0x52a,0xb
052b 180f | | Execute Package,Field_Execute,Field_Number 0xf
052c 0217 | | Execute Heap_Access,All_Reference
052d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
052e a403 | | Store_Unchecked 0x2,0x3
052f e5fc | | Load 0x2,-0x4 ; Debug Table 0xd.0x14 = 0x52f,0xc
0530 e002 | | Load 0x0,0x2
0531 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0532 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0533 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0534 c407 | | Store 0x2,0x7
0535 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x15 = 0x535,0xd
0536 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0537 00f1 | | Load_Encached Diana_Temp_Seq
0538 e001 | | Load 0x0,0x1
0539 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
053a 1b17 | | Execute Package,Field_Read,Field_Number 0x17
053b e408 | | Load 0x2,0x8
053c 0120 | | Execute Any,Is_Value
053d 6803 |h | Jump_Zero 0x541
053e e005 | | Load 0x0,0x5
053f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0540 7801 |x | Jump 0x542
0541 e408 | | Load 0x2,0x8
0542 e406 | | Load 0x2,0x6
0543 0120 | | Execute Any,Is_Value
0544 6803 |h | Jump_Zero 0x548
0545 e001 | | Load 0x0,0x1
0546 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0547 7801 |x | Jump 0x549
0548 e406 | | Load 0x2,0x6
0549 66ba |f | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
054a e407 | | Load 0x2,0x7
054b 4800 |H | Short_Literal 0x0
054c e001 | | Load 0x0,0x1
054d 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
054e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
054f e001 | | Load 0x0,0x1
0550 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0551 e5fb | | Load 0x2,-0x5
0552 4801 |H | Short_Literal 0x1
0553 4ffc |O | Short_Literal -0x4
0554 e403 | | Load 0x2,0x3
0555 4800 |H | Short_Literal 0x0
0556 e402 | | Load 0x2,0x2
0557 e5fe | | Load 0x2,-0x2
0558 e5ff | | Load 0x2,-0x1
0559 e001 | | Load 0x0,0x1
055a 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
055b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
055c c406 | | Store 0x2,0x6
055d c408 | | Store 0x2,0x8
055e c409 | | Store 0x2,0x9
055f 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0560 c404 | | Store 0x2,0x4
0561 e404 | | Load 0x2,0x4 ; Debug Table 0xd.0x16 = 0x561,0xe
0562 681c |h | Jump_Zero 0x57f
0563 0092 0a99 | | Action Push_String_Extended,0xa99 ; "any_object.copy failed"
; Debug Table 0xd.0x17 = 0x563,0xf
0565 e404 | | Load 0x2,0x4
0566 00da | | Load_Top At_Offset_2
0567 e409 | | Load 0x2,0x9
0568 e408 | | Load 0x2,0x8
0569 8006 | | Call 0x0,0x6
056a a405 | | Store_Unchecked 0x2,0x5
056b e002 | | Load 0x0,0x2 ; Debug Table 0xd.0x18 = 0x56b,0x10
056c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
056d 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
056e 180e | | Execute Package,Field_Execute,Field_Number 0xe
056f 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x19 = 0x56f,0x401
0570 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x1a = 0x570,0x10
; Debug Table 0xd.0x1b = 0x570,0x801
0571 e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x1c = 0x571,0x401
0572 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0573 e001 | | Load 0x0,0x1
0574 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0575 e001 | | Load 0x0,0x1
0576 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0577 e5fe | | Load 0x2,-0x2
0578 e405 | | Load 0x2,0x5
0579 e002 | | Load 0x0,0x2
057a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
057b 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
057c 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
057d a5f9 | | Store_Unchecked 0x2,-0x7
057e 782a |x* | Jump 0x5a9
057f 00ea | | Load_Encached Null_String_Cache ; Debug Table 0xd.0x1d = 0x57f,0x11
0580 e404 | | Load 0x2,0x4
0581 00da | | Load_Top At_Offset_2
0582 e409 | | Load 0x2,0x9
0583 e408 | | Load 0x2,0x8
0584 8006 | | Call 0x0,0x6
0585 a405 | | Store_Unchecked 0x2,0x5
0586 e5fa | | Load 0x2,-0x6 ; Debug Table 0xd.0x1e = 0x586,0x12
0587 e002 | | Load 0x0,0x2
0588 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0589 181d | | Execute Package,Field_Execute,Field_Number 0x1d
058a 700f |p | Jump_Nonzero 0x59a
058b e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x1f = 0x58b,0x13
058c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
058d 6676 |fv | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
058e e003 | | Load 0x0,0x3
058f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0590 e5fa | | Load 0x2,-0x6
0591 e002 | | Load 0x0,0x2
0592 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0593 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0594 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0595 e406 | | Load 0x2,0x6
0596 e001 | | Load 0x0,0x1
0597 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0598 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0599 c404 | | Store 0x2,0x4
059a 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0x20 = 0x59a,0x14
059b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x21 = 0x59b,0xc01
059c 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xd.0x22 = 0x59c,0x14
; Debug Table 0xd.0x23 = 0x59c,0x1001
059d e001 | | Load 0x0,0x1 ; Debug Table 0xd.0x24 = 0x59d,0xc01
059e 181e | | Execute Package,Field_Execute,Field_Number 0x1e
059f e001 | | Load 0x0,0x1
05a0 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05a1 e406 | | Load 0x2,0x6
05a2 e5fe | | Load 0x2,-0x2
05a3 e405 | | Load 0x2,0x5
05a4 e002 | | Load 0x0,0x2
05a5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05a6 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
05a7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
05a8 a5f9 | | Store_Unchecked 0x2,-0x7
05a9 e405 | | Load 0x2,0x5 ; Debug Table 0xd.0x25 = 0x5a9,0x15
05aa a5f8 | | Store_Unchecked 0x2,-0x8
05ab 4507 |E | Exit_Suprogram New_Top_Offset 0x7
05ac 0000 0000 | | .BLANK 0000[0x4]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05d6 | | .CONST 0x05d6 ; Address of begin
05b1 0004 | | .CONST 0x0004 ; Address of exception handler
05b2 000b | | .CONST 0x000b ; Number of locals
05b3 INIT_05b0:
05b3 e001 | | Load 0x0,0x1 ; Debug Table 0xe = .DEBUG 0x05b3,0x0fb8,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c53
; Debug Table 0xe.0x0 = 0x5b3,0xffff
05b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05b5 02c7 | | Declare_Variable Any
05b6 00d8 | | Load_Top At_Offset_0
05b7 1c00 | | Execute_Immediate Run_Utility,0x0
05b8 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x1 = 0x5b8,0xfffe
05b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ba e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x2 = 0x5ba,0xfffd
05bb 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
05bc 1b17 | | Execute Package,Field_Read,Field_Number 0x17
05bd 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xe.0x3 = 0x5bd,0xfffc
05be e005 | | Load 0x0,0x5 ; Debug Table 0xe.0x4 = 0x5be,0xfffb
05bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05c0 02c7 | | Declare_Variable Any
05c1 00d8 | | Load_Top At_Offset_0
05c2 1c00 | | Execute_Immediate Run_Utility,0x0
05c3 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x5 = 0x5c3,0xfffa
05c4 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05c5 02ff | | Declare_Variable Variant_Record
05c6 00d8 | | Load_Top At_Offset_0
05c7 1c00 | | Execute_Immediate Run_Utility,0x0
05c8 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x6 = 0x5c8,0xfff9
05c9 1b14 | | Execute Package,Field_Read,Field_Number 0x14
05ca 02ff | | Declare_Variable Variant_Record
05cb 00d8 | | Load_Top At_Offset_0
05cc 1c00 | | Execute_Immediate Run_Utility,0x0
05cd e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x7 = 0x5cd,0xfff8
05ce 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05cf 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
05d0 e003 | | Load 0x0,0x3 ; Debug Table 0xe.0x8 = 0x5d0,0xfff7
05d1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d2 02c7 | | Declare_Variable Any
05d3 00d8 | | Load_Top At_Offset_0
05d4 1c00 | | Execute_Immediate Run_Utility,0x0
05d5 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xe.0x9 = 0x5d5,0xfff6
05d6 BODY_05b0:
05d6 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0xa = 0x5d6,0x1
05d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05d8 e402 | | Load 0x2,0x2
05d9 0120 | | Execute Any,Is_Value
05da 6803 |h | Jump_Zero 0x5de
05db e001 | | Load 0x0,0x1
05dc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05dd 7801 |x | Jump 0x5df
05de e402 | | Load 0x2,0x2
05df e5ff | | Load 0x2,-0x1
05e0 e002 | | Load 0x0,0x2
05e1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05e2 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
05e3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
05e4 c402 | | Store 0x2,0x2
05e5 c403 | | Store 0x2,0x3
05e6 e403 | | Load 0x2,0x3 ; Debug Table 0xe.0xb = 0x5e6,0x2
05e7 6815 |h | Jump_Zero 0x5fd
05e8 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0xc = 0x5e8,0x3
05e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ea 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
05eb e002 | | Load 0x0,0x2
05ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ed 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
05ee e002 | | Load 0x0,0x2
05ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05f0 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
05f1 0092 0a9a | | Action Push_String_Extended,0xa9a ; "delete: bad object handle"
05f3 e403 | | Load 0x2,0x3
05f4 e002 | | Load 0x0,0x2
05f5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05f6 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
05f7 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
05f8 e002 | | Load 0x0,0x2
05f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05fa 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
05fb a5fd | | Store_Unchecked 0x2,-0x3
05fc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0xd = 0x5fc,0x4
05fd e001 | | Load 0x0,0x1 ; Debug Table 0xe.0xe = 0x5fd,0x5
05fe 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05ff 00e3 | | Load_Encached Natural_Cache
0600 6603 |f | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
0601 e003 | | Load 0x0,0x3
0602 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0603 e402 | | Load 0x2,0x2
0604 e001 | | Load 0x0,0x1
0605 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0606 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0607 005a | Z | Store_Top Discrete,At_Offset_2
0608 c403 | | Store 0x2,0x3
0609 e403 | | Load 0x2,0x3 ; Debug Table 0xe.0xf = 0x609,0x6
060a 6815 |h | Jump_Zero 0x620
060b e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x10 = 0x60b,0x7
060c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
060d 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
060e e002 | | Load 0x0,0x2
060f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0610 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0611 e002 | | Load 0x0,0x2
0612 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0613 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0614 0092 0a9b | | Action Push_String_Extended,0xa9b ; "delete: Couldn't get retention count"
0616 e403 | | Load 0x2,0x3
0617 e002 | | Load 0x0,0x2
0618 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0619 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
061a 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
061b e002 | | Load 0x0,0x2
061c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
061d 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
061e a5fd | | Store_Unchecked 0x2,-0x3
061f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0x11 = 0x61f,0x8
0620 e5ff | | Load 0x2,-0x1 ; Debug Table 0xe.0x12 = 0x620,0x9
0621 e002 | | Load 0x0,0x2
0622 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0623 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0624 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0625 c40a | | Store 0x2,0xa
0626 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x13 = 0x626,0xa
0627 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0628 e407 | | Load 0x2,0x7
0629 65da |e | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
062a e40a | | Load 0x2,0xa
062b 4800 |H | Short_Literal 0x0
062c e402 | | Load 0x2,0x2
062d e001 | | Load 0x0,0x1
062e 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
062f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0630 00d1 | | Pop_Control Pop_Count_1
0631 c403 | | Store 0x2,0x3
0632 e403 | | Load 0x2,0x3 ; Debug Table 0xe.0x14 = 0x632,0xb
0633 6815 |h | Jump_Zero 0x649
0634 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x15 = 0x634,0xc
0635 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0636 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0637 e002 | | Load 0x0,0x2
0638 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0639 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
063a e002 | | Load 0x0,0x2
063b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
063c 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
063d 0092 0a9c | | Action Push_String_Extended,0xa9c ; "Delete: Already deleted"
063f e403 | | Load 0x2,0x3
0640 e002 | | Load 0x0,0x2
0641 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0642 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0643 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0644 e002 | | Load 0x0,0x2
0645 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0646 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0647 a5fd | | Store_Unchecked 0x2,-0x3
0648 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0x16 = 0x648,0xd
0649 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x17 = 0x649,0xe
064a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
064b e408 | | Load 0x2,0x8
064c 65b7 |e | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
064d e003 | | Load 0x0,0x3
064e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
064f e5ff | | Load 0x2,-0x1
0650 e002 | | Load 0x0,0x2
0651 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0652 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0653 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0654 00d1 | | Pop_Control Pop_Count_1
0655 c403 | | Store 0x2,0x3
0656 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x18 = 0x656,0xf
0657 e001 | | Load 0x0,0x1
0658 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0659 e407 | | Load 0x2,0x7
065a e001 | | Load 0x0,0x1
065b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
065c 027e | ~ | Execute Discrete,Not_Equal
065d 6811 |h | Jump_Zero 0x66f
065e e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x19 = 0x65e,0x10
065f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0660 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0661 e002 | | Load 0x0,0x2
0662 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0663 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0664 e002 | | Load 0x0,0x2
0665 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0666 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0667 0092 0a9d | | Action Push_String_Extended,0xa9d ; "Delete: specified version isn't currently visible"
0669 4807 |H | Short_Literal 0x7
066a e002 | | Load 0x0,0x2
066b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
066c 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
066d a5fd | | Store_Unchecked 0x2,-0x3
066e 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0x1a = 0x66e,0x11
066f e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x1b = 0x66f,0x12
0670 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0671 00f1 | | Load_Encached Diana_Temp_Seq
0672 e001 | | Load 0x0,0x1
0673 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0674 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0675 e406 | | Load 0x2,0x6
0676 0120 | | Execute Any,Is_Value
0677 6803 |h | Jump_Zero 0x67b
0678 e005 | | Load 0x0,0x5
0679 1b0d | | Execute Package,Field_Read,Field_Number 0xd
067a 7801 |x | Jump 0x67c
067b e406 | | Load 0x2,0x6
067c 6587 |e | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
067d e40a | | Load 0x2,0xa
067e 4800 |H | Short_Literal 0x0
067f e001 | | Load 0x0,0x1
0680 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0681 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0682 e001 | | Load 0x0,0x1
0683 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0684 e001 | | Load 0x0,0x1
0685 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0686 e402 | | Load 0x2,0x2
0687 e001 | | Load 0x0,0x1
0688 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0689 1820 | | Execute Package,Field_Execute,Field_Number 0x20
068a c406 | | Store 0x2,0x6
068b c404 | | Store 0x2,0x4
068c c405 | | Store 0x2,0x5
068d c403 | | Store 0x2,0x3
068e 0092 0a9e | | Action Push_String_Extended,0xa9e ; "Any_Object.delete"
; Debug Table 0xe.0x1c = 0x68e,0x13
0690 e403 | | Load 0x2,0x3
0691 e405 | | Load 0x2,0x5
0692 e404 | | Load 0x2,0x4
0693 e406 | | Load 0x2,0x6
0694 8006 | | Call 0x0,0x6
0695 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0696 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x1d = 0x696,0x14
0697 a5fd | | Store_Unchecked 0x2,-0x3
0698 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x1e = 0x698,0x15
0699 6805 |h | Jump_Zero 0x69f
069a 00da | | Load_Top At_Offset_2
069b e002 | | Load 0x0,0x2
069c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
069d 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
069e 6801 |h | Jump_Zero 0x6a0
069f 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0x1f = 0x69f,0x16
06a0 e001 | | Load 0x0,0x1 ; Debug Table 0xe.0x20 = 0x6a0,0x17
06a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06a2 6561 |ea | Indirect_Literal Discrete,0x404,{0x00000000, 0x00004000}
06a3 00db | | Load_Top At_Offset_3
06a4 e5fe | | Load 0x2,-0x2
06a5 e402 | | Load 0x2,0x2
06a6 e001 | | Load 0x0,0x1
06a7 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
06a8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
06a9 c403 | | Store 0x2,0x3
06aa e403 | | Load 0x2,0x3 ; Debug Table 0xe.0x21 = 0x6aa,0x18
06ab 6815 |h | Jump_Zero 0x6c1
06ac e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x22 = 0x6ac,0x19
06ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ae 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
06af e002 | | Load 0x0,0x2
06b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06b1 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
06b2 e002 | | Load 0x0,0x2
06b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06b4 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
06b5 0092 0a9f | | Action Push_String_Extended,0xa9f ; "delete: failure during expunging"
06b7 e403 | | Load 0x2,0x3
06b8 e002 | | Load 0x0,0x2
06b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ba 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
06bb 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
06bc e002 | | Load 0x0,0x2
06bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06be 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
06bf a5fd | | Store_Unchecked 0x2,-0x3
06c0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xe.0x23 = 0x6c0,0x1a
06c1 4503 |E | Exit_Suprogram New_Top_Offset 0x3
06c2 0000 0000 | | .BLANK 0000[0x6]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06ce | | .CONST 0x06ce ; Address of begin
06c9 0004 | | .CONST 0x0004 ; Address of exception handler
06ca 0002 | | .CONST 0x0002 ; Number of locals
06cb INIT_06c8:
06cb e002 | | Load 0x0,0x2 ; Debug Table 0xf = .DEBUG 0x06cb,0x1002,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c68
; Debug Table 0xf.0x0 = 0x6cb,0xffff
06cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ce BODY_06c8:
06ce 4801 |H | Short_Literal 0x1 ; Debug Table 0xf.0x1 = 0x6ce,0x1
06cf e5fe | | Load 0x2,-0x2
06d0 e5ff | | Load 0x2,-0x1
06d1 e002 | | Load 0x0,0x2
06d2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06d3 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
06d4 0031 | 1 | Store_Top Heap_Access,At_Offset_1
06d5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2 = 0x6d5,0x2
06d6 e002 | | Load 0x0,0x2
06d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06d8 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
06d9 6801 |h | Jump_Zero 0x6db
06da 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0xf.0x3 = 0x6da,0x3
06db e002 | | Load 0x0,0x2 ; Debug Table 0xf.0x4 = 0x6db,0x4
06dc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06dd 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
06de e5fd | | Load 0x2,-0x3
06df 00da | | Load_Top At_Offset_2
06e0 8219 | | Call 0x1,0x19
06e1 c5fc | | Store 0x2,-0x4
06e2 4504 |E | Exit_Suprogram New_Top_Offset 0x4
06e3 0000 0000 | | .BLANK 0000[0x5]
06e8 ; --------------------------------------------------------------------------------------
06e8 ; SUBPROGRAM
06e8 ; --------------------------------------------------------------------------------------
06e8 0703 | | .CONST 0x0703 ; Address of begin
06e9 0004 | | .CONST 0x0004 ; Address of exception handler
06ea 0008 | | .CONST 0x0008 ; Number of locals
06eb INIT_06e8:
06eb e001 | | Load 0x0,0x1 ; Debug Table 0x10 = .DEBUG 0x06eb,0x100e,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c86
; Debug Table 0x10.0x0 = 0x6eb,0xffff
06ec 1b0f | | Execute Package,Field_Read,Field_Number 0xf
06ed 02c7 | | Declare_Variable Any
06ee 00d8 | | Load_Top At_Offset_0
06ef 1c00 | | Execute_Immediate Run_Utility,0x0
06f0 e001 | | Load 0x0,0x1 ; Debug Table 0x10.0x1 = 0x6f0,0xfffe
06f1 1b14 | | Execute Package,Field_Read,Field_Number 0x14
06f2 02ff | | Declare_Variable Variant_Record
06f3 00d8 | | Load_Top At_Offset_0
06f4 1c00 | | Execute_Immediate Run_Utility,0x0
06f5 e001 | | Load 0x0,0x1 ; Debug Table 0x10.0x2 = 0x6f5,0xfffd
06f6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
06f7 1b17 | | Execute Package,Field_Read,Field_Number 0x17
06f8 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x10.0x3 = 0x6f8,0xfffc
06f9 e005 | | Load 0x0,0x5 ; Debug Table 0x10.0x4 = 0x6f9,0xfffb
06fa 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06fb 02c7 | | Declare_Variable Any
06fc 00d8 | | Load_Top At_Offset_0
06fd 1c00 | | Execute_Immediate Run_Utility,0x0
06fe e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x5 = 0x6fe,0xfffa
06ff 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0700 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0701 e001 | | Load 0x0,0x1 ; Debug Table 0x10.0x6 = 0x701,0xfff9
0702 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0703 BODY_06e8:
0703 e001 | | Load 0x0,0x1 ; Debug Table 0x10.0x7 = 0x703,0x1
0704 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0705 e402 | | Load 0x2,0x2
0706 0120 | | Execute Any,Is_Value
0707 6803 |h | Jump_Zero 0x70b
0708 e001 | | Load 0x0,0x1
0709 1b0f | | Execute Package,Field_Read,Field_Number 0xf
070a 7801 |x | Jump 0x70c
070b e402 | | Load 0x2,0x2
070c e5ff | | Load 0x2,-0x1
070d e002 | | Load 0x0,0x2
070e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
070f 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0710 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0711 c402 | | Store 0x2,0x2
0712 0059 | Y | Store_Top Discrete,At_Offset_1
0713 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x8 = 0x713,0x2
0714 6815 |h | Jump_Zero 0x72a
0715 e002 | | Load 0x0,0x2 ; Debug Table 0x10.0x9 = 0x715,0x3
0716 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0717 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0718 e002 | | Load 0x0,0x2
0719 1b0d | | Execute Package,Field_Read,Field_Number 0xd
071a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
071b e002 | | Load 0x0,0x2
071c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
071d 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
071e 0092 0aa0 | | Action Push_String_Extended,0xaa0 ; "Undelete: Handle doesn't represent an object"
0720 e408 | | Load 0x2,0x8
0721 e002 | | Load 0x0,0x2
0722 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0723 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0724 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0725 e002 | | Load 0x0,0x2
0726 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0727 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0728 a5fe | | Store_Unchecked 0x2,-0x2
0729 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x10.0xa = 0x729,0x4
072a e001 | | Load 0x0,0x1 ; Debug Table 0x10.0xb = 0x72a,0x5
072b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
072c e403 | | Load 0x2,0x3
072d 62ea |b | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
072e e003 | | Load 0x0,0x3
072f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0730 e5ff | | Load 0x2,-0x1
0731 e002 | | Load 0x0,0x2
0732 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0733 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0734 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0735 00d1 | | Pop_Control Pop_Count_1
0736 0059 | Y | Store_Top Discrete,At_Offset_1
0737 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0xc = 0x737,0x6
0738 6824 |h$ | Jump_Zero 0x75d
0739 e001 | | Load 0x0,0x1 ; Debug Table 0x10.0xd = 0x739,0x7
073a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
073b e403 | | Load 0x2,0x3
073c 62db |b | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
073d e003 | | Load 0x0,0x3
073e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
073f 4fff |O | Short_Literal -0x1
0740 e402 | | Load 0x2,0x2
0741 e001 | | Load 0x0,0x1
0742 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0743 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0744 00d1 | | Pop_Control Pop_Count_1
0745 0059 | Y | Store_Top Discrete,At_Offset_1
0746 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0xe = 0x746,0x8
0747 6815 |h | Jump_Zero 0x75d
0748 e002 | | Load 0x0,0x2 ; Debug Table 0x10.0xf = 0x748,0x9
0749 1b0d | | Execute Package,Field_Read,Field_Number 0xd
074a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
074b e002 | | Load 0x0,0x2
074c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
074d 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
074e e002 | | Load 0x0,0x2
074f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0750 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0751 0092 0aa1 | | Action Push_String_Extended,0xaa1 ; "Undelete: the object has no versions"
0753 e408 | | Load 0x2,0x8
0754 e002 | | Load 0x0,0x2
0755 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0756 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0757 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0758 e002 | | Load 0x0,0x2
0759 1b0d | | Execute Package,Field_Read,Field_Number 0xd
075a 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
075b a5fe | | Store_Unchecked 0x2,-0x2
075c 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x10.0x10 = 0x75c,0xa
075d e001 | | Load 0x0,0x1 ; Debug Table 0x10.0x11 = 0x75d,0xb
075e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
075f 00f1 | | Load_Encached Diana_Temp_Seq
0760 e001 | | Load 0x0,0x1
0761 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0762 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0763 e406 | | Load 0x2,0x6
0764 0120 | | Execute Any,Is_Value
0765 6803 |h | Jump_Zero 0x769
0766 e005 | | Load 0x0,0x5
0767 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0768 7801 |x | Jump 0x76a
0769 e406 | | Load 0x2,0x6
076a 62ad |b | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
076b e5ff | | Load 0x2,-0x1
076c e002 | | Load 0x0,0x2
076d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
076e 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
076f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0770 4800 |H | Short_Literal 0x0
0771 e001 | | Load 0x0,0x1
0772 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0773 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0774 e001 | | Load 0x0,0x1
0775 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0776 e403 | | Load 0x2,0x3
0777 e402 | | Load 0x2,0x2
0778 e001 | | Load 0x0,0x1
0779 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
077a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
077b c406 | | Store 0x2,0x6
077c c404 | | Store 0x2,0x4
077d c405 | | Store 0x2,0x5
077e 0059 | Y | Store_Top Discrete,At_Offset_1
077f 0092 0aa2 | | Action Push_String_Extended,0xaa2 ; "Any_Object.Undelete"
; Debug Table 0x10.0x12 = 0x77f,0xc
0781 00d9 | | Load_Top At_Offset_1
0782 e405 | | Load 0x2,0x5
0783 e404 | | Load 0x2,0x4
0784 e406 | | Load 0x2,0x6
0785 8006 | | Call 0x0,0x6
0786 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0787 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x10.0x13 = 0x787,0xd
0788 a5fe | | Store_Unchecked 0x2,-0x2
0789 4502 |E | Exit_Suprogram New_Top_Offset 0x2
078a 0000 0000 | | .BLANK 0000[0x6]
0790 ; --------------------------------------------------------------------------------------
0790 ; SUBPROGRAM
0790 ; --------------------------------------------------------------------------------------
0790 0796 | | .CONST 0x0796 ; Address of begin
0791 0004 | | .CONST 0x0004 ; Address of exception handler
0792 0002 | | .CONST 0x0002 ; Number of locals
0793 INIT_0790:
0793 e002 | | Load 0x0,0x2 ; Debug Table 0x11 = .DEBUG 0x0793,0x1038,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c96
; Debug Table 0x11.0x0 = 0x793,0xffff
0794 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0795 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0796 BODY_0790:
0796 4801 |H | Short_Literal 0x1 ; Debug Table 0x11.0x1 = 0x796,0x1
0797 e5fe | | Load 0x2,-0x2
0798 e5ff | | Load 0x2,-0x1
0799 e002 | | Load 0x0,0x2
079a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
079b 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
079c 0031 | 1 | Store_Top Heap_Access,At_Offset_1
079d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x79d,0x2
079e e002 | | Load 0x0,0x2
079f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07a0 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
07a1 6801 |h | Jump_Zero 0x7a3
07a2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x11.0x3 = 0x7a2,0x3
07a3 e002 | | Load 0x0,0x2 ; Debug Table 0x11.0x4 = 0x7a3,0x4
07a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07a5 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
07a6 00d9 | | Load_Top At_Offset_1
07a7 821b | | Call 0x1,0x1b
07a8 c5fd | | Store 0x2,-0x3
07a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
07aa 0000 0000 | | .BLANK 0000[0x6]
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07b6 | | .CONST 0x07b6 ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0002 | | .CONST 0x0002 ; Number of locals
07b3 INIT_07b0:
07b3 e002 | | Load 0x0,0x2 ; Debug Table 0x12 = .DEBUG 0x07b3,0x1044,0x0001,0x0000,0x0055,0xe795,0x0000,0x0caf
; Debug Table 0x12.0x0 = 0x7b3,0xffff
07b4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07b5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07b6 BODY_07b0:
07b6 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x1 = 0x7b6,0x1
07b7 e5fd | | Load 0x2,-0x3
07b8 e5ff | | Load 0x2,-0x1
07b9 e002 | | Load 0x0,0x2
07ba 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07bb 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
07bc 0031 | 1 | Store_Top Heap_Access,At_Offset_1
07bd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x2 = 0x7bd,0x2
07be e002 | | Load 0x0,0x2
07bf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07c0 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
07c1 6806 |h | Jump_Zero 0x7c8
07c2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x3 = 0x7c2,0x3
07c3 e002 | | Load 0x0,0x2
07c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07c5 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
07c6 a5fc | | Store_Unchecked 0x2,-0x4
07c7 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x12.0x4 = 0x7c7,0x4
07c8 e002 | | Load 0x0,0x2 ; Debug Table 0x12.0x5 = 0x7c8,0x5
07c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ca 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
07cb e5fe | | Load 0x2,-0x2
07cc 00da | | Load_Top At_Offset_2
07cd 821e | | Call 0x1,0x1e
07ce c5fc | | Store 0x2,-0x4
07cf 4504 |E | Exit_Suprogram New_Top_Offset 0x4
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07da | | .CONST 0x07da ; Address of begin
07d1 0004 | | .CONST 0x0004 ; Address of exception handler
07d2 0003 | | .CONST 0x0003 ; Number of locals
07d3 INIT_07d0:
07d3 e001 | | Load 0x0,0x1 ; Debug Table 0x13 = .DEBUG 0x07d3,0x1052,0x0001,0x0000,0x0055,0xe795,0x0000,0x0ccd
; Debug Table 0x13.0x0 = 0x7d3,0xffff
07d4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07d5 02c7 | | Declare_Variable Any
07d6 00d8 | | Load_Top At_Offset_0
07d7 1c00 | | Execute_Immediate Run_Utility,0x0
07d8 e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x1 = 0x7d8,0xfffe
07d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07da BODY_07d0:
07da e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x2 = 0x7da,0x1
07db 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07dc 00da | | Load_Top At_Offset_2
07dd 0120 | | Execute Any,Is_Value
07de 6803 |h | Jump_Zero 0x7e2
07df e001 | | Load 0x0,0x1
07e0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
07e1 7801 |x | Jump 0x7e3
07e2 00da | | Load_Top At_Offset_2
07e3 e5ff | | Load 0x2,-0x1
07e4 e002 | | Load 0x0,0x2
07e5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07e6 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
07e7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
07e8 c402 | | Store 0x2,0x2
07e9 0059 | Y | Store_Top Discrete,At_Offset_1
07ea 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x3 = 0x7ea,0x2
07eb 6815 |h | Jump_Zero 0x801
07ec e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x4 = 0x7ec,0x3
07ed 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07ee 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
07ef e002 | | Load 0x0,0x2
07f0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f1 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
07f2 e002 | | Load 0x0,0x2
07f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07f4 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
07f5 0092 0aa3 | | Action Push_String_Extended,0xaa3 ; "Expunge: bad object handle"
07f7 e403 | | Load 0x2,0x3
07f8 e002 | | Load 0x0,0x2
07f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07fa 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
07fb 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
07fc e002 | | Load 0x0,0x2
07fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07fe 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
07ff a5fd | | Store_Unchecked 0x2,-0x3
0800 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x13.0x5 = 0x800,0x4
0801 e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x6 = 0x801,0x5
0802 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0803 6214 |b | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
0804 e5ff | | Load 0x2,-0x1
0805 e002 | | Load 0x0,0x2
0806 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0807 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0808 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0809 e5fe | | Load 0x2,-0x2
080a e402 | | Load 0x2,0x2
080b e001 | | Load 0x0,0x1
080c 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
080d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
080e 0059 | Y | Store_Top Discrete,At_Offset_1
080f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x7 = 0x80f,0x6
0810 6815 |h | Jump_Zero 0x826
0811 e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x8 = 0x811,0x7
0812 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0813 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0814 e002 | | Load 0x0,0x2
0815 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0816 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0817 e002 | | Load 0x0,0x2
0818 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0819 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
081a 0092 0aa4 | | Action Push_String_Extended,0xaa4 ; "Expunge_object: operation failed"
081c e403 | | Load 0x2,0x3
081d e002 | | Load 0x0,0x2
081e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
081f 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0820 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0821 e002 | | Load 0x0,0x2
0822 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0823 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0824 a5fd | | Store_Unchecked 0x2,-0x3
0825 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0826 e002 | | Load 0x0,0x2 ; Debug Table 0x13.0x9 = 0x826,0x8
0827 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0828 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0829 a5fd | | Store_Unchecked 0x2,-0x3
082a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
082b 0000 0000 | | .BLANK 0000[0x5]
0830 ; --------------------------------------------------------------------------------------
0830 ; SUBPROGRAM
0830 ; --------------------------------------------------------------------------------------
0830 0850 | P | .CONST 0x0850 ; Address of begin
0831 0004 | | .CONST 0x0004 ; Address of exception handler
0832 0009 | | .CONST 0x0009 ; Number of locals
0833 INIT_0830:
0833 e001 | | Load 0x0,0x1 ; Debug Table 0x14 = .DEBUG 0x0833,0x1068,0x0001,0x0000,0x0055,0xe795,0x0000,0x0ce2
; Debug Table 0x14.0x0 = 0x833,0xffff
0834 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0835 02c7 | | Declare_Variable Any
0836 00d8 | | Load_Top At_Offset_0
0837 1c00 | | Execute_Immediate Run_Utility,0x0
0838 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x1 = 0x838,0xfffe
0839 1b0d | | Execute Package,Field_Read,Field_Number 0xd
083a e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x2 = 0x83a,0xfffd
083b 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
083c 1b17 | | Execute Package,Field_Read,Field_Number 0x17
083d 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0x14.0x3 = 0x83d,0xfffc
083e e005 | | Load 0x0,0x5 ; Debug Table 0x14.0x4 = 0x83e,0xfffb
083f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0840 02c7 | | Declare_Variable Any
0841 00d8 | | Load_Top At_Offset_0
0842 1c00 | | Execute_Immediate Run_Utility,0x0
0843 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x5 = 0x843,0xfffa
0844 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0845 02ff | | Declare_Variable Variant_Record
0846 00d8 | | Load_Top At_Offset_0
0847 1c00 | | Execute_Immediate Run_Utility,0x0
0848 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x6 = 0x848,0xfff9
0849 1b0d | | Execute Package,Field_Read,Field_Number 0xd
084a 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
084b e003 | | Load 0x0,0x3 ; Debug Table 0x14.0x7 = 0x84b,0xfff8
084c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
084d 02c7 | | Declare_Variable Any
084e 00d8 | | Load_Top At_Offset_0
084f 1c00 | | Execute_Immediate Run_Utility,0x0
0850 BODY_0830:
0850 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x8 = 0x850,0x1
0851 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0852 e402 | | Load 0x2,0x2
0853 0120 | | Execute Any,Is_Value
0854 6803 |h | Jump_Zero 0x858
0855 e001 | | Load 0x0,0x1
0856 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0857 7801 |x | Jump 0x859
0858 e402 | | Load 0x2,0x2
0859 e5ff | | Load 0x2,-0x1
085a e002 | | Load 0x0,0x2
085b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
085c 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
085d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
085e c402 | | Store 0x2,0x2
085f c403 | | Store 0x2,0x3
0860 e403 | | Load 0x2,0x3 ; Debug Table 0x14.0x9 = 0x860,0x2
0861 6815 |h | Jump_Zero 0x877
0862 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0xa = 0x862,0x3
0863 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0864 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0865 e002 | | Load 0x0,0x2
0866 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0867 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0868 e002 | | Load 0x0,0x2
0869 1b0d | | Execute Package,Field_Read,Field_Number 0xd
086a 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
086b 0092 0aa5 | | Action Push_String_Extended,0xaa5 ; "Destroy: bad object handle"
086d e403 | | Load 0x2,0x3
086e e002 | | Load 0x0,0x2
086f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0870 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0871 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0872 e002 | | Load 0x0,0x2
0873 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0874 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0875 a5fd | | Store_Unchecked 0x2,-0x3
0876 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x14.0xb = 0x876,0x4
0877 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0xc = 0x877,0x5
0878 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0879 00db | | Load_Top At_Offset_3
087a 619d |a | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
087b e003 | | Load 0x0,0x3
087c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
087d e5ff | | Load 0x2,-0x1
087e e002 | | Load 0x0,0x2
087f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0880 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0881 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0882 00d1 | | Pop_Control Pop_Count_1
0883 c403 | | Store 0x2,0x3
0884 e403 | | Load 0x2,0x3 ; Debug Table 0x14.0xd = 0x884,0x6
0885 6815 |h | Jump_Zero 0x89b
0886 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0xe = 0x886,0x7
0887 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0888 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0889 e002 | | Load 0x0,0x2
088a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
088b 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
088c e002 | | Load 0x0,0x2
088d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
088e 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
088f 0092 0aa6 | | Action Push_String_Extended,0xaa6 ; "Destroy: No Version to Destroy"
0891 e403 | | Load 0x2,0x3
0892 e002 | | Load 0x0,0x2
0893 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0894 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0895 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0896 e002 | | Load 0x0,0x2
0897 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0898 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0899 a5fd | | Store_Unchecked 0x2,-0x3
089a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x14.0xf = 0x89a,0x8
089b e5ff | | Load 0x2,-0x1 ; Debug Table 0x14.0x10 = 0x89b,0x9
089c e002 | | Load 0x0,0x2
089d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
089e 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
089f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
08a0 c409 | | Store 0x2,0x9
08a1 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x11 = 0x8a1,0xa
08a2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08a3 00f1 | | Load_Encached Diana_Temp_Seq
08a4 e001 | | Load 0x0,0x1
08a5 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
08a6 1b17 | | Execute Package,Field_Read,Field_Number 0x17
08a7 e406 | | Load 0x2,0x6
08a8 0120 | | Execute Any,Is_Value
08a9 6803 |h | Jump_Zero 0x8ad
08aa e005 | | Load 0x0,0x5
08ab 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ac 7801 |x | Jump 0x8ae
08ad e406 | | Load 0x2,0x6
08ae 6169 |ai | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
08af e409 | | Load 0x2,0x9
08b0 4800 |H | Short_Literal 0x0
08b1 e001 | | Load 0x0,0x1
08b2 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
08b3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08b4 e001 | | Load 0x0,0x1
08b5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
08b6 e407 | | Load 0x2,0x7
08b7 e001 | | Load 0x0,0x1
08b8 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
08b9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
08ba c406 | | Store 0x2,0x6
08bb c404 | | Store 0x2,0x4
08bc c405 | | Store 0x2,0x5
08bd c403 | | Store 0x2,0x3
08be 0092 0aa7 | | Action Push_String_Extended,0xaa7 ; "Any_Object.Destroy"
; Debug Table 0x14.0x12 = 0x8be,0xb
08c0 e403 | | Load 0x2,0x3
08c1 e405 | | Load 0x2,0x5
08c2 e404 | | Load 0x2,0x4
08c3 e406 | | Load 0x2,0x6
08c4 8006 | | Call 0x0,0x6
08c5 0032 | 2 | Store_Top Heap_Access,At_Offset_2
08c6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x14.0x13 = 0x8c6,0xc
08c7 a5fd | | Store_Unchecked 0x2,-0x3
08c8 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x14 = 0x8c8,0xd
08c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ca 00db | | Load_Top At_Offset_3
08cb 614c |aL | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
08cc 00db | | Load_Top At_Offset_3
08cd 4ffe |O | Short_Literal -0x2
08ce e402 | | Load 0x2,0x2
08cf e001 | | Load 0x0,0x1
08d0 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
08d1 181a | | Execute Package,Field_Execute,Field_Number 0x1a
08d2 00d1 | | Pop_Control Pop_Count_1
08d3 c403 | | Store 0x2,0x3
08d4 e403 | | Load 0x2,0x3 ; Debug Table 0x14.0x15 = 0x8d4,0xe
08d5 7020 |p | Jump_Nonzero 0x8f6
08d6 e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x16 = 0x8d6,0xf
08d7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08d8 613f |a? | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
08d9 00da | | Load_Top At_Offset_2
08da e5fe | | Load 0x2,-0x2
08db e402 | | Load 0x2,0x2
08dc e001 | | Load 0x0,0x1
08dd 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
08de 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
08df c403 | | Store 0x2,0x3
08e0 e403 | | Load 0x2,0x3 ; Debug Table 0x14.0x17 = 0x8e0,0x10
08e1 6814 |h | Jump_Zero 0x8f6
08e2 e002 | | Load 0x0,0x2 ; Debug Table 0x14.0x18 = 0x8e2,0x11
08e3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08e4 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
08e5 e002 | | Load 0x0,0x2
08e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08e7 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
08e8 e002 | | Load 0x0,0x2
08e9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08ea 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
08eb 0092 0aa8 | | Action Push_String_Extended,0xaa8 ; "Destroy: failure during expunging"
08ed e403 | | Load 0x2,0x3
08ee e002 | | Load 0x0,0x2
08ef 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08f0 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
08f1 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
08f2 e002 | | Load 0x0,0x2
08f3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08f4 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
08f5 a5fd | | Store_Unchecked 0x2,-0x3
08f6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
08f7 0000 | | .XXX[0x1]
08f8 ; --------------------------------------------------------------------------------------
08f8 ; SUBPROGRAM
08f8 ; --------------------------------------------------------------------------------------
08f8 08fe | | .CONST 0x08fe ; Address of begin
08f9 0004 | | .CONST 0x0004 ; Address of exception handler
08fa 0002 | | .CONST 0x0002 ; Number of locals
08fb INIT_08f8:
08fb e002 | | Load 0x0,0x2 ; Debug Table 0x15 = .DEBUG 0x08fb,0x109c,0x0001,0x0000,0x0055,0xe795,0x0000,0x0cf7
; Debug Table 0x15.0x0 = 0x8fb,0xffff
08fc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
08fe BODY_08f8:
08fe 4801 |H | Short_Literal 0x1 ; Debug Table 0x15.0x1 = 0x8fe,0x1
08ff e5fe | | Load 0x2,-0x2
0900 e5ff | | Load 0x2,-0x1
0901 e002 | | Load 0x0,0x2
0902 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0903 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0904 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0905 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x2 = 0x905,0x2
0906 e002 | | Load 0x0,0x2
0907 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0908 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0909 6806 |h | Jump_Zero 0x910
090a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x3 = 0x90a,0x3
090b e002 | | Load 0x0,0x2
090c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
090d 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
090e a5fc | | Store_Unchecked 0x2,-0x4
090f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x15.0x4 = 0x90f,0x4
0910 e002 | | Load 0x0,0x2 ; Debug Table 0x15.0x5 = 0x910,0x5
0911 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0912 1b30 | 0 | Execute Package,Field_Read,Field_Number 0x30
0913 e5fd | | Load 0x2,-0x3
0914 00da | | Load_Top At_Offset_2
0915 821f | | Call 0x1,0x1f
0916 c5fc | | Store 0x2,-0x4
0917 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0918 ; --------------------------------------------------------------------------------------
0918 ; SUBPROGRAM
0918 ; --------------------------------------------------------------------------------------
0918 091e | | .CONST 0x091e ; Address of begin
0919 0004 | | .CONST 0x0004 ; Address of exception handler
091a 0002 | | .CONST 0x0002 ; Number of locals
091b INIT_0918:
091b e002 | | Load 0x0,0x2 ; Debug Table 0x16 = .DEBUG 0x091b,0x10aa,0x0002,0x0000,0x0055,0xe795,0x0000,0x0d15
; Debug Table 0x16.0x0 = 0x91b,0xffff
091c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
091d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
091e BODY_0918:
091e 4801 |H | Short_Literal 0x1 ; Debug Table 0x16.0x1 = 0x91e,0x1
091f e002 | | Load 0x0,0x2
0920 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0921 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0922 e5ff | | Load 0x2,-0x1
0923 e002 | | Load 0x0,0x2
0924 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0925 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0926 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0927 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x2 = 0x927,0x2
0928 e002 | | Load 0x0,0x2
0929 1b0d | | Execute Package,Field_Read,Field_Number 0xd
092a 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
092b 6802 |h | Jump_Zero 0x92e
092c 4800 |H | Short_Literal 0x0 ; Debug Table 0x16.0x3 = 0x92c,0x3
092d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
092e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x16.0x4 = 0x92e,0x4
092f 8222 | " | Call 0x1,0x22
0930 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0931 0000 0000 | | .BLANK 0000[0x7]
0938 ; --------------------------------------------------------------------------------------
0938 ; SUBPROGRAM
0938 ; --------------------------------------------------------------------------------------
0938 0943 | C | .CONST 0x0943 ; Address of begin
0939 0004 | | .CONST 0x0004 ; Address of exception handler
093a 0004 | | .CONST 0x0004 ; Number of locals
093b INIT_0938:
093b e001 | | Load 0x0,0x1 ; Debug Table 0x17 = .DEBUG 0x093b,0x10b6,0x0002,0x0000,0x0055,0xe795,0x0000,0x0d20
; Debug Table 0x17.0x0 = 0x93b,0xffff
093c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
093d 02c7 | | Declare_Variable Any
093e 00d8 | | Load_Top At_Offset_0
093f 1c00 | | Execute_Immediate Run_Utility,0x0
0940 e001 | | Load 0x0,0x1 ; Debug Table 0x17.0x1 = 0x940,0xfffe
0941 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0942 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x17.0x2 = 0x942,0xfffd
0943 BODY_0938:
0943 e5ff | | Load 0x2,-0x1 ; Debug Table 0x17.0x3 = 0x943,0x1
0944 e002 | | Load 0x0,0x2
0945 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0946 180f | | Execute Package,Field_Execute,Field_Number 0xf
0947 6802 |h | Jump_Zero 0x94a
0948 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x4 = 0x948,0x2
0949 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
094a e001 | | Load 0x0,0x1 ; Debug Table 0x17.0x5 = 0x94a,0x3
094b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
094c 00db | | Load_Top At_Offset_3
094d 0120 | | Execute Any,Is_Value
094e 6803 |h | Jump_Zero 0x952
094f e001 | | Load 0x0,0x1
0950 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0951 7801 |x | Jump 0x953
0952 00db | | Load_Top At_Offset_3
0953 e5ff | | Load 0x2,-0x1
0954 e002 | | Load 0x0,0x2
0955 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0956 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0957 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0958 c402 | | Store 0x2,0x2
0959 005a | Z | Store_Top Discrete,At_Offset_2
095a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x17.0x6 = 0x95a,0x4
095b 681a |h | Jump_Zero 0x976
095c e002 | | Load 0x0,0x2 ; Debug Table 0x17.0x7 = 0x95c,0x5
095d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
095e 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
095f e002 | | Load 0x0,0x2
0960 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0961 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0962 e002 | | Load 0x0,0x2
0963 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0964 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0965 0092 0aa9 | | Action Push_String_Extended,0xaa9 ; "Is_Frozen: handle doesn't refer to an object"
0967 e403 | | Load 0x2,0x3
0968 e002 | | Load 0x0,0x2
0969 1b0d | | Execute Package,Field_Read,Field_Number 0xd
096a 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
096b 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
096c e002 | | Load 0x0,0x2
096d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
096e 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
096f e5ff | | Load 0x2,-0x1
0970 e002 | | Load 0x0,0x2
0971 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0972 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0973 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0974 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0x8 = 0x974,0x6
0975 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0976 e001 | | Load 0x0,0x1 ; Debug Table 0x17.0x9 = 0x976,0x7
0977 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0978 00e1 | | Load_Encached Boolean_Cache
0979 609e |` | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
097a e5ff | | Load 0x2,-0x1
097b e002 | | Load 0x0,0x2
097c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
097d 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
097e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
097f e402 | | Load 0x2,0x2
0980 e001 | | Load 0x0,0x1
0981 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0982 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0983 005a | Z | Store_Top Discrete,At_Offset_2
0984 005a | Z | Store_Top Discrete,At_Offset_2
0985 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x17.0xa = 0x985,0x8
0986 681a |h | Jump_Zero 0x9a1
0987 e002 | | Load 0x0,0x2 ; Debug Table 0x17.0xb = 0x987,0x9
0988 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0989 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
098a e002 | | Load 0x0,0x2
098b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
098c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
098d e002 | | Load 0x0,0x2
098e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
098f 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0990 0092 0aaa | | Action Push_String_Extended,0xaaa ; "Is_Frozen: operation failed"
0992 e403 | | Load 0x2,0x3
0993 e002 | | Load 0x0,0x2
0994 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0995 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0996 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0997 e002 | | Load 0x0,0x2
0998 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0999 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
099a e5ff | | Load 0x2,-0x1
099b e002 | | Load 0x0,0x2
099c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
099d 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
099e 181d | | Execute Package,Field_Execute,Field_Number 0x1d
099f 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0xc = 0x99f,0xa
09a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09a1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0xd = 0x9a1,0xb
09a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
09a3 0000 0000 | | .BLANK 0000[0x5]
09a8 ; --------------------------------------------------------------------------------------
09a8 ; SUBPROGRAM
09a8 ; --------------------------------------------------------------------------------------
09a8 09b2 | | .CONST 0x09b2 ; 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 ; Debug Table 0x18 = .DEBUG 0x09ab,0x10d4,0x0001,0x0000,0x0055,0xe795,0x0000,0x0d2b
; Debug Table 0x18.0x0 = 0x9ab,0xffff
09ac 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09ad 02c7 | | Declare_Variable Any
09ae 00d8 | | Load_Top At_Offset_0
09af 1c00 | | Execute_Immediate Run_Utility,0x0
09b0 e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x1 = 0x9b0,0xfffe
09b1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09b2 BODY_09a8:
09b2 e002 | | Load 0x0,0x2 ; Debug Table 0x18.0x2 = 0x9b2,0x1
09b3 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09b4 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
09b5 a5fd | | Store_Unchecked 0x2,-0x3
09b6 e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x3 = 0x9b6,0x2
09b7 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09b8 00da | | Load_Top At_Offset_2
09b9 0120 | | Execute Any,Is_Value
09ba 6803 |h | Jump_Zero 0x9be
09bb e001 | | Load 0x0,0x1
09bc 1b0f | | Execute Package,Field_Read,Field_Number 0xf
09bd 7801 |x | Jump 0x9bf
09be 00da | | Load_Top At_Offset_2
09bf e5ff | | Load 0x2,-0x1
09c0 e002 | | Load 0x0,0x2
09c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09c2 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
09c3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09c4 c402 | | Store 0x2,0x2
09c5 0059 | Y | Store_Top Discrete,At_Offset_1
09c6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0x4 = 0x9c6,0x3
09c7 6815 |h | Jump_Zero 0x9dd
09c8 e002 | | Load 0x0,0x2 ; Debug Table 0x18.0x5 = 0x9c8,0x4
09c9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09ca 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
09cb e002 | | Load 0x0,0x2
09cc 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09cd 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
09ce e002 | | Load 0x0,0x2
09cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09d0 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
09d1 0092 0aab | | Action Push_String_Extended,0xaab ; "Freeze: handle doesn't refer to an object"
09d3 e403 | | Load 0x2,0x3
09d4 e002 | | Load 0x0,0x2
09d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09d6 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
09d7 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
09d8 e002 | | Load 0x0,0x2
09d9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09da 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
09db a5fd | | Store_Unchecked 0x2,-0x3
09dc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x18.0x6 = 0x9dc,0x5
09dd e5fe | | Load 0x2,-0x2 ; Debug Table 0x18.0x7 = 0x9dd,0x6
09de 700e |p | Jump_Nonzero 0x9ed
09df e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x8 = 0x9df,0x7
09e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09e1 6036 |`6 | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
09e2 e5ff | | Load 0x2,-0x1
09e3 e002 | | Load 0x0,0x2
09e4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09e5 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
09e6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
09e7 e402 | | Load 0x2,0x2
09e8 e001 | | Load 0x0,0x1
09e9 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
09ea 181c | | Execute Package,Field_Execute,Field_Number 0x1c
09eb 0059 | Y | Store_Top Discrete,At_Offset_1
09ec 7811 |x | Jump 0x9fe
09ed e001 | | Load 0x0,0x1 ; Debug Table 0x18.0x9 = 0x9ed,0x8
09ee 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09ef 6028 |`( | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
09f0 e5ff | | Load 0x2,-0x1
09f1 e002 | | Load 0x0,0x2
09f2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
09f3 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
09f4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
09f5 4801 |H | Short_Literal 0x1
09f6 e402 | | Load 0x2,0x2
09f7 e001 | | Load 0x0,0x1
09f8 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
09f9 1811 | | Execute Package,Field_Execute,Field_Number 0x11
09fa e001 | | Load 0x0,0x1
09fb 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
09fc 181d | | Execute Package,Field_Execute,Field_Number 0x1d
09fd 0059 | Y | Store_Top Discrete,At_Offset_1
09fe 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x18.0xa = 0x9fe,0x9
09ff 6815 |h | Jump_Zero 0xa15
0a00 e002 | | Load 0x0,0x2 ; Debug Table 0x18.0xb = 0xa00,0xa
0a01 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a02 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a03 e002 | | Load 0x0,0x2
0a04 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a05 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a06 e002 | | Load 0x0,0x2
0a07 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a08 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0a09 0092 0aac | | Action Push_String_Extended,0xaac ; "Any_Object.Freeze"
0a0b e403 | | Load 0x2,0x3
0a0c e002 | | Load 0x0,0x2
0a0d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a0e 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0a0f 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0a10 e002 | | Load 0x0,0x2
0a11 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a12 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0a13 a5fd | | Store_Unchecked 0x2,-0x3
0a14 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x18.0xc = 0xa14,0xb
0a15 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a16 0000 0000 | | .XXX[0x2]
0a18 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0a1c 0000 0000 | | .BLANK 0000[0x4]
0a20 ; --------------------------------------------------------------------------------------
0a20 ; SUBPROGRAM
0a20 ; --------------------------------------------------------------------------------------
0a20 0a2a | * | .CONST 0x0a2a ; Address of begin
0a21 0004 | | .CONST 0x0004 ; Address of exception handler
0a22 0003 | | .CONST 0x0003 ; Number of locals
0a23 INIT_0a20:
0a23 e001 | | Load 0x0,0x1 ; Debug Table 0x19 = .DEBUG 0x0a23,0x10f0,0x0001,0x0000,0x0055,0xe795,0x0000,0x0d40
; Debug Table 0x19.0x0 = 0xa23,0xffff
0a24 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a25 02c7 | | Declare_Variable Any
0a26 00d8 | | Load_Top At_Offset_0
0a27 1c00 | | Execute_Immediate Run_Utility,0x0
0a28 e001 | | Load 0x0,0x1 ; Debug Table 0x19.0x1 = 0xa28,0xfffe
0a29 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a2a BODY_0a20:
0a2a e002 | | Load 0x0,0x2 ; Debug Table 0x19.0x2 = 0xa2a,0x1
0a2b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a2c 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
0a2d a5fd | | Store_Unchecked 0x2,-0x3
0a2e e001 | | Load 0x0,0x1 ; Debug Table 0x19.0x3 = 0xa2e,0x2
0a2f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a30 00da | | Load_Top At_Offset_2
0a31 0120 | | Execute Any,Is_Value
0a32 6803 |h | Jump_Zero 0xa36
0a33 e001 | | Load 0x0,0x1
0a34 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a35 7801 |x | Jump 0xa37
0a36 00da | | Load_Top At_Offset_2
0a37 e5ff | | Load 0x2,-0x1
0a38 e002 | | Load 0x0,0x2
0a39 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a3a 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0a3b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0a3c c402 | | Store 0x2,0x2
0a3d 0059 | Y | Store_Top Discrete,At_Offset_1
0a3e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x4 = 0xa3e,0x3
0a3f 6815 |h | Jump_Zero 0xa55
0a40 e002 | | Load 0x0,0x2 ; Debug Table 0x19.0x5 = 0xa40,0x4
0a41 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a42 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a43 e002 | | Load 0x0,0x2
0a44 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a45 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a46 e002 | | Load 0x0,0x2
0a47 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a48 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0a49 0092 0aad | | Action Push_String_Extended,0xaad ; "Unfreeze: handle doesn't refer to an object"
0a4b e403 | | Load 0x2,0x3
0a4c e002 | | Load 0x0,0x2
0a4d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a4e 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0a4f 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0a50 e002 | | Load 0x0,0x2
0a51 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a52 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0a53 a5fd | | Store_Unchecked 0x2,-0x3
0a54 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x19.0x6 = 0xa54,0x5
0a55 e5fe | | Load 0x2,-0x2 ; Debug Table 0x19.0x7 = 0xa55,0x6
0a56 700e |p | Jump_Nonzero 0xa65
0a57 e001 | | Load 0x0,0x1 ; Debug Table 0x19.0x8 = 0xa57,0x7
0a58 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a59 67be |g | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
0a5a e5ff | | Load 0x2,-0x1
0a5b e002 | | Load 0x0,0x2
0a5c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a5d 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0a5e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a5f e402 | | Load 0x2,0x2
0a60 e001 | | Load 0x0,0x1
0a61 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0a62 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0a63 0059 | Y | Store_Top Discrete,At_Offset_1
0a64 7811 |x | Jump 0xa76
0a65 e001 | | Load 0x0,0x1 ; Debug Table 0x19.0x9 = 0xa65,0x8
0a66 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a67 67b0 |g | Indirect_Literal Discrete,0xa18,{0x00000000, 0x00004000}
0a68 e5ff | | Load 0x2,-0x1
0a69 e002 | | Load 0x0,0x2
0a6a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a6b 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0a6c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0a6d 4801 |H | Short_Literal 0x1
0a6e e402 | | Load 0x2,0x2
0a6f e001 | | Load 0x0,0x1
0a70 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0a71 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a72 e001 | | Load 0x0,0x1
0a73 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0a74 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0a75 0059 | Y | Store_Top Discrete,At_Offset_1
0a76 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0xa = 0xa76,0x9
0a77 6815 |h | Jump_Zero 0xa8d
0a78 e002 | | Load 0x0,0x2 ; Debug Table 0x19.0xb = 0xa78,0xa
0a79 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a7a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a7b e002 | | Load 0x0,0x2
0a7c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a7d 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0a7e e002 | | Load 0x0,0x2
0a7f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a80 184d | M | Execute Package,Field_Execute,Field_Number 0x4d
0a81 0092 0aae | | Action Push_String_Extended,0xaae ; "Any_Object.Unfreeze"
0a83 e403 | | Load 0x2,0x3
0a84 e002 | | Load 0x0,0x2
0a85 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a86 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0a87 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0a88 e002 | | Load 0x0,0x2
0a89 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0a8a 1852 | R | Execute Package,Field_Execute,Field_Number 0x52
0a8b a5fd | | Store_Unchecked 0x2,-0x3
0a8c 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x19.0xc = 0xa8c,0xb
0a8d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0a8e ; --------------------------------------------------------------------------------------
0a8e ; STRING TABLE
0a8e ; --------------------------------------------------------------------------------------
0a8e 0044 | D | .STRTAB 0x0044->0x0ab0 ; "Set_retention_count: bad object handle"
0a8f 0068 | h | .STRTAB 0x0068->0x0ac3 ; "Set_retention_count failed"
0a90 0080 | | .STRTAB 0x0080->0x0ad0 ; "Is_Visible: bad object handle"
0a91 009b | | .STRTAB 0x009b->0x0ade ; "Has_Versions: bad object handle"
0a92 00b8 | | .STRTAB 0x00b8->0x0aee ; "Has_Default_Version: bad object handle"
0a93 00dc | | .STRTAB 0x00dc->0x0b01 ; "create: bad object handle"
0a94 00f3 | | .STRTAB 0x00f3->0x0b0d ; "Create: Could not create version"
0a95 0111 | | .STRTAB 0x0111->0x0b1d ; "Libraries are made only with library_object.create"
0a96 0141 | A | .STRTAB 0x0141->0x0b36 ; "Any_Object.Create failed"
0a97 0157 | W | .STRTAB 0x0157->0x0b42 ; "copy: bad source object handle"
0a98 0173 | s | .STRTAB 0x0173->0x0b51 ; "copy: bad destination object handle"
0a99 0194 | | .STRTAB 0x0194->0x0b63 ; "any_object.copy failed"
0a9a 01a8 | | .STRTAB 0x01a8->0x0b6e ; "delete: bad object handle"
0a9b 01bf | | .STRTAB 0x01bf->0x0b7a ; "delete: Couldn't get retention count"
0a9c 01e1 | | .STRTAB 0x01e1->0x0b8c ; "Delete: Already deleted"
0a9d 01f6 | | .STRTAB 0x01f6->0x0b98 ; "Delete: specified version isn't currently visible"
0a9e 0225 | % | .STRTAB 0x0225->0x0bb0 ; "Any_Object.delete"
0a9f 0234 | 4 | .STRTAB 0x0234->0x0bb9 ; "delete: failure during expunging"
0aa0 0252 | R | .STRTAB 0x0252->0x0bc9 ; "Undelete: Handle doesn't represent an object"
0aa1 027c | | | .STRTAB 0x027c->0x0bdf ; "Undelete: the object has no versions"
0aa2 029e | | .STRTAB 0x029e->0x0bf1 ; "Any_Object.Undelete"
0aa3 02af | | .STRTAB 0x02af->0x0bfa ; "Expunge: bad object handle"
0aa4 02c7 | | .STRTAB 0x02c7->0x0c07 ; "Expunge_object: operation failed"
0aa5 02e5 | | .STRTAB 0x02e5->0x0c17 ; "Destroy: bad object handle"
0aa6 02fd | | .STRTAB 0x02fd->0x0c24 ; "Destroy: No Version to Destroy"
0aa7 0319 | | .STRTAB 0x0319->0x0c33 ; "Any_Object.Destroy"
0aa8 0329 | ) | .STRTAB 0x0329->0x0c3c ; "Destroy: failure during expunging"
0aa9 0348 | H | .STRTAB 0x0348->0x0c4d ; "Is_Frozen: handle doesn't refer to an object"
0aaa 0372 | r | .STRTAB 0x0372->0x0c63 ; "Is_Frozen: operation failed"
0aab 038b | | .STRTAB 0x038b->0x0c70 ; "Freeze: handle doesn't refer to an object"
0aac 03b2 | | .STRTAB 0x03b2->0x0c85 ; "Any_Object.Freeze"
0aad 03c1 | | .STRTAB 0x03c1->0x0c8d ; "Unfreeze: handle doesn't refer to an object"
0aae 03ea | | .STRTAB 0x03ea->0x0ca3 ; "Any_Object.Unfreeze"
0aaf 03fb | | .STREND 0x03fb->0x0cac
0ab0 5365 745f |Set_| .STRTAB_STRINGS
0cad 0000 0000 | | .XXX[0x3]
0caf 0000 | |
0cb0 ; --------------------------------------------------------------------------------------
0cb0 ; Debug Table
0cb0 ; --------------------------------------------------------------------------------------
0cb0 0003 001a | | .CONST 0x0003,0x001a
0cb2 000b 0d82 | | .DEBUG 0x000b,0x0d82,0x0000,0x0000,0x0055,0xe795,0x0000,0x0b41
0cba 003c 0db6 | < | .DEBUG 0x003c,0x0db6,0x0000,0x0000,0x0057,0x7dd5,0x0000,0x000a
0cc2 0073 0dee | s | .DEBUG 0x0073,0x0dee,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b49
0cca 00ab 0e02 | | .DEBUG 0x00ab,0x0e02,0x0001,0x0000,0x0055,0xe795,0x0000,0x0b54
0cd2 010b 0e1a | | .DEBUG 0x010b,0x0e1a,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b69
0cda 017b 0e3e | { >| .DEBUG 0x017b,0x0e3e,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b74
0ce2 0193 0e46 | F| .DEBUG 0x0193,0x0e46,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b7f
0cea 01eb 0e62 | b| .DEBUG 0x01eb,0x0e62,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b8a
0cf2 0203 0e6a | j| .DEBUG 0x0203,0x0e6a,0x0002,0x0000,0x0055,0xe795,0x0000,0x0b95
0cfa 025b 0e86 | [ | .DEBUG 0x025b,0x0e86,0x0002,0x0000,0x0055,0xe795,0x0000,0x0ba0
0d02 0273 0e8e | s | .DEBUG 0x0273,0x0e8e,0x0001,0x0000,0x0055,0xe795,0x0000,0x0bab
0d0a 032b 0ece | + | .DEBUG 0x032b,0x0ece,0x0001,0x0000,0x0055,0xe795,0x0000,0x0bc1
0d12 040b 0f22 | "| .DEBUG 0x040b,0x0f22,0x0001,0x0000,0x0055,0xe795,0x0000,0x0bf9
0d1a 04eb 0f6a | j| .DEBUG 0x04eb,0x0f6a,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c15
0d22 05b3 0fb8 | | .DEBUG 0x05b3,0x0fb8,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c53
0d2a 06cb 1002 | | .DEBUG 0x06cb,0x1002,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c68
0d32 06eb 100e | | .DEBUG 0x06eb,0x100e,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c86
0d3a 0793 1038 | 8| .DEBUG 0x0793,0x1038,0x0001,0x0000,0x0055,0xe795,0x0000,0x0c96
0d42 07b3 1044 | D| .DEBUG 0x07b3,0x1044,0x0001,0x0000,0x0055,0xe795,0x0000,0x0caf
0d4a 07d3 1052 | R| .DEBUG 0x07d3,0x1052,0x0001,0x0000,0x0055,0xe795,0x0000,0x0ccd
0d52 0833 1068 | 3 h| .DEBUG 0x0833,0x1068,0x0001,0x0000,0x0055,0xe795,0x0000,0x0ce2
0d5a 08fb 109c | | .DEBUG 0x08fb,0x109c,0x0001,0x0000,0x0055,0xe795,0x0000,0x0cf7
0d62 091b 10aa | | .DEBUG 0x091b,0x10aa,0x0002,0x0000,0x0055,0xe795,0x0000,0x0d15
0d6a 093b 10b6 | ; | .DEBUG 0x093b,0x10b6,0x0002,0x0000,0x0055,0xe795,0x0000,0x0d20
0d72 09ab 10d4 | | .DEBUG 0x09ab,0x10d4,0x0001,0x0000,0x0055,0xe795,0x0000,0x0d2b
0d7a 0a23 10f0 | # | .DEBUG 0x0a23,0x10f0,0x0001,0x0000,0x0055,0xe795,0x0000,0x0d40
0d82 ; --------------------------------------------------------------------------------------
0d82 ; Debug3 Subtable 0x0
0d82 ; --------------------------------------------------------------------------------------
0d82 0019 0000 | | .DBG3TAB 0x0019,0x0000
0d84 000b ffff | | .CONST 0x000b,0xffff
0d86 000b fffe | | .CONST 0x000b,0xfffe
0d88 000d fffd | | .CONST 0x000d,0xfffd
0d8a 000f fffc | | .CONST 0x000f,0xfffc
0d8c 0011 fffb | | .CONST 0x0011,0xfffb
0d8e 0013 fffa | | .CONST 0x0013,0xfffa
0d90 0015 fff9 | | .CONST 0x0015,0xfff9
0d92 0017 fff8 | | .CONST 0x0017,0xfff8
0d94 0019 fff7 | | .CONST 0x0019,0xfff7
0d96 001b fff6 | | .CONST 0x001b,0xfff6
0d98 001d fff5 | | .CONST 0x001d,0xfff5
0d9a 001f fff4 | | .CONST 0x001f,0xfff4
0d9c 0021 fff3 | ! | .CONST 0x0021,0xfff3
0d9e 0023 fff2 | # | .CONST 0x0023,0xfff2
0da0 0025 fff1 | % | .CONST 0x0025,0xfff1
0da2 0027 fff0 | ' | .CONST 0x0027,0xfff0
0da4 0029 ffef | ) | .CONST 0x0029,0xffef
0da6 002b ffee | + | .CONST 0x002b,0xffee
0da8 002d ffed | - | .CONST 0x002d,0xffed
0daa 002f ffec | / | .CONST 0x002f,0xffec
0dac 0031 ffeb | 1 | .CONST 0x0031,0xffeb
0dae 0033 ffea | 3 | .CONST 0x0033,0xffea
0db0 0035 ffe9 | 5 | .CONST 0x0035,0xffe9
0db2 0037 ffe8 | 7 | .CONST 0x0037,0xffe8
0db4 0039 ffe7 | 9 | .CONST 0x0039,0xffe7
0db6 ; --------------------------------------------------------------------------------------
0db6 ; Debug3 Subtable 0x1
0db6 ; --------------------------------------------------------------------------------------
0db6 001b 0000 | | .DBG3TAB 0x001b,0x0000
0db8 003c ffff | < | .CONST 0x003c,0xffff
0dba 003c fffe | < | .CONST 0x003c,0xfffe
0dbc 003c fffd | < | .CONST 0x003c,0xfffd
0dbe 003c fffc | < | .CONST 0x003c,0xfffc
0dc0 003e fffb | > | .CONST 0x003e,0xfffb
0dc2 0040 fffa | @ | .CONST 0x0040,0xfffa
0dc4 0042 fff9 | B | .CONST 0x0042,0xfff9
0dc6 0044 fff8 | D | .CONST 0x0044,0xfff8
0dc8 0046 fff7 | F | .CONST 0x0046,0xfff7
0dca 0048 fff6 | H | .CONST 0x0048,0xfff6
0dcc 004a fff5 | J | .CONST 0x004a,0xfff5
0dce 004c fff4 | L | .CONST 0x004c,0xfff4
0dd0 004e fff3 | N | .CONST 0x004e,0xfff3
0dd2 0050 fff2 | P | .CONST 0x0050,0xfff2
0dd4 0052 fff1 | R | .CONST 0x0052,0xfff1
0dd6 0054 fff0 | T | .CONST 0x0054,0xfff0
0dd8 0056 ffef | V | .CONST 0x0056,0xffef
0dda 0058 ffee | X | .CONST 0x0058,0xffee
0ddc 005a ffed | Z | .CONST 0x005a,0xffed
0dde 005c ffec | \ | .CONST 0x005c,0xffec
0de0 005e ffeb | ^ | .CONST 0x005e,0xffeb
0de2 0060 ffea | ` | .CONST 0x0060,0xffea
0de4 0062 ffe9 | b | .CONST 0x0062,0xffe9
0de6 0064 ffe8 | d | .CONST 0x0064,0xffe8
0de8 0066 ffe7 | f | .CONST 0x0066,0xffe7
0dea 0068 ffe6 | h | .CONST 0x0068,0xffe6
0dec 006a ffe5 | j | .CONST 0x006a,0xffe5
0dee ; --------------------------------------------------------------------------------------
0dee ; Debug3 Subtable 0x2
0dee ; --------------------------------------------------------------------------------------
0dee 0003 0006 | | .DBG3TAB 0x0003,0x0006
0df0 0073 ffff | s | .CONST 0x0073,0xffff
0df2 0078 fffe | x | .CONST 0x0078,0xfffe
0df4 0079 fffd | y | .CONST 0x0079,0xfffd
0df6 007b 0001 | { | .CONST 0x007b,0x0001
0df8 008b 0002 | | .CONST 0x008b,0x0002
0dfa 008d 0003 | | .CONST 0x008d,0x0003
0dfc 008f 0004 | | .CONST 0x008f,0x0004
0dfe 0091 0005 | | .CONST 0x0091,0x0005
0e00 00a0 0006 | | .CONST 0x00a0,0x0006
0e02 ; --------------------------------------------------------------------------------------
0e02 ; Debug3 Subtable 0x3
0e02 ; --------------------------------------------------------------------------------------
0e02 0002 0009 | | .DBG3TAB 0x0002,0x0009
0e04 00ab ffff | | .CONST 0x00ab,0xffff
0e06 00b0 fffe | | .CONST 0x00b0,0xfffe
0e08 00b2 0001 | | .CONST 0x00b2,0x0001
0e0a 00c2 0002 | | .CONST 0x00c2,0x0002
0e0c 00c4 0003 | | .CONST 0x00c4,0x0003
0e0e 00d8 0004 | | .CONST 0x00d8,0x0004
0e10 00d9 0005 | | .CONST 0x00d9,0x0005
0e12 00e7 0006 | | .CONST 0x00e7,0x0006
0e14 00e9 0007 | | .CONST 0x00e9,0x0007
0e16 00fd 0008 | | .CONST 0x00fd,0x0008
0e18 00fe 0009 | | .CONST 0x00fe,0x0009
0e1a ; --------------------------------------------------------------------------------------
0e1a ; Debug3 Subtable 0x4
0e1a ; --------------------------------------------------------------------------------------
0e1a 0004 000d | | .DBG3TAB 0x0004,0x000d
0e1c 010b ffff | | .CONST 0x010b,0xffff
0e1e 0110 fffe | | .CONST 0x0110,0xfffe
0e20 0112 fffd | | .CONST 0x0112,0xfffd
0e22 0117 fffc | | .CONST 0x0117,0xfffc
0e24 0119 0001 | | .CONST 0x0119,0x0001
0e26 011e 0002 | | .CONST 0x011e,0x0002
0e28 0120 0003 | | .CONST 0x0120,0x0003
0e2a 0130 0004 | 0 | .CONST 0x0130,0x0004
0e2c 0132 0005 | 2 | .CONST 0x0132,0x0005
0e2e 0140 0006 | @ | .CONST 0x0140,0x0006
0e30 0142 0007 | B | .CONST 0x0142,0x0007
0e32 015a 0008 | Z | .CONST 0x015a,0x0008
0e34 015c 0009 | \ | .CONST 0x015c,0x0009
0e36 015e 000a | ^ | .CONST 0x015e,0x000a
0e38 016e 000b | n | .CONST 0x016e,0x000b
0e3a 0170 000c | p | .CONST 0x0170,0x000c
0e3c 0172 000d | r | .CONST 0x0172,0x000d
0e3e ; --------------------------------------------------------------------------------------
0e3e ; Debug3 Subtable 0x5
0e3e ; --------------------------------------------------------------------------------------
0e3e 0001 0002 | | .DBG3TAB 0x0001,0x0002
0e40 017b ffff | { | .CONST 0x017b,0xffff
0e42 017e 0001 | ~ | .CONST 0x017e,0x0001
0e44 0187 0002 | | .CONST 0x0187,0x0002
0e46 ; --------------------------------------------------------------------------------------
0e46 ; Debug3 Subtable 0x6
0e46 ; --------------------------------------------------------------------------------------
0e46 0003 000a | | .DBG3TAB 0x0003,0x000a
0e48 0193 ffff | | .CONST 0x0193,0xffff
0e4a 0198 fffe | | .CONST 0x0198,0xfffe
0e4c 019a fffd | | .CONST 0x019a,0xfffd
0e4e 019f 0001 | | .CONST 0x019f,0x0001
0e50 01a4 0002 | | .CONST 0x01a4,0x0002
0e52 01a6 0003 | | .CONST 0x01a6,0x0003
0e54 01b6 0004 | | .CONST 0x01b6,0x0004
0e56 01b8 0005 | | .CONST 0x01b8,0x0005
0e58 01d0 0006 | | .CONST 0x01d0,0x0006
0e5a 01d2 0007 | | .CONST 0x01d2,0x0007
0e5c 01e2 0008 | | .CONST 0x01e2,0x0008
0e5e 01e4 0009 | | .CONST 0x01e4,0x0009
0e60 01e6 000a | | .CONST 0x01e6,0x000a
0e62 ; --------------------------------------------------------------------------------------
0e62 ; Debug3 Subtable 0x7
0e62 ; --------------------------------------------------------------------------------------
0e62 0001 0002 | | .DBG3TAB 0x0001,0x0002
0e64 01eb ffff | | .CONST 0x01eb,0xffff
0e66 01ee 0001 | | .CONST 0x01ee,0x0001
0e68 01f7 0002 | | .CONST 0x01f7,0x0002
0e6a ; --------------------------------------------------------------------------------------
0e6a ; Debug3 Subtable 0x8
0e6a ; --------------------------------------------------------------------------------------
0e6a 0003 000a | | .DBG3TAB 0x0003,0x000a
0e6c 0203 ffff | | .CONST 0x0203,0xffff
0e6e 0208 fffe | | .CONST 0x0208,0xfffe
0e70 020a fffd | | .CONST 0x020a,0xfffd
0e72 020f 0001 | | .CONST 0x020f,0x0001
0e74 0214 0002 | | .CONST 0x0214,0x0002
0e76 0216 0003 | | .CONST 0x0216,0x0003
0e78 0226 0004 | & | .CONST 0x0226,0x0004
0e7a 0228 0005 | ( | .CONST 0x0228,0x0005
0e7c 0240 0006 | @ | .CONST 0x0240,0x0006
0e7e 0242 0007 | B | .CONST 0x0242,0x0007
0e80 0252 0008 | R | .CONST 0x0252,0x0008
0e82 0254 0009 | T | .CONST 0x0254,0x0009
0e84 0256 000a | V | .CONST 0x0256,0x000a
0e86 ; --------------------------------------------------------------------------------------
0e86 ; Debug3 Subtable 0x9
0e86 ; --------------------------------------------------------------------------------------
0e86 0001 0002 | | .DBG3TAB 0x0001,0x0002
0e88 025b ffff | [ | .CONST 0x025b,0xffff
0e8a 025e 0001 | ^ | .CONST 0x025e,0x0001
0e8c 0267 0002 | g | .CONST 0x0267,0x0002
0e8e ; --------------------------------------------------------------------------------------
0e8e ; Debug3 Subtable 0xa
0e8e ; --------------------------------------------------------------------------------------
0e8e 0009 0016 | | .DBG3TAB 0x0009,0x0016
0e90 0273 ffff | s | .CONST 0x0273,0xffff
0e92 0278 fffe | x | .CONST 0x0278,0xfffe
0e94 027a fffd | z | .CONST 0x027a,0xfffd
0e96 027f fffc | | .CONST 0x027f,0xfffc
0e98 0284 fffb | | .CONST 0x0284,0xfffb
0e9a 0286 fffa | | .CONST 0x0286,0xfffa
0e9c 0289 fff9 | | .CONST 0x0289,0xfff9
0e9e 028a fff8 | | .CONST 0x028a,0xfff8
0ea0 028f fff7 | | .CONST 0x028f,0xfff7
0ea2 0292 0001 | | .CONST 0x0292,0x0001
0ea4 0296 0002 | | .CONST 0x0296,0x0002
0ea6 02a6 0003 | | .CONST 0x02a6,0x0003
0ea8 02a8 0004 | | .CONST 0x02a8,0x0004
0eaa 02bc 0005 | | .CONST 0x02bc,0x0005
0eac 02bd 0006 | | .CONST 0x02bd,0x0006
0eae 02c3 0007 | | .CONST 0x02c3,0x0007
0eb0 02e4 0008 | | .CONST 0x02e4,0x0008
0eb2 02ea 0009 | | .CONST 0x02ea,0x0009
0eb4 02ec 000a | | .CONST 0x02ec,0x000a
0eb6 02f4 000b | | .CONST 0x02f4,0x000b
0eb8 02f8 0401 | | .CONST 0x02f8,0x0401
0eba 02f9 000b | | .CONST 0x02f9,0x000b
0ebc 02f9 0801 | | .CONST 0x02f9,0x0801
0ebe 02fa 0401 | | .CONST 0x02fa,0x0401
0ec0 0308 000c | | .CONST 0x0308,0x000c
0ec2 030f 000d | | .CONST 0x030f,0x000d
0ec4 0310 0c01 | | .CONST 0x0310,0x0c01
0ec6 0311 000d | | .CONST 0x0311,0x000d
0ec8 0311 1001 | | .CONST 0x0311,0x1001
0eca 0312 0c01 | | .CONST 0x0312,0x0c01
0ecc 031e 000e | | .CONST 0x031e,0x000e
0ece ; --------------------------------------------------------------------------------------
0ece ; Debug3 Subtable 0xb
0ece ; --------------------------------------------------------------------------------------
0ece 0009 0020 | | .DBG3TAB 0x0009,0x0020
0ed0 032b ffff | + | .CONST 0x032b,0xffff
0ed2 032d fffe | - | .CONST 0x032d,0xfffe
0ed4 0330 fffd | 0 | .CONST 0x0330,0xfffd
0ed6 0335 fffc | 5 | .CONST 0x0335,0xfffc
0ed8 0337 fffb | 7 | .CONST 0x0337,0xfffb
0eda 033c fffa | < | .CONST 0x033c,0xfffa
0edc 0341 fff9 | A | .CONST 0x0341,0xfff9
0ede 0346 fff8 | F | .CONST 0x0346,0xfff8
0ee0 0349 fff7 | I | .CONST 0x0349,0xfff7
0ee2 034a 0001 | J | .CONST 0x034a,0x0001
0ee4 034e 0002 | N | .CONST 0x034e,0x0002
0ee6 0352 0003 | R | .CONST 0x0352,0x0003
0ee8 0357 0004 | W | .CONST 0x0357,0x0004
0eea 0359 0005 | Y | .CONST 0x0359,0x0005
0eec 035a 0006 | Z | .CONST 0x035a,0x0006
0eee 035f 0007 | _ | .CONST 0x035f,0x0007
0ef0 036e 0010 | n | .CONST 0x036e,0x0010
0ef2 0372 0008 | r | .CONST 0x0372,0x0008
0ef4 0376 0009 | v | .CONST 0x0376,0x0009
0ef6 0386 000a | | .CONST 0x0386,0x000a
0ef8 0387 000b | | .CONST 0x0387,0x000b
0efa 038b 000c | | .CONST 0x038b,0x000c
0efc 038f 000d | | .CONST 0x038f,0x000d
0efe 0393 000e | | .CONST 0x0393,0x000e
0f00 0397 000f | | .CONST 0x0397,0x000f
0f02 039b 0011 | | .CONST 0x039b,0x0011
0f04 03a1 0012 | | .CONST 0x03a1,0x0012
0f06 03ca 0013 | | .CONST 0x03ca,0x0013
0f08 03cc 0014 | | .CONST 0x03cc,0x0014
0f0a 03d4 0015 | | .CONST 0x03d4,0x0015
0f0c 03d8 0401 | | .CONST 0x03d8,0x0401
0f0e 03d9 0015 | | .CONST 0x03d9,0x0015
0f10 03d9 0801 | | .CONST 0x03d9,0x0801
0f12 03da 0401 | | .CONST 0x03da,0x0401
0f14 03e8 0016 | | .CONST 0x03e8,0x0016
0f16 03ef 0017 | | .CONST 0x03ef,0x0017
0f18 03f0 0c01 | | .CONST 0x03f0,0x0c01
0f1a 03f1 0017 | | .CONST 0x03f1,0x0017
0f1c 03f1 1001 | | .CONST 0x03f1,0x1001
0f1e 03f2 0c01 | | .CONST 0x03f2,0x0c01
0f20 03fe 0018 | | .CONST 0x03fe,0x0018
0f22 ; --------------------------------------------------------------------------------------
0f22 ; Debug3 Subtable 0xc
0f22 ; --------------------------------------------------------------------------------------
0f22 0009 001a | | .DBG3TAB 0x0009,0x001a
0f24 040b ffff | | .CONST 0x040b,0xffff
0f26 0410 fffe | | .CONST 0x0410,0xfffe
0f28 0415 fffd | | .CONST 0x0415,0xfffd
0f2a 0417 fffc | | .CONST 0x0417,0xfffc
0f2c 041c fffb | | .CONST 0x041c,0xfffb
0f2e 041f fffa | | .CONST 0x041f,0xfffa
0f30 0420 fff9 | | .CONST 0x0420,0xfff9
0f32 0423 fff8 | # | .CONST 0x0423,0xfff8
0f34 0428 fff7 | ( | .CONST 0x0428,0xfff7
0f36 042a 0001 | * | .CONST 0x042a,0x0001
0f38 043a 0002 | : | .CONST 0x043a,0x0002
0f3a 043c 0003 | < | .CONST 0x043c,0x0003
0f3c 0450 0004 | P | .CONST 0x0450,0x0004
0f3e 0451 0005 | Q | .CONST 0x0451,0x0005
0f40 0461 0006 | a | .CONST 0x0461,0x0006
0f42 0463 0007 | c | .CONST 0x0463,0x0007
0f44 0477 0008 | w | .CONST 0x0477,0x0008
0f46 0478 0009 | x | .CONST 0x0478,0x0009
0f48 047e 000a | ~ | .CONST 0x047e,0x000a
0f4a 049f 000b | | .CONST 0x049f,0x000b
0f4c 04a1 000c | | .CONST 0x04a1,0x000c
0f4e 04a9 000d | | .CONST 0x04a9,0x000d
0f50 04af 000e | | .CONST 0x04af,0x000e
0f52 04b3 0401 | | .CONST 0x04b3,0x0401
0f54 04b4 000e | | .CONST 0x04b4,0x000e
0f56 04b4 0801 | | .CONST 0x04b4,0x0801
0f58 04b5 0401 | | .CONST 0x04b5,0x0401
0f5a 04c3 000f | | .CONST 0x04c3,0x000f
0f5c 04ca 0010 | | .CONST 0x04ca,0x0010
0f5e 04d0 0011 | | .CONST 0x04d0,0x0011
0f60 04d1 0c01 | | .CONST 0x04d1,0x0c01
0f62 04d2 0011 | | .CONST 0x04d2,0x0011
0f64 04d2 1001 | | .CONST 0x04d2,0x1001
0f66 04d3 0c01 | | .CONST 0x04d3,0x0c01
0f68 04df 0012 | | .CONST 0x04df,0x0012
0f6a ; --------------------------------------------------------------------------------------
0f6a ; Debug3 Subtable 0xd
0f6a ; --------------------------------------------------------------------------------------
0f6a 0009 001d | | .DBG3TAB 0x0009,0x001d
0f6c 04eb ffff | | .CONST 0x04eb,0xffff
0f6e 04ee fffe | | .CONST 0x04ee,0xfffe
0f70 04f1 fffd | | .CONST 0x04f1,0xfffd
0f72 04f3 fffc | | .CONST 0x04f3,0xfffc
0f74 04f6 fffb | | .CONST 0x04f6,0xfffb
0f76 04fb fffa | | .CONST 0x04fb,0xfffa
0f78 0500 fff9 | | .CONST 0x0500,0xfff9
0f7a 0505 fff8 | | .CONST 0x0505,0xfff8
0f7c 0508 fff7 | | .CONST 0x0508,0xfff7
0f7e 0509 0001 | | .CONST 0x0509,0x0001
0f80 050d 0002 | | .CONST 0x050d,0x0002
0f82 0511 0003 | | .CONST 0x0511,0x0003
0f84 0516 0004 | | .CONST 0x0516,0x0004
0f86 0518 0005 | | .CONST 0x0518,0x0005
0f88 0519 0006 | | .CONST 0x0519,0x0006
0f8a 051e 0007 | | .CONST 0x051e,0x0007
0f8c 0522 0008 | " | .CONST 0x0522,0x0008
0f8e 0527 0009 | ' | .CONST 0x0527,0x0009
0f90 0529 000a | ) | .CONST 0x0529,0x000a
0f92 052a 000b | * | .CONST 0x052a,0x000b
0f94 052f 000c | / | .CONST 0x052f,0x000c
0f96 0535 000d | 5 | .CONST 0x0535,0x000d
0f98 0561 000e | a | .CONST 0x0561,0x000e
0f9a 0563 000f | c | .CONST 0x0563,0x000f
0f9c 056b 0010 | k | .CONST 0x056b,0x0010
0f9e 056f 0401 | o | .CONST 0x056f,0x0401
0fa0 0570 0010 | p | .CONST 0x0570,0x0010
0fa2 0570 0801 | p | .CONST 0x0570,0x0801
0fa4 0571 0401 | q | .CONST 0x0571,0x0401
0fa6 057f 0011 | | .CONST 0x057f,0x0011
0fa8 0586 0012 | | .CONST 0x0586,0x0012
0faa 058b 0013 | | .CONST 0x058b,0x0013
0fac 059a 0014 | | .CONST 0x059a,0x0014
0fae 059b 0c01 | | .CONST 0x059b,0x0c01
0fb0 059c 0014 | | .CONST 0x059c,0x0014
0fb2 059c 1001 | | .CONST 0x059c,0x1001
0fb4 059d 0c01 | | .CONST 0x059d,0x0c01
0fb6 05a9 0015 | | .CONST 0x05a9,0x0015
0fb8 ; --------------------------------------------------------------------------------------
0fb8 ; Debug3 Subtable 0xe
0fb8 ; --------------------------------------------------------------------------------------
0fb8 000a 001a | | .DBG3TAB 0x000a,0x001a
0fba 05b3 ffff | | .CONST 0x05b3,0xffff
0fbc 05b8 fffe | | .CONST 0x05b8,0xfffe
0fbe 05ba fffd | | .CONST 0x05ba,0xfffd
0fc0 05bd fffc | | .CONST 0x05bd,0xfffc
0fc2 05be fffb | | .CONST 0x05be,0xfffb
0fc4 05c3 fffa | | .CONST 0x05c3,0xfffa
0fc6 05c8 fff9 | | .CONST 0x05c8,0xfff9
0fc8 05cd fff8 | | .CONST 0x05cd,0xfff8
0fca 05d0 fff7 | | .CONST 0x05d0,0xfff7
0fcc 05d5 fff6 | | .CONST 0x05d5,0xfff6
0fce 05d6 0001 | | .CONST 0x05d6,0x0001
0fd0 05e6 0002 | | .CONST 0x05e6,0x0002
0fd2 05e8 0003 | | .CONST 0x05e8,0x0003
0fd4 05fc 0004 | | .CONST 0x05fc,0x0004
0fd6 05fd 0005 | | .CONST 0x05fd,0x0005
0fd8 0609 0006 | | .CONST 0x0609,0x0006
0fda 060b 0007 | | .CONST 0x060b,0x0007
0fdc 061f 0008 | | .CONST 0x061f,0x0008
0fde 0620 0009 | | .CONST 0x0620,0x0009
0fe0 0626 000a | & | .CONST 0x0626,0x000a
0fe2 0632 000b | 2 | .CONST 0x0632,0x000b
0fe4 0634 000c | 4 | .CONST 0x0634,0x000c
0fe6 0648 000d | H | .CONST 0x0648,0x000d
0fe8 0649 000e | I | .CONST 0x0649,0x000e
0fea 0656 000f | V | .CONST 0x0656,0x000f
0fec 065e 0010 | ^ | .CONST 0x065e,0x0010
0fee 066e 0011 | n | .CONST 0x066e,0x0011
0ff0 066f 0012 | o | .CONST 0x066f,0x0012
0ff2 068e 0013 | | .CONST 0x068e,0x0013
0ff4 0696 0014 | | .CONST 0x0696,0x0014
0ff6 0698 0015 | | .CONST 0x0698,0x0015
0ff8 069f 0016 | | .CONST 0x069f,0x0016
0ffa 06a0 0017 | | .CONST 0x06a0,0x0017
0ffc 06aa 0018 | | .CONST 0x06aa,0x0018
0ffe 06ac 0019 | | .CONST 0x06ac,0x0019
1000 06c0 001a | | .CONST 0x06c0,0x001a
1002 ; --------------------------------------------------------------------------------------
1002 ; Debug3 Subtable 0xf
1002 ; --------------------------------------------------------------------------------------
1002 0001 0004 | | .DBG3TAB 0x0001,0x0004
1004 06cb ffff | | .CONST 0x06cb,0xffff
1006 06ce 0001 | | .CONST 0x06ce,0x0001
1008 06d5 0002 | | .CONST 0x06d5,0x0002
100a 06da 0003 | | .CONST 0x06da,0x0003
100c 06db 0004 | | .CONST 0x06db,0x0004
100e ; --------------------------------------------------------------------------------------
100e ; Debug3 Subtable 0x10
100e ; --------------------------------------------------------------------------------------
100e 0007 000d | | .DBG3TAB 0x0007,0x000d
1010 06eb ffff | | .CONST 0x06eb,0xffff
1012 06f0 fffe | | .CONST 0x06f0,0xfffe
1014 06f5 fffd | | .CONST 0x06f5,0xfffd
1016 06f8 fffc | | .CONST 0x06f8,0xfffc
1018 06f9 fffb | | .CONST 0x06f9,0xfffb
101a 06fe fffa | | .CONST 0x06fe,0xfffa
101c 0701 fff9 | | .CONST 0x0701,0xfff9
101e 0703 0001 | | .CONST 0x0703,0x0001
1020 0713 0002 | | .CONST 0x0713,0x0002
1022 0715 0003 | | .CONST 0x0715,0x0003
1024 0729 0004 | ) | .CONST 0x0729,0x0004
1026 072a 0005 | * | .CONST 0x072a,0x0005
1028 0737 0006 | 7 | .CONST 0x0737,0x0006
102a 0739 0007 | 9 | .CONST 0x0739,0x0007
102c 0746 0008 | F | .CONST 0x0746,0x0008
102e 0748 0009 | H | .CONST 0x0748,0x0009
1030 075c 000a | \ | .CONST 0x075c,0x000a
1032 075d 000b | ] | .CONST 0x075d,0x000b
1034 077f 000c | | .CONST 0x077f,0x000c
1036 0787 000d | | .CONST 0x0787,0x000d
1038 ; --------------------------------------------------------------------------------------
1038 ; Debug3 Subtable 0x11
1038 ; --------------------------------------------------------------------------------------
1038 0001 0004 | | .DBG3TAB 0x0001,0x0004
103a 0793 ffff | | .CONST 0x0793,0xffff
103c 0796 0001 | | .CONST 0x0796,0x0001
103e 079d 0002 | | .CONST 0x079d,0x0002
1040 07a2 0003 | | .CONST 0x07a2,0x0003
1042 07a3 0004 | | .CONST 0x07a3,0x0004
1044 ; --------------------------------------------------------------------------------------
1044 ; Debug3 Subtable 0x12
1044 ; --------------------------------------------------------------------------------------
1044 0001 0005 | | .DBG3TAB 0x0001,0x0005
1046 07b3 ffff | | .CONST 0x07b3,0xffff
1048 07b6 0001 | | .CONST 0x07b6,0x0001
104a 07bd 0002 | | .CONST 0x07bd,0x0002
104c 07c2 0003 | | .CONST 0x07c2,0x0003
104e 07c7 0004 | | .CONST 0x07c7,0x0004
1050 07c8 0005 | | .CONST 0x07c8,0x0005
1052 ; --------------------------------------------------------------------------------------
1052 ; Debug3 Subtable 0x13
1052 ; --------------------------------------------------------------------------------------
1052 0002 0008 | | .DBG3TAB 0x0002,0x0008
1054 07d3 ffff | | .CONST 0x07d3,0xffff
1056 07d8 fffe | | .CONST 0x07d8,0xfffe
1058 07da 0001 | | .CONST 0x07da,0x0001
105a 07ea 0002 | | .CONST 0x07ea,0x0002
105c 07ec 0003 | | .CONST 0x07ec,0x0003
105e 0800 0004 | | .CONST 0x0800,0x0004
1060 0801 0005 | | .CONST 0x0801,0x0005
1062 080f 0006 | | .CONST 0x080f,0x0006
1064 0811 0007 | | .CONST 0x0811,0x0007
1066 0826 0008 | & | .CONST 0x0826,0x0008
1068 ; --------------------------------------------------------------------------------------
1068 ; Debug3 Subtable 0x14
1068 ; --------------------------------------------------------------------------------------
1068 0008 0011 | | .DBG3TAB 0x0008,0x0011
106a 0833 ffff | 3 | .CONST 0x0833,0xffff
106c 0838 fffe | 8 | .CONST 0x0838,0xfffe
106e 083a fffd | : | .CONST 0x083a,0xfffd
1070 083d fffc | = | .CONST 0x083d,0xfffc
1072 083e fffb | > | .CONST 0x083e,0xfffb
1074 0843 fffa | C | .CONST 0x0843,0xfffa
1076 0848 fff9 | H | .CONST 0x0848,0xfff9
1078 084b fff8 | K | .CONST 0x084b,0xfff8
107a 0850 0001 | P | .CONST 0x0850,0x0001
107c 0860 0002 | ` | .CONST 0x0860,0x0002
107e 0862 0003 | b | .CONST 0x0862,0x0003
1080 0876 0004 | v | .CONST 0x0876,0x0004
1082 0877 0005 | w | .CONST 0x0877,0x0005
1084 0884 0006 | | .CONST 0x0884,0x0006
1086 0886 0007 | | .CONST 0x0886,0x0007
1088 089a 0008 | | .CONST 0x089a,0x0008
108a 089b 0009 | | .CONST 0x089b,0x0009
108c 08a1 000a | | .CONST 0x08a1,0x000a
108e 08be 000b | | .CONST 0x08be,0x000b
1090 08c6 000c | | .CONST 0x08c6,0x000c
1092 08c8 000d | | .CONST 0x08c8,0x000d
1094 08d4 000e | | .CONST 0x08d4,0x000e
1096 08d6 000f | | .CONST 0x08d6,0x000f
1098 08e0 0010 | | .CONST 0x08e0,0x0010
109a 08e2 0011 | | .CONST 0x08e2,0x0011
109c ; --------------------------------------------------------------------------------------
109c ; Debug3 Subtable 0x15
109c ; --------------------------------------------------------------------------------------
109c 0001 0005 | | .DBG3TAB 0x0001,0x0005
109e 08fb ffff | | .CONST 0x08fb,0xffff
10a0 08fe 0001 | | .CONST 0x08fe,0x0001
10a2 0905 0002 | | .CONST 0x0905,0x0002
10a4 090a 0003 | | .CONST 0x090a,0x0003
10a6 090f 0004 | | .CONST 0x090f,0x0004
10a8 0910 0005 | | .CONST 0x0910,0x0005
10aa ; --------------------------------------------------------------------------------------
10aa ; Debug3 Subtable 0x16
10aa ; --------------------------------------------------------------------------------------
10aa 0001 0004 | | .DBG3TAB 0x0001,0x0004
10ac 091b ffff | | .CONST 0x091b,0xffff
10ae 091e 0001 | | .CONST 0x091e,0x0001
10b0 0927 0002 | ' | .CONST 0x0927,0x0002
10b2 092c 0003 | , | .CONST 0x092c,0x0003
10b4 092e 0004 | . | .CONST 0x092e,0x0004
10b6 ; --------------------------------------------------------------------------------------
10b6 ; Debug3 Subtable 0x17
10b6 ; --------------------------------------------------------------------------------------
10b6 0003 000b | | .DBG3TAB 0x0003,0x000b
10b8 093b ffff | ; | .CONST 0x093b,0xffff
10ba 0940 fffe | @ | .CONST 0x0940,0xfffe
10bc 0942 fffd | B | .CONST 0x0942,0xfffd
10be 0943 0001 | C | .CONST 0x0943,0x0001
10c0 0948 0002 | H | .CONST 0x0948,0x0002
10c2 094a 0003 | J | .CONST 0x094a,0x0003
10c4 095a 0004 | Z | .CONST 0x095a,0x0004
10c6 095c 0005 | \ | .CONST 0x095c,0x0005
10c8 0974 0006 | t | .CONST 0x0974,0x0006
10ca 0976 0007 | v | .CONST 0x0976,0x0007
10cc 0985 0008 | | .CONST 0x0985,0x0008
10ce 0987 0009 | | .CONST 0x0987,0x0009
10d0 099f 000a | | .CONST 0x099f,0x000a
10d2 09a1 000b | | .CONST 0x09a1,0x000b
10d4 ; --------------------------------------------------------------------------------------
10d4 ; Debug3 Subtable 0x18
10d4 ; --------------------------------------------------------------------------------------
10d4 0002 000b | | .DBG3TAB 0x0002,0x000b
10d6 09ab ffff | | .CONST 0x09ab,0xffff
10d8 09b0 fffe | | .CONST 0x09b0,0xfffe
10da 09b2 0001 | | .CONST 0x09b2,0x0001
10dc 09b6 0002 | | .CONST 0x09b6,0x0002
10de 09c6 0003 | | .CONST 0x09c6,0x0003
10e0 09c8 0004 | | .CONST 0x09c8,0x0004
10e2 09dc 0005 | | .CONST 0x09dc,0x0005
10e4 09dd 0006 | | .CONST 0x09dd,0x0006
10e6 09df 0007 | | .CONST 0x09df,0x0007
10e8 09ed 0008 | | .CONST 0x09ed,0x0008
10ea 09fe 0009 | | .CONST 0x09fe,0x0009
10ec 0a00 000a | | .CONST 0x0a00,0x000a
10ee 0a14 000b | | .CONST 0x0a14,0x000b
10f0 ; --------------------------------------------------------------------------------------
10f0 ; Debug3 Subtable 0x19
10f0 ; --------------------------------------------------------------------------------------
10f0 0002 000b | | .DBG3TAB 0x0002,0x000b
10f2 0a23 ffff | # | .CONST 0x0a23,0xffff
10f4 0a28 fffe | ( | .CONST 0x0a28,0xfffe
10f6 0a2a 0001 | * | .CONST 0x0a2a,0x0001
10f8 0a2e 0002 | . | .CONST 0x0a2e,0x0002
10fa 0a3e 0003 | > | .CONST 0x0a3e,0x0003
10fc 0a40 0004 | @ | .CONST 0x0a40,0x0004
10fe 0a54 0005 | T | .CONST 0x0a54,0x0005
1100 0a55 0006 | U | .CONST 0x0a55,0x0006
1102 0a57 0007 | W | .CONST 0x0a57,0x0007
1104 0a65 0008 | e | .CONST 0x0a65,0x0008
1106 0a76 0009 | v | .CONST 0x0a76,0x0009
1108 0a78 000a | x | .CONST 0x0a78,0x000a
110a 0a8c 000b | | .CONST 0x0a8c,0x000b
110c 0000 0000 | | .BLANK 0000[0xf4]