|
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: 7168 (0x1c00)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦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 0928 | ( | .CONST 0x0928 ; 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 0006 | | .CONST 0x0006 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0078 | x | .CONST 0x0078 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002c | , | .CONST 0x002c ; Number of locals
000b INIT_0008:
000b 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0a42,0x0000,0x0000,0x005a,0x8bd5,0x0000,0x0b34
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 029a 0403 | | Declare_Subprogram INIT_0400,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1f,0xfff5
0021 029a 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x21,0xfff4
0023 029a 0483 | | Declare_Subprogram INIT_0480,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x23,0xfff3
0025 029a 049b | | Declare_Subprogram INIT_0498,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x25,0xfff2
0027 029a 04b3 | | Declare_Subprogram INIT_04b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x27,0xfff1
0029 029a 04f3 | | Declare_Subprogram INIT_04f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x29,0xfff0
002b 029a 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x10 = 0x2b,0xffef
002d 029a 0533 | 3| Declare_Subprogram INIT_0530,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x2d,0xffee
002f 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x2f,0xffed
0031 029a 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x13 = 0x31,0xffec
0033 029a 05b3 | | Declare_Subprogram INIT_05b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x14 = 0x33,0xffeb
0035 029a 05d3 | | Declare_Subprogram INIT_05d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x15 = 0x35,0xffea
0037 00bf | | Action Accept_Activation
0038 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1 = .DEBUG 0x0038,0x0a70,0x0000,0x0000,0x005a,0x8c75,0x0000,0x0004
; Debug Table 0x1.0x0 = 0x38,0xffff
0039 00c7 | | Action Elaborate_Subprogram
003a 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x1 = 0x3a,0xfffe
003b 00c7 | | Action Elaborate_Subprogram
003c 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x2 = 0x3c,0xfffd
003d 00c7 | | Action Elaborate_Subprogram
003e 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x1.0x3 = 0x3e,0xfffc
003f 00c7 | | Action Elaborate_Subprogram
0040 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 ; Debug Table 0x1.0x4 = 0x40,0xfffb
0041 00c7 | | Action Elaborate_Subprogram
0042 029d 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call ; Debug Table 0x1.0x5 = 0x42,0xfffa
0044 029d 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call ; Debug Table 0x1.0x6 = 0x44,0xfff9
0046 029d 060b | | Declare_Subprogram INIT_0608,For_Outer_Call ; Debug Table 0x1.0x7 = 0x46,0xfff8
0048 029d 061b | | Declare_Subprogram INIT_0618,For_Outer_Call ; Debug Table 0x1.0x8 = 0x48,0xfff7
004a 029d 064b | K| Declare_Subprogram INIT_0648,For_Outer_Call ; Debug Table 0x1.0x9 = 0x4a,0xfff6
004c 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xa = 0x4c,0xfff5
004d 00c7 | | Action Elaborate_Subprogram
004e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xb = 0x4e,0xfff4
004f 00c7 | | Action Elaborate_Subprogram
0050 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xc = 0x50,0xfff3
0051 00c7 | | Action Elaborate_Subprogram
0052 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xd = 0x52,0xfff2
0053 00c7 | | Action Elaborate_Subprogram
0054 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0xe = 0x54,0xfff1
0055 00c7 | | Action Elaborate_Subprogram
0056 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0xf = 0x56,0xfff0
0057 00c7 | | Action Elaborate_Subprogram
0058 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0x10 = 0x58,0xffef
0059 00c7 | | Action Elaborate_Subprogram
005a 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 ; Debug Table 0x1.0x11 = 0x5a,0xffee
005b 00c7 | | Action Elaborate_Subprogram
005c 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x12 = 0x5c,0xffed
005d 00c7 | | Action Elaborate_Subprogram
005e 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x13 = 0x5e,0xffec
005f 00c7 | | Action Elaborate_Subprogram
0060 029d 068b | | Declare_Subprogram INIT_0688,For_Outer_Call ; Debug Table 0x1.0x14 = 0x60,0xffeb
0062 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x15 = 0x62,0xffea
0063 00c7 | | Action Elaborate_Subprogram
0064 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x16 = 0x64,0xffe9
0065 00c7 | | Action Elaborate_Subprogram
0066 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x17 = 0x66,0xffe8
0067 00c7 | | Action Elaborate_Subprogram
0068 029d 06cb | | Declare_Subprogram INIT_06c8,For_Outer_Call ; Debug Table 0x1.0x18 = 0x68,0xffe7
006a 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x19 = 0x6a,0xffe6
006b 00c7 | | Action Elaborate_Subprogram
006c 029d 0713 | | Declare_Subprogram INIT_0710,For_Outer_Call ; Debug Table 0x1.0x1a = 0x6c,0xffe5
006e 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x1b = 0x6e,0xffe4
006f 00c7 | | Action Elaborate_Subprogram
0070 029d 076b | k| Declare_Subprogram INIT_0768,For_Outer_Call ; Debug Table 0x1.0x1c = 0x70,0xffe3
0072 029d 079b | | Declare_Subprogram INIT_0798,For_Outer_Call ; Debug Table 0x1.0x1d = 0x72,0xffe2
0074 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x1e = 0x74,0xffe1
0075 00c7 | | Action Elaborate_Subprogram
0076 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x1f = 0x76,0xffe0
0077 00c7 | | Action Elaborate_Subprogram
0078 BODY_0008:
0078 00bc | | Action Signal_Activated
0079 00bb | | Action Signal_Completion
007a 0000 0000 | | .BLANK 0000[0x6]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 008c | | .CONST 0x008c ; Address of begin
0081 00dc | | .CONST 0x00dc ; Address of exception handler
0082 0004 | | .CONST 0x0004 ; Number of locals
0083 INIT_0080:
0083 e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x0083,0x0ab2,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b35
; Debug Table 0x2.0x0 = 0x83,0xffff
0084 0007 | | Action Break_Optional
0085 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x1 = 0x85,0xfffe
0086 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0087 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x2 = 0x87,0xfffd
0088 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0089 0322 | " | Declare_Variable Record
008a 00d8 | | Load_Top At_Offset_0
008b 1c00 | | Execute_Immediate Run_Utility,0x0
008c BODY_0080:
008c e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x3 = 0x8c,0x1
008d e003 | | Load 0x0,0x3
008e 1853 | S | Execute Package,Field_Execute,Field_Number 0x53
008f e003 | | Load 0x0,0x3
0090 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0091 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0092 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x4 = 0x92,0x2
0093 0217 | | Execute Heap_Access,All_Reference
0094 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0095 0f03 | | Execute_Immediate Equal,0x3
0096 6806 |h | Jump_Zero 0x9d
0097 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x5 = 0x97,0x3
0098 e5fe | | Load 0x2,-0x2
0099 e5ff | | Load 0x2,-0x1
009a e402 | | Load 0x2,0x2
009b 822c | , | Call 0x1,0x2c
009c 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x2.0x6 = 0x9c,0x4
009d e003 | | Load 0x0,0x3 ; Debug Table 0x2.0x7 = 0x9d,0x5
009e 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
009f 00d9 | | Load_Top At_Offset_1
00a0 017d | } | Execute Record,Structure_Write
00a1 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x8 = 0xa1,0x6
00a2 e003 | | Load 0x0,0x3
00a3 1881 | | Execute Package,Field_Execute,Field_Number 0x81
00a4 4603 |F | Jump_Case 0x4
00a5 7809 |x | Jump 0xaf ; case 0x0
00a6 7823 |x# | Jump 0xca ; case 0x1
00a7 7807 |x | Jump 0xaf ; case 0x2
00a8 7800 |x | Jump 0xa9 ; case 0x3
00a9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x9 = 0xa9,0x7
00aa e003 | | Load 0x0,0x3
00ab 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
00ac 00db | | Load_Top At_Offset_3
00ad 8220 | | Call 0x1,0x20
00ae 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00af 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0xa = 0xaf,0x8
00b0 e003 | | Load 0x0,0x3
00b1 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
00b2 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00b3 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0xb = 0xb3,0x9
00b4 00d9 | | Load_Top At_Offset_1
00b5 e003 | | Load 0x0,0x3
00b6 1882 | | Execute Package,Field_Execute,Field_Number 0x82
00b7 7004 |p | Jump_Nonzero 0xbc
00b8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0xc = 0xb8,0xa
00b9 00db | | Load_Top At_Offset_3
00ba 8220 | | Call 0x1,0x20
00bb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00bc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0xd = 0xbc,0xb
00bd 0c02 | | Execute_Immediate Greater_Equal,0x2
00be 6806 |h | Jump_Zero 0xc5
00bf 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0xe = 0xbf,0xc
00c0 0aff | | Execute_Immediate Plus,-0x1
00c1 0248 | H | Execute Discrete,Check_In_Integer
00c2 00db | | Load_Top At_Offset_3
00c3 8220 | | Call 0x1,0x20
00c4 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00c5 0092 0820 | | Action Push_String_Extended,0x820 ; "cursor is on first line"
; Debug Table 0x2.0xf = 0xc5,0xd
00c7 e004 | | Load 0x0,0x4
00c8 180d | | Execute Package,Field_Execute,Field_Number 0xd
00c9 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00ca 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x10 = 0xca,0xe
00cb e003 | | Load 0x0,0x3
00cc 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
00cd 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
00ce 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x11 = 0xce,0xf
00cf 0c02 | | Execute_Immediate Greater_Equal,0x2
00d0 6806 |h | Jump_Zero 0xd7
00d1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x12 = 0xd1,0x10
00d2 0aff | | Execute_Immediate Plus,-0x1
00d3 0248 | H | Execute Discrete,Check_In_Integer
00d4 00db | | Load_Top At_Offset_3
00d5 8220 | | Call 0x1,0x20
00d6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00d7 0092 0820 | | Action Push_String_Extended,0x820 ; "cursor is on first line"
; Debug Table 0x2.0x13 = 0xd7,0x11
00d9 e004 | | Load 0x0,0x4
00da 180d | | Execute Package,Field_Execute,Field_Number 0xd
00db 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00dc TRAP_0080:
00dc 62ef |b | Indirect_Literal Discrete,0x3cc,{0x00000000, 0x5a8bd501}
00dd 010f | | Execute Exception,Equal
00de 6807 |h | Jump_Zero 0xe6
00df 0092 0821 | !| Action Push_String_Extended,0x821 ; "doe_error"
; Debug Table 0x2.0x14 = 0xdf,0x12
00e1 0092 0822 | "| Action Push_String_Extended,0x822 ; "previous"
00e3 e005 | | Load 0x0,0x5
00e4 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00e5 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00e6 e006 | | Load 0x0,0x6 ; Debug Table 0x2.0x15 = 0xe6,0x13
00e7 180d | | Execute Package,Field_Execute,Field_Number 0xd
00e8 0092 0822 | "| Action Push_String_Extended,0x822 ; "previous"
00ea e005 | | Load 0x0,0x5
00eb 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00ec 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00ed 0000 0000 | | .XXX[0x3]
00ef 0000 | |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00fe | | .CONST 0x00fe ; Address of begin
00f1 016a | j | .CONST 0x016a ; Address of exception handler
00f2 0005 | | .CONST 0x0005 ; Number of locals
00f3 INIT_00f0:
00f3 e001 | | Load 0x0,0x1 ; Debug Table 0x3 = .DEBUG 0x00f3,0x0ae0,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b49
; Debug Table 0x3.0x0 = 0xf3,0xffff
00f4 0007 | | Action Break_Optional
00f5 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x1 = 0xf5,0xfffe
00f6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00f7 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x2 = 0xf7,0xfffd
00f8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00f9 e002 | | Load 0x0,0x2 ; Debug Table 0x3.0x3 = 0xf9,0xfffc
00fa 1b12 | | Execute Package,Field_Read,Field_Number 0x12
00fb 0322 | " | Declare_Variable Record
00fc 00d8 | | Load_Top At_Offset_0
00fd 1c00 | | Execute_Immediate Run_Utility,0x0
00fe BODY_00f0:
00fe e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x4 = 0xfe,0x1
00ff e003 | | Load 0x0,0x3
0100 1853 | S | Execute Package,Field_Execute,Field_Number 0x53
0101 e003 | | Load 0x0,0x3
0102 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0103 a402 | | Store_Unchecked 0x2,0x2
0104 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x5 = 0x104,0x2
0105 0217 | | Execute Heap_Access,All_Reference
0106 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0107 0f03 | | Execute_Immediate Equal,0x3
0108 6806 |h | Jump_Zero 0x10f
0109 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x6 = 0x109,0x3
010a e5fe | | Load 0x2,-0x2
010b e5ff | | Load 0x2,-0x1
010c e402 | | Load 0x2,0x2
010d 822b | + | Call 0x1,0x2b
010e 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x3.0x7 = 0x10e,0x4
010f e003 | | Load 0x0,0x3 ; Debug Table 0x3.0x8 = 0x10f,0x5
0110 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
0111 00d9 | | Load_Top At_Offset_1
0112 017d | } | Execute Record,Structure_Write
0113 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x9 = 0x113,0x6
0114 e003 | | Load 0x0,0x3
0115 1881 | | Execute Package,Field_Execute,Field_Number 0x81
0116 4603 |F | Jump_Case 0x4
0117 7819 |x | Jump 0x131 ; case 0x0
0118 7839 |x9 | Jump 0x152 ; case 0x1
0119 7817 |x | Jump 0x131 ; case 0x2
011a 7800 |x | Jump 0x11b ; case 0x3
011b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xa = 0x11b,0x7
011c e003 | | Load 0x0,0x3
011d 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
011e 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
011f 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0xb = 0x11f,0x8
0120 0217 | | Execute Heap_Access,All_Reference
0121 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0122 e003 | | Load 0x0,0x3
0123 1869 | i | Execute Package,Field_Execute,Field_Number 0x69
0124 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0125 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0xc = 0x125,0x9
0126 00da | | Load_Top At_Offset_2
0127 027d | } | Execute Discrete,Greater
0128 6804 |h | Jump_Zero 0x12d
0129 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0xd = 0x129,0xa
012a e402 | | Load 0x2,0x2
012b 8220 | | Call 0x1,0x20
012c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
012d 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0xe = 0x12d,0xb
012e e402 | | Load 0x2,0x2
012f 8220 | | Call 0x1,0x20
0130 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0131 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0xf = 0x131,0xc
0132 e003 | | Load 0x0,0x3
0133 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0134 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0135 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x10 = 0x135,0xd
0136 0217 | | Execute Heap_Access,All_Reference
0137 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0138 e003 | | Load 0x0,0x3
0139 1869 | i | Execute Package,Field_Execute,Field_Number 0x69
013a 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
013b 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x11 = 0x13b,0xe
013c 00da | | Load_Top At_Offset_2
013d 027b | { | Execute Discrete,Greater_Equal
013e 6804 |h | Jump_Zero 0x143
013f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x12 = 0x13f,0xf
0140 e402 | | Load 0x2,0x2
0141 8220 | | Call 0x1,0x20
0142 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0143 e5fe | | Load 0x2,-0x2 ; Debug Table 0x3.0x13 = 0x143,0x10
0144 00d9 | | Load_Top At_Offset_1
0145 e003 | | Load 0x0,0x3
0146 1882 | | Execute Package,Field_Execute,Field_Number 0x82
0147 6806 |h | Jump_Zero 0x14e
0148 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x14 = 0x148,0x11
0149 0a01 | | Execute_Immediate Plus,0x1
014a 0248 | H | Execute Discrete,Check_In_Integer
014b e402 | | Load 0x2,0x2
014c 8220 | | Call 0x1,0x20
014d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
014e 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x15 = 0x14e,0x12
014f e402 | | Load 0x2,0x2
0150 8220 | | Call 0x1,0x20
0151 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0152 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x16 = 0x152,0x13
0153 e003 | | Load 0x0,0x3
0154 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0155 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
0156 00db | | Load_Top At_Offset_3 ; Debug Table 0x3.0x17 = 0x156,0x14
0157 0217 | | Execute Heap_Access,All_Reference
0158 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0159 e003 | | Load 0x0,0x3
015a 1869 | i | Execute Package,Field_Execute,Field_Number 0x69
015b 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
015c 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x18 = 0x15c,0x15
015d 00da | | Load_Top At_Offset_2
015e 027b | { | Execute Discrete,Greater_Equal
015f 6804 |h | Jump_Zero 0x164
0160 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x19 = 0x160,0x16
0161 e402 | | Load 0x2,0x2
0162 8220 | | Call 0x1,0x20
0163 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0164 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x1a = 0x164,0x17
0165 0a01 | | Execute_Immediate Plus,0x1
0166 0248 | H | Execute Discrete,Check_In_Integer
0167 e402 | | Load 0x2,0x2
0168 8220 | | Call 0x1,0x20
0169 4504 |E | Exit_Suprogram New_Top_Offset 0x4
016a TRAP_00f0:
016a 6261 |ba | Indirect_Literal Discrete,0x3cc,{0x00000000, 0x5a8bd501}
016b 010f | | Execute Exception,Equal
016c 6807 |h | Jump_Zero 0x174
016d 0092 0821 | !| Action Push_String_Extended,0x821 ; "doe_error"
; Debug Table 0x3.0x1b = 0x16d,0x18
016f 0092 0823 | #| Action Push_String_Extended,0x823 ; "next"
0171 e005 | | Load 0x0,0x5
0172 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0173 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0174 e006 | | Load 0x0,0x6 ; Debug Table 0x3.0x1c = 0x174,0x19
0175 180d | | Execute Package,Field_Execute,Field_Number 0xd
0176 0092 0823 | #| Action Push_String_Extended,0x823 ; "next"
0178 e005 | | Load 0x0,0x5
0179 181d | | Execute Package,Field_Execute,Field_Number 0x1d
017a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
017b 0000 0000 | | .BLANK 0000[0x5]
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 0192 | | .CONST 0x0192 ; Address of begin
0181 021e | | .CONST 0x021e ; Address of exception handler
0182 0005 | | .CONST 0x0005 ; Number of locals
0183 INIT_0180:
0183 e001 | | Load 0x0,0x1 ; Debug Table 0x4 = .DEBUG 0x0183,0x0b1c,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b5d
; Debug Table 0x4.0x0 = 0x183,0xffff
0184 0007 | | Action Break_Optional
0185 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x1 = 0x185,0xfffe
0186 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0187 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x2 = 0x187,0xfffd
0188 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0189 0322 | " | Declare_Variable Record
018a 00d8 | | Load_Top At_Offset_0
018b 1c00 | | Execute_Immediate Run_Utility,0x0
018c e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x3 = 0x18c,0xfffc
018d e003 | | Load 0x0,0x3
018e 1881 | | Execute Package,Field_Execute,Field_Number 0x81
018f e003 | | Load 0x0,0x3
0190 1b80 | | Execute Package,Field_Read,Field_Number 0x80
0191 03f1 | | Declare_Variable Discrete,With_Value
0192 BODY_0180:
0192 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x4 = 0x192,0x1
0193 e003 | | Load 0x0,0x3
0194 1853 | S | Execute Package,Field_Execute,Field_Number 0x53
0195 e003 | | Load 0x0,0x3
0196 1867 | g | Execute Package,Field_Execute,Field_Number 0x67
0197 a402 | | Store_Unchecked 0x2,0x2
0198 e003 | | Load 0x0,0x3 ; Debug Table 0x4.0x5 = 0x198,0x2
0199 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
019a 00da | | Load_Top At_Offset_2
019b 017d | } | Execute Record,Structure_Write
019c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x6 = 0x19c,0x3
019d 4603 |F | Jump_Case 0x4
019e 782a |x* | Jump 0x1c9 ; case 0x0
019f 7852 |xR | Jump 0x1f2 ; case 0x1
01a0 7828 |x( | Jump 0x1c9 ; case 0x2
01a1 7800 |x | Jump 0x1a2 ; case 0x3
01a2 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x7 = 0x1a2,0x4
01a3 0217 | | Execute Heap_Access,All_Reference
01a4 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01a5 0f03 | | Execute_Immediate Equal,0x3
01a6 6807 |h | Jump_Zero 0x1ae
01a7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x8 = 0x1a7,0x5
01a8 e003 | | Load 0x0,0x3
01a9 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
01aa e402 | | Load 0x2,0x2
01ab e5ff | | Load 0x2,-0x1
01ac 822a | * | Call 0x1,0x2a
01ad 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01ae e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x9 = 0x1ae,0x6
01af 0f01 | | Execute_Immediate Equal,0x1
01b0 6806 |h | Jump_Zero 0x1b7
01b1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0xa = 0x1b1,0x7
01b2 e003 | | Load 0x0,0x3
01b3 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
01b4 e402 | | Load 0x2,0x2
01b5 8220 | | Call 0x1,0x20
01b6 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01b7 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0xb = 0x1b7,0x8
01b8 0219 | | Execute Heap_Access,All_Read
01b9 e002 | | Load 0x0,0x2
01ba 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
01bb 00d9 | | Load_Top At_Offset_1
01bc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01bd e003 | | Load 0x0,0x3
01be 1884 | | Execute Package,Field_Execute,Field_Number 0x84
01bf 00da | | Load_Top At_Offset_2
01c0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01c1 c403 | | Store 0x2,0x3
01c2 00d1 | | Pop_Control Pop_Count_1
01c3 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xc = 0x1c3,0x9
01c4 0092 0824 | $| Action Push_String_Extended,0x824 ; "select_image"
01c6 e005 | | Load 0x0,0x5
01c7 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01c8 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01c9 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0xd = 0x1c9,0xa
01ca 00da | | Load_Top At_Offset_2
01cb e003 | | Load 0x0,0x3
01cc 1882 | | Execute Package,Field_Execute,Field_Number 0x82
01cd 6812 |h | Jump_Zero 0x1e0
01ce 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0xe = 0x1ce,0xb
01cf 0219 | | Execute Heap_Access,All_Read
01d0 e002 | | Load 0x0,0x2
01d1 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
01d2 00d9 | | Load_Top At_Offset_1
01d3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
01d4 e003 | | Load 0x0,0x3
01d5 1884 | | Execute Package,Field_Execute,Field_Number 0x84
01d6 00da | | Load_Top At_Offset_2
01d7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01d8 c403 | | Store 0x2,0x3
01d9 00d1 | | Pop_Control Pop_Count_1
01da 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0xf = 0x1da,0xc
01db 0092 0824 | $| Action Push_String_Extended,0x824 ; "select_image"
01dd e005 | | Load 0x0,0x5
01de 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01df 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01e0 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x10 = 0x1e0,0xd
01e1 0217 | | Execute Heap_Access,All_Reference
01e2 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01e3 0f03 | | Execute_Immediate Equal,0x3
01e4 6807 |h | Jump_Zero 0x1ec
01e5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x11 = 0x1e5,0xe
01e6 e003 | | Load 0x0,0x3
01e7 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
01e8 e402 | | Load 0x2,0x2
01e9 e5ff | | Load 0x2,-0x1
01ea 822a | * | Call 0x1,0x2a
01eb 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01ec 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x12 = 0x1ec,0xf
01ed e003 | | Load 0x0,0x3
01ee 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
01ef e402 | | Load 0x2,0x2
01f0 8220 | | Call 0x1,0x20
01f1 4504 |E | Exit_Suprogram New_Top_Offset 0x4
01f2 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x13 = 0x1f2,0x10
01f3 00da | | Load_Top At_Offset_2
01f4 e003 | | Load 0x0,0x3
01f5 1882 | | Execute Package,Field_Execute,Field_Number 0x82
01f6 7026 |p& | Jump_Nonzero 0x21d
01f7 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x14 = 0x1f7,0x11
01f8 0217 | | Execute Heap_Access,All_Reference
01f9 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
01fa 0f03 | | Execute_Immediate Equal,0x3
01fb 6807 |h | Jump_Zero 0x203
01fc 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x15 = 0x1fc,0x12
01fd e003 | | Load 0x0,0x3
01fe 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
01ff e402 | | Load 0x2,0x2
0200 e5ff | | Load 0x2,-0x1
0201 822a | * | Call 0x1,0x2a
0202 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0203 e5fd | | Load 0x2,-0x3 ; Debug Table 0x4.0x16 = 0x203,0x13
0204 0f01 | | Execute_Immediate Equal,0x1
0205 6806 |h | Jump_Zero 0x20c
0206 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x17 = 0x206,0x14
0207 e003 | | Load 0x0,0x3
0208 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0209 e402 | | Load 0x2,0x2
020a 8220 | | Call 0x1,0x20
020b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
020c 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x18 = 0x20c,0x15
020d 0219 | | Execute Heap_Access,All_Read
020e e002 | | Load 0x0,0x2
020f 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0210 00d9 | | Load_Top At_Offset_1
0211 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0212 e003 | | Load 0x0,0x3
0213 1884 | | Execute Package,Field_Execute,Field_Number 0x84
0214 00da | | Load_Top At_Offset_2
0215 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0216 c403 | | Store 0x2,0x3
0217 00d1 | | Pop_Control Pop_Count_1
0218 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x19 = 0x218,0x16
0219 0092 0824 | $| Action Push_String_Extended,0x824 ; "select_image"
021b e005 | | Load 0x0,0x5
021c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
021d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
021e TRAP_0180:
021e 61ad |a | Indirect_Literal Discrete,0x3cc,{0x00000000, 0x5a8bd501}
021f 010f | | Execute Exception,Equal
0220 6807 |h | Jump_Zero 0x228
0221 0092 0821 | !| Action Push_String_Extended,0x821 ; "doe_error"
; Debug Table 0x4.0x1a = 0x221,0x17
0223 0092 0825 | %| Action Push_String_Extended,0x825 ; "parent"
0225 e005 | | Load 0x0,0x5
0226 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0227 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0228 e006 | | Load 0x0,0x6 ; Debug Table 0x4.0x1b = 0x228,0x18
0229 180d | | Execute Package,Field_Execute,Field_Number 0xd
022a 0092 0825 | %| Action Push_String_Extended,0x825 ; "parent"
022c e005 | | Load 0x0,0x5
022d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
022e 4504 |E | Exit_Suprogram New_Top_Offset 0x4
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0235 | 5 | .CONST 0x0235 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0002 | | .CONST 0x0002 ; Number of locals
0233 INIT_0230:
0233 e002 | | Load 0x0,0x2 ; Debug Table 0x5 = .DEBUG 0x0233,0x0b56,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b71
; Debug Table 0x5.0x0 = 0x233,0xffff
0234 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0235 BODY_0230:
0235 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x1 = 0x235,0x1
0236 0219 | | Execute Heap_Access,All_Read
0237 e002 | | Load 0x0,0x2
0238 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0239 00d9 | | Load_Top At_Offset_1
023a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
023b e003 | | Load 0x0,0x3
023c 1854 | T | Execute Package,Field_Execute,Field_Number 0x54
023d 00da | | Load_Top At_Offset_2
023e 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
023f 005a | Z | Store_Top Discrete,At_Offset_2
0240 00d1 | | Pop_Control Pop_Count_1
0241 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x2 = 0x241,0x2
0242 680d |h | Jump_Zero 0x250
0243 0092 0826 | &| Action Push_String_Extended,0x826 ; "Couldn't open menu image handle ("
; Debug Table 0x5.0x3 = 0x243,0x3
0245 00d9 | | Load_Top At_Offset_1
0246 e002 | | Load 0x0,0x2
0247 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0248 025e | ^ | Execute Discrete,Convert
0249 1c01 | | Execute_Immediate Run_Utility,0x1
024a 01cc | | Execute Vector,Catenate
024b 0092 0827 | '| Action Push_String_Extended,0x827 ; ")"
024d 01cc | | Execute Vector,Catenate
024e e004 | | Load 0x0,0x4
024f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0250 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0251 0000 0000 | | .BLANK 0000[0x7]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025d | ] | .CONST 0x025d ; 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 0x6 = .DEBUG 0x025b,0x0b60,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b79
; Debug Table 0x6.0x0 = 0x25b,0xffff
025c 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
025d BODY_0258:
025d 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x1 = 0x25d,0x1
025e 0219 | | Execute Heap_Access,All_Read
025f e002 | | Load 0x0,0x2
0260 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0261 e003 | | Load 0x0,0x3
0262 1b41 | A | Execute Package,Field_Read,Field_Number 0x41
0263 4804 |H | Short_Literal 0x4
0264 4802 |H | Short_Literal 0x2
0265 e002 | | Load 0x0,0x2
0266 180e | | Execute Package,Field_Execute,Field_Number 0xe
0267 4802 |H | Short_Literal 0x2
0268 e5ff | | Load 0x2,-0x1
0269 0217 | | Execute Heap_Access,All_Reference
026a 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
026b e5ff | | Load 0x2,-0x1
026c e003 | | Load 0x0,0x3
026d 1848 | H | Execute Package,Field_Execute,Field_Number 0x48
026e 00da | | Load_Top At_Offset_2
026f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0270 005a | Z | Store_Top Discrete,At_Offset_2
0271 00d1 | | Pop_Control Pop_Count_1
0272 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x2 = 0x272,0x2
0273 0092 0828 | (| Action Push_String_Extended,0x828 ; "Edit"
0275 e005 | | Load 0x0,0x5
0276 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0277 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027d | } | .CONST 0x027d ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0002 | | .CONST 0x0002 ; Number of locals
027b INIT_0278:
027b e002 | | Load 0x0,0x2 ; Debug Table 0x7 = .DEBUG 0x027b,0x0b68,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b81
; Debug Table 0x7.0x0 = 0x27b,0xffff
027c 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
027d BODY_0278:
027d e002 | | Load 0x0,0x2 ; Debug Table 0x7.0x1 = 0x27d,0x1
027e 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
027f 4804 |H | Short_Literal 0x4
0280 e5ff | | Load 0x2,-0x1
0281 0217 | | Execute Heap_Access,All_Reference
0282 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0283 e003 | | Load 0x0,0x3
0284 187a | z | Execute Package,Field_Execute,Field_Number 0x7a
0285 0059 | Y | Store_Top Discrete,At_Offset_1
0286 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x2 = 0x286,0x2
0287 0092 0829 | )| Action Push_String_Extended,0x829 ; "set_image_state"
0289 e005 | | Load 0x0,0x5
028a 181e | | Execute Package,Field_Execute,Field_Number 0x1e
028b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
028c 0000 0000 | | .BLANK 0000[0x4]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0297 | | .CONST 0x0297 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0002 | | .CONST 0x0002 ; Number of locals
0293 INIT_0290:
0293 4fff |O | Short_Literal -0x1 ; Debug Table 0x8 = .DEBUG 0x0293,0x0b70,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b89
; Debug Table 0x8.0x0 = 0x293,0xffff
0294 e5fe | | Load 0x2,-0x2
0295 e007 | | Load 0x0,0x7
0296 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0297 BODY_0290:
0297 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1 = 0x297,0x1
0298 0217 | | Execute Heap_Access,All_Reference
0299 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
029a 0f0c | | Execute_Immediate Equal,0xc
029b 680c |h | Jump_Zero 0x2a8
029c 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x2 = 0x29c,0x2
029d 0219 | | Execute Heap_Access,All_Read
029e 00d8 | | Load_Top At_Offset_0
029f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02a0 0092 082a | *| Action Push_String_Extended,0x82a ; "obsolescence"
02a2 e003 | | Load 0x0,0x3
02a3 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
02a4 00d9 | | Load_Top At_Offset_1
02a5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02a6 00d1 | | Pop_Control Pop_Count_1
02a7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02a8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x3 = 0x2a8,0x3
02a9 01db | | Execute Vector,Length
02aa 0d1e | | Execute_Immediate Less,0x1e
02ab 680e |h | Jump_Zero 0x2ba
02ac 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x4 = 0x2ac,0x4
02ad 0219 | | Execute Heap_Access,All_Read
02ae 00d8 | | Load_Top At_Offset_0
02af 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02b0 0092 082b | +| Action Push_String_Extended,0x82b ; "xref: "
02b2 00db | | Load_Top At_Offset_3
02b3 01cc | | Execute Vector,Catenate
02b4 e003 | | Load 0x0,0x3
02b5 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
02b6 00d9 | | Load_Top At_Offset_1
02b7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02b8 00d1 | | Pop_Control Pop_Count_1
02b9 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02ba 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0x5 = 0x2ba,0x5
02bb 01dd | | Execute Vector,First
02bc 00d9 | | Load_Top At_Offset_1
02bd 01d7 | | Execute Vector,Field_Read
02be 0f21 | ! | Execute_Immediate Equal,0x21
02bf 6815 |h | Jump_Zero 0x2d5
02c0 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x6 = 0x2c0,0x6
02c1 0219 | | Execute Heap_Access,All_Read
02c2 00d8 | | Load_Top At_Offset_0
02c3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02c4 0092 082c | ,| Action Push_String_Extended,0x82c ; "xref: ..."
02c6 00db | | Load_Top At_Offset_3
02c7 01dc | | Execute Vector,Last
02c8 0ae7 | | Execute_Immediate Plus,-0x19
02c9 0248 | H | Execute Discrete,Check_In_Integer
02ca e402 | | Load 0x2,0x2
02cb 01dc | | Execute Vector,Last
02cc e402 | | Load 0x2,0x2
02cd 01cf | | Execute Vector,Slice_Read
02ce 01cc | | Execute Vector,Catenate
02cf e003 | | Load 0x0,0x3
02d0 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
02d1 00d9 | | Load_Top At_Offset_1
02d2 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02d3 00d1 | | Pop_Control Pop_Count_1
02d4 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02d5 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x7 = 0x2d5,0x7
02d6 0219 | | Execute Heap_Access,All_Read
02d7 00d8 | | Load_Top At_Offset_0
02d8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
02d9 0092 082b | +| Action Push_String_Extended,0x82b ; "xref: "
02db 00db | | Load_Top At_Offset_3
02dc 01dd | | Execute Vector,First
02dd e402 | | Load 0x2,0x2
02de 01dd | | Execute Vector,First
02df 0a19 | | Execute_Immediate Plus,0x19
02e0 0248 | H | Execute Discrete,Check_In_Integer
02e1 e402 | | Load 0x2,0x2
02e2 01cf | | Execute Vector,Slice_Read
02e3 01cc | | Execute Vector,Catenate
02e4 0092 082d | -| Action Push_String_Extended,0x82d ; "..."
02e6 01cc | | Execute Vector,Catenate
02e7 e003 | | Load 0x0,0x3
02e8 1878 | x | Execute Package,Field_Execute,Field_Number 0x78
02e9 00d9 | | Load_Top At_Offset_1
02ea 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02eb 00d1 | | Pop_Control Pop_Count_1
02ec 4503 |E | Exit_Suprogram New_Top_Offset 0x3
02ed 0000 0000 | | .XXX[0x3]
02ef 0000 | |
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3 | | .CONST 0x02f3 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0001 | | .CONST 0x0001 ; Number of locals
02f3 BODY_02f0:
02f3 INIT_02f0:
02f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x02f3,0x0b82,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b95
; Debug Table 0x9.0x0 = 0x2f3,0x1
02f4 0217 | | Execute Heap_Access,All_Reference
02f5 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
02f6 460d |F | Jump_Case 0xe
02f7 78b0 |x | Jump 0x3a8 ; case 0x0
02f8 78a3 |x | Jump 0x39c ; case 0x1
02f9 780b |x | Jump 0x305 ; case 0x2
02fa 788c |x | Jump 0x387 ; case 0x3
02fb 7876 |xv | Jump 0x372 ; case 0x4
02fc 782a |x* | Jump 0x327 ; case 0x5
02fd 7844 |xD | Jump 0x342 ; case 0x6
02fe 785e |x^ | Jump 0x35d ; case 0x7
02ff 78b4 |x | Jump 0x3b4 ; case 0x8
0300 78bf |x | Jump 0x3c0 ; case 0x9
0301 78be |x | Jump 0x3c0 ; case 0xa
0302 78bd |x | Jump 0x3c0 ; case 0xb
0303 78bc |x | Jump 0x3c0 ; case 0xc
0304 78bb |x | Jump 0x3c0 ; case 0xd
0305 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x1 = 0x305,0x2
0306 0217 | | Execute Heap_Access,All_Reference
0307 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0308 460d |F | Jump_Case 0xe
0309 781a |x | Jump 0x324 ; case 0x0
030a 7819 |x | Jump 0x324 ; case 0x1
030b 780b |x | Jump 0x317 ; case 0x2
030c 7817 |x | Jump 0x324 ; case 0x3
030d 7809 |x | Jump 0x317 ; case 0x4
030e 7815 |x | Jump 0x324 ; case 0x5
030f 7814 |x | Jump 0x324 ; case 0x6
0310 7813 |x | Jump 0x324 ; case 0x7
0311 7812 |x | Jump 0x324 ; case 0x8
0312 7811 |x | Jump 0x324 ; case 0x9
0313 7810 |x | Jump 0x324 ; case 0xa
0314 780f |x | Jump 0x324 ; case 0xb
0315 7804 |x | Jump 0x31a ; case 0xc
0316 780d |x | Jump 0x324 ; case 0xd
0317 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x2 = 0x317,0x3
0318 8226 | & | Call 0x1,0x26
0319 4502 |E | Exit_Suprogram New_Top_Offset 0x2
031a 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x3 = 0x31a,0x4
031b 0217 | | Execute Heap_Access,All_Reference
031c 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
031d 6803 |h | Jump_Zero 0x321
031e 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x4 = 0x31e,0x5
031f 8226 | & | Call 0x1,0x26
0320 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0321 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x5 = 0x321,0x6
0322 8227 | ' | Call 0x1,0x27
0323 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0324 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x6 = 0x324,0x7
0325 8227 | ' | Call 0x1,0x27
0326 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0327 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x7 = 0x327,0x8
0328 0219 | | Execute Heap_Access,All_Read
0329 00d8 | | Load_Top At_Offset_0
032a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
032b e5ff | | Load 0x2,-0x1
032c 8223 | # | Call 0x1,0x23
032d 0092 082e | .| Action Push_String_Extended,0x82e ; "UNIT"
032f 01cc | | Execute Vector,Catenate
0330 e5ff | | Load 0x2,-0x1
0331 8224 | $ | Call 0x1,0x24
0332 01cc | | Execute Vector,Catenate
0333 0092 082f | /| Action Push_String_Extended,0x82f ; " "
0335 01cc | | Execute Vector,Catenate
0336 e5ff | | Load 0x2,-0x1
0337 8223 | # | Call 0x1,0x23
0338 01cc | | Execute Vector,Catenate
0339 0092 0830 | 0| Action Push_String_Extended,0x830 ; "KIND/PARENT"
033b 01cc | | Execute Vector,Catenate
033c e003 | | Load 0x0,0x3
033d 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
033e 00d9 | | Load_Top At_Offset_1
033f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0340 00d1 | | Pop_Control Pop_Count_1
0341 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0342 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x8 = 0x342,0x9
0343 0219 | | Execute Heap_Access,All_Read
0344 00d8 | | Load_Top At_Offset_0
0345 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0346 e5ff | | Load 0x2,-0x1
0347 8223 | # | Call 0x1,0x23
0348 0092 082e | .| Action Push_String_Extended,0x82e ; "UNIT"
034a 01cc | | Execute Vector,Catenate
034b e5ff | | Load 0x2,-0x1
034c 8224 | $ | Call 0x1,0x24
034d 01cc | | Execute Vector,Catenate
034e 0092 082f | /| Action Push_String_Extended,0x82f ; " "
0350 01cc | | Execute Vector,Catenate
0351 e5ff | | Load 0x2,-0x1
0352 8223 | # | Call 0x1,0x23
0353 01cc | | Execute Vector,Catenate
0354 0092 0831 | 1| Action Push_String_Extended,0x831 ; "ITEM(S)"
0356 01cc | | Execute Vector,Catenate
0357 e003 | | Load 0x0,0x3
0358 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0359 00d9 | | Load_Top At_Offset_1
035a 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
035b 00d1 | | Pop_Control Pop_Count_1
035c 4502 |E | Exit_Suprogram New_Top_Offset 0x2
035d 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x9 = 0x35d,0xa
035e 0219 | | Execute Heap_Access,All_Read
035f 00d8 | | Load_Top At_Offset_0
0360 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0361 e5ff | | Load 0x2,-0x1
0362 8223 | # | Call 0x1,0x23
0363 0092 082e | .| Action Push_String_Extended,0x82e ; "UNIT"
0365 01cc | | Execute Vector,Catenate
0366 e5ff | | Load 0x2,-0x1
0367 8224 | $ | Call 0x1,0x24
0368 01cc | | Execute Vector,Catenate
0369 0092 0832 | 2| Action Push_String_Extended,0x832 ; " PARENT ITEM"
036b 01cc | | Execute Vector,Catenate
036c e003 | | Load 0x0,0x3
036d 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
036e 00d9 | | Load_Top At_Offset_1
036f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0370 00d1 | | Pop_Control Pop_Count_1
0371 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0372 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xa = 0x372,0xb
0373 0219 | | Execute Heap_Access,All_Read
0374 00d8 | | Load_Top At_Offset_0
0375 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0376 e5ff | | Load 0x2,-0x1
0377 8223 | # | Call 0x1,0x23
0378 0092 0830 | 0| Action Push_String_Extended,0x830 ; "KIND/PARENT"
037a 01cc | | Execute Vector,Catenate
037b e5ff | | Load 0x2,-0x1
037c 8225 | % | Call 0x1,0x25
037d 01cc | | Execute Vector,Catenate
037e e5ff | | Load 0x2,-0x1
037f 8224 | $ | Call 0x1,0x24
0380 01cc | | Execute Vector,Catenate
0381 e003 | | Load 0x0,0x3
0382 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0383 00d9 | | Load_Top At_Offset_1
0384 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0385 00d1 | | Pop_Control Pop_Count_1
0386 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0387 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xb = 0x387,0xc
0388 0219 | | Execute Heap_Access,All_Read
0389 00d8 | | Load_Top At_Offset_0
038a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
038b e5ff | | Load 0x2,-0x1
038c 8223 | # | Call 0x1,0x23
038d 0092 0833 | 3| Action Push_String_Extended,0x833 ; "PARENT"
038f 01cc | | Execute Vector,Catenate
0390 e5ff | | Load 0x2,-0x1
0391 8225 | % | Call 0x1,0x25
0392 01cc | | Execute Vector,Catenate
0393 e5ff | | Load 0x2,-0x1
0394 8224 | $ | Call 0x1,0x24
0395 01cc | | Execute Vector,Catenate
0396 e003 | | Load 0x0,0x3
0397 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0398 00d9 | | Load_Top At_Offset_1
0399 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
039a 00d1 | | Pop_Control Pop_Count_1
039b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
039c 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xc = 0x39c,0xd
039d 0219 | | Execute Heap_Access,All_Read
039e 00d8 | | Load_Top At_Offset_0
039f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03a0 0092 0834 | 4| Action Push_String_Extended,0x834 ; "VIEWS"
03a2 e003 | | Load 0x0,0x3
03a3 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
03a4 00d9 | | Load_Top At_Offset_1
03a5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03a6 00d1 | | Pop_Control Pop_Count_1
03a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03a8 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xd = 0x3a8,0xe
03a9 0219 | | Execute Heap_Access,All_Read
03aa 00d8 | | Load_Top At_Offset_0
03ab 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03ac 0092 0835 | 5| Action Push_String_Extended,0x835 ; "SUBSYSTEMS"
03ae e003 | | Load 0x0,0x3
03af 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
03b0 00d9 | | Load_Top At_Offset_1
03b1 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03b2 00d1 | | Pop_Control Pop_Count_1
03b3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03b4 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xe = 0x3b4,0xf
03b5 0219 | | Execute Heap_Access,All_Read
03b6 00d8 | | Load_Top At_Offset_0
03b7 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03b8 0092 0836 | 6| Action Push_String_Extended,0x836 ; "EXPANDED_ITEM"
03ba e003 | | Load 0x0,0x3
03bb 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
03bc 00d9 | | Load_Top At_Offset_1
03bd 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03be 00d1 | | Pop_Control Pop_Count_1
03bf 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03c0 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xf = 0x3c0,0x10
03c1 0219 | | Execute Heap_Access,All_Read
03c2 00d8 | | Load_Top At_Offset_0
03c3 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03c4 00ea | | Load_Encached Null_String_Cache
03c5 e003 | | Load 0x0,0x3
03c6 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
03c7 00d9 | | Load_Top At_Offset_1
03c8 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
03c9 00d1 | | Pop_Control Pop_Count_1
03ca 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03cb 0000 | | .XXX[0x1]
03cc 0000 0000 | | .LITERAL {0x00000000, 0x5a8bd501}
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d5 | | .CONST 0x03d5 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0002 | | .CONST 0x0002 ; Number of locals
03d3 INIT_03d0:
03d3 e002 | | Load 0x0,0x2 ; Debug Table 0xa = .DEBUG 0x03d3,0x0ba4,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b9d
; Debug Table 0xa.0x0 = 0x3d3,0xffff
03d4 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
03d5 BODY_03d0:
03d5 e002 | | Load 0x0,0x2 ; Debug Table 0xa.0x1 = 0x3d5,0x1
03d6 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
03d7 e5ff | | Load 0x2,-0x1
03d8 e5ff | | Load 0x2,-0x1
03d9 0217 | | Execute Heap_Access,All_Reference
03da 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03db e003 | | Load 0x0,0x3
03dc 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
03dd 0059 | Y | Store_Top Discrete,At_Offset_1
03de 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x2 = 0x3de,0x2
03df 0092 0837 | 7| Action Push_String_Extended,0x837 ; "Set_Image_Info"
03e1 e005 | | Load 0x0,0x5
03e2 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03e3 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03e4 0000 0000 | | .BLANK 0000[0x4]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03ed | | .CONST 0x03ed ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0002 | | .CONST 0x0002 ; Number of locals
03eb INIT_03e8:
03eb e002 | | Load 0x0,0x2 ; Debug Table 0xb = .DEBUG 0x03eb,0x0bac,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0ba5
; Debug Table 0xb.0x0 = 0x3eb,0xffff
03ec 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
03ed BODY_03e8:
03ed e002 | | Load 0x0,0x2 ; Debug Table 0xb.0x1 = 0x3ed,0x1
03ee 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
03ef e5fe | | Load 0x2,-0x2
03f0 4800 |H | Short_Literal 0x0
03f1 4801 |H | Short_Literal 0x1
03f2 e5fd | | Load 0x2,-0x3
03f3 e5ff | | Load 0x2,-0x1
03f4 0217 | | Execute Heap_Access,All_Reference
03f5 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03f6 e003 | | Load 0x0,0x3
03f7 1874 | t | Execute Package,Field_Execute,Field_Number 0x74
03f8 0059 | Y | Store_Top Discrete,At_Offset_1
03f9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x2 = 0x3f9,0x2
03fa 0092 0838 | 8| Action Push_String_Extended,0x838 ; "Make_Visible"
03fc e005 | | Load 0x0,0x5
03fd 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03fe 4504 |E | Exit_Suprogram New_Top_Offset 0x4
03ff 0000 | | .XXX[0x1]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0404 | | .CONST 0x0404 ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0002 | | .CONST 0x0002 ; Number of locals
0403 INIT_0400:
0403 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xc = .DEBUG 0x0403,0x0bb4,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0bb8
; Debug Table 0xc.0x0 = 0x403,0xffff
0404 BODY_0400:
0404 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x1 = 0x404,0x1
0405 e008 | | Load 0x0,0x8
0406 01df | | Execute Vector,Equal
0407 6801 |h | Jump_Zero 0x409
0408 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xc.0x2 = 0x408,0x2
0409 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x3 = 0x409,0x3
040a 8222 | " | Call 0x1,0x22
040b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
040c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x4 = 0x40c,0x4
040d e5fd | | Load 0x2,-0x3
040e 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
040f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x5 = 0x40f,0x5
0410 0f01 | | Execute_Immediate Equal,0x1
0411 6809 |h | Jump_Zero 0x41b
0412 e5fc | | Load 0x2,-0x4 ; Debug Table 0xc.0x6 = 0x412,0x6
0413 e002 | | Load 0x0,0x2
0414 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0415 e5fe | | Load 0x2,-0x2
0416 e5fd | | Load 0x2,-0x3
0417 e5ff | | Load 0x2,-0x1
0418 821c | | Call 0x1,0x1c
0419 c5fc | | Store 0x2,-0x4
041a 4503 |E | Exit_Suprogram New_Top_Offset 0x3
041b e5fd | | Load 0x2,-0x3 ; Debug Table 0xc.0x7 = 0x41b,0x7
041c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
041d 0f07 | | Execute_Immediate Equal,0x7
041e 680d |h | Jump_Zero 0x42c
041f e5fd | | Load 0x2,-0x3
0420 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0421 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0422 7009 |p | Jump_Nonzero 0x42c
0423 e5fc | | Load 0x2,-0x4 ; Debug Table 0xc.0x8 = 0x423,0x8
0424 e5fd | | Load 0x2,-0x3
0425 e5fe | | Load 0x2,-0x2
0426 e5ff | | Load 0x2,-0x1
0427 e009 | | Load 0x0,0x9
0428 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0429 00d1 | | Pop_Control Pop_Count_1
042a c5fc | | Store 0x2,-0x4
042b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
042c e5fc | | Load 0x2,-0x4 ; Debug Table 0xc.0x9 = 0x42c,0x9
042d e5fd | | Load 0x2,-0x3
042e e5fe | | Load 0x2,-0x2
042f e5ff | | Load 0x2,-0x1
0430 8229 | ) | Call 0x1,0x29
0431 00d1 | | Pop_Control Pop_Count_1
0432 c5fc | | Store 0x2,-0x4
0433 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0434 0000 0000 | | .BLANK 0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b | ; | .CONST 0x043b ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0001 | | .CONST 0x0001 ; Number of locals
043b BODY_0438:
043b INIT_0438:
043b e5fd | | Load 0x2,-0x3 ; Debug Table 0xd = .DEBUG 0x043b,0x0bca,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0bce
; Debug Table 0xd.0x0 = 0x43b,0x1
043c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
043d 0f07 | | Execute_Immediate Equal,0x7
043e 680b |h | Jump_Zero 0x44a
043f e5fd | | Load 0x2,-0x3
0440 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0441 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0442 7007 |p | Jump_Nonzero 0x44a
0443 e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0x1 = 0x443,0x2
0444 e5fe | | Load 0x2,-0x2
0445 e5ff | | Load 0x2,-0x1
0446 e009 | | Load 0x0,0x9
0447 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0448 00d1 | | Pop_Control Pop_Count_1
0449 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0xd.0x2 = 0x449,0x3
044a 0007 | | Action Break_Optional ; Debug Table 0xd.0x3 = 0x44a,0x4
044b 00db | | Load_Top At_Offset_3 ; Debug Table 0xd.0x4 = 0x44b,0xfbff
044c e5fd | | Load 0x2,-0x3
044d e5ff | | Load 0x2,-0x1
044e e007 | | Load 0x0,0x7
044f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0450 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x5 = 0x450,0xfbfe
0451 8222 | " | Call 0x1,0x22
0452 00e2 | | Load_Encached Integer_Cache
0453 03f1 | | Declare_Variable Discrete,With_Value
0454 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xd.0x6 = 0x454,0xfbfd
0455 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x7 = 0x455,0x401
0456 e5fd | | Load 0x2,-0x3
0457 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0458 027e | ~ | Execute Discrete,Not_Equal
0459 680e |h | Jump_Zero 0x468
045a e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0x8 = 0x45a,0x402
045b 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
045c 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
045d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0x9 = 0x45d,0x403
045e e5fd | | Load 0x2,-0x3
045f 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
0460 e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0xa = 0x460,0x404
0461 00db | | Load_Top At_Offset_3
0462 00da | | Load_Top At_Offset_2
0463 e5fe | | Load 0x2,-0x2
0464 e5ff | | Load 0x2,-0x1
0465 8228 | ( | Call 0x1,0x28
0466 00d1 | | Pop_Control Pop_Count_1
0467 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0468 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xd.0xb = 0x468,0x405
0469 0c02 | | Execute_Immediate Greater_Equal,0x2
046a 6808 |h | Jump_Zero 0x473
046b e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0xc = 0x46b,0x406
046c 00db | | Load_Top At_Offset_3
046d 00db | | Load_Top At_Offset_3
046e e5fe | | Load 0x2,-0x2
046f e5ff | | Load 0x2,-0x1
0470 8228 | ( | Call 0x1,0x28
0471 00d1 | | Pop_Control Pop_Count_1
0472 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0473 e5fd | | Load 0x2,-0x3 ; Debug Table 0xd.0xd = 0x473,0x407
0474 00db | | Load_Top At_Offset_3
0475 e5fe | | Load 0x2,-0x2
0476 e5ff | | Load 0x2,-0x1
0477 8219 | | Call 0x1,0x19
0478 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0479 0000 0000 | | .BLANK 0000[0x7]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0485 | | .CONST 0x0485 ; Address of begin
0481 0004 | | .CONST 0x0004 ; Address of exception handler
0482 0002 | | .CONST 0x0002 ; Number of locals
0483 INIT_0480:
0483 e002 | | Load 0x0,0x2 ; Debug Table 0xe = .DEBUG 0x0483,0x0be8,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0be0
; Debug Table 0xe.0x0 = 0x483,0xffff
0484 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0485 BODY_0480:
0485 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0x1 = 0x485,0x1
0486 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0487 4800 |H | Short_Literal 0x0
0488 e5fd | | Load 0x2,-0x3
0489 e5fc | | Load 0x2,-0x4
048a e5fe | | Load 0x2,-0x2
048b e5ff | | Load 0x2,-0x1
048c 0217 | | Execute Heap_Access,All_Reference
048d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
048e e003 | | Load 0x0,0x3
048f 186e | n | Execute Package,Field_Execute,Field_Number 0x6e
0490 0059 | Y | Store_Top Discrete,At_Offset_1
0491 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x2 = 0x491,0x2
0492 0092 0839 | 9| Action Push_String_Extended,0x839 ; "Replace_Text"
0494 e005 | | Load 0x0,0x5
0495 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0496 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0497 0000 | | .XXX[0x1]
0498 ; --------------------------------------------------------------------------------------
0498 ; SUBPROGRAM
0498 ; --------------------------------------------------------------------------------------
0498 049d | | .CONST 0x049d ; Address of begin
0499 0004 | | .CONST 0x0004 ; Address of exception handler
049a 0002 | | .CONST 0x0002 ; Number of locals
049b INIT_0498:
049b e002 | | Load 0x0,0x2 ; Debug Table 0xf = .DEBUG 0x049b,0x0bf0,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0bf6
; Debug Table 0xf.0x0 = 0x49b,0xffff
049c 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
049d BODY_0498:
049d e002 | | Load 0x0,0x2 ; Debug Table 0xf.0x1 = 0x49d,0x1
049e 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
049f 4800 |H | Short_Literal 0x0
04a0 e5fd | | Load 0x2,-0x3
04a1 e5fe | | Load 0x2,-0x2
04a2 e5ff | | Load 0x2,-0x1
04a3 0217 | | Execute Heap_Access,All_Reference
04a4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04a5 e003 | | Load 0x0,0x3
04a6 186d | m | Execute Package,Field_Execute,Field_Number 0x6d
04a7 0059 | Y | Store_Top Discrete,At_Offset_1
04a8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x2 = 0x4a8,0x2
04a9 0092 0839 | 9| Action Push_String_Extended,0x839 ; "Replace_Text"
04ab e005 | | Load 0x0,0x5
04ac 181e | | Execute Package,Field_Execute,Field_Number 0x1e
04ad 4504 |E | Exit_Suprogram New_Top_Offset 0x4
04ae 0000 0000 | | .XXX[0x2]
04b0 ; --------------------------------------------------------------------------------------
04b0 ; SUBPROGRAM
04b0 ; --------------------------------------------------------------------------------------
04b0 04b3 | | .CONST 0x04b3 ; Address of begin
04b1 0004 | | .CONST 0x0004 ; Address of exception handler
04b2 0001 | | .CONST 0x0001 ; Number of locals
04b3 BODY_04b0:
04b3 INIT_04b0:
04b3 e5fd | | Load 0x2,-0x3 ; Debug Table 0x10 = .DEBUG 0x04b3,0x0bf8,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c08
; Debug Table 0x10.0x0 = 0x4b3,0x1
04b4 e00a | | Load 0x0,0xa
04b5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
04b6 7035 |p5 | Jump_Nonzero 0x4ec
04b7 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x1 = 0x4b7,0x2
04b8 00db | | Load_Top At_Offset_3
04b9 0217 | | Execute Heap_Access,All_Reference
04ba 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
04bb 027c | | | Execute Discrete,Less
04bc 6814 |h | Jump_Zero 0x4d1
04bd 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x2 = 0x4bd,0x3
04be e00b | | Load 0x0,0xb
04bf 1c08 | | Execute_Immediate Run_Utility,0x8
04c0 e5fd | | Load 0x2,-0x3
04c1 e00a | | Load 0x0,0xa
04c2 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04c3 0119 | | Execute Any,Check_In_Formal_Type
04c4 00d9 | | Load_Top At_Offset_1
04c5 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
04c6 e5fb | | Load 0x2,-0x5
04c7 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04c8 e5fb | | Load 0x2,-0x5 ; Debug Table 0x10.0x3 = 0x4c8,0x4
04c9 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
04ca e5fe | | Load 0x2,-0x2
04cb e5ff | | Load 0x2,-0x1
04cc e005 | | Load 0x0,0x5
04cd 1817 | | Execute Package,Field_Execute,Field_Number 0x17
04ce 0217 | | Execute Heap_Access,All_Reference
04cf 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04d0 7816 |x | Jump 0x4e7
04d1 e5fc | | Load 0x2,-0x4 ; Debug Table 0x10.0x4 = 0x4d1,0x5
04d2 e5fb | | Load 0x2,-0x5
04d3 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
04d4 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
04d5 e5fb | | Load 0x2,-0x5
04d6 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
04d7 e00c | | Load 0x0,0xc
04d8 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
04d9 e5fc | | Load 0x2,-0x4 ; Debug Table 0x10.0x5 = 0x4d9,0x6
04da e5fb | | Load 0x2,-0x5
04db 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
04dc 4801 |H | Short_Literal 0x1 ; Debug Table 0x10.0x6 = 0x4dc,0x7
04dd e00b | | Load 0x0,0xb
04de 1c08 | | Execute_Immediate Run_Utility,0x8
04df e5fd | | Load 0x2,-0x3
04e0 e00a | | Load 0x0,0xa
04e1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04e2 0119 | | Execute Any,Check_In_Formal_Type
04e3 00d9 | | Load_Top At_Offset_1
04e4 2a02 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x2
04e5 e5fb | | Load 0x2,-0x5
04e6 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
04e7 e5fb | | Load 0x2,-0x5 ; Debug Table 0x10.0x7 = 0x4e7,0x8
04e8 e5fe | | Load 0x2,-0x2
04e9 e5ff | | Load 0x2,-0x1
04ea 8218 | | Call 0x1,0x18
04eb 00d1 | | Pop_Control Pop_Count_1
04ec 4505 |E | Exit_Suprogram New_Top_Offset 0x5
04ed 0000 0000 | | .XXX[0x3]
04ef 0000 | |
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f5 | | .CONST 0x04f5 ; Address of begin
04f1 0004 | | .CONST 0x0004 ; Address of exception handler
04f2 0002 | | .CONST 0x0002 ; Number of locals
04f3 INIT_04f0:
04f3 e002 | | Load 0x0,0x2 ; Debug Table 0x11 = .DEBUG 0x04f3,0x0c0a,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c26
; Debug Table 0x11.0x0 = 0x4f3,0xffff
04f4 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
04f5 BODY_04f0:
04f5 e002 | | Load 0x0,0x2 ; Debug Table 0x11.0x1 = 0x4f5,0x1
04f6 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
04f7 4800 |H | Short_Literal 0x0
04f8 e5fc | | Load 0x2,-0x4
04f9 e5fd | | Load 0x2,-0x3
04fa e5fe | | Load 0x2,-0x2
04fb e5fb | | Load 0x2,-0x5
04fc e5ff | | Load 0x2,-0x1
04fd 0217 | | Execute Heap_Access,All_Reference
04fe 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
04ff e003 | | Load 0x0,0x3
0500 1870 | p | Execute Package,Field_Execute,Field_Number 0x70
0501 0059 | Y | Store_Top Discrete,At_Offset_1
0502 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x502,0x2
0503 0092 083a | :| Action Push_String_Extended,0x83a ; "Insert_Text"
0505 e005 | | Load 0x0,0x5
0506 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0507 e5fb | | Load 0x2,-0x5 ; Debug Table 0x11.0x3 = 0x507,0x3
0508 0a01 | | Execute_Immediate Plus,0x1
0509 0248 | H | Execute Discrete,Check_In_Integer
050a a5fb | | Store_Unchecked 0x2,-0x5
050b 4505 |E | Exit_Suprogram New_Top_Offset 0x5
050c 0000 0000 | | .BLANK 0000[0x4]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0515 | | .CONST 0x0515 ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0002 | | .CONST 0x0002 ; Number of locals
0513 INIT_0510:
0513 e002 | | Load 0x0,0x2 ; Debug Table 0x12 = .DEBUG 0x0513,0x0c14,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c45
; Debug Table 0x12.0x0 = 0x513,0xffff
0514 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0515 BODY_0510:
0515 e5fd | | Load 0x2,-0x3 ; Debug Table 0x12.0x1 = 0x515,0x1
0516 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0517 0c02 | | Execute_Immediate Greater_Equal,0x2
0518 680b |h | Jump_Zero 0x524
0519 e5fe | | Load 0x2,-0x2 ; Debug Table 0x12.0x2 = 0x519,0x2
051a e5fd | | Load 0x2,-0x3
051b 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
051c 0aff | | Execute_Immediate Plus,-0x1
051d e002 | | Load 0x0,0x2
051e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
051f 025b | [ | Execute Discrete,Check_In_Type
0520 0273 | s | Execute Discrete,Plus
0521 0248 | H | Execute Discrete,Check_In_Integer
0522 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0523 7802 |x | Jump 0x526
0524 e5fe | | Load 0x2,-0x2 ; Debug Table 0x12.0x3 = 0x524,0x3
0525 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0526 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x12.0x4 = 0x526,0x4
0527 e5fe | | Load 0x2,-0x2
0528 e5ff | | Load 0x2,-0x1
0529 821e | | Call 0x1,0x1e
052a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
052b 0000 0000 | | .BLANK 0000[0x5]
0530 ; --------------------------------------------------------------------------------------
0530 ; SUBPROGRAM
0530 ; --------------------------------------------------------------------------------------
0530 0535 | 5 | .CONST 0x0535 ; Address of begin
0531 0004 | | .CONST 0x0004 ; Address of exception handler
0532 0002 | | .CONST 0x0002 ; Number of locals
0533 INIT_0530:
0533 e002 | | Load 0x0,0x2 ; Debug Table 0x13 = .DEBUG 0x0533,0x0c20,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c57
; Debug Table 0x13.0x0 = 0x533,0xffff
0534 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0535 BODY_0530:
0535 00db | | Load_Top At_Offset_3 ; Debug Table 0x13.0x1 = 0x535,0x1
0536 0219 | | Execute Heap_Access,All_Read
0537 e002 | | Load 0x0,0x2
0538 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0539 00d9 | | Load_Top At_Offset_1
053a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
053b e5fd | | Load 0x2,-0x3
053c e5fe | | Load 0x2,-0x2
053d e003 | | Load 0x0,0x3
053e 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
053f 00da | | Load_Top At_Offset_2
0540 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0541 005a | Z | Store_Top Discrete,At_Offset_2
0542 00d1 | | Pop_Control Pop_Count_1
0543 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x2 = 0x543,0x2
0544 0092 083b | ;| Action Push_String_Extended,0x83b ; "Delete_Text"
0546 e005 | | Load 0x0,0x5
0547 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0548 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0549 0000 0000 | | .BLANK 0000[0x7]
0550 ; --------------------------------------------------------------------------------------
0550 ; SUBPROGRAM
0550 ; --------------------------------------------------------------------------------------
0550 0554 | T | .CONST 0x0554 ; Address of begin
0551 0004 | | .CONST 0x0004 ; Address of exception handler
0552 0002 | | .CONST 0x0002 ; Number of locals
0553 INIT_0550:
0553 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x14 = .DEBUG 0x0553,0x0c28,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c6b
; Debug Table 0x14.0x0 = 0x553,0xffff
0554 BODY_0550:
0554 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x1 = 0x554,0x1
0555 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0556 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0557 7027 |p' | Jump_Nonzero 0x57f
0558 e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x2 = 0x558,0x2
0559 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
055a 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
055b e5fc | | Load 0x2,-0x4
055c 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
055d e00c | | Load 0x0,0xc
055e 183e | > | Execute Package,Field_Execute,Field_Number 0x3e
055f 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0560 0007 | | Action Break_Optional ; Debug Table 0x14.0x3 = 0x560,0x3
0561 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x4 = 0x561,0x401
0562 021d | | Execute Heap_Access,Is_Null
0563 7014 |p | Jump_Nonzero 0x578 ; Debug Table 0x14.0x5 = 0x563,0x3
0564 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x14.0x6 = 0x564,0x4
0565 e5fc | | Load 0x2,-0x4
0566 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
0567 2a03 |* | Execute Variant_Record,Field_Write,Variant,Direct,Field_Number 0x3
0568 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0x7 = 0x568,0x5
0569 0217 | | Execute Heap_Access,All_Reference
056a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
056b 0e08 | | Execute_Immediate Not_Equal,0x8
056c 680a |h | Jump_Zero 0x577
056d e5fd | | Load 0x2,-0x3 ; Debug Table 0x14.0x8 = 0x56d,0x6
056e e5fc | | Load 0x2,-0x4
056f 00da | | Load_Top At_Offset_2
0570 e5fc | | Load 0x2,-0x4
0571 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0572 e5ff | | Load 0x2,-0x1
0573 e00d | | Load 0x0,0xd
0574 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0575 00d1 | | Pop_Control Pop_Count_1
0576 c5fd | | Store 0x2,-0x3
0577 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x14.0x9 = 0x577,0x7
0578 e5fe | | Load 0x2,-0x2 ; Debug Table 0x14.0xa = 0x578,0x8
0579 680b |h | Jump_Zero 0x585
057a 0092 083c | <| Action Push_String_Extended,0x83c ; "cannot find this item"
; Debug Table 0x14.0xb = 0x57a,0x9
057c e004 | | Load 0x0,0x4
057d 180d | | Execute Package,Field_Execute,Field_Number 0xd
057e 7806 |x | Jump 0x585
057f e5fe | | Load 0x2,-0x2 ; Debug Table 0x14.0xc = 0x57f,0xa
0580 6804 |h | Jump_Zero 0x585
0581 0092 083d | =| Action Push_String_Extended,0x83d ; "cannot find this object"
; Debug Table 0x14.0xd = 0x581,0xb
0583 e004 | | Load 0x0,0x4
0584 180d | | Execute Package,Field_Execute,Field_Number 0xd
0585 00db | | Load_Top At_Offset_3 ; Debug Table 0x14.0xe = 0x585,0xc
0586 0217 | | Execute Heap_Access,All_Reference
0587 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0588 0f08 | | Execute_Immediate Equal,0x8
0589 6801 |h | Jump_Zero 0x58b
058a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 ; Debug Table 0x14.0xf = 0x58a,0xd
058b e5fc | | Load 0x2,-0x4 ; Debug Table 0x14.0x10 = 0x58b,0xe
058c e5fd | | Load 0x2,-0x3
058d e5ff | | Load 0x2,-0x1
058e 821d | | Call 0x1,0x1d
058f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0595 | | .CONST 0x0595 ; Address of begin
0591 0004 | | .CONST 0x0004 ; Address of exception handler
0592 0002 | | .CONST 0x0002 ; Number of locals
0593 INIT_0590:
0593 e002 | | Load 0x0,0x2 ; Debug Table 0x15 = .DEBUG 0x0593,0x0c4c,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c81
; Debug Table 0x15.0x0 = 0x593,0xffff
0594 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0595 BODY_0590:
0595 00db | | Load_Top At_Offset_3 ; Debug Table 0x15.0x1 = 0x595,0x1
0596 0219 | | Execute Heap_Access,All_Read
0597 e002 | | Load 0x0,0x2
0598 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
0599 00d9 | | Load_Top At_Offset_1
059a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
059b 4801 |H | Short_Literal 0x1
059c e5fe | | Load 0x2,-0x2
059d e003 | | Load 0x0,0x3
059e 1883 | | Execute Package,Field_Execute,Field_Number 0x83
059f 00da | | Load_Top At_Offset_2
05a0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05a1 005a | Z | Store_Top Discrete,At_Offset_2
05a2 00d1 | | Pop_Control Pop_Count_1
05a3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0x2 = 0x5a3,0x2
05a4 0092 083e | >| Action Push_String_Extended,0x83e ; "select_line"
05a6 e005 | | Load 0x0,0x5
05a7 181e | | Execute Package,Field_Execute,Field_Number 0x1e
05a8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05a9 0000 0000 | | .BLANK 0000[0x7]
05b0 ; --------------------------------------------------------------------------------------
05b0 ; SUBPROGRAM
05b0 ; --------------------------------------------------------------------------------------
05b0 05b5 | | .CONST 0x05b5 ; Address of begin
05b1 0004 | | .CONST 0x0004 ; Address of exception handler
05b2 0002 | | .CONST 0x0002 ; Number of locals
05b3 INIT_05b0:
05b3 e002 | | Load 0x0,0x2 ; Debug Table 0x16 = .DEBUG 0x05b3,0x0c54,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c8f
; Debug Table 0x16.0x0 = 0x5b3,0xffff
05b4 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
05b5 BODY_05b0:
05b5 e5fe | | Load 0x2,-0x2 ; Debug Table 0x16.0x1 = 0x5b5,0x1
05b6 e003 | | Load 0x0,0x3
05b7 1881 | | Execute Package,Field_Execute,Field_Number 0x81
05b8 0e03 | | Execute_Immediate Not_Equal,0x3
05b9 680e |h | Jump_Zero 0x5c8
05ba 00db | | Load_Top At_Offset_3 ; Debug Table 0x16.0x2 = 0x5ba,0x2
05bb 0219 | | Execute Heap_Access,All_Read
05bc e002 | | Load 0x0,0x2
05bd 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
05be 00d9 | | Load_Top At_Offset_1
05bf 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
05c0 4800 |H | Short_Literal 0x0
05c1 e5fe | | Load 0x2,-0x2
05c2 e003 | | Load 0x0,0x3
05c3 1886 | | Execute Package,Field_Execute,Field_Number 0x86
05c4 00da | | Load_Top At_Offset_2
05c5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
05c6 005a | Z | Store_Top Discrete,At_Offset_2
05c7 00d1 | | Pop_Control Pop_Count_1
05c8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
05c9 0000 0000 | | .BLANK 0000[0x7]
05d0 ; --------------------------------------------------------------------------------------
05d0 ; SUBPROGRAM
05d0 ; --------------------------------------------------------------------------------------
05d0 05d5 | | .CONST 0x05d5 ; Address of begin
05d1 0004 | | .CONST 0x0004 ; Address of exception handler
05d2 0002 | | .CONST 0x0002 ; Number of locals
05d3 INIT_05d0:
05d3 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x17 = .DEBUG 0x05d3,0x0c5c,0x0002,0x0000,0x005a,0x8bd5,0x0000,0x0c9d
; Debug Table 0x17.0x0 = 0x5d3,0xffff
05d4 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
05d5 BODY_05d0:
05d5 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0x1 = 0x5d5,0x1
05d6 01d9 | | Execute Vector,Reverse_Bounds
05d7 0263 | c | Execute Discrete,Above_Bound
05d8 700a |p | Jump_Nonzero 0x5e3
05d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x2 = 0x5d9,0x2
05da e5ff | | Load 0x2,-0x1
05db 01d7 | | Execute Vector,Field_Read
05dc 0f0a | | Execute_Immediate Equal,0xa
05dd 6804 |h | Jump_Zero 0x5e2
05de 00da | | Load_Top At_Offset_2 ; Debug Table 0x17.0x3 = 0x5de,0x3
05df 0a01 | | Execute_Immediate Plus,0x1
05e0 0248 | H | Execute Discrete,Check_In_Integer
05e1 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
05e2 3ff6 |? | Loop_Increasing 0x5d9
05e3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x17.0x4 = 0x5e3,0x4
05e4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05e5 0000 0000 | | .XXX[0x3]
05e7 0000 | |
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05eb | | .CONST 0x05eb ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0001 | | .CONST 0x0001 ; Number of locals
05eb BODY_05e8:
05eb INIT_05e8:
05eb 00da | | Load_Top At_Offset_2 ; Debug Table 0x18 = .DEBUG 0x05eb,0x0c68,0x0002,0x0000,0x005a,0x8c75,0x0000,0x00ff
; Debug Table 0x18.0x0 = 0x5eb,0x1
05ec 0217 | | Execute Heap_Access,All_Reference
05ed 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
05ee 6803 |h | Jump_Zero 0x5f2
05ef 0092 083f | ?| Action Push_String_Extended,0x83f ; "STATE/"
; Debug Table 0x18.0x1 = 0x5ef,0x2
05f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05f2 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x18.0x2 = 0x5f2,0x3
05f3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05f4 0000 0000 | | .BLANK 0000[0x4]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb | | .CONST 0x05fb ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0001 | | .CONST 0x0001 ; Number of locals
05fb BODY_05f8:
05fb INIT_05f8:
05fb 00da | | Load_Top At_Offset_2 ; Debug Table 0x19 = .DEBUG 0x05fb,0x0c70,0x0002,0x0000,0x005a,0x8c75,0x0000,0x0118
; Debug Table 0x19.0x0 = 0x5fb,0x1
05fc 0217 | | Execute Heap_Access,All_Reference
05fd 3c0c |< | Execute Record,Field_Read,Field_Number 0xc
05fe 7007 |p | Jump_Nonzero 0x606
05ff 00da | | Load_Top At_Offset_2
0600 0217 | | Execute Heap_Access,All_Reference
0601 3c0d |< | Execute Record,Field_Read,Field_Number 0xd
0602 6803 |h | Jump_Zero 0x606
0603 0092 0840 | @| Action Push_String_Extended,0x840 ; "/LIBRARY"
; Debug Table 0x19.0x1 = 0x603,0x2
0605 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0606 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x19.0x2 = 0x606,0x3
0607 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0608 ; --------------------------------------------------------------------------------------
0608 ; SUBPROGRAM
0608 ; --------------------------------------------------------------------------------------
0608 060b | | .CONST 0x060b ; Address of begin
0609 0004 | | .CONST 0x0004 ; Address of exception handler
060a 0001 | | .CONST 0x0001 ; Number of locals
060b BODY_0608:
060b INIT_0608:
060b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1a = .DEBUG 0x060b,0x0c78,0x0002,0x0000,0x005a,0x8c75,0x0000,0x0139
; Debug Table 0x1a.0x0 = 0x60b,0x1
060c 0217 | | Execute Heap_Access,All_Reference
060d 3c0e |< | Execute Record,Field_Read,Field_Number 0xe
060e 0c00 | | Execute_Immediate Greater_Equal,0x0
060f 6803 |h | Jump_Zero 0x613
0610 0092 0841 | A| Action Push_String_Extended,0x841 ; "/UNIT"
; Debug Table 0x1a.0x1 = 0x610,0x2
0612 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0613 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x1a.0x2 = 0x613,0x3
0614 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0615 0000 0000 | | .XXX[0x3]
0617 0000 | |
0618 ; --------------------------------------------------------------------------------------
0618 ; SUBPROGRAM
0618 ; --------------------------------------------------------------------------------------
0618 061b | | .CONST 0x061b ; Address of begin
0619 0004 | | .CONST 0x0004 ; Address of exception handler
061a 0001 | | .CONST 0x0001 ; Number of locals
061b BODY_0618:
061b INIT_0618:
061b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b = .DEBUG 0x061b,0x0c80,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0156
; Debug Table 0x1b.0x0 = 0x61b,0x1
061c 0217 | | Execute Heap_Access,All_Reference
061d 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
061e 0f04 | | Execute_Immediate Equal,0x4
061f 680c |h | Jump_Zero 0x62c
0620 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x1 = 0x620,0x2
0621 0219 | | Execute Heap_Access,All_Read
0622 00d8 | | Load_Top At_Offset_0
0623 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0624 0092 0842 | B| Action Push_String_Extended,0x842 ; "UNITS CLOSURE"
0626 e003 | | Load 0x0,0x3
0627 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0628 00d9 | | Load_Top At_Offset_1
0629 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
062a 00d1 | | Pop_Control Pop_Count_1
062b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
062c 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x2 = 0x62c,0x3
062d 0217 | | Execute Heap_Access,All_Reference
062e 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
062f 680c |h | Jump_Zero 0x63c
0630 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x3 = 0x630,0x4
0631 0219 | | Execute Heap_Access,All_Read
0632 00d8 | | Load_Top At_Offset_0
0633 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0634 0092 0843 | C| Action Push_String_Extended,0x843 ; "STATE/UNIT"
0636 e003 | | Load 0x0,0x3
0637 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0638 00d9 | | Load_Top At_Offset_1
0639 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
063a 00d1 | | Pop_Control Pop_Count_1
063b 4502 |E | Exit_Suprogram New_Top_Offset 0x2
063c 00da | | Load_Top At_Offset_2 ; Debug Table 0x1b.0x4 = 0x63c,0x5
063d 0219 | | Execute Heap_Access,All_Read
063e 00d8 | | Load_Top At_Offset_0
063f 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0640 0092 0844 | D| Action Push_String_Extended,0x844 ; "UNITS"
0642 e003 | | Load 0x0,0x3
0643 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0644 00d9 | | Load_Top At_Offset_1
0645 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0646 00d1 | | Pop_Control Pop_Count_1
0647 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0648 ; --------------------------------------------------------------------------------------
0648 ; SUBPROGRAM
0648 ; --------------------------------------------------------------------------------------
0648 064b | K | .CONST 0x064b ; Address of begin
0649 0004 | | .CONST 0x0004 ; Address of exception handler
064a 0001 | | .CONST 0x0001 ; Number of locals
064b BODY_0648:
064b INIT_0648:
064b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c = .DEBUG 0x064b,0x0c8c,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0190
; Debug Table 0x1c.0x0 = 0x64b,0x1
064c 0217 | | Execute Heap_Access,All_Reference
064d 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
064e 7008 |p | Jump_Nonzero 0x657
064f 00da | | Load_Top At_Offset_2
0650 0217 | | Execute Heap_Access,All_Reference
0651 3c0c |< | Execute Record,Field_Read,Field_Number 0xc
0652 7004 |p | Jump_Nonzero 0x657
0653 00da | | Load_Top At_Offset_2
0654 0217 | | Execute Heap_Access,All_Reference
0655 3c0d |< | Execute Record,Field_Read,Field_Number 0xd
0656 701c |p | Jump_Nonzero 0x673
0657 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0x1 = 0x657,0x2
0658 0217 | | Execute Heap_Access,All_Reference
0659 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
065a 680c |h | Jump_Zero 0x667
065b 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0x2 = 0x65b,0x3
065c 0219 | | Execute Heap_Access,All_Read
065d 00d8 | | Load_Top At_Offset_0
065e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
065f 0092 0843 | C| Action Push_String_Extended,0x843 ; "STATE/UNIT"
0661 e003 | | Load 0x0,0x3
0662 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0663 00d9 | | Load_Top At_Offset_1
0664 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0665 00d1 | | Pop_Control Pop_Count_1
0666 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0667 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0x3 = 0x667,0x4
0668 0219 | | Execute Heap_Access,All_Read
0669 00d8 | | Load_Top At_Offset_0
066a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
066b 0092 0844 | D| Action Push_String_Extended,0x844 ; "UNITS"
066d e003 | | Load 0x0,0x3
066e 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
066f 00d9 | | Load_Top At_Offset_1
0670 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0671 00d1 | | Pop_Control Pop_Count_1
0672 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0673 00da | | Load_Top At_Offset_2 ; Debug Table 0x1c.0x4 = 0x673,0x5
0674 0219 | | Execute Heap_Access,All_Read
0675 00d8 | | Load_Top At_Offset_0
0676 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0677 e5ff | | Load 0x2,-0x1
0678 8223 | # | Call 0x1,0x23
0679 0092 082e | .| Action Push_String_Extended,0x82e ; "UNIT"
067b 01cc | | Execute Vector,Catenate
067c e5ff | | Load 0x2,-0x1
067d 8224 | $ | Call 0x1,0x24
067e 01cc | | Execute Vector,Catenate
067f e003 | | Load 0x0,0x3
0680 1876 | v | Execute Package,Field_Execute,Field_Number 0x76
0681 00d9 | | Load_Top At_Offset_1
0682 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0683 00d1 | | Pop_Control Pop_Count_1
0684 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0685 0000 0000 | | .XXX[0x3]
0687 0000 | |
0688 ; --------------------------------------------------------------------------------------
0688 ; SUBPROGRAM
0688 ; --------------------------------------------------------------------------------------
0688 069f | | .CONST 0x069f ; Address of begin
0689 0004 | | .CONST 0x0004 ; Address of exception handler
068a 0006 | | .CONST 0x0006 ; Number of locals
068b INIT_0688:
068b e002 | | Load 0x0,0x2 ; Debug Table 0x1d = .DEBUG 0x068b,0x0c98,0x0001,0x0000,0x005a,0x8c75,0x0000,0x05a9
; Debug Table 0x1d.0x0 = 0x68b,0xffff
068c 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
068d 4801 |H | Short_Literal 0x1 ; Debug Table 0x1d.0x1 = 0x68d,0xfffe
068e e5fb | | Load 0x2,-0x5
068f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0690 e003 | | Load 0x0,0x3
0691 1b8b | | Execute Package,Field_Read,Field_Number 0x8b
0692 0334 | 4 | Declare_Variable Array,With_Constraint
0693 00d8 | | Load_Top At_Offset_0
0694 1c00 | | Execute_Immediate Run_Utility,0x0
0695 4801 |H | Short_Literal 0x1 ; Debug Table 0x1d.0x2 = 0x695,0xfffd
0696 e5fb | | Load 0x2,-0x5
0697 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0698 e003 | | Load 0x0,0x3
0699 1b8a | | Execute Package,Field_Read,Field_Number 0x8a
069a 0334 | 4 | Declare_Variable Array,With_Constraint
069b 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x1d.0x3 = 0x69b,0xfffc
069c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
069d 029f 07f3 | | Declare_Subprogram INIT_07f0,For_Call ; Debug Table 0x1d.0x4 = 0x69d,0xfffb
069f BODY_0688:
069f e5fb | | Load 0x2,-0x5 ; Debug Table 0x1d.0x5 = 0x69f,0x1
06a0 4801 |H | Short_Literal 0x1
06a1 e403 | | Load 0x2,0x3
06a2 01d6 | | Execute Vector,Field_Write
06a3 e5fb | | Load 0x2,-0x5 ; Debug Table 0x1d.0x6 = 0x6a3,0x2
06a4 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
06a5 4802 |H | Short_Literal 0x2
06a6 0263 | c | Execute Discrete,Above_Bound
06a7 7005 |p | Jump_Nonzero 0x6ad
06a8 e00e | | Load 0x0,0xe ; Debug Table 0x1d.0x7 = 0x6a8,0x3
06a9 00d9 | | Load_Top At_Offset_1
06aa e403 | | Load 0x2,0x3
06ab 01d6 | | Execute Vector,Field_Write
06ac 3ffb |? | Loop_Increasing 0x6a8
06ad e002 | | Load 0x0,0x2 ; Debug Table 0x1d.0x8 = 0x6ad,0x4
06ae 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
06af e403 | | Load 0x2,0x3
06b0 e404 | | Load 0x2,0x4
06b1 e5fc | | Load 0x2,-0x4
06b2 8406 | | Call 0x2,0x6
06b3 e5fd | | Load 0x2,-0x3
06b4 00e3 | | Load_Encached Natural_Cache
06b5 025b | [ | Execute Discrete,Check_In_Type
06b6 e5fe | | Load 0x2,-0x2
06b7 e5ff | | Load 0x2,-0x1
06b8 0217 | | Execute Heap_Access,All_Reference
06b9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
06ba e003 | | Load 0x0,0x3
06bb 188c | | Execute Package,Field_Execute,Field_Number 0x8c
06bc c402 | | Store 0x2,0x2
06bd e402 | | Load 0x2,0x2 ; Debug Table 0x1d.0x9 = 0x6bd,0x5
06be 0092 0845 | E| Action Push_String_Extended,0x845 ; "Replace_Lines"
06c0 e005 | | Load 0x0,0x5
06c1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
06c2 4505 |E | Exit_Suprogram New_Top_Offset 0x5
06c3 0000 0000 | | .BLANK 0000[0x5]
06c8 ; --------------------------------------------------------------------------------------
06c8 ; SUBPROGRAM
06c8 ; --------------------------------------------------------------------------------------
06c8 06cf | | .CONST 0x06cf ; Address of begin
06c9 0004 | | .CONST 0x0004 ; Address of exception handler
06ca 0002 | | .CONST 0x0002 ; Number of locals
06cb INIT_06c8:
06cb 00db | | Load_Top At_Offset_3 ; Debug Table 0x1e = .DEBUG 0x06cb,0x0cae,0x0001,0x0000,0x005a,0x8c75,0x0000,0x07bb
; Debug Table 0x1e.0x0 = 0x6cb,0xffff
06cc 01dd | | Execute Vector,First
06cd 00e2 | | Load_Encached Integer_Cache
06ce 03f1 | | Declare_Variable Discrete,With_Value
06cf BODY_06c8:
06cf e5fe | | Load 0x2,-0x2 ; Debug Table 0x1e.0x1 = 0x6cf,0x1
06d0 01d9 | | Execute Vector,Reverse_Bounds
06d1 0263 | c | Execute Discrete,Above_Bound
06d2 702a |p* | Jump_Nonzero 0x6fd
06d3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1e.0x2 = 0x6d3,0x2
06d4 e5fe | | Load 0x2,-0x2
06d5 01d7 | | Execute Vector,Field_Read
06d6 0f0a | | Execute_Immediate Equal,0xa
06d7 6824 |h$ | Jump_Zero 0x6fc
06d8 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e.0x3 = 0x6d8,0x3
06d9 e5fe | | Load 0x2,-0x2
06da 01dd | | Execute Vector,First
06db 027f | | Execute Discrete,Equal
06dc 680e |h | Jump_Zero 0x6eb
06dd e5fc | | Load 0x2,-0x4 ; Debug Table 0x1e.0x4 = 0x6dd,0x4
06de e002 | | Load 0x0,0x2
06df 1b15 | | Execute Package,Field_Read,Field_Number 0x15
06e0 e402 | | Load 0x2,0x2
06e1 00db | | Load_Top At_Offset_3
06e2 0aff | | Execute_Immediate Plus,-0x1
06e3 0248 | H | Execute Discrete,Check_In_Integer
06e4 e5fe | | Load 0x2,-0x2
06e5 01cf | | Execute Vector,Slice_Read
06e6 e5fd | | Load 0x2,-0x3
06e7 e5ff | | Load 0x2,-0x1
06e8 821c | | Call 0x1,0x1c
06e9 c5fc | | Store 0x2,-0x4
06ea 780d |x | Jump 0x6f8
06eb e5fc | | Load 0x2,-0x4 ; Debug Table 0x1e.0x5 = 0x6eb,0x5
06ec e002 | | Load 0x0,0x2
06ed 1b15 | | Execute Package,Field_Read,Field_Number 0x15
06ee e402 | | Load 0x2,0x2
06ef 00db | | Load_Top At_Offset_3
06f0 0aff | | Execute_Immediate Plus,-0x1
06f1 0248 | H | Execute Discrete,Check_In_Integer
06f2 e5fe | | Load 0x2,-0x2
06f3 01cf | | Execute Vector,Slice_Read
06f4 e00e | | Load 0x0,0xe
06f5 e5ff | | Load 0x2,-0x1
06f6 821c | | Call 0x1,0x1c
06f7 c5fc | | Store 0x2,-0x4
06f8 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1e.0x6 = 0x6f8,0x6
06f9 0a01 | | Execute_Immediate Plus,0x1
06fa 0248 | H | Execute Discrete,Check_In_Integer
06fb 0053 | S | Store_Top_Uncheched Discrete,At_Offset_3
06fc 3fd6 |? | Loop_Increasing 0x6d3
06fd e5fc | | Load 0x2,-0x4 ; Debug Table 0x1e.0x7 = 0x6fd,0x7
06fe e002 | | Load 0x0,0x2
06ff 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0700 00da | | Load_Top At_Offset_2
0701 e5fe | | Load 0x2,-0x2
0702 01dc | | Execute Vector,Last
0703 e5fe | | Load 0x2,-0x2
0704 01cf | | Execute Vector,Slice_Read
0705 e00e | | Load 0x0,0xe
0706 e5ff | | Load 0x2,-0x1
0707 821c | | Call 0x1,0x1c
0708 c5fc | | Store 0x2,-0x4
0709 4503 |E | Exit_Suprogram New_Top_Offset 0x3
070a 0000 0000 | | .BLANK 0000[0x6]
0710 ; --------------------------------------------------------------------------------------
0710 ; SUBPROGRAM
0710 ; --------------------------------------------------------------------------------------
0710 0727 | ' | .CONST 0x0727 ; Address of begin
0711 0004 | | .CONST 0x0004 ; Address of exception handler
0712 0006 | | .CONST 0x0006 ; Number of locals
0713 INIT_0710:
0713 e002 | | Load 0x0,0x2 ; Debug Table 0x1f = .DEBUG 0x0713,0x0cc0,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0896
; Debug Table 0x1f.0x0 = 0x713,0xffff
0714 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0715 0322 | " | Declare_Variable Record
0716 00d8 | | Load_Top At_Offset_0
0717 1c00 | | Execute_Immediate Run_Utility,0x0
0718 e002 | | Load 0x0,0x2 ; Debug Table 0x1f.0x1 = 0x718,0xfffe
0719 1b12 | | Execute Package,Field_Read,Field_Number 0x12
071a 0322 | " | Declare_Variable Record
071b 00d8 | | Load_Top At_Offset_0
071c 1c00 | | Execute_Immediate Run_Utility,0x0
071d e002 | | Load 0x0,0x2 ; Debug Table 0x1f.0x2 = 0x71d,0xfffd
071e 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
071f e00f | | Load 0x0,0xf ; Debug Table 0x1f.0x3 = 0x71f,0xfffc
0720 0322 | " | Declare_Variable Record
0721 00d8 | | Load_Top At_Offset_0
0722 1c00 | | Execute_Immediate Run_Utility,0x0
0723 e5fd | | Load 0x2,-0x3 ; Debug Table 0x1f.0x4 = 0x723,0xfffb
0724 e002 | | Load 0x0,0x2
0725 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0726 03f1 | | Declare_Variable Discrete,With_Value
0727 BODY_0710:
0727 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1f.0x5 = 0x727,0x1
0728 00d9 | | Load_Top At_Offset_1
0729 e5fe | | Load 0x2,-0x2
072a e005 | | Load 0x0,0x5
072b 180e | | Execute Package,Field_Execute,Field_Number 0xe
072c 005a | Z | Store_Top Discrete,At_Offset_2
072d 00d1 | | Pop_Control Pop_Count_1
072e 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1f.0x6 = 0x72e,0x2
072f 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0730 0c02 | | Execute_Immediate Greater_Equal,0x2
0731 682b |h+ | Jump_Zero 0x75d
0732 4801 |H | Short_Literal 0x1 ; Debug Table 0x1f.0x7 = 0x732,0x3
0733 00d9 | | Load_Top At_Offset_1
0734 e5ff | | Load 0x2,-0x1
0735 e003 | | Load 0x0,0x3
0736 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0737 e402 | | Load 0x2,0x2
0738 017d | } | Execute Record,Structure_Write
0739 4be8 |K | Short_Literal 0x3e8 ; Debug Table 0x1f.0x8 = 0x739,0x4
073a 00d9 | | Load_Top At_Offset_1
073b 00db | | Load_Top At_Offset_3
073c 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
073d 0aff | | Execute_Immediate Plus,-0x1
073e e002 | | Load 0x0,0x2
073f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0740 025b | [ | Execute Discrete,Check_In_Type
0741 0273 | s | Execute Discrete,Plus
0742 0248 | H | Execute Discrete,Check_In_Integer
0743 e5ff | | Load 0x2,-0x1
0744 e003 | | Load 0x0,0x3
0745 185f | _ | Execute Package,Field_Execute,Field_Number 0x5f
0746 e403 | | Load 0x2,0x3
0747 017d | } | Execute Record,Structure_Write
0748 e5fe | | Load 0x2,-0x2 ; Debug Table 0x1f.0x9 = 0x748,0x5
0749 0219 | | Execute Heap_Access,All_Read
074a e002 | | Load 0x0,0x2
074b 1b2f | / | Execute Package,Field_Read,Field_Number 0x2f
074c 00d9 | | Load_Top At_Offset_1
074d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
074e 4801 |H | Short_Literal 0x1
074f e403 | | Load 0x2,0x3
0750 e402 | | Load 0x2,0x2
0751 e003 | | Load 0x0,0x3
0752 1885 | | Execute Package,Field_Execute,Field_Number 0x85
0753 00da | | Load_Top At_Offset_2
0754 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0755 c404 | | Store 0x2,0x4
0756 00d1 | | Pop_Control Pop_Count_1
0757 00da | | Load_Top At_Offset_2 ; Debug Table 0x1f.0xa = 0x757,0x6
0758 0092 0846 | F| Action Push_String_Extended,0x846 ; "select_region"
075a e005 | | Load 0x0,0x5
075b 181e | | Execute Package,Field_Execute,Field_Number 0x1e
075c 4504 |E | Exit_Suprogram New_Top_Offset 0x4
075d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1f.0xb = 0x75d,0x7
075e e5fe | | Load 0x2,-0x2
075f 8220 | | Call 0x1,0x20
0760 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0761 0000 0000 | | .BLANK 0000[0x7]
0768 ; --------------------------------------------------------------------------------------
0768 ; SUBPROGRAM
0768 ; --------------------------------------------------------------------------------------
0768 0771 | q | .CONST 0x0771 ; Address of begin
0769 0004 | | .CONST 0x0004 ; Address of exception handler
076a 0003 | | .CONST 0x0003 ; Number of locals
076b INIT_0768:
076b e00f | | Load 0x0,0xf ; Debug Table 0x20 = .DEBUG 0x076b,0x0cda,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0a51
; Debug Table 0x20.0x0 = 0x76b,0xffff
076c 0322 | " | Declare_Variable Record
076d 00d8 | | Load_Top At_Offset_0
076e 1c00 | | Execute_Immediate Run_Utility,0x0
076f e002 | | Load 0x0,0x2 ; Debug Table 0x20.0x1 = 0x76f,0xfffe
0770 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0771 BODY_0768:
0771 e5fd | | Load 0x2,-0x3 ; Debug Table 0x20.0x2 = 0x771,0x1
0772 e003 | | Load 0x0,0x3
0773 1881 | | Execute Package,Field_Execute,Field_Number 0x81
0774 4603 |F | Jump_Case 0x4
0775 7808 |x | Jump 0x77e ; case 0x0
0776 781c |x | Jump 0x793 ; case 0x1
0777 7806 |x | Jump 0x77e ; case 0x2
0778 7800 |x | Jump 0x779 ; case 0x3
0779 e5fc | | Load 0x2,-0x4 ; Debug Table 0x20.0x3 = 0x779,0x2
077a e5fd | | Load 0x2,-0x3
077b e5fe | | Load 0x2,-0x2
077c 820f | | Call 0x1,0xf
077d 4505 |E | Exit_Suprogram New_Top_Offset 0x5
077e e003 | | Load 0x0,0x3 ; Debug Table 0x20.0x4 = 0x77e,0x3
077f 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
0780 e003 | | Load 0x0,0x3
0781 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
0782 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0783 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x20.0x5 = 0x783,0x4
0784 00d9 | | Load_Top At_Offset_1
0785 e5ff | | Load 0x2,-0x1
0786 e005 | | Load 0x0,0x5
0787 180e | | Execute Package,Field_Execute,Field_Number 0xe
0788 005a | Z | Store_Top Discrete,At_Offset_2
0789 00d1 | | Pop_Control Pop_Count_1
078a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x20.0x6 = 0x78a,0x5
078b 00d9 | | Load_Top At_Offset_1
078c 8010 | | Call 0x0,0x10
078d 0a01 | | Execute_Immediate Plus,0x1
078e 0248 | H | Execute Discrete,Check_In_Integer
078f e5ff | | Load 0x2,-0x1
0790 e5fe | | Load 0x2,-0x2
0791 822a | * | Call 0x1,0x2a
0792 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0793 0092 0847 | G| Action Push_String_Extended,0x847 ; "entire image is selected"
; Debug Table 0x20.0x7 = 0x793,0x6
0795 e004 | | Load 0x0,0x4
0796 180d | | Execute Package,Field_Execute,Field_Number 0xd
0797 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0798 ; --------------------------------------------------------------------------------------
0798 ; SUBPROGRAM
0798 ; --------------------------------------------------------------------------------------
0798 07a1 | | .CONST 0x07a1 ; Address of begin
0799 0004 | | .CONST 0x0004 ; Address of exception handler
079a 0003 | | .CONST 0x0003 ; Number of locals
079b INIT_0798:
079b e002 | | Load 0x0,0x2 ; Debug Table 0x21 = .DEBUG 0x079b,0x0cec,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0ac2
; Debug Table 0x21.0x0 = 0x79b,0xffff
079c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
079d e00f | | Load 0x0,0xf ; Debug Table 0x21.0x1 = 0x79d,0xfffe
079e 0322 | " | Declare_Variable Record
079f 00d8 | | Load_Top At_Offset_0
07a0 1c00 | | Execute_Immediate Run_Utility,0x0
07a1 BODY_0798:
07a1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x21.0x2 = 0x7a1,0x1
07a2 e003 | | Load 0x0,0x3
07a3 1881 | | Execute Package,Field_Execute,Field_Number 0x81
07a4 4603 |F | Jump_Case 0x4
07a5 7808 |x | Jump 0x7ae ; case 0x0
07a6 783d |x= | Jump 0x7e4 ; case 0x1
07a7 7821 |x! | Jump 0x7c9 ; case 0x2
07a8 7800 |x | Jump 0x7a9 ; case 0x3
07a9 e5fc | | Load 0x2,-0x4 ; Debug Table 0x21.0x3 = 0x7a9,0x2
07aa e5fd | | Load 0x2,-0x3
07ab e5fe | | Load 0x2,-0x2
07ac 820f | | Call 0x1,0xf
07ad 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07ae e003 | | Load 0x0,0x3 ; Debug Table 0x21.0x4 = 0x7ae,0x3
07af 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
07b0 e003 | | Load 0x0,0x3
07b1 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
07b2 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
07b3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0x5 = 0x7b3,0x4
07b4 0c02 | | Execute_Immediate Greater_Equal,0x2
07b5 680e |h | Jump_Zero 0x7c4
07b6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x21.0x6 = 0x7b6,0x5
07b7 00da | | Load_Top At_Offset_2
07b8 e5ff | | Load 0x2,-0x1
07b9 e005 | | Load 0x0,0x5
07ba 180e | | Execute Package,Field_Execute,Field_Number 0xe
07bb 005b | [ | Store_Top Discrete,At_Offset_3
07bc 00d1 | | Pop_Control Pop_Count_1
07bd 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0x7 = 0x7bd,0x6
07be 0aff | | Execute_Immediate Plus,-0x1
07bf 0248 | H | Execute Discrete,Check_In_Integer
07c0 e5ff | | Load 0x2,-0x1
07c1 e5fe | | Load 0x2,-0x2
07c2 822a | * | Call 0x1,0x2a
07c3 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07c4 0092 0820 | | Action Push_String_Extended,0x820 ; "cursor is on first line"
; Debug Table 0x21.0x8 = 0x7c4,0x7
07c6 e004 | | Load 0x0,0x4
07c7 180d | | Execute Package,Field_Execute,Field_Number 0xd
07c8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07c9 e003 | | Load 0x0,0x3 ; Debug Table 0x21.0x9 = 0x7c9,0x8
07ca 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
07cb e003 | | Load 0x0,0x3
07cc 185d | ] | Execute Package,Field_Execute,Field_Number 0x5d
07cd 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
07ce 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x21.0xa = 0x7ce,0x9
07cf 00da | | Load_Top At_Offset_2
07d0 e5ff | | Load 0x2,-0x1
07d1 e005 | | Load 0x0,0x5
07d2 180e | | Execute Package,Field_Execute,Field_Number 0xe
07d3 005b | [ | Store_Top Discrete,At_Offset_3
07d4 00d1 | | Pop_Control Pop_Count_1
07d5 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0xb = 0x7d5,0xa
07d6 0c02 | | Execute_Immediate Greater_Equal,0x2
07d7 6807 |h | Jump_Zero 0x7df
07d8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x21.0xc = 0x7d8,0xb
07d9 0aff | | Execute_Immediate Plus,-0x1
07da 0248 | H | Execute Discrete,Check_In_Integer
07db e5ff | | Load 0x2,-0x1
07dc e5fe | | Load 0x2,-0x2
07dd 822a | * | Call 0x1,0x2a
07de 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07df 0092 0848 | H| Action Push_String_Extended,0x848 ; "at top of image"
; Debug Table 0x21.0xd = 0x7df,0xc
07e1 e004 | | Load 0x0,0x4
07e2 180d | | Execute Package,Field_Execute,Field_Number 0xd
07e3 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07e4 0092 0847 | G| Action Push_String_Extended,0x847 ; "entire image is selected"
; Debug Table 0x21.0xe = 0x7e4,0xd
07e6 e004 | | Load 0x0,0x4
07e7 180d | | Execute Package,Field_Execute,Field_Number 0xd
07e8 4505 |E | Exit_Suprogram New_Top_Offset 0x5
07e9 0000 0000 | | .BLANK 0000[0x7]
07f0 ; --------------------------------------------------------------------------------------
07f0 ; SUBPROGRAM
07f0 ; --------------------------------------------------------------------------------------
07f0 07f3 | | .CONST 0x07f3 ; Address of begin
07f1 0004 | | .CONST 0x0004 ; Address of exception handler
07f2 0001 | | .CONST 0x0001 ; Number of locals
07f3 BODY_07f0:
07f3 INIT_07f0:
07f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x22 = .DEBUG 0x07f3,0x0d0c,0x0002,0x0000,0x005a,0x8c75,0x0000,0x05e9
; Debug Table 0x22.0x0 = 0x7f3,0x1
07f4 01d9 | | Execute Vector,Reverse_Bounds
07f5 0263 | c | Execute Discrete,Above_Bound
07f6 7022 |p" | Jump_Nonzero 0x819
07f7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x1 = 0x7f7,0x2
07f8 e7ff | | Load 0x3,-0x1
07f9 01d7 | | Execute Vector,Field_Read
07fa 0f0a | | Execute_Immediate Equal,0xa
07fb 681c |h | Jump_Zero 0x818
07fc 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x22.0x2 = 0x7fc,0x3
07fd e7ff | | Load 0x3,-0x1
07fe 01dd | | Execute Vector,First
07ff 0272 | r | Execute Discrete,Minus
0800 e405 | | Load 0x2,0x5
0801 e404 | | Load 0x2,0x4
0802 01d6 | | Execute Vector,Field_Write
0803 e405 | | Load 0x2,0x5 ; Debug Table 0x22.0x3 = 0x803,0x4
0804 0a01 | | Execute_Immediate Plus,0x1
0805 0248 | H | Execute Discrete,Check_In_Integer
0806 a405 | | Store_Unchecked 0x2,0x5
0807 e7ff | | Load 0x3,-0x1 ; Debug Table 0x22.0x4 = 0x807,0x5
0808 01dd | | Execute Vector,First
0809 00d9 | | Load_Top At_Offset_1
080a 0aff | | Execute_Immediate Plus,-0x1
080b 0248 | H | Execute Discrete,Check_In_Integer
080c e7ff | | Load 0x3,-0x1
080d 01cf | | Execute Vector,Slice_Read
080e 00d9 | | Load_Top At_Offset_1
080f 0a01 | | Execute_Immediate Plus,0x1
0810 0248 | H | Execute Discrete,Check_In_Integer
0811 e7ff | | Load 0x3,-0x1
0812 01dc | | Execute Vector,Last
0813 e7ff | | Load 0x3,-0x1
0814 01cf | | Execute Vector,Slice_Read
0815 8406 | | Call 0x2,0x6
0816 01cc | | Execute Vector,Catenate
0817 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0818 3fde |? | Loop_Increasing 0x7f7
0819 00da | | Load_Top At_Offset_2 ; Debug Table 0x22.0x5 = 0x819,0x6
081a 01db | | Execute Vector,Length
081b e405 | | Load 0x2,0x5
081c e404 | | Load 0x2,0x4
081d 01d6 | | Execute Vector,Field_Write
081e 00da | | Load_Top At_Offset_2 ; Debug Table 0x22.0x6 = 0x81e,0x7
081f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0820 ; --------------------------------------------------------------------------------------
0820 ; STRING TABLE
0820 ; --------------------------------------------------------------------------------------
0820 0054 | T | .STRTAB 0x0054->0x084a ; "cursor is on first line"
0821 0069 | i | .STRTAB 0x0069->0x0855 ; "doe_error"
0822 0070 | p | .STRTAB 0x0070->0x085a ; "previous"
0823 0076 | v | .STRTAB 0x0076->0x085e ; "next"
0824 0078 | x | .STRTAB 0x0078->0x0860 ; "select_image"
0825 0082 | | .STRTAB 0x0082->0x0866 ; "parent"
0826 0086 | | .STRTAB 0x0086->0x0869 ; "Couldn't open menu image handle ("
0827 00a5 | | .STRTAB 0x00a5->0x0879 ; ")"
0828 00a4 | | .STRTAB 0x00a4->0x087a ; "Edit"
0829 00a6 | | .STRTAB 0x00a6->0x087c ; "set_image_state"
082a 00b3 | | .STRTAB 0x00b3->0x0883 ; "obsolescence"
082b 00bd | | .STRTAB 0x00bd->0x0889 ; "xref: "
082c 00c1 | | .STRTAB 0x00c1->0x088c ; "xref: ..."
082d 00c8 | | .STRTAB 0x00c8->0x0891 ; "..."
082e 00c9 | | .STRTAB 0x00c9->0x0892 ; "UNIT"
082f 00cb | | .STRTAB 0x00cb->0x0894 ; " "
0830 00ca | | .STRTAB 0x00ca->0x0895 ; "KIND/PARENT"
0831 00d3 | | .STRTAB 0x00d3->0x089a ; "ITEM(S)"
0832 00d8 | | .STRTAB 0x00d8->0x089e ; " PARENT ITEM"
0833 00e2 | | .STRTAB 0x00e2->0x08a4 ; "PARENT"
0834 00e6 | | .STRTAB 0x00e6->0x08a7 ; "VIEWS"
0835 00e9 | | .STRTAB 0x00e9->0x08a9 ; "SUBSYSTEMS"
0836 00f1 | | .STRTAB 0x00f1->0x08ae ; "EXPANDED_ITEM"
0837 00fc | | .STRTAB 0x00fc->0x08b5 ; "Set_Image_Info"
0838 0108 | | .STRTAB 0x0108->0x08bc ; "Make_Visible"
0839 0112 | | .STRTAB 0x0112->0x08c2 ; "Replace_Text"
083a 011c | | .STRTAB 0x011c->0x08c8 ; "Insert_Text"
083b 0125 | % | .STRTAB 0x0125->0x08cd ; "Delete_Text"
083c 012e | . | .STRTAB 0x012e->0x08d3 ; "cannot find this item"
083d 0141 | A | .STRTAB 0x0141->0x08dd ; "cannot find this object"
083e 0156 | V | .STRTAB 0x0156->0x08e9 ; "select_line"
083f 015f | _ | .STRTAB 0x015f->0x08ee ; "STATE/"
0840 0163 | c | .STRTAB 0x0163->0x08f1 ; "/LIBRARY"
0841 0169 | i | .STRTAB 0x0169->0x08f5 ; "/UNIT"
0842 016c | l | .STRTAB 0x016c->0x08f8 ; "UNITS CLOSURE"
0843 0177 | w | .STRTAB 0x0177->0x08fe ; "STATE/UNIT"
0844 017f | | .STRTAB 0x017f->0x0903 ; "UNITS"
0845 0182 | | .STRTAB 0x0182->0x0906 ; "Replace_Lines"
0846 018d | | .STRTAB 0x018d->0x090c ; "select_region"
0847 0198 | | .STRTAB 0x0198->0x0913 ; "entire image is selected"
0848 01ae | | .STRTAB 0x01ae->0x091f ; "at top of image"
0849 01bb | | .STREND 0x01bb->0x0926
084a 6375 7273 |curs| .STRTAB_STRINGS
0927 0000 | | .XXX[0x1]
0928 ; --------------------------------------------------------------------------------------
0928 ; Debug Table
0928 ; --------------------------------------------------------------------------------------
0928 0003 0023 | #| .CONST 0x0003,0x0023
092a 000b 0a42 | B| .DEBUG 0x000b,0x0a42,0x0000,0x0000,0x005a,0x8bd5,0x0000,0x0b34
0932 0038 0a70 | 8 p| .DEBUG 0x0038,0x0a70,0x0000,0x0000,0x005a,0x8c75,0x0000,0x0004
093a 0083 0ab2 | | .DEBUG 0x0083,0x0ab2,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b35
0942 00f3 0ae0 | | .DEBUG 0x00f3,0x0ae0,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b49
094a 0183 0b1c | | .DEBUG 0x0183,0x0b1c,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b5d
0952 0233 0b56 | 3 V| .DEBUG 0x0233,0x0b56,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b71
095a 025b 0b60 | [ `| .DEBUG 0x025b,0x0b60,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b79
0962 027b 0b68 | { h| .DEBUG 0x027b,0x0b68,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b81
096a 0293 0b70 | p| .DEBUG 0x0293,0x0b70,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b89
0972 02f3 0b82 | | .DEBUG 0x02f3,0x0b82,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b95
097a 03d3 0ba4 | | .DEBUG 0x03d3,0x0ba4,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0b9d
0982 03eb 0bac | | .DEBUG 0x03eb,0x0bac,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0ba5
098a 0403 0bb4 | | .DEBUG 0x0403,0x0bb4,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0bb8
0992 043b 0bca | ; | .DEBUG 0x043b,0x0bca,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0bce
099a 0483 0be8 | | .DEBUG 0x0483,0x0be8,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0be0
09a2 049b 0bf0 | | .DEBUG 0x049b,0x0bf0,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0bf6
09aa 04b3 0bf8 | | .DEBUG 0x04b3,0x0bf8,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c08
09b2 04f3 0c0a | | .DEBUG 0x04f3,0x0c0a,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c26
09ba 0513 0c14 | | .DEBUG 0x0513,0x0c14,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c45
09c2 0533 0c20 | 3 | .DEBUG 0x0533,0x0c20,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c57
09ca 0553 0c28 | S (| .DEBUG 0x0553,0x0c28,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c6b
09d2 0593 0c4c | L| .DEBUG 0x0593,0x0c4c,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c81
09da 05b3 0c54 | T| .DEBUG 0x05b3,0x0c54,0x0001,0x0000,0x005a,0x8bd5,0x0000,0x0c8f
09e2 05d3 0c5c | \| .DEBUG 0x05d3,0x0c5c,0x0002,0x0000,0x005a,0x8bd5,0x0000,0x0c9d
09ea 05eb 0c68 | h| .DEBUG 0x05eb,0x0c68,0x0002,0x0000,0x005a,0x8c75,0x0000,0x00ff
09f2 05fb 0c70 | p| .DEBUG 0x05fb,0x0c70,0x0002,0x0000,0x005a,0x8c75,0x0000,0x0118
09fa 060b 0c78 | x| .DEBUG 0x060b,0x0c78,0x0002,0x0000,0x005a,0x8c75,0x0000,0x0139
0a02 061b 0c80 | | .DEBUG 0x061b,0x0c80,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0156
0a0a 064b 0c8c | K | .DEBUG 0x064b,0x0c8c,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0190
0a12 068b 0c98 | | .DEBUG 0x068b,0x0c98,0x0001,0x0000,0x005a,0x8c75,0x0000,0x05a9
0a1a 06cb 0cae | | .DEBUG 0x06cb,0x0cae,0x0001,0x0000,0x005a,0x8c75,0x0000,0x07bb
0a22 0713 0cc0 | | .DEBUG 0x0713,0x0cc0,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0896
0a2a 076b 0cda | k | .DEBUG 0x076b,0x0cda,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0a51
0a32 079b 0cec | | .DEBUG 0x079b,0x0cec,0x0001,0x0000,0x005a,0x8c75,0x0000,0x0ac2
0a3a 07f3 0d0c | | .DEBUG 0x07f3,0x0d0c,0x0002,0x0000,0x005a,0x8c75,0x0000,0x05e9
0a42 ; --------------------------------------------------------------------------------------
0a42 ; Debug3 Subtable 0x0
0a42 ; --------------------------------------------------------------------------------------
0a42 0016 0000 | | .DBG3TAB 0x0016,0x0000
0a44 000b ffff | | .CONST 0x000b,0xffff
0a46 000d fffe | | .CONST 0x000d,0xfffe
0a48 000f fffd | | .CONST 0x000f,0xfffd
0a4a 0011 fffc | | .CONST 0x0011,0xfffc
0a4c 0013 fffb | | .CONST 0x0013,0xfffb
0a4e 0015 fffa | | .CONST 0x0015,0xfffa
0a50 0017 fff9 | | .CONST 0x0017,0xfff9
0a52 0019 fff8 | | .CONST 0x0019,0xfff8
0a54 001b fff7 | | .CONST 0x001b,0xfff7
0a56 001d fff6 | | .CONST 0x001d,0xfff6
0a58 001f fff5 | | .CONST 0x001f,0xfff5
0a5a 0021 fff4 | ! | .CONST 0x0021,0xfff4
0a5c 0023 fff3 | # | .CONST 0x0023,0xfff3
0a5e 0025 fff2 | % | .CONST 0x0025,0xfff2
0a60 0027 fff1 | ' | .CONST 0x0027,0xfff1
0a62 0029 fff0 | ) | .CONST 0x0029,0xfff0
0a64 002b ffef | + | .CONST 0x002b,0xffef
0a66 002d ffee | - | .CONST 0x002d,0xffee
0a68 002f ffed | / | .CONST 0x002f,0xffed
0a6a 0031 ffec | 1 | .CONST 0x0031,0xffec
0a6c 0033 ffeb | 3 | .CONST 0x0033,0xffeb
0a6e 0035 ffea | 5 | .CONST 0x0035,0xffea
0a70 ; --------------------------------------------------------------------------------------
0a70 ; Debug3 Subtable 0x1
0a70 ; --------------------------------------------------------------------------------------
0a70 0020 0000 | | .DBG3TAB 0x0020,0x0000
0a72 0038 ffff | 8 | .CONST 0x0038,0xffff
0a74 003a fffe | : | .CONST 0x003a,0xfffe
0a76 003c fffd | < | .CONST 0x003c,0xfffd
0a78 003e fffc | > | .CONST 0x003e,0xfffc
0a7a 0040 fffb | @ | .CONST 0x0040,0xfffb
0a7c 0042 fffa | B | .CONST 0x0042,0xfffa
0a7e 0044 fff9 | D | .CONST 0x0044,0xfff9
0a80 0046 fff8 | F | .CONST 0x0046,0xfff8
0a82 0048 fff7 | H | .CONST 0x0048,0xfff7
0a84 004a fff6 | J | .CONST 0x004a,0xfff6
0a86 004c fff5 | L | .CONST 0x004c,0xfff5
0a88 004e fff4 | N | .CONST 0x004e,0xfff4
0a8a 0050 fff3 | P | .CONST 0x0050,0xfff3
0a8c 0052 fff2 | R | .CONST 0x0052,0xfff2
0a8e 0054 fff1 | T | .CONST 0x0054,0xfff1
0a90 0056 fff0 | V | .CONST 0x0056,0xfff0
0a92 0058 ffef | X | .CONST 0x0058,0xffef
0a94 005a ffee | Z | .CONST 0x005a,0xffee
0a96 005c ffed | \ | .CONST 0x005c,0xffed
0a98 005e ffec | ^ | .CONST 0x005e,0xffec
0a9a 0060 ffeb | ` | .CONST 0x0060,0xffeb
0a9c 0062 ffea | b | .CONST 0x0062,0xffea
0a9e 0064 ffe9 | d | .CONST 0x0064,0xffe9
0aa0 0066 ffe8 | f | .CONST 0x0066,0xffe8
0aa2 0068 ffe7 | h | .CONST 0x0068,0xffe7
0aa4 006a ffe6 | j | .CONST 0x006a,0xffe6
0aa6 006c ffe5 | l | .CONST 0x006c,0xffe5
0aa8 006e ffe4 | n | .CONST 0x006e,0xffe4
0aaa 0070 ffe3 | p | .CONST 0x0070,0xffe3
0aac 0072 ffe2 | r | .CONST 0x0072,0xffe2
0aae 0074 ffe1 | t | .CONST 0x0074,0xffe1
0ab0 0076 ffe0 | v | .CONST 0x0076,0xffe0
0ab2 ; --------------------------------------------------------------------------------------
0ab2 ; Debug3 Subtable 0x2
0ab2 ; --------------------------------------------------------------------------------------
0ab2 0003 0013 | | .DBG3TAB 0x0003,0x0013
0ab4 0083 ffff | | .CONST 0x0083,0xffff
0ab6 0085 fffe | | .CONST 0x0085,0xfffe
0ab8 0087 fffd | | .CONST 0x0087,0xfffd
0aba 008c 0001 | | .CONST 0x008c,0x0001
0abc 0092 0002 | | .CONST 0x0092,0x0002
0abe 0097 0003 | | .CONST 0x0097,0x0003
0ac0 009c 0004 | | .CONST 0x009c,0x0004
0ac2 009d 0005 | | .CONST 0x009d,0x0005
0ac4 00a1 0006 | | .CONST 0x00a1,0x0006
0ac6 00a9 0007 | | .CONST 0x00a9,0x0007
0ac8 00af 0008 | | .CONST 0x00af,0x0008
0aca 00b3 0009 | | .CONST 0x00b3,0x0009
0acc 00b8 000a | | .CONST 0x00b8,0x000a
0ace 00bc 000b | | .CONST 0x00bc,0x000b
0ad0 00bf 000c | | .CONST 0x00bf,0x000c
0ad2 00c5 000d | | .CONST 0x00c5,0x000d
0ad4 00ca 000e | | .CONST 0x00ca,0x000e
0ad6 00ce 000f | | .CONST 0x00ce,0x000f
0ad8 00d1 0010 | | .CONST 0x00d1,0x0010
0ada 00d7 0011 | | .CONST 0x00d7,0x0011
0adc 00df 0012 | | .CONST 0x00df,0x0012
0ade 00e6 0013 | | .CONST 0x00e6,0x0013
0ae0 ; --------------------------------------------------------------------------------------
0ae0 ; Debug3 Subtable 0x3
0ae0 ; --------------------------------------------------------------------------------------
0ae0 0004 0019 | | .DBG3TAB 0x0004,0x0019
0ae2 00f3 ffff | | .CONST 0x00f3,0xffff
0ae4 00f5 fffe | | .CONST 0x00f5,0xfffe
0ae6 00f7 fffd | | .CONST 0x00f7,0xfffd
0ae8 00f9 fffc | | .CONST 0x00f9,0xfffc
0aea 00fe 0001 | | .CONST 0x00fe,0x0001
0aec 0104 0002 | | .CONST 0x0104,0x0002
0aee 0109 0003 | | .CONST 0x0109,0x0003
0af0 010e 0004 | | .CONST 0x010e,0x0004
0af2 010f 0005 | | .CONST 0x010f,0x0005
0af4 0113 0006 | | .CONST 0x0113,0x0006
0af6 011b 0007 | | .CONST 0x011b,0x0007
0af8 011f 0008 | | .CONST 0x011f,0x0008
0afa 0125 0009 | % | .CONST 0x0125,0x0009
0afc 0129 000a | ) | .CONST 0x0129,0x000a
0afe 012d 000b | - | .CONST 0x012d,0x000b
0b00 0131 000c | 1 | .CONST 0x0131,0x000c
0b02 0135 000d | 5 | .CONST 0x0135,0x000d
0b04 013b 000e | ; | .CONST 0x013b,0x000e
0b06 013f 000f | ? | .CONST 0x013f,0x000f
0b08 0143 0010 | C | .CONST 0x0143,0x0010
0b0a 0148 0011 | H | .CONST 0x0148,0x0011
0b0c 014e 0012 | N | .CONST 0x014e,0x0012
0b0e 0152 0013 | R | .CONST 0x0152,0x0013
0b10 0156 0014 | V | .CONST 0x0156,0x0014
0b12 015c 0015 | \ | .CONST 0x015c,0x0015
0b14 0160 0016 | ` | .CONST 0x0160,0x0016
0b16 0164 0017 | d | .CONST 0x0164,0x0017
0b18 016d 0018 | m | .CONST 0x016d,0x0018
0b1a 0174 0019 | t | .CONST 0x0174,0x0019
0b1c ; --------------------------------------------------------------------------------------
0b1c ; Debug3 Subtable 0x4
0b1c ; --------------------------------------------------------------------------------------
0b1c 0004 0018 | | .DBG3TAB 0x0004,0x0018
0b1e 0183 ffff | | .CONST 0x0183,0xffff
0b20 0185 fffe | | .CONST 0x0185,0xfffe
0b22 0187 fffd | | .CONST 0x0187,0xfffd
0b24 018c fffc | | .CONST 0x018c,0xfffc
0b26 0192 0001 | | .CONST 0x0192,0x0001
0b28 0198 0002 | | .CONST 0x0198,0x0002
0b2a 019c 0003 | | .CONST 0x019c,0x0003
0b2c 01a2 0004 | | .CONST 0x01a2,0x0004
0b2e 01a7 0005 | | .CONST 0x01a7,0x0005
0b30 01ae 0006 | | .CONST 0x01ae,0x0006
0b32 01b1 0007 | | .CONST 0x01b1,0x0007
0b34 01b7 0008 | | .CONST 0x01b7,0x0008
0b36 01c3 0009 | | .CONST 0x01c3,0x0009
0b38 01c9 000a | | .CONST 0x01c9,0x000a
0b3a 01ce 000b | | .CONST 0x01ce,0x000b
0b3c 01da 000c | | .CONST 0x01da,0x000c
0b3e 01e0 000d | | .CONST 0x01e0,0x000d
0b40 01e5 000e | | .CONST 0x01e5,0x000e
0b42 01ec 000f | | .CONST 0x01ec,0x000f
0b44 01f2 0010 | | .CONST 0x01f2,0x0010
0b46 01f7 0011 | | .CONST 0x01f7,0x0011
0b48 01fc 0012 | | .CONST 0x01fc,0x0012
0b4a 0203 0013 | | .CONST 0x0203,0x0013
0b4c 0206 0014 | | .CONST 0x0206,0x0014
0b4e 020c 0015 | | .CONST 0x020c,0x0015
0b50 0218 0016 | | .CONST 0x0218,0x0016
0b52 0221 0017 | ! | .CONST 0x0221,0x0017
0b54 0228 0018 | ( | .CONST 0x0228,0x0018
0b56 ; --------------------------------------------------------------------------------------
0b56 ; Debug3 Subtable 0x5
0b56 ; --------------------------------------------------------------------------------------
0b56 0001 0003 | | .DBG3TAB 0x0001,0x0003
0b58 0233 ffff | 3 | .CONST 0x0233,0xffff
0b5a 0235 0001 | 5 | .CONST 0x0235,0x0001
0b5c 0241 0002 | A | .CONST 0x0241,0x0002
0b5e 0243 0003 | C | .CONST 0x0243,0x0003
0b60 ; --------------------------------------------------------------------------------------
0b60 ; Debug3 Subtable 0x6
0b60 ; --------------------------------------------------------------------------------------
0b60 0001 0002 | | .DBG3TAB 0x0001,0x0002
0b62 025b ffff | [ | .CONST 0x025b,0xffff
0b64 025d 0001 | ] | .CONST 0x025d,0x0001
0b66 0272 0002 | r | .CONST 0x0272,0x0002
0b68 ; --------------------------------------------------------------------------------------
0b68 ; Debug3 Subtable 0x7
0b68 ; --------------------------------------------------------------------------------------
0b68 0001 0002 | | .DBG3TAB 0x0001,0x0002
0b6a 027b ffff | { | .CONST 0x027b,0xffff
0b6c 027d 0001 | } | .CONST 0x027d,0x0001
0b6e 0286 0002 | | .CONST 0x0286,0x0002
0b70 ; --------------------------------------------------------------------------------------
0b70 ; Debug3 Subtable 0x8
0b70 ; --------------------------------------------------------------------------------------
0b70 0001 0007 | | .DBG3TAB 0x0001,0x0007
0b72 0293 ffff | | .CONST 0x0293,0xffff
0b74 0297 0001 | | .CONST 0x0297,0x0001
0b76 029c 0002 | | .CONST 0x029c,0x0002
0b78 02a8 0003 | | .CONST 0x02a8,0x0003
0b7a 02ac 0004 | | .CONST 0x02ac,0x0004
0b7c 02ba 0005 | | .CONST 0x02ba,0x0005
0b7e 02c0 0006 | | .CONST 0x02c0,0x0006
0b80 02d5 0007 | | .CONST 0x02d5,0x0007
0b82 ; --------------------------------------------------------------------------------------
0b82 ; Debug3 Subtable 0x9
0b82 ; --------------------------------------------------------------------------------------
0b82 0000 0010 | | .DBG3TAB 0x0000,0x0010
0b84 02f3 0001 | | .CONST 0x02f3,0x0001
0b86 0305 0002 | | .CONST 0x0305,0x0002
0b88 0317 0003 | | .CONST 0x0317,0x0003
0b8a 031a 0004 | | .CONST 0x031a,0x0004
0b8c 031e 0005 | | .CONST 0x031e,0x0005
0b8e 0321 0006 | ! | .CONST 0x0321,0x0006
0b90 0324 0007 | $ | .CONST 0x0324,0x0007
0b92 0327 0008 | ' | .CONST 0x0327,0x0008
0b94 0342 0009 | B | .CONST 0x0342,0x0009
0b96 035d 000a | ] | .CONST 0x035d,0x000a
0b98 0372 000b | r | .CONST 0x0372,0x000b
0b9a 0387 000c | | .CONST 0x0387,0x000c
0b9c 039c 000d | | .CONST 0x039c,0x000d
0b9e 03a8 000e | | .CONST 0x03a8,0x000e
0ba0 03b4 000f | | .CONST 0x03b4,0x000f
0ba2 03c0 0010 | | .CONST 0x03c0,0x0010
0ba4 ; --------------------------------------------------------------------------------------
0ba4 ; Debug3 Subtable 0xa
0ba4 ; --------------------------------------------------------------------------------------
0ba4 0001 0002 | | .DBG3TAB 0x0001,0x0002
0ba6 03d3 ffff | | .CONST 0x03d3,0xffff
0ba8 03d5 0001 | | .CONST 0x03d5,0x0001
0baa 03de 0002 | | .CONST 0x03de,0x0002
0bac ; --------------------------------------------------------------------------------------
0bac ; Debug3 Subtable 0xb
0bac ; --------------------------------------------------------------------------------------
0bac 0001 0002 | | .DBG3TAB 0x0001,0x0002
0bae 03eb ffff | | .CONST 0x03eb,0xffff
0bb0 03ed 0001 | | .CONST 0x03ed,0x0001
0bb2 03f9 0002 | | .CONST 0x03f9,0x0002
0bb4 ; --------------------------------------------------------------------------------------
0bb4 ; Debug3 Subtable 0xc
0bb4 ; --------------------------------------------------------------------------------------
0bb4 0001 0009 | | .DBG3TAB 0x0001,0x0009
0bb6 0403 ffff | | .CONST 0x0403,0xffff
0bb8 0404 0001 | | .CONST 0x0404,0x0001
0bba 0408 0002 | | .CONST 0x0408,0x0002
0bbc 0409 0003 | | .CONST 0x0409,0x0003
0bbe 040c 0004 | | .CONST 0x040c,0x0004
0bc0 040f 0005 | | .CONST 0x040f,0x0005
0bc2 0412 0006 | | .CONST 0x0412,0x0006
0bc4 041b 0007 | | .CONST 0x041b,0x0007
0bc6 0423 0008 | # | .CONST 0x0423,0x0008
0bc8 042c 0009 | , | .CONST 0x042c,0x0009
0bca ; --------------------------------------------------------------------------------------
0bca ; Debug3 Subtable 0xd
0bca ; --------------------------------------------------------------------------------------
0bca 0003 000b | | .DBG3TAB 0x0003,0x000b
0bcc 043b 0001 | ; | .CONST 0x043b,0x0001
0bce 0443 0002 | C | .CONST 0x0443,0x0002
0bd0 0449 0003 | I | .CONST 0x0449,0x0003
0bd2 044a 0004 | J | .CONST 0x044a,0x0004
0bd4 044b fbff | K | .CONST 0x044b,0xfbff
0bd6 0450 fbfe | P | .CONST 0x0450,0xfbfe
0bd8 0454 fbfd | T | .CONST 0x0454,0xfbfd
0bda 0455 0401 | U | .CONST 0x0455,0x0401
0bdc 045a 0402 | Z | .CONST 0x045a,0x0402
0bde 045d 0403 | ] | .CONST 0x045d,0x0403
0be0 0460 0404 | ` | .CONST 0x0460,0x0404
0be2 0468 0405 | h | .CONST 0x0468,0x0405
0be4 046b 0406 | k | .CONST 0x046b,0x0406
0be6 0473 0407 | s | .CONST 0x0473,0x0407
0be8 ; --------------------------------------------------------------------------------------
0be8 ; Debug3 Subtable 0xe
0be8 ; --------------------------------------------------------------------------------------
0be8 0001 0002 | | .DBG3TAB 0x0001,0x0002
0bea 0483 ffff | | .CONST 0x0483,0xffff
0bec 0485 0001 | | .CONST 0x0485,0x0001
0bee 0491 0002 | | .CONST 0x0491,0x0002
0bf0 ; --------------------------------------------------------------------------------------
0bf0 ; Debug3 Subtable 0xf
0bf0 ; --------------------------------------------------------------------------------------
0bf0 0001 0002 | | .DBG3TAB 0x0001,0x0002
0bf2 049b ffff | | .CONST 0x049b,0xffff
0bf4 049d 0001 | | .CONST 0x049d,0x0001
0bf6 04a8 0002 | | .CONST 0x04a8,0x0002
0bf8 ; --------------------------------------------------------------------------------------
0bf8 ; Debug3 Subtable 0x10
0bf8 ; --------------------------------------------------------------------------------------
0bf8 0000 0008 | | .DBG3TAB 0x0000,0x0008
0bfa 04b3 0001 | | .CONST 0x04b3,0x0001
0bfc 04b7 0002 | | .CONST 0x04b7,0x0002
0bfe 04bd 0003 | | .CONST 0x04bd,0x0003
0c00 04c8 0004 | | .CONST 0x04c8,0x0004
0c02 04d1 0005 | | .CONST 0x04d1,0x0005
0c04 04d9 0006 | | .CONST 0x04d9,0x0006
0c06 04dc 0007 | | .CONST 0x04dc,0x0007
0c08 04e7 0008 | | .CONST 0x04e7,0x0008
0c0a ; --------------------------------------------------------------------------------------
0c0a ; Debug3 Subtable 0x11
0c0a ; --------------------------------------------------------------------------------------
0c0a 0001 0003 | | .DBG3TAB 0x0001,0x0003
0c0c 04f3 ffff | | .CONST 0x04f3,0xffff
0c0e 04f5 0001 | | .CONST 0x04f5,0x0001
0c10 0502 0002 | | .CONST 0x0502,0x0002
0c12 0507 0003 | | .CONST 0x0507,0x0003
0c14 ; --------------------------------------------------------------------------------------
0c14 ; Debug3 Subtable 0x12
0c14 ; --------------------------------------------------------------------------------------
0c14 0001 0004 | | .DBG3TAB 0x0001,0x0004
0c16 0513 ffff | | .CONST 0x0513,0xffff
0c18 0515 0001 | | .CONST 0x0515,0x0001
0c1a 0519 0002 | | .CONST 0x0519,0x0002
0c1c 0524 0003 | $ | .CONST 0x0524,0x0003
0c1e 0526 0004 | & | .CONST 0x0526,0x0004
0c20 ; --------------------------------------------------------------------------------------
0c20 ; Debug3 Subtable 0x13
0c20 ; --------------------------------------------------------------------------------------
0c20 0001 0002 | | .DBG3TAB 0x0001,0x0002
0c22 0533 ffff | 3 | .CONST 0x0533,0xffff
0c24 0535 0001 | 5 | .CONST 0x0535,0x0001
0c26 0543 0002 | C | .CONST 0x0543,0x0002
0c28 ; --------------------------------------------------------------------------------------
0c28 ; Debug3 Subtable 0x14
0c28 ; --------------------------------------------------------------------------------------
0c28 0001 0010 | | .DBG3TAB 0x0001,0x0010
0c2a 0553 ffff | S | .CONST 0x0553,0xffff
0c2c 0554 0001 | T | .CONST 0x0554,0x0001
0c2e 0558 0002 | X | .CONST 0x0558,0x0002
0c30 0560 0003 | ` | .CONST 0x0560,0x0003
0c32 0561 0401 | a | .CONST 0x0561,0x0401
0c34 0563 0003 | c | .CONST 0x0563,0x0003
0c36 0564 0004 | d | .CONST 0x0564,0x0004
0c38 0568 0005 | h | .CONST 0x0568,0x0005
0c3a 056d 0006 | m | .CONST 0x056d,0x0006
0c3c 0577 0007 | w | .CONST 0x0577,0x0007
0c3e 0578 0008 | x | .CONST 0x0578,0x0008
0c40 057a 0009 | z | .CONST 0x057a,0x0009
0c42 057f 000a | | .CONST 0x057f,0x000a
0c44 0581 000b | | .CONST 0x0581,0x000b
0c46 0585 000c | | .CONST 0x0585,0x000c
0c48 058a 000d | | .CONST 0x058a,0x000d
0c4a 058b 000e | | .CONST 0x058b,0x000e
0c4c ; --------------------------------------------------------------------------------------
0c4c ; Debug3 Subtable 0x15
0c4c ; --------------------------------------------------------------------------------------
0c4c 0001 0002 | | .DBG3TAB 0x0001,0x0002
0c4e 0593 ffff | | .CONST 0x0593,0xffff
0c50 0595 0001 | | .CONST 0x0595,0x0001
0c52 05a3 0002 | | .CONST 0x05a3,0x0002
0c54 ; --------------------------------------------------------------------------------------
0c54 ; Debug3 Subtable 0x16
0c54 ; --------------------------------------------------------------------------------------
0c54 0001 0002 | | .DBG3TAB 0x0001,0x0002
0c56 05b3 ffff | | .CONST 0x05b3,0xffff
0c58 05b5 0001 | | .CONST 0x05b5,0x0001
0c5a 05ba 0002 | | .CONST 0x05ba,0x0002
0c5c ; --------------------------------------------------------------------------------------
0c5c ; Debug3 Subtable 0x17
0c5c ; --------------------------------------------------------------------------------------
0c5c 0001 0004 | | .DBG3TAB 0x0001,0x0004
0c5e 05d3 ffff | | .CONST 0x05d3,0xffff
0c60 05d5 0001 | | .CONST 0x05d5,0x0001
0c62 05d9 0002 | | .CONST 0x05d9,0x0002
0c64 05de 0003 | | .CONST 0x05de,0x0003
0c66 05e3 0004 | | .CONST 0x05e3,0x0004
0c68 ; --------------------------------------------------------------------------------------
0c68 ; Debug3 Subtable 0x18
0c68 ; --------------------------------------------------------------------------------------
0c68 0000 0003 | | .DBG3TAB 0x0000,0x0003
0c6a 05eb 0001 | | .CONST 0x05eb,0x0001
0c6c 05ef 0002 | | .CONST 0x05ef,0x0002
0c6e 05f2 0003 | | .CONST 0x05f2,0x0003
0c70 ; --------------------------------------------------------------------------------------
0c70 ; Debug3 Subtable 0x19
0c70 ; --------------------------------------------------------------------------------------
0c70 0000 0003 | | .DBG3TAB 0x0000,0x0003
0c72 05fb 0001 | | .CONST 0x05fb,0x0001
0c74 0603 0002 | | .CONST 0x0603,0x0002
0c76 0606 0003 | | .CONST 0x0606,0x0003
0c78 ; --------------------------------------------------------------------------------------
0c78 ; Debug3 Subtable 0x1a
0c78 ; --------------------------------------------------------------------------------------
0c78 0000 0003 | | .DBG3TAB 0x0000,0x0003
0c7a 060b 0001 | | .CONST 0x060b,0x0001
0c7c 0610 0002 | | .CONST 0x0610,0x0002
0c7e 0613 0003 | | .CONST 0x0613,0x0003
0c80 ; --------------------------------------------------------------------------------------
0c80 ; Debug3 Subtable 0x1b
0c80 ; --------------------------------------------------------------------------------------
0c80 0000 0005 | | .DBG3TAB 0x0000,0x0005
0c82 061b 0001 | | .CONST 0x061b,0x0001
0c84 0620 0002 | | .CONST 0x0620,0x0002
0c86 062c 0003 | , | .CONST 0x062c,0x0003
0c88 0630 0004 | 0 | .CONST 0x0630,0x0004
0c8a 063c 0005 | < | .CONST 0x063c,0x0005
0c8c ; --------------------------------------------------------------------------------------
0c8c ; Debug3 Subtable 0x1c
0c8c ; --------------------------------------------------------------------------------------
0c8c 0000 0005 | | .DBG3TAB 0x0000,0x0005
0c8e 064b 0001 | K | .CONST 0x064b,0x0001
0c90 0657 0002 | W | .CONST 0x0657,0x0002
0c92 065b 0003 | [ | .CONST 0x065b,0x0003
0c94 0667 0004 | g | .CONST 0x0667,0x0004
0c96 0673 0005 | s | .CONST 0x0673,0x0005
0c98 ; --------------------------------------------------------------------------------------
0c98 ; Debug3 Subtable 0x1d
0c98 ; --------------------------------------------------------------------------------------
0c98 0005 0005 | | .DBG3TAB 0x0005,0x0005
0c9a 068b ffff | | .CONST 0x068b,0xffff
0c9c 068d fffe | | .CONST 0x068d,0xfffe
0c9e 0695 fffd | | .CONST 0x0695,0xfffd
0ca0 069b fffc | | .CONST 0x069b,0xfffc
0ca2 069d fffb | | .CONST 0x069d,0xfffb
0ca4 069f 0001 | | .CONST 0x069f,0x0001
0ca6 06a3 0002 | | .CONST 0x06a3,0x0002
0ca8 06a8 0003 | | .CONST 0x06a8,0x0003
0caa 06ad 0004 | | .CONST 0x06ad,0x0004
0cac 06bd 0005 | | .CONST 0x06bd,0x0005
0cae ; --------------------------------------------------------------------------------------
0cae ; Debug3 Subtable 0x1e
0cae ; --------------------------------------------------------------------------------------
0cae 0001 0007 | | .DBG3TAB 0x0001,0x0007
0cb0 06cb ffff | | .CONST 0x06cb,0xffff
0cb2 06cf 0001 | | .CONST 0x06cf,0x0001
0cb4 06d3 0002 | | .CONST 0x06d3,0x0002
0cb6 06d8 0003 | | .CONST 0x06d8,0x0003
0cb8 06dd 0004 | | .CONST 0x06dd,0x0004
0cba 06eb 0005 | | .CONST 0x06eb,0x0005
0cbc 06f8 0006 | | .CONST 0x06f8,0x0006
0cbe 06fd 0007 | | .CONST 0x06fd,0x0007
0cc0 ; --------------------------------------------------------------------------------------
0cc0 ; Debug3 Subtable 0x1f
0cc0 ; --------------------------------------------------------------------------------------
0cc0 0005 0007 | | .DBG3TAB 0x0005,0x0007
0cc2 0713 ffff | | .CONST 0x0713,0xffff
0cc4 0718 fffe | | .CONST 0x0718,0xfffe
0cc6 071d fffd | | .CONST 0x071d,0xfffd
0cc8 071f fffc | | .CONST 0x071f,0xfffc
0cca 0723 fffb | # | .CONST 0x0723,0xfffb
0ccc 0727 0001 | ' | .CONST 0x0727,0x0001
0cce 072e 0002 | . | .CONST 0x072e,0x0002
0cd0 0732 0003 | 2 | .CONST 0x0732,0x0003
0cd2 0739 0004 | 9 | .CONST 0x0739,0x0004
0cd4 0748 0005 | H | .CONST 0x0748,0x0005
0cd6 0757 0006 | W | .CONST 0x0757,0x0006
0cd8 075d 0007 | ] | .CONST 0x075d,0x0007
0cda ; --------------------------------------------------------------------------------------
0cda ; Debug3 Subtable 0x20
0cda ; --------------------------------------------------------------------------------------
0cda 0002 0006 | | .DBG3TAB 0x0002,0x0006
0cdc 076b ffff | k | .CONST 0x076b,0xffff
0cde 076f fffe | o | .CONST 0x076f,0xfffe
0ce0 0771 0001 | q | .CONST 0x0771,0x0001
0ce2 0779 0002 | y | .CONST 0x0779,0x0002
0ce4 077e 0003 | ~ | .CONST 0x077e,0x0003
0ce6 0783 0004 | | .CONST 0x0783,0x0004
0ce8 078a 0005 | | .CONST 0x078a,0x0005
0cea 0793 0006 | | .CONST 0x0793,0x0006
0cec ; --------------------------------------------------------------------------------------
0cec ; Debug3 Subtable 0x21
0cec ; --------------------------------------------------------------------------------------
0cec 0002 000d | | .DBG3TAB 0x0002,0x000d
0cee 079b ffff | | .CONST 0x079b,0xffff
0cf0 079d fffe | | .CONST 0x079d,0xfffe
0cf2 07a1 0001 | | .CONST 0x07a1,0x0001
0cf4 07a9 0002 | | .CONST 0x07a9,0x0002
0cf6 07ae 0003 | | .CONST 0x07ae,0x0003
0cf8 07b3 0004 | | .CONST 0x07b3,0x0004
0cfa 07b6 0005 | | .CONST 0x07b6,0x0005
0cfc 07bd 0006 | | .CONST 0x07bd,0x0006
0cfe 07c4 0007 | | .CONST 0x07c4,0x0007
0d00 07c9 0008 | | .CONST 0x07c9,0x0008
0d02 07ce 0009 | | .CONST 0x07ce,0x0009
0d04 07d5 000a | | .CONST 0x07d5,0x000a
0d06 07d8 000b | | .CONST 0x07d8,0x000b
0d08 07df 000c | | .CONST 0x07df,0x000c
0d0a 07e4 000d | | .CONST 0x07e4,0x000d
0d0c ; --------------------------------------------------------------------------------------
0d0c ; Debug3 Subtable 0x22
0d0c ; --------------------------------------------------------------------------------------
0d0c 0000 0007 | | .DBG3TAB 0x0000,0x0007
0d0e 07f3 0001 | | .CONST 0x07f3,0x0001
0d10 07f7 0002 | | .CONST 0x07f7,0x0002
0d12 07fc 0003 | | .CONST 0x07fc,0x0003
0d14 0803 0004 | | .CONST 0x0803,0x0004
0d16 0807 0005 | | .CONST 0x0807,0x0005
0d18 0819 0006 | | .CONST 0x0819,0x0006
0d1a 081e 0007 | | .CONST 0x081e,0x0007
0d1c 0000 0000 | | .BLANK 0000[0xe4]