|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 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 0300 | | .CONST 0x0300 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0035 | 5 | .CONST 0x0035 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0016 | | .CONST 0x0016 ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x0362,0x8000,0x0000,0x0056,0xdb05,0x0000,0x000d
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xe,0xfffc
0010 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x10,0xfffb
0012 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x12,0xfffa
0014 029a 0113 | | Declare_Subprogram INIT_0110,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x14,0xfff9
0016 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x16,0xfff8
0018 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x18,0xfff7
001a 00bf | | Action Accept_Activation
001b 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001b,0x0376,0x8000,0x0000,0x0056,0xdf55,0x0000,0x001b
; Debug Table 0x1.0x0 = 0x1b,0xffff
001c 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x1c,0xfffe
001d 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x1d,0xfffd
001e 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x1e,0xfffc
001f 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x1f,0xfffb
0020 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x20,0xfffa
0021 029d 01cb | | Declare_Subprogram INIT_01c8,For_Outer_Call ; Debug Table 0x1.0x6 = 0x21,0xfff9
0023 029d 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call ; Debug Table 0x1.0x7 = 0x23,0xfff8
0025 029d 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call ; Debug Table 0x1.0x8 = 0x25,0xfff7
0027 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x9 = 0x27,0xfff6
0028 00c7 | | Action Elaborate_Subprogram
0029 029d 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call ; Debug Table 0x1.0xa = 0x29,0xfff5
002b 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0xb = 0x2b,0xfff4
002c 00c7 | | Action Elaborate_Subprogram
002d 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0xc = 0x2d,0xfff3
002e 00c7 | | Action Elaborate_Subprogram
002f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xd = 0x2f,0xfff2
0030 00c7 | | Action Elaborate_Subprogram
0031 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0xe = 0x31,0xfff1
0032 00c7 | | Action Elaborate_Subprogram
0033 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xf = 0x33,0xfff0
0034 00c7 | | Action Elaborate_Subprogram
0035 BODY_0008:
0035 00bc | | Action Signal_Activated
0036 00bb | | Action Signal_Completion
0037 0000 | | .XXX[0x1]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 004b | K | .CONST 0x004b ; Address of begin
0039 0004 | | .CONST 0x0004 ; Address of exception handler
003a 0007 | | .CONST 0x0007 ; Number of locals
003b INIT_0038:
003b e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x003b,0x0398,0x0002,0x0000,0x0056,0xdb05,0x0000,0x001c
; Debug Table 0x2.0x0 = 0x3b,0xffff
003c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
003d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
003e 02c7 | | Declare_Variable Any
003f 00d8 | | Load_Top At_Offset_0
0040 1c00 | | Execute_Immediate Run_Utility,0x0
0041 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x1 = 0x41,0xfffe
0042 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x2 = 0x42,0xfffd
0043 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x3 = 0x43,0xfffc
0044 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x4 = 0x44,0xfffb
0045 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0046 e001 | | Load 0x0,0x1 ; Debug Table 0x2.0x5 = 0x46,0xfffa
0047 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0048 02ff | | Declare_Variable Variant_Record
0049 00d8 | | Load_Top At_Offset_0
004a 1c00 | | Execute_Immediate Run_Utility,0x0
004b BODY_0038:
004b e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x6 = 0x4b,0x1
004c e001 | | Load 0x0,0x1
004d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
004e 6803 |h | Jump_Zero 0x52
004f 0007 | | Action Break_Optional ; Debug Table 0x2.0x7 = 0x4f,0x2
0050 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2.0x8 = 0x50,0x401
0051 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 ; Debug Table 0x2.0x9 = 0x51,0x2
0052 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0xa = 0x52,0x3
0053 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0054 e402 | | Load 0x2,0x2
0055 0120 | | Execute Any,Is_Value
0056 6804 |h | Jump_Zero 0x5b
0057 e001 | | Load 0x0,0x1
0058 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0059 1b0d | | Execute Package,Field_Read,Field_Number 0xd
005a 7801 |x | Jump 0x5c
005b e402 | | Load 0x2,0x2
005c e003 | | Load 0x0,0x3
005d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
005e 4800 |H | Short_Literal 0x0
005f 4800 |H | Short_Literal 0x0
0060 e5ff | | Load 0x2,-0x1
0061 e001 | | Load 0x0,0x1
0062 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0063 c402 | | Store 0x2,0x2
0064 005a | Z | Store_Top Discrete,At_Offset_2
0065 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0xb = 0x65,0x4
0066 6802 |h | Jump_Zero 0x69
0067 627c |b| | Indirect_Literal Discrete,0x2e4,{0x00000000, 0x56df5502} ; Debug Table 0x2.0xc = 0x67,0x5
0068 0257 | W | Execute Discrete,Raise
0069 e402 | | Load 0x2,0x2 ; Debug Table 0x2.0xd = 0x69,0x6
006a e001 | | Load 0x0,0x1
006b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
006c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
006d 0033 | 3 | Store_Top Heap_Access,At_Offset_3
006e 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0xe = 0x6e,0x7
006f 4976 |Iv | Short_Literal 0x176
0070 00eb | | Load_Encached Diana_Cache
0071 0098 | | Execute Package,Field_Read_Dynamic
0072 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0073 a404 | | Store_Unchecked 0x2,0x4
0074 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0xf = 0x74,0x8
0075 e004 | | Load 0x0,0x4
0076 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0077 700d |p | Jump_Nonzero 0x85
0078 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x10 = 0x78,0x9
0079 00db | | Load_Top At_Offset_3
007a 4976 |Iv | Short_Literal 0x176
007b 00eb | | Load_Encached Diana_Cache
007c 0098 | | Execute Package,Field_Read_Dynamic
007d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
007e 00eb | | Load_Encached Diana_Cache
007f 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0080 4817 |H | Short_Literal 0x17
0081 00eb | | Load_Encached Diana_Cache
0082 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
0083 a403 | | Store_Unchecked 0x2,0x3
0084 7810 |x | Jump 0x95
0085 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x11 = 0x85,0xa
0086 00eb | | Load_Encached Diana_Cache
0087 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0088 4817 |H | Short_Literal 0x17
0089 00eb | | Load_Encached Diana_Cache
008a 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
008b a403 | | Store_Unchecked 0x2,0x3
008c 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x12 = 0x8c,0xb
008d 4976 |Iv | Short_Literal 0x176
008e 00eb | | Load_Encached Diana_Cache
008f 0098 | | Execute Package,Field_Read_Dynamic
0090 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0091 e403 | | Load 0x2,0x3
0092 4959 |IY | Short_Literal 0x159
0093 00eb | | Load_Encached Diana_Cache
0094 0096 | | Execute Package,Entry
0095 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x13 = 0x95,0xc
0096 8213 | | Call 0x1,0x13
0097 6802 |h | Jump_Zero 0x9a
0098 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x14 = 0x98,0xd
0099 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
009a e402 | | Load 0x2,0x2 ; Debug Table 0x2.0x15 = 0x9a,0xe
009b 8215 | | Call 0x1,0x15
009c 00d9 | | Load_Top At_Offset_1
009d 016d | m | Execute Variant_Record,Structure_Write
009e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x16 = 0x9e,0xf
009f 8214 | | Call 0x1,0x14
00a0 6802 |h | Jump_Zero 0xa3
00a1 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x17 = 0xa1,0x10
00a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00a3 e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x18 = 0xa3,0x11
00a4 00d9 | | Load_Top At_Offset_1
00a5 820d | | Call 0x1,0xd
00a6 4812 |H | Short_Literal 0x12
00a7 00eb | | Load_Encached Diana_Cache
00a8 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
00a9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00aa 0000 0000 | | .BLANK 0000[0x6]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 00b8 | | .CONST 0x00b8 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 00db | | Load_Top At_Offset_3 ; Debug Table 0x3 = .DEBUG 0x00b3,0x03cc,0x0002,0x0000,0x0056,0xdb05,0x0000,0x0029
; Debug Table 0x3.0x0 = 0xb3,0x1
00b4 00db | | Load_Top At_Offset_3
00b5 8216 | | Call 0x1,0x16
00b6 4801 |H | Short_Literal 0x1 ; Debug Table 0x3.0x1 = 0xb6,0x2
00b7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00b8 TRAP_00b0:
00b8 6227 |b' | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x56df5501}
00b9 010f | | Execute Exception,Equal
00ba 6802 |h | Jump_Zero 0xbd
00bb 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x2 = 0xbb,0x3
00bc 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00bd 0100 | | Execute Exception,Raise
00be 0000 0000 | | .XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00d4 | | .CONST 0x00d4 ; Address of begin
00c1 00f7 | | .CONST 0x00f7 ; Address of exception handler
00c2 0004 | | .CONST 0x0004 ; Number of locals
00c3 INIT_00c0:
00c3 e002 | | Load 0x0,0x2 ; Debug Table 0x4 = .DEBUG 0x00c3,0x03d4,0x0001,0x0000,0x0056,0xdb05,0x0000,0x003a
; Debug Table 0x4.0x0 = 0xc3,0xffff
00c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c5 e003 | | Load 0x0,0x3 ; Debug Table 0x4.0x1 = 0xc5,0xfffe
00c6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00c7 02c7 | | Declare_Variable Any
00c8 e005 | | Load 0x0,0x5
00c9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00ca e5fd | | Load 0x2,-0x3
00cb e003 | | Load 0x0,0x3
00cc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00cd c403 | | Store 0x2,0x3
00ce e006 | | Load 0x0,0x6 ; Debug Table 0x4.0x2 = 0xce,0xfffd
00cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d0 02ff | | Declare_Variable Variant_Record
00d1 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x3 = 0xd1,0x401
00d2 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x4 = 0xd2,0xfffd
00d3 016d | m | Execute Variant_Record,Structure_Write
00d4 BODY_00c0:
00d4 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x5 = 0xd4,0x1
00d5 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00d6 00da | | Load_Top At_Offset_2
00d7 e5fc | | Load 0x2,-0x4
00d8 e5fe | | Load 0x2,-0x2
00d9 e006 | | Load 0x0,0x6
00da 1b44 | D | Execute Package,Field_Read,Field_Number 0x44
00db 025b | [ | Execute Discrete,Check_In_Type
00dc e404 | | Load 0x2,0x4
00dd e006 | | Load 0x0,0x6
00de 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
00df 005b | [ | Store_Top Discrete,At_Offset_3
00e0 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x6 = 0xe0,0x2
00e1 e007 | | Load 0x0,0x7
00e2 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
00e3 e008 | | Load 0x0,0x8 ; Debug Table 0x4.0x7 = 0xe3,0x3
00e4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00e5 4801 |H | Short_Literal 0x1
00e6 e5ff | | Load 0x2,-0x1
00e7 e009 | | Load 0x0,0x9
00e8 1b3d | = | Execute Package,Field_Read,Field_Number 0x3d
00e9 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00ea e5ff | | Load 0x2,-0x1
00eb e00a | | Load 0x0,0xa
00ec 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00ed 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x8 = 0xed,0x4
00ee 4801 |H | Short_Literal 0x1
00ef 4801 |H | Short_Literal 0x1
00f0 e5fd | | Load 0x2,-0x3
00f1 e003 | | Load 0x0,0x3
00f2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
00f3 c403 | | Store 0x2,0x3
00f4 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x9 = 0xf4,0x5
00f5 a5fb | | Store_Unchecked 0x2,-0x5
00f6 4505 |E | Exit_Suprogram New_Top_Offset 0x5
00f7 TRAP_00c0:
00f7 0007 | | Action Break_Optional
00f8 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0xa = 0xf8,0x6
00f9 e003 | | Load 0x0,0x3
00fa 181a | | Execute Package,Field_Execute,Field_Number 0x1a
00fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xb = 0xfb,0x7
00fc 4801 |H | Short_Literal 0x1
00fd 4800 |H | Short_Literal 0x0
00fe e5fd | | Load 0x2,-0x3
00ff e003 | | Load 0x0,0x3
0100 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0101 c403 | | Store 0x2,0x3
0102 e009 | | Load 0x0,0x9 ; Debug Table 0x4.0xc = 0x102,0x8
0103 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0104 0092 02e8 | | Action Push_String_Extended,0x2e8 ; "Set_Unit_State"
0106 e00b | | Load 0x0,0xb
0107 180f | | Execute Package,Field_Execute,Field_Number 0xf
0108 e007 | | Load 0x0,0x7
0109 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
010a c5fb | | Store 0x2,-0x5
010b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
010c 0000 0000 | | .BLANK 0000[0x4]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 011a | | .CONST 0x011a ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0003 | | .CONST 0x0003 ; Number of locals
0113 INIT_0110:
0113 e009 | | Load 0x0,0x9 ; Debug Table 0x5 = .DEBUG 0x0113,0x03f0,0x0001,0x0000,0x0056,0xdb05,0x0000,0x0062
; Debug Table 0x5.0x0 = 0x113,0xffff
0114 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0115 e009 | | Load 0x0,0x9 ; Debug Table 0x5.0x1 = 0x115,0xfffe
0116 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0117 02ff | | Declare_Variable Variant_Record
0118 00d8 | | Load_Top At_Offset_0
0119 1c00 | | Execute_Immediate Run_Utility,0x0
011a BODY_0110:
011a e009 | | Load 0x0,0x9 ; Debug Table 0x5.0x2 = 0x11a,0x1
011b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011c 00d9 | | Load_Top At_Offset_1
011d e5fc | | Load 0x2,-0x4
011e e5fd | | Load 0x2,-0x3
011f e5ff | | Load 0x2,-0x1
0120 e009 | | Load 0x0,0x9
0121 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0122 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0123 00d1 | | Pop_Control Pop_Count_1
0124 005a | Z | Store_Top Discrete,At_Offset_2
0125 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x3 = 0x125,0x2
0126 7009 |p | Jump_Nonzero 0x130
0127 e009 | | Load 0x0,0x9 ; Debug Table 0x5.0x4 = 0x127,0x3
0128 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0129 e5fc | | Load 0x2,-0x4
012a e5fd | | Load 0x2,-0x3
012b e5fe | | Load 0x2,-0x2
012c e403 | | Load 0x2,0x3
012d 820f | | Call 0x1,0xf
012e c5fb | | Store 0x2,-0x5
012f 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0130 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x5 = 0x130,0x4
0131 a5fb | | Store_Unchecked 0x2,-0x5
0132 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0133 0000 0000 | | .BLANK 0000[0x5]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013b | ; | .CONST 0x013b ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0001 | | .CONST 0x0001 ; Number of locals
013b BODY_0138:
013b INIT_0138:
013b e009 | | Load 0x0,0x9 ; Debug Table 0x6 = .DEBUG 0x013b,0x03fe,0x0001,0x0000,0x0056,0xdb05,0x0000,0x008a
; Debug Table 0x6.0x0 = 0x13b,0x1
013c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
013d e5fc | | Load 0x2,-0x4
013e e5fd | | Load 0x2,-0x3
013f e5fe | | Load 0x2,-0x2
0140 e5ff | | Load 0x2,-0x1
0141 e001 | | Load 0x0,0x1
0142 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0143 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0144 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0x144,0x401
0145 00d0 | | Action Swap_Control
0146 00d1 | | Pop_Control Pop_Count_1
0147 820f | | Call 0x1,0xf ; Debug Table 0x6.0x2 = 0x147,0x1
0148 c5fb | | Store 0x2,-0x5
0149 4505 |E | Exit_Suprogram New_Top_Offset 0x5
014a 0000 0000 | | .BLANK 0000[0x6]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0170 | p | .CONST 0x0170 ; Address of begin
0151 01ad | | .CONST 0x01ad ; Address of exception handler
0152 0007 | | .CONST 0x0007 ; Number of locals
0153 INIT_0150:
0153 e006 | | Load 0x0,0x6 ; Debug Table 0x7 = .DEBUG 0x0153,0x0406,0x0001,0x0000,0x0056,0xdb05,0x0000,0x00b2
; Debug Table 0x7.0x0 = 0x153,0xffff
0154 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
0155 0322 | " | Declare_Variable Record
0156 00d8 | | Load_Top At_Offset_0
0157 1c00 | | Execute_Immediate Run_Utility,0x0
0158 e006 | | Load 0x0,0x6 ; Debug Table 0x7.0x1 = 0x158,0xfffe
0159 1b0f | | Execute Package,Field_Read,Field_Number 0xf
015a 02ff | | Declare_Variable Variant_Record
015b e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x2 = 0x15b,0x401
015c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x3 = 0x15c,0xfffe
015d 016d | m | Execute Variant_Record,Structure_Write
015e e003 | | Load 0x0,0x3 ; Debug Table 0x7.0x4 = 0x15e,0xfffd
015f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0160 02c7 | | Declare_Variable Any
0161 e005 | | Load 0x0,0x5
0162 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0163 e5fd | | Load 0x2,-0x3
0164 e003 | | Load 0x0,0x3
0165 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0166 c404 | | Store 0x2,0x4
0167 e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x5 = 0x167,0xfffc
0168 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0169 e006 | | Load 0x0,0x6 ; Debug Table 0x7.0x6 = 0x169,0xfffb
016a 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
016b 0322 | " | Declare_Variable Record
016c 00d8 | | Load_Top At_Offset_0
016d 1c00 | | Execute_Immediate Run_Utility,0x0
016e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x7 = 0x16e,0xfffa
016f 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0170 BODY_0150:
0170 e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x8 = 0x170,0x1
0171 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0172 e402 | | Load 0x2,0x2
0173 e404 | | Load 0x2,0x4
0174 e5fc | | Load 0x2,-0x4
0175 e403 | | Load 0x2,0x3
0176 e006 | | Load 0x0,0x6
0177 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0178 00d1 | | Pop_Control Pop_Count_1
0179 005b | [ | Store_Top Discrete,At_Offset_3
017a 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x9 = 0x17a,0x2
017b e007 | | Load 0x0,0x7
017c 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
017d e002 | | Load 0x0,0x2 ; Debug Table 0x7.0xa = 0x17d,0x3
017e 1b10 | | Execute Package,Field_Read,Field_Number 0x10
017f 00da | | Load_Top At_Offset_2
0180 e404 | | Load 0x2,0x4
0181 e5fc | | Load 0x2,-0x4
0182 e402 | | Load 0x2,0x2
0183 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0184 e006 | | Load 0x0,0x6
0185 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0186 00d1 | | Pop_Control Pop_Count_1
0187 005b | [ | Store_Top Discrete,At_Offset_3
0188 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0xb = 0x188,0x4
0189 e007 | | Load 0x0,0x7
018a 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
018b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0xc = 0x18b,0x5
018c 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
018d 6803 |h | Jump_Zero 0x191
018e 4807 |H | Short_Literal 0x7 ; Debug Table 0x7.0xd = 0x18e,0x6
018f a5fb | | Store_Unchecked 0x2,-0x5
0190 4505 |E | Exit_Suprogram New_Top_Offset 0x5 ; Debug Table 0x7.0xe = 0x190,0x7
0191 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0xf = 0x191,0x8
0192 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0193 e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x10 = 0x193,0x9
0194 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0195 e404 | | Load 0x2,0x4
0196 e5fc | | Load 0x2,-0x4
0197 483e |H> | Short_Literal 0x3e
0198 483c |H< | Short_Literal 0x3c
0199 e5fe | | Load 0x2,-0x2
019a 01ca | | Execute Vector,Prepend
019b 01cb | | Execute Vector,Append
019c e403 | | Load 0x2,0x3
019d e006 | | Load 0x0,0x6
019e 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
019f 005b | [ | Store_Top Discrete,At_Offset_3
01a0 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x11 = 0x1a0,0xa
01a1 e007 | | Load 0x0,0x7
01a2 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
01a3 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x12 = 0x1a3,0xb
01a4 a5fb | | Store_Unchecked 0x2,-0x5
01a5 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x13 = 0x1a5,0xc
01a6 4801 |H | Short_Literal 0x1
01a7 4801 |H | Short_Literal 0x1
01a8 e5fd | | Load 0x2,-0x3
01a9 e003 | | Load 0x0,0x3
01aa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01ab c404 | | Store 0x2,0x4
01ac 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01ad TRAP_0150:
01ad 0007 | | Action Break_Optional
01ae 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x7.0x14 = 0x1ae,0xd
01af 6803 |h | Jump_Zero 0x1b3
01b0 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x15 = 0x1b0,0xe
01b1 e003 | | Load 0x0,0x3
01b2 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01b3 e404 | | Load 0x2,0x4 ; Debug Table 0x7.0x16 = 0x1b3,0xf
01b4 4801 |H | Short_Literal 0x1
01b5 4800 |H | Short_Literal 0x0
01b6 e5fd | | Load 0x2,-0x3
01b7 e003 | | Load 0x0,0x3
01b8 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01b9 c404 | | Store 0x2,0x4
01ba e009 | | Load 0x0,0x9 ; Debug Table 0x7.0x17 = 0x1ba,0x10
01bb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01bc 0092 02e9 | | Action Push_String_Extended,0x2e9 ; "Name_Managed_Object"
01be e00b | | Load 0x0,0xb
01bf 180f | | Execute Package,Field_Execute,Field_Number 0xf
01c0 e007 | | Load 0x0,0x7
01c1 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01c2 c5fb | | Store 0x2,-0x5
01c3 4505 |E | Exit_Suprogram New_Top_Offset 0x5
01c4 0000 0000 | | .BLANK 0000[0x4]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d3 | | .CONST 0x01d3 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0003 | | .CONST 0x0003 ; Number of locals
01cb INIT_01c8:
01cb e001 | | Load 0x0,0x1 ; Debug Table 0x8 = .DEBUG 0x01cb,0x0438,0x0002,0x0000,0x0056,0xdf55,0x0000,0x004c
; Debug Table 0x8.0x0 = 0x1cb,0xffff
01cc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ce 02c7 | | Declare_Variable Any
01cf 00d8 | | Load_Top At_Offset_0
01d0 1c00 | | Execute_Immediate Run_Utility,0x0
01d1 e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x1 = 0x1d1,0xfffe
01d2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01d3 BODY_01c8:
01d3 e002 | | Load 0x0,0x2 ; Debug Table 0x8.0x2 = 0x1d3,0x1
01d4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01d5 00da | | Load_Top At_Offset_2
01d6 0120 | | Execute Any,Is_Value
01d7 6804 |h | Jump_Zero 0x1dc
01d8 e001 | | Load 0x0,0x1
01d9 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01db 7801 |x | Jump 0x1dd
01dc 00da | | Load_Top At_Offset_2
01dd e003 | | Load 0x0,0x3
01de 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01df 4800 |H | Short_Literal 0x0
01e0 4800 |H | Short_Literal 0x0
01e1 e5ff | | Load 0x2,-0x1
01e2 e001 | | Load 0x0,0x1
01e3 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01e4 c402 | | Store 0x2,0x2
01e5 0059 | Y | Store_Top Discrete,At_Offset_1
01e6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x3 = 0x1e6,0x2
01e7 6802 |h | Jump_Zero 0x1ea
01e8 60fb |` | Indirect_Literal Discrete,0x2e4,{0x00000000, 0x56df5502} ; Debug Table 0x8.0x4 = 0x1e8,0x3
01e9 0257 | W | Execute Discrete,Raise
01ea 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x5 = 0x1ea,0x4
01eb e001 | | Load 0x0,0x1
01ec 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01ed 181a | | Execute Package,Field_Execute,Field_Number 0x1a
01ee e006 | | Load 0x0,0x6
01ef 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01f0 016f | o | Execute Variant_Record,Equal
01f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01f2 0000 0000 | | .BLANK 0000[0x6]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 0203 | | .CONST 0x0203 ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0003 | | .CONST 0x0003 ; Number of locals
01fb INIT_01f8:
01fb e001 | | Load 0x0,0x1 ; Debug Table 0x9 = .DEBUG 0x01fb,0x0446,0x0002,0x0000,0x0056,0xdf55,0x0000,0x00a1
; Debug Table 0x9.0x0 = 0x1fb,0xffff
01fc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01fd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01fe 02c7 | | Declare_Variable Any
01ff 00d8 | | Load_Top At_Offset_0
0200 1c00 | | Execute_Immediate Run_Utility,0x0
0201 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x1 = 0x201,0xfffe
0202 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0203 BODY_01f8:
0203 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x2 = 0x203,0x1
0204 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0205 00da | | Load_Top At_Offset_2
0206 0120 | | Execute Any,Is_Value
0207 6804 |h | Jump_Zero 0x20c
0208 e001 | | Load 0x0,0x1
0209 1b13 | | Execute Package,Field_Read,Field_Number 0x13
020a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
020b 7801 |x | Jump 0x20d
020c 00da | | Load_Top At_Offset_2
020d e003 | | Load 0x0,0x3
020e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
020f 4800 |H | Short_Literal 0x0
0210 4800 |H | Short_Literal 0x0
0211 e5ff | | Load 0x2,-0x1
0212 e001 | | Load 0x0,0x1
0213 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0214 c402 | | Store 0x2,0x2
0215 0059 | Y | Store_Top Discrete,At_Offset_1
0216 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x3 = 0x216,0x2
0217 6802 |h | Jump_Zero 0x21a
0218 60cb |` | Indirect_Literal Discrete,0x2e4,{0x00000000, 0x56df5502} ; Debug Table 0x9.0x4 = 0x218,0x3
0219 0257 | W | Execute Discrete,Raise
021a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x5 = 0x21a,0x4
021b e001 | | Load 0x0,0x1
021c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
021d 1815 | | Execute Package,Field_Execute,Field_Number 0x15
021e e00c | | Load 0x0,0xc
021f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0220 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0221 0000 0000 | | .BLANK 0000[0x7]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 0233 | 3 | .CONST 0x0233 ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0003 | | .CONST 0x0003 ; Number of locals
022b INIT_0228:
022b e009 | | Load 0x0,0x9 ; Debug Table 0xa = .DEBUG 0x022b,0x0454,0x0002,0x0000,0x0056,0xdf55,0x0000,0x00ee
; Debug Table 0xa.0x0 = 0x22b,0xffff
022c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
022d e009 | | Load 0x0,0x9 ; Debug Table 0xa.0x1 = 0x22d,0xfffe
022e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
022f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0230 02ff | | Declare_Variable Variant_Record
0231 00d8 | | Load_Top At_Offset_0
0232 1c00 | | Execute_Immediate Run_Utility,0x0
0233 BODY_0228:
0233 e009 | | Load 0x0,0x9 ; Debug Table 0xa.0x2 = 0x233,0x1
0234 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0235 00d9 | | Load_Top At_Offset_1
0236 60a5 |` | Indirect_Literal Discrete,0x2dc,{0x00000000, 0x00004000}
0237 e003 | | Load 0x0,0x3
0238 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0239 4800 |H | Short_Literal 0x0
023a e5ff | | Load 0x2,-0x1
023b e001 | | Load 0x0,0x1
023c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
023d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
023e e009 | | Load 0x0,0x9
023f 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0240 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0241 00d1 | | Pop_Control Pop_Count_1
0242 005a | Z | Store_Top Discrete,At_Offset_2
0243 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x3 = 0x243,0x2
0244 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0245 0000 0000 | | .XXX[0x3]
0247 0000 | |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 0258 | X | .CONST 0x0258 ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0004 | | .CONST 0x0004 ; Number of locals
024b INIT_0248:
024b e001 | | Load 0x0,0x1 ; Debug Table 0xb = .DEBUG 0x024b,0x045e,0x0001,0x0000,0x0056,0xdf55,0x0000,0x021d
; Debug Table 0xb.0x0 = 0x24b,0xffff
024c 1b13 | | Execute Package,Field_Read,Field_Number 0x13
024d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
024e 02c7 | | Declare_Variable Any
024f 00d8 | | Load_Top At_Offset_0
0250 1c00 | | Execute_Immediate Run_Utility,0x0
0251 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x1 = 0x251,0xfffe
0252 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0253 e001 | | Load 0x0,0x1 ; Debug Table 0xb.0x2 = 0x253,0xfffd
0254 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0255 02ff | | Declare_Variable Variant_Record
0256 00d8 | | Load_Top At_Offset_0
0257 1c00 | | Execute_Immediate Run_Utility,0x0
0258 BODY_0248:
0258 0007 | | Action Break_Optional ; Debug Table 0xb.0x3 = 0x258,0x1
0259 e5ff | | Load 0x2,-0x1 ; Debug Table 0xb.0x4 = 0x259,0x401
025a 0007 | | Action Break_Optional
025b 0145 | E | Execute Heap_Access,Diana_Tree_Kind ; Debug Table 0xb.0x5 = 0x25b,0x402
025c 0007 | | Action Break_Optional ; Debug Table 0xb.0x6 = 0x25c,0x403
025d 0007 | | Action Break_Optional ; Debug Table 0xb.0x7 = 0x25d,0x404
025e 0f12 | | Execute_Immediate Equal,0x12 ; Debug Table 0xb.0x8 = 0x25e,0x1
025f 6843 |hC | Jump_Zero 0x2a3
0260 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x9 = 0x260,0x2
0261 8213 | | Call 0x1,0x13
0262 7004 |p | Jump_Nonzero 0x267
0263 e5fe | | Load 0x2,-0x2
0264 e001 | | Load 0x0,0x1
0265 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0266 6802 |h | Jump_Zero 0x269
0267 6078 |`x | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x56df5501} ; Debug Table 0xb.0xa = 0x267,0x3
0268 0257 | W | Execute Discrete,Raise
0269 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0xb = 0x269,0x4
026a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
026b 00db | | Load_Top At_Offset_3
026c 0120 | | Execute Any,Is_Value
026d 6804 |h | Jump_Zero 0x272
026e e001 | | Load 0x0,0x1
026f 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0270 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0271 7801 |x | Jump 0x273
0272 00db | | Load_Top At_Offset_3
0273 e003 | | Load 0x0,0x3
0274 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0275 4800 |H | Short_Literal 0x0
0276 4800 |H | Short_Literal 0x0
0277 e5fe | | Load 0x2,-0x2
0278 e001 | | Load 0x0,0x1
0279 181a | | Execute Package,Field_Execute,Field_Number 0x1a
027a c402 | | Store 0x2,0x2
027b 005a | Z | Store_Top Discrete,At_Offset_2
027c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0xc = 0x27c,0x5
027d 6802 |h | Jump_Zero 0x280
027e 6065 |`e | Indirect_Literal Discrete,0x2e4,{0x00000000, 0x56df5502} ; Debug Table 0xb.0xd = 0x27e,0x6
027f 0257 | W | Execute Discrete,Raise
0280 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0xe = 0x280,0x7
0281 8215 | | Call 0x1,0x15
0282 00d9 | | Load_Top At_Offset_1
0283 016d | m | Execute Variant_Record,Structure_Write
0284 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0xf = 0x284,0x8
0285 8214 | | Call 0x1,0x14
0286 6802 |h | Jump_Zero 0x289
0287 6058 |`X | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x56df5501} ; Debug Table 0xb.0x10 = 0x287,0x9
0288 0257 | W | Execute Discrete,Raise
0289 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x11 = 0x289,0xa
028a e001 | | Load 0x0,0x1
028b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
028c 1815 | | Execute Package,Field_Execute,Field_Number 0x15
028d 4976 |Iv | Short_Literal 0x176
028e 00eb | | Load_Encached Diana_Cache
028f 0098 | | Execute Package,Field_Read_Dynamic
0290 180f | | Execute Package,Field_Execute,Field_Number 0xf
0291 00eb | | Load_Encached Diana_Cache
0292 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0293 e5ff | | Load 0x2,-0x1
0294 00eb | | Load_Encached Diana_Cache
0295 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0
0296 00eb | | Load_Encached Diana_Cache
0297 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0298 00eb | | Load_Encached Diana_Cache
0299 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
029a 6806 |h | Jump_Zero 0x2a1
029b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x12 = 0x29b,0xb
029c e5ff | | Load 0x2,-0x1
029d 00eb | | Load_Encached Diana_Cache
029e 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
029f 8216 | | Call 0x1,0x16
02a0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02a1 603e |`> | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x56df5501} ; Debug Table 0xb.0x13 = 0x2a1,0xc
02a2 0257 | W | Execute Discrete,Raise
02a3 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x14 = 0x2a3,0xd
02a4 e001 | | Load 0x0,0x1
02a5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02a6 6802 |h | Jump_Zero 0x2a9
02a7 6038 |`8 | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x56df5501} ; Debug Table 0xb.0x15 = 0x2a7,0xe
02a8 0257 | W | Execute Discrete,Raise
02a9 e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x16 = 0x2a9,0xf
02aa 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02ab 00db | | Load_Top At_Offset_3
02ac 0120 | | Execute Any,Is_Value
02ad 6804 |h | Jump_Zero 0x2b2
02ae e001 | | Load 0x0,0x1
02af 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02b1 7801 |x | Jump 0x2b3
02b2 00db | | Load_Top At_Offset_3
02b3 e003 | | Load 0x0,0x3
02b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02b5 4800 |H | Short_Literal 0x0
02b6 4800 |H | Short_Literal 0x0
02b7 e5fe | | Load 0x2,-0x2
02b8 e001 | | Load 0x0,0x1
02b9 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02ba c402 | | Store 0x2,0x2
02bb 005a | Z | Store_Top Discrete,At_Offset_2
02bc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0x17 = 0x2bc,0x10
02bd 6802 |h | Jump_Zero 0x2c0
02be 6025 |`% | Indirect_Literal Discrete,0x2e4,{0x00000000, 0x56df5502} ; Debug Table 0xb.0x18 = 0x2be,0x11
02bf 0257 | W | Execute Discrete,Raise
02c0 e5fe | | Load 0x2,-0x2 ; Debug Table 0xb.0x19 = 0x2c0,0x12
02c1 8213 | | Call 0x1,0x13
02c2 7006 |p | Jump_Nonzero 0x2c9
02c3 00da | | Load_Top At_Offset_2
02c4 8215 | | Call 0x1,0x15
02c5 8214 | | Call 0x1,0x14
02c6 7002 |p | Jump_Nonzero 0x2c9
02c7 6018 |` | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x56df5501} ; Debug Table 0xb.0x1a = 0x2c7,0x13
02c8 0257 | W | Execute Discrete,Raise
02c9 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1b = 0x2c9,0x14
02ca e001 | | Load 0x0,0x1
02cb 1b13 | | Execute Package,Field_Read,Field_Number 0x13
02cc 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02cd 4976 |Iv | Short_Literal 0x176
02ce 00eb | | Load_Encached Diana_Cache
02cf 0098 | | Execute Package,Field_Read_Dynamic
02d0 180f | | Execute Package,Field_Execute,Field_Number 0xf
02d1 00eb | | Load_Encached Diana_Cache
02d2 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
02d3 e5ff | | Load 0x2,-0x1
02d4 00eb | | Load_Encached Diana_Cache
02d5 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
02d6 00eb | | Load_Encached Diana_Cache
02d7 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
02d8 7002 |p | Jump_Nonzero 0x2db
02d9 6006 |` | Indirect_Literal Discrete,0x2e0,{0x00000000, 0x56df5501} ; Debug Table 0xb.0x1c = 0x2d9,0x15
02da 0257 | W | Execute Discrete,Raise
02db 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02dc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
02e0 0000 0000 | | .LITERAL {0x00000000, 0x56df5501}
02e4 0000 0000 | | .LITERAL {0x00000000, 0x56df5502}
02e8 ; --------------------------------------------------------------------------------------
02e8 ; STRING TABLE
02e8 ; --------------------------------------------------------------------------------------
02e8 0006 | | .STRTAB 0x0006->0x02eb ; "Set_Unit_State"
02e9 0012 | | .STRTAB 0x0012->0x02f2 ; "Name_Managed_Object"
02ea 0023 | # | .STREND 0x0023->0x02fb
02eb 5365 745f |Set_| .STRTAB_STRINGS
02fc 0000 0000 | | .BLANK 0000[0x4]
0300 ; --------------------------------------------------------------------------------------
0300 ; Debug Table
0300 ; --------------------------------------------------------------------------------------
0300 0003 000c | | .CONST 0x0003,0x000c
0302 000b 0362 | b| .DEBUG 0x000b,0x0362,0x8000,0x0000,0x0056,0xdb05,0x0000,0x000d
030a 001b 0376 | v| .DEBUG 0x001b,0x0376,0x8000,0x0000,0x0056,0xdf55,0x0000,0x001b
0312 003b 0398 | ; | .DEBUG 0x003b,0x0398,0x0002,0x0000,0x0056,0xdb05,0x0000,0x001c
031a 00b3 03cc | | .DEBUG 0x00b3,0x03cc,0x0002,0x0000,0x0056,0xdb05,0x0000,0x0029
0322 00c3 03d4 | | .DEBUG 0x00c3,0x03d4,0x0001,0x0000,0x0056,0xdb05,0x0000,0x003a
032a 0113 03f0 | | .DEBUG 0x0113,0x03f0,0x0001,0x0000,0x0056,0xdb05,0x0000,0x0062
0332 013b 03fe | ; | .DEBUG 0x013b,0x03fe,0x0001,0x0000,0x0056,0xdb05,0x0000,0x008a
033a 0153 0406 | S | .DEBUG 0x0153,0x0406,0x0001,0x0000,0x0056,0xdb05,0x0000,0x00b2
0342 01cb 0438 | 8| .DEBUG 0x01cb,0x0438,0x0002,0x0000,0x0056,0xdf55,0x0000,0x004c
034a 01fb 0446 | F| .DEBUG 0x01fb,0x0446,0x0002,0x0000,0x0056,0xdf55,0x0000,0x00a1
0352 022b 0454 | + T| .DEBUG 0x022b,0x0454,0x0002,0x0000,0x0056,0xdf55,0x0000,0x00ee
035a 024b 045e | K ^| .DEBUG 0x024b,0x045e,0x0001,0x0000,0x0056,0xdf55,0x0000,0x021d
0362 ; --------------------------------------------------------------------------------------
0362 ; Debug3 Subtable 0x0
0362 ; --------------------------------------------------------------------------------------
0362 0009 0000 | | .DBG3TAB 0x0009,0x0000
0364 000b ffff | | .CONST 0x000b,0xffff
0366 000c fffe | | .CONST 0x000c,0xfffe
0368 000d fffd | | .CONST 0x000d,0xfffd
036a 000e fffc | | .CONST 0x000e,0xfffc
036c 0010 fffb | | .CONST 0x0010,0xfffb
036e 0012 fffa | | .CONST 0x0012,0xfffa
0370 0014 fff9 | | .CONST 0x0014,0xfff9
0372 0016 fff8 | | .CONST 0x0016,0xfff8
0374 0018 fff7 | | .CONST 0x0018,0xfff7
0376 ; --------------------------------------------------------------------------------------
0376 ; Debug3 Subtable 0x1
0376 ; --------------------------------------------------------------------------------------
0376 0010 0000 | | .DBG3TAB 0x0010,0x0000
0378 001b ffff | | .CONST 0x001b,0xffff
037a 001c fffe | | .CONST 0x001c,0xfffe
037c 001d fffd | | .CONST 0x001d,0xfffd
037e 001e fffc | | .CONST 0x001e,0xfffc
0380 001f fffb | | .CONST 0x001f,0xfffb
0382 0020 fffa | | .CONST 0x0020,0xfffa
0384 0021 fff9 | ! | .CONST 0x0021,0xfff9
0386 0023 fff8 | # | .CONST 0x0023,0xfff8
0388 0025 fff7 | % | .CONST 0x0025,0xfff7
038a 0027 fff6 | ' | .CONST 0x0027,0xfff6
038c 0029 fff5 | ) | .CONST 0x0029,0xfff5
038e 002b fff4 | + | .CONST 0x002b,0xfff4
0390 002d fff3 | - | .CONST 0x002d,0xfff3
0392 002f fff2 | / | .CONST 0x002f,0xfff2
0394 0031 fff1 | 1 | .CONST 0x0031,0xfff1
0396 0033 fff0 | 3 | .CONST 0x0033,0xfff0
0398 ; --------------------------------------------------------------------------------------
0398 ; Debug3 Subtable 0x2
0398 ; --------------------------------------------------------------------------------------
0398 0006 0013 | | .DBG3TAB 0x0006,0x0013
039a 003b ffff | ; | .CONST 0x003b,0xffff
039c 0041 fffe | A | .CONST 0x0041,0xfffe
039e 0042 fffd | B | .CONST 0x0042,0xfffd
03a0 0043 fffc | C | .CONST 0x0043,0xfffc
03a2 0044 fffb | D | .CONST 0x0044,0xfffb
03a4 0046 fffa | F | .CONST 0x0046,0xfffa
03a6 004b 0001 | K | .CONST 0x004b,0x0001
03a8 004f 0002 | O | .CONST 0x004f,0x0002
03aa 0050 0401 | P | .CONST 0x0050,0x0401
03ac 0051 0002 | Q | .CONST 0x0051,0x0002
03ae 0052 0003 | R | .CONST 0x0052,0x0003
03b0 0065 0004 | e | .CONST 0x0065,0x0004
03b2 0067 0005 | g | .CONST 0x0067,0x0005
03b4 0069 0006 | i | .CONST 0x0069,0x0006
03b6 006e 0007 | n | .CONST 0x006e,0x0007
03b8 0074 0008 | t | .CONST 0x0074,0x0008
03ba 0078 0009 | x | .CONST 0x0078,0x0009
03bc 0085 000a | | .CONST 0x0085,0x000a
03be 008c 000b | | .CONST 0x008c,0x000b
03c0 0095 000c | | .CONST 0x0095,0x000c
03c2 0098 000d | | .CONST 0x0098,0x000d
03c4 009a 000e | | .CONST 0x009a,0x000e
03c6 009e 000f | | .CONST 0x009e,0x000f
03c8 00a1 0010 | | .CONST 0x00a1,0x0010
03ca 00a3 0011 | | .CONST 0x00a3,0x0011
03cc ; --------------------------------------------------------------------------------------
03cc ; Debug3 Subtable 0x3
03cc ; --------------------------------------------------------------------------------------
03cc 0000 0003 | | .DBG3TAB 0x0000,0x0003
03ce 00b3 0001 | | .CONST 0x00b3,0x0001
03d0 00b6 0002 | | .CONST 0x00b6,0x0002
03d2 00bb 0003 | | .CONST 0x00bb,0x0003
03d4 ; --------------------------------------------------------------------------------------
03d4 ; Debug3 Subtable 0x4
03d4 ; --------------------------------------------------------------------------------------
03d4 0004 0009 | | .DBG3TAB 0x0004,0x0009
03d6 00c3 ffff | | .CONST 0x00c3,0xffff
03d8 00c5 fffe | | .CONST 0x00c5,0xfffe
03da 00ce fffd | | .CONST 0x00ce,0xfffd
03dc 00d1 0401 | | .CONST 0x00d1,0x0401
03de 00d2 fffd | | .CONST 0x00d2,0xfffd
03e0 00d4 0001 | | .CONST 0x00d4,0x0001
03e2 00e0 0002 | | .CONST 0x00e0,0x0002
03e4 00e3 0003 | | .CONST 0x00e3,0x0003
03e6 00ed 0004 | | .CONST 0x00ed,0x0004
03e8 00f4 0005 | | .CONST 0x00f4,0x0005
03ea 00f8 0006 | | .CONST 0x00f8,0x0006
03ec 00fb 0007 | | .CONST 0x00fb,0x0007
03ee 0102 0008 | | .CONST 0x0102,0x0008
03f0 ; --------------------------------------------------------------------------------------
03f0 ; Debug3 Subtable 0x5
03f0 ; --------------------------------------------------------------------------------------
03f0 0002 0004 | | .DBG3TAB 0x0002,0x0004
03f2 0113 ffff | | .CONST 0x0113,0xffff
03f4 0115 fffe | | .CONST 0x0115,0xfffe
03f6 011a 0001 | | .CONST 0x011a,0x0001
03f8 0125 0002 | % | .CONST 0x0125,0x0002
03fa 0127 0003 | ' | .CONST 0x0127,0x0003
03fc 0130 0004 | 0 | .CONST 0x0130,0x0004
03fe ; --------------------------------------------------------------------------------------
03fe ; Debug3 Subtable 0x6
03fe ; --------------------------------------------------------------------------------------
03fe 0000 0003 | | .DBG3TAB 0x0000,0x0003
0400 013b 0001 | ; | .CONST 0x013b,0x0001
0402 0144 0401 | D | .CONST 0x0144,0x0401
0404 0147 0001 | G | .CONST 0x0147,0x0001
0406 ; --------------------------------------------------------------------------------------
0406 ; Debug3 Subtable 0x7
0406 ; --------------------------------------------------------------------------------------
0406 0007 0011 | | .DBG3TAB 0x0007,0x0011
0408 0153 ffff | S | .CONST 0x0153,0xffff
040a 0158 fffe | X | .CONST 0x0158,0xfffe
040c 015b 0401 | [ | .CONST 0x015b,0x0401
040e 015c fffe | \ | .CONST 0x015c,0xfffe
0410 015e fffd | ^ | .CONST 0x015e,0xfffd
0412 0167 fffc | g | .CONST 0x0167,0xfffc
0414 0169 fffb | i | .CONST 0x0169,0xfffb
0416 016e fffa | n | .CONST 0x016e,0xfffa
0418 0170 0001 | p | .CONST 0x0170,0x0001
041a 017a 0002 | z | .CONST 0x017a,0x0002
041c 017d 0003 | } | .CONST 0x017d,0x0003
041e 0188 0004 | | .CONST 0x0188,0x0004
0420 018b 0005 | | .CONST 0x018b,0x0005
0422 018e 0006 | | .CONST 0x018e,0x0006
0424 0190 0007 | | .CONST 0x0190,0x0007
0426 0191 0008 | | .CONST 0x0191,0x0008
0428 0193 0009 | | .CONST 0x0193,0x0009
042a 01a0 000a | | .CONST 0x01a0,0x000a
042c 01a3 000b | | .CONST 0x01a3,0x000b
042e 01a5 000c | | .CONST 0x01a5,0x000c
0430 01ae 000d | | .CONST 0x01ae,0x000d
0432 01b0 000e | | .CONST 0x01b0,0x000e
0434 01b3 000f | | .CONST 0x01b3,0x000f
0436 01ba 0010 | | .CONST 0x01ba,0x0010
0438 ; --------------------------------------------------------------------------------------
0438 ; Debug3 Subtable 0x8
0438 ; --------------------------------------------------------------------------------------
0438 0002 0004 | | .DBG3TAB 0x0002,0x0004
043a 01cb ffff | | .CONST 0x01cb,0xffff
043c 01d1 fffe | | .CONST 0x01d1,0xfffe
043e 01d3 0001 | | .CONST 0x01d3,0x0001
0440 01e6 0002 | | .CONST 0x01e6,0x0002
0442 01e8 0003 | | .CONST 0x01e8,0x0003
0444 01ea 0004 | | .CONST 0x01ea,0x0004
0446 ; --------------------------------------------------------------------------------------
0446 ; Debug3 Subtable 0x9
0446 ; --------------------------------------------------------------------------------------
0446 0002 0004 | | .DBG3TAB 0x0002,0x0004
0448 01fb ffff | | .CONST 0x01fb,0xffff
044a 0201 fffe | | .CONST 0x0201,0xfffe
044c 0203 0001 | | .CONST 0x0203,0x0001
044e 0216 0002 | | .CONST 0x0216,0x0002
0450 0218 0003 | | .CONST 0x0218,0x0003
0452 021a 0004 | | .CONST 0x021a,0x0004
0454 ; --------------------------------------------------------------------------------------
0454 ; Debug3 Subtable 0xa
0454 ; --------------------------------------------------------------------------------------
0454 0002 0002 | | .DBG3TAB 0x0002,0x0002
0456 022b ffff | + | .CONST 0x022b,0xffff
0458 022d fffe | - | .CONST 0x022d,0xfffe
045a 0233 0001 | 3 | .CONST 0x0233,0x0001
045c 0243 0002 | C | .CONST 0x0243,0x0002
045e ; --------------------------------------------------------------------------------------
045e ; Debug3 Subtable 0xb
045e ; --------------------------------------------------------------------------------------
045e 0003 001a | | .DBG3TAB 0x0003,0x001a
0460 024b ffff | K | .CONST 0x024b,0xffff
0462 0251 fffe | Q | .CONST 0x0251,0xfffe
0464 0253 fffd | S | .CONST 0x0253,0xfffd
0466 0258 0001 | X | .CONST 0x0258,0x0001
0468 0259 0401 | Y | .CONST 0x0259,0x0401
046a 025b 0402 | [ | .CONST 0x025b,0x0402
046c 025c 0403 | \ | .CONST 0x025c,0x0403
046e 025d 0404 | ] | .CONST 0x025d,0x0404
0470 025e 0001 | ^ | .CONST 0x025e,0x0001
0472 0260 0002 | ` | .CONST 0x0260,0x0002
0474 0267 0003 | g | .CONST 0x0267,0x0003
0476 0269 0004 | i | .CONST 0x0269,0x0004
0478 027c 0005 | | | .CONST 0x027c,0x0005
047a 027e 0006 | ~ | .CONST 0x027e,0x0006
047c 0280 0007 | | .CONST 0x0280,0x0007
047e 0284 0008 | | .CONST 0x0284,0x0008
0480 0287 0009 | | .CONST 0x0287,0x0009
0482 0289 000a | | .CONST 0x0289,0x000a
0484 029b 000b | | .CONST 0x029b,0x000b
0486 02a1 000c | | .CONST 0x02a1,0x000c
0488 02a3 000d | | .CONST 0x02a3,0x000d
048a 02a7 000e | | .CONST 0x02a7,0x000e
048c 02a9 000f | | .CONST 0x02a9,0x000f
048e 02bc 0010 | | .CONST 0x02bc,0x0010
0490 02be 0011 | | .CONST 0x02be,0x0011
0492 02c0 0012 | | .CONST 0x02c0,0x0012
0494 02c7 0013 | | .CONST 0x02c7,0x0013
0496 02c9 0014 | | .CONST 0x02c9,0x0014
0498 02d9 0015 | | .CONST 0x02d9,0x0015
049a 0000 0000 | | .BLANK 0000[0x166]