|
|
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 - metrics - download
Length: 9216 (0x2400)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0cd0 | | .CONST 0x0cd0 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0008 | | .CONST 0x0008 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00f3 | | .CONST 0x00f3 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0046 | F | .CONST 0x0046 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x0e12,0x8000,0x0000,0x0057,0xb0d5,0x0000,0x0007
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b15 | | Execute Package,Field_Read,Field_Number 0x15
000d 0129 | ) | Execute Any,Make_Visible
000e e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0010 0129 | ) | Execute Any,Make_Visible
0011 029a 00fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00f8 ; Debug Table 0x0.0x2 = 0x11,0xfffd
0013 029a 0133 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0130 ; Debug Table 0x0.0x3 = 0x13,0xfffc
0015 029a 016b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0168 ; Debug Table 0x0.0x4 = 0x15,0xfffb
0017 029a 028b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0288 ; Debug Table 0x0.0x5 = 0x17,0xfffa
0019 029a 029b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0298 ; Debug Table 0x0.0x6 = 0x19,0xfff9
001b 029a 02b3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02b0 ; Debug Table 0x0.0x7 = 0x1b,0xfff8
001d 029a 03d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03d0 ; Debug Table 0x0.0x8 = 0x1d,0xfff7
001f 0007 | | Action Break_Optional ; Debug Table 0x0.0x9 = 0x1f,0xfff6
0020 00bf | | Action Accept_Activation ; Debug Table 0x0.0xa = 0x20,0xfff5
0021 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0021,0x0e2a,0x8000,0x0000,0x0058,0x6f55,0x0000,0x0049
; Debug Table 0x1.0x0 = 0x21,0xffff
0022 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x22,0xfffe
0023 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x23,0xfffd
0024 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x24,0xfffc
0025 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x25,0xfffb
0026 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x26,0xfffa
0027 0007 | | Action Break_Optional ; Debug Table 0x1.0x6 = 0x27,0xfff9
0028 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x7 = 0x28,0xfff8
0029 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
002a e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x8 = 0x2a,0xfff7
002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002c e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x9 = 0x2c,0xfff6
002d 1922 | " | Execute Package,Field_Reference,Field_Number 0x22
002e 0007 | | Action Break_Optional
002f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1.0xa = 0x2f,0xfff5
0030 02c7 | | Declare_Variable Any
0031 4802 |H | Short_Literal 0x2
0032 0092 0acc | | Action Push_String_Extended,0xacc ; "Invalid User Identity"
0034 8218 | | Call 0x1,0x18
0035 c219 | | Store 0x1,0x19
0036 00da | | Load_Top At_Offset_2 ; Debug Table 0x1.0xb = 0x36,0xfff4
0037 02c7 | | Declare_Variable Any
0038 4802 |H | Short_Literal 0x2
0039 0092 0acd | | Action Push_String_Extended,0xacd ; "Option Error"
003b 8218 | | Call 0x1,0x18
003c c21a | | Store 0x1,0x1a
003d 00db | | Load_Top At_Offset_3 ; Debug Table 0x1.0xc = 0x3d,0xfff3
003e 02c7 | | Declare_Variable Any
003f 4802 |H | Short_Literal 0x2
0040 0092 0ace | | Action Push_String_Extended,0xace ; "Invalid Option String"
0042 8218 | | Call 0x1,0x18
0043 c21b | | Store 0x1,0x1b
0044 e217 | | Load 0x1,0x17 ; Debug Table 0x1.0xd = 0x44,0xfff2
0045 02c7 | | Declare_Variable Any
0046 4802 |H | Short_Literal 0x2
0047 0092 0acf | | Action Push_String_Extended,0xacf ; "Access Violation"
0049 8218 | | Call 0x1,0x18
004a c21c | | Store 0x1,0x1c
004b e217 | | Load 0x1,0x17 ; Debug Table 0x1.0xe = 0x4b,0xfff1
004c 02c7 | | Declare_Variable Any
004d 4802 |H | Short_Literal 0x2
004e 0092 0ad0 | | Action Push_String_Extended,0xad0 ; "Invalid Program"
0050 8218 | | Call 0x1,0x18
0051 c21d | | Store 0x1,0x1d
0052 e217 | | Load 0x1,0x17 ; Debug Table 0x1.0xf = 0x52,0xfff0
0053 02c7 | | Declare_Variable Any
0054 4802 |H | Short_Literal 0x2
0055 0092 0ad1 | | Action Push_String_Extended,0xad1 ; "Unexpected Exception"
0057 8218 | | Call 0x1,0x18
0058 c21e | | Store 0x1,0x1e
0059 e003 | | Load 0x0,0x3 ; Debug Table 0x1.0x10 = 0x59,0xffef
005a 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
005b 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x11 = 0x5b,0xffee
005c e004 | | Load 0x0,0x4
005d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
005e 0092 0ad2 | | Action Push_String_Extended,0xad2 ; "procedure Created_For_Program_Run is begin \x0a"
; Debug Table 0x1.0x12 = 0x5e,0xffed
0060 0092 0ad3 | | Action Push_String_Extended,0xad3 ; "\x0a end;"
; Debug Table 0x1.0x13 = 0x60,0xffec
0062 0092 0ad4 | | Action Push_String_Extended,0xad4 ; "Program"
; Debug Table 0x1.0x14 = 0x62,0xffeb
0064 0092 0ad5 | | Action Push_String_Extended,0xad5 ; "Change_Identity"
; Debug Table 0x1.0x15 = 0x64,0xffea
0066 e005 | | Load 0x0,0x5 ; Debug Table 0x1.0x16 = 0x66,0xffe9
0067 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0068 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0069 00ec | | Load_Encached Diana_Tree_Cache
006a e006 | | Load 0x0,0x6
006b 1b10 | | Execute Package,Field_Read,Field_Number 0x10
006c e001 | | Load 0x0,0x1
006d 1b15 | | Execute Package,Field_Read,Field_Number 0x15
006e 029f 04cb | | Declare_Subprogram For_Call,INIT_04c8
0070 4804 |H | Short_Literal 0x4
0071 032d | - | Declare_Type Record,Defined
0072 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x17 = 0x72,0xffe8
0073 4807 |H | Short_Literal 0x7
0074 029f 04e3 | | Declare_Subprogram For_Call,INIT_04e0
0076 03fd | | Declare_Type Discrete,Defined
0077 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x18 = 0x77,0xffe7
0078 4803 |H | Short_Literal 0x3
0079 029f 04fb | | Declare_Subprogram For_Call,INIT_04f8
007b 03fd | | Declare_Type Discrete,Defined
007c 029b 0513 | | Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0510 ; Debug Table 0x1.0x19 = 0x7c,0xffe6
007e 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 ; Debug Table 0x1.0x1a = 0x7e,0xffe5
007f 00c7 | | Action Elaborate_Subprogram
0080 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28 ; Debug Table 0x1.0x1b = 0x80,0xffe4
0081 00c6 | | Action Check_Subprogram_Elaborated
0082 e007 | | Load 0x0,0x7
0083 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0084 e007 | | Load 0x0,0x7
0085 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0086 e007 | | Load 0x0,0x7
0087 1913 | | Execute Package,Field_Reference,Field_Number 0x13
0088 e007 | | Load 0x0,0x7
0089 1914 | | Execute Package,Field_Reference,Field_Number 0x14
008a e007 | | Load 0x0,0x7
008b 1916 | | Execute Package,Field_Reference,Field_Number 0x16
008c e007 | | Load 0x0,0x7
008d 1917 | | Execute Package,Field_Reference,Field_Number 0x17
008e e007 | | Load 0x0,0x7
008f 191a | | Execute Package,Field_Reference,Field_Number 0x1a
0090 e007 | | Load 0x0,0x7
0091 1919 | | Execute Package,Field_Reference,Field_Number 0x19
0092 6335 |c5 | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x00586f55}
0093 4a2b |J+ | Short_Literal 0x22b
0094 4800 |H | Short_Literal 0x0
0095 0007 | | Action Break_Optional
0096 029d 053b | ;| Declare_Subprogram For_Outer_Call,INIT_0538 ; Debug Table 0x1.0x1c = 0x96,0xffe3
0098 029d 054b | K| Declare_Subprogram For_Outer_Call,INIT_0548 ; Debug Table 0x1.0x1d = 0x98,0xffe2
009a 029d 0573 | s| Declare_Subprogram For_Outer_Call,INIT_0570 ; Debug Table 0x1.0x1e = 0x9a,0xffe1
009c 029d 057b | {| Declare_Subprogram For_Outer_Call,INIT_0578 ; Debug Table 0x1.0x1f = 0x9c,0xffe0
009e 029d 0593 | | Declare_Subprogram For_Outer_Call,INIT_0590 ; Debug Table 0x1.0x20 = 0x9e,0xffdf
00a0 029d 05eb | | Declare_Subprogram For_Outer_Call,INIT_05e8 ; Debug Table 0x1.0x21 = 0xa0,0xffde
00a2 029d 0643 | C| Declare_Subprogram For_Outer_Call,INIT_0640 ; Debug Table 0x1.0x22 = 0xa2,0xffdd
00a4 029d 0673 | s| Declare_Subprogram For_Outer_Call,INIT_0670 ; Debug Table 0x1.0x23 = 0xa4,0xffdc
00a6 029d 06a3 | | Declare_Subprogram For_Outer_Call,INIT_06a0 ; Debug Table 0x1.0x24 = 0xa6,0xffdb
00a8 029d 0723 | #| Declare_Subprogram For_Outer_Call,INIT_0720 ; Debug Table 0x1.0x25 = 0xa8,0xffda
00aa 029d 0753 | S| Declare_Subprogram For_Outer_Call,INIT_0750 ; Debug Table 0x1.0x26 = 0xaa,0xffd9
00ac 631b |c | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x00586f55} ; Debug Table 0x1.0x27 = 0xac,0xffd8
00ad 6316 |c | Indirect_Literal Discrete,0x3c4,{0x00000000, 0x00000737}
00ae e226 | & | Load 0x1,0x26
00af 4800 |H | Short_Literal 0x0
00b0 4801 |H | Short_Literal 0x1
00b1 4807 |H | Short_Literal 0x7
00b2 0092 0ad6 | | Action Push_String_Extended,0xad6 ; "Output..Session => Directory_String_Name"
00b4 00ea | | Load_Encached Null_String_Cache
00b5 00ea | | Load_Encached Null_String_Cache
00b6 4801 |H | Short_Literal 0x1
00b7 4807 |H | Short_Literal 0x7
00b8 e008 | | Load 0x0,0x8
00b9 0387 | | Declare_Variable Package
00ba 00d8 | | Load_Top At_Offset_0
00bb 020f | | Execute Module,Activate
00bc 029d 07b3 | | Declare_Subprogram For_Outer_Call,INIT_07b0 ; Debug Table 0x1.0x28 = 0xbc,0xffd7
00be 029d 07d3 | | Declare_Subprogram For_Outer_Call,INIT_07d0 ; Debug Table 0x1.0x29 = 0xbe,0xffd6
00c0 6307 |c | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x00586f55} ; Debug Table 0x1.0x2a = 0xc0,0xffd5
00c1 62fe |b | Indirect_Literal Discrete,0x3c0,{0x00000000, 0x000007d2}
00c2 e225 | % | Load 0x1,0x25
00c3 1d41 | A | Execute_Immediate Reference_Lex_1,0x41
00c4 e009 | | Load 0x0,0x9
00c5 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00c6 0387 | | Declare_Variable Package
00c7 00d8 | | Load_Top At_Offset_0
00c8 020f | | Execute Module,Activate
00c9 029d 0813 | | Declare_Subprogram For_Outer_Call,INIT_0810 ; Debug Table 0x1.0x2b = 0xc9,0xffd4
00cb 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x2c = 0xcb,0xffd3
00cc 00c7 | | Action Elaborate_Subprogram
00cd 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x2d = 0xcd,0xffd2
00ce 00c7 | | Action Elaborate_Subprogram
00cf 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x2e = 0xcf,0xffd1
00d0 00c7 | | Action Elaborate_Subprogram
00d1 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x2f = 0xd1,0xffd0
00d2 00c7 | | Action Elaborate_Subprogram
00d3 62f4 |b | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x00586f55} ; Debug Table 0x1.0x30 = 0xd3,0xffcf
00d4 62e7 |b | Indirect_Literal Discrete,0x3bc,{0x00000000, 0x00000dc6}
00d5 e227 | ' | Load 0x1,0x27
00d6 4800 |H | Short_Literal 0x0
00d7 4801 |H | Short_Literal 0x1
00d8 4803 |H | Short_Literal 0x3
00d9 0092 0ad7 | | Action Push_String_Extended,0xad7 ; "Privileged..Restore_Identity => Boolean_Valued"
00db 00ea | | Load_Encached Null_String_Cache
00dc 00ea | | Load_Encached Null_String_Cache
00dd 4801 |H | Short_Literal 0x1
00de 4803 |H | Short_Literal 0x3
00df e008 | | Load 0x0,0x8
00e0 0387 | | Declare_Variable Package
00e1 00d8 | | Load_Top At_Offset_0
00e2 020f | | Execute Module,Activate
00e3 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x31 = 0xe3,0xffce
00e4 00c7 | | Action Elaborate_Subprogram
00e5 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x32 = 0xe5,0xffcd
00e6 00c7 | | Action Elaborate_Subprogram
00e7 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x33 = 0xe7,0xffcc
00e8 00c7 | | Action Elaborate_Subprogram
00e9 029d 08d3 | | Declare_Subprogram For_Outer_Call,INIT_08d0 ; Debug Table 0x1.0x34 = 0xe9,0xffcb
00eb 62dc |b | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x00586f55} ; Debug Table 0x1.0x35 = 0xeb,0xffca
00ec 62cb |b | Indirect_Literal Discrete,0x3b8,{0x00000000, 0x000011ad}
00ed 1d45 | E | Execute_Immediate Reference_Lex_1,0x45
00ee e00a | | Load 0x0,0xa
00ef 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f0 0387 | | Declare_Variable Package
00f1 00d8 | | Load_Top At_Offset_0
00f2 020f | | Execute Module,Activate
00f3 BODY_0008:
00f3 00bc | | Action Signal_Activated
00f4 00bb | | Action Signal_Completion
00f5 0000 0000 | | .XXX[0x3]
00f7 0000 | |
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 010e | | .CONST 0x010e ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0007 | | .CONST 0x0007 ; Number of locals
00fb INIT_00f8:
00fb 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x2 = .DEBUG 0x00fb,0x0e98,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0014
; Debug Table 0x2.0x0 = 0xfb,0xffff
00fc e20e | | Load 0x1,0xe ; Debug Table 0x2.0x1 = 0xfc,0xfffe
00fd 02c7 | | Declare_Variable Any
00fe 00d8 | | Load_Top At_Offset_0
00ff 1c00 | | Execute_Immediate Run_Utility,0x0
0100 e00b | | Load 0x0,0xb ; Debug Table 0x2.0x2 = 0x100,0xfffd
0101 180e | | Execute Package,Field_Execute,Field_Number 0xe
0102 e00b | | Load 0x0,0xb
0103 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0104 011e | | Execute Any,Convert
0105 e00b | | Load 0x0,0xb ; Debug Table 0x2.0x3 = 0x105,0xfffc
0106 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0107 02c7 | | Declare_Variable Any
0108 00d8 | | Load_Top At_Offset_0
0109 1c00 | | Execute_Immediate Run_Utility,0x0
010a 029f 08eb | | Declare_Subprogram For_Call,INIT_08e8 ; Debug Table 0x2.0x4 = 0x10a,0xfffb
010c 029f 0903 | | Declare_Subprogram For_Call,INIT_0900
010e BODY_00f8:
010e e403 | | Load 0x2,0x3 ; Debug Table 0x2.0x5 = 0x10e,0x1
010f 00db | | Load_Top At_Offset_3
0110 0120 | | Execute Any,Is_Value
0111 6803 |h | Jump_Zero 0x115
0112 e00b | | Load 0x0,0xb
0113 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0114 7801 |x | Jump 0x116
0115 00db | | Load_Top At_Offset_3
0116 e5fd | | Load 0x2,-0x3
0117 e00b | | Load 0x0,0xb
0118 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
0119 c405 | | Store 0x2,0x5
011a c403 | | Store 0x2,0x3
011b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x6 = 0x11b,0x2
011c e00b | | Load 0x0,0xb
011d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
011e 8407 | | Call 0x2,0x7 ; Debug Table 0x2.0x7 = 0x11e,0x3
011f 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x8 = 0x11f,0x4
0120 e403 | | Load 0x2,0x3
0121 e002 | | Load 0x0,0x2
0122 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0123 7003 |p | Jump_Nonzero 0x127
0124 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x9 = 0x124,0x5
0125 e402 | | Load 0x2,0x2
0126 8406 | | Call 0x2,0x6
0127 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0xa = 0x127,0x6
0128 e00b | | Load 0x0,0xb
0129 1810 | | Execute Package,Field_Execute,Field_Number 0x10
012a e403 | | Load 0x2,0x3 ; Debug Table 0x2.0xb = 0x12a,0x7
012b 00db | | Load_Top At_Offset_3
012c 8235 | 5 | Call 0x1,0x35
012d c403 | | Store 0x2,0x3
012e 4504 |E | Exit_Subprogram 0x4
012f 0000 | | .XXX[0x1]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0139 | 9 | .CONST 0x0139 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0003 | | .CONST 0x0003 ; Number of locals
0133 INIT_0130:
0133 e20d | | Load 0x1,0xd ; Debug Table 0x3 = .DEBUG 0x0133,0x0eb2,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0027
; Debug Table 0x3.0x0 = 0x133,0xffff
0134 0007 | | Action Break_Optional
0135 e20e | | Load 0x1,0xe ; Debug Table 0x3.0x1 = 0x135,0xfffe
0136 02c7 | | Declare_Variable Any
0137 00d8 | | Load_Top At_Offset_0
0138 1c00 | | Execute_Immediate Run_Utility,0x0
0139 BODY_0130:
0139 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x2 = 0x139,0x1
013a e20d | | Load 0x1,0xd
013b e5fa | | Load 0x2,-0x6
013c e5fb | | Load 0x2,-0x5
013d e5fc | | Load 0x2,-0x4
013e e5fd | | Load 0x2,-0x3
013f e5fe | | Load 0x2,-0x2
0140 e5ff | | Load 0x2,-0x1
0141 8211 | | Call 0x1,0x11
0142 005b | [ | Store_Top Discrete,At_Offset_3
0143 c403 | | Store 0x2,0x3
0144 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x3 = 0x144,0x2
0145 8212 | | Call 0x1,0x12
0146 7006 |p | Jump_Nonzero 0x14d
0147 8234 | 4 | Call 0x1,0x34
0148 6804 |h | Jump_Zero 0x14d
0149 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x4 = 0x149,0x3
014a e00c | | Load 0x0,0xc
014b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
014c c403 | | Store 0x2,0x3
014d e00b | | Load 0x0,0xb ; Debug Table 0x3.0x5 = 0x14d,0x4
014e 180e | | Execute Package,Field_Execute,Field_Number 0xe
014f 00d9 | | Load_Top At_Offset_1
0150 e00d | | Load 0x0,0xd
0151 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0152 e00b | | Load 0x0,0xb ; Debug Table 0x3.0x6 = 0x152,0x5
0153 180e | | Execute Package,Field_Execute,Field_Number 0xe
0154 e00b | | Load 0x0,0xb
0155 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0156 680b |h | Jump_Zero 0x162
0157 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x7 = 0x157,0x6
0158 e002 | | Load 0x0,0x2
0159 1814 | | Execute Package,Field_Execute,Field_Number 0x14
015a 4603 |F | Jump_Case 0x3
015b 4507 |E | Exit_Subprogram 0x7 ; case 0x0
015c 4507 |E | Exit_Subprogram 0x7 ; case 0x1
015d 7801 |x | Jump 0x15f ; case 0x2
015e 7800 |x | Jump 0x15f ; case 0x3
015f e00b | | Load 0x0,0xb ; Debug Table 0x3.0x8 = 0x15f,0x7
0160 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0161 0257 | W | Execute Discrete,Raise
0162 4507 |E | Exit_Subprogram 0x7
0163 0000 0000 | | .BLANK 0000[0x5]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 01a5 | | .CONST 0x01a5 ; Address of begin
0169 0267 | g | .CONST 0x0267 ; Address of exception handler
016a 000e | | .CONST 0x000e ; Number of locals
016b INIT_0168:
016b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x016b,0x0ec6,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0049
; Debug Table 0x4.0x0 = 0x16b,0xffff
016c e225 | % | Load 0x1,0x25 ; Debug Table 0x4.0x1 = 0x16c,0xfffe
016d 0322 | " | Declare_Variable Record
016e 00d8 | | Load_Top At_Offset_0
016f 1c00 | | Execute_Immediate Run_Utility,0x0
0170 e23f | ? | Load 0x1,0x3f ; Debug Table 0x4.0x2 = 0x170,0xfffd
0171 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0172 e5fb | | Load 0x2,-0x5
0173 e23f | ? | Load 0x1,0x3f
0174 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0175 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0176 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0x3 = 0x176,0xfffc
0177 4802 |H | Short_Literal 0x2
0178 00da | | Load_Top At_Offset_2
0179 e23f | ? | Load 0x1,0x3f
017a 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
017b 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0x4 = 0x17b,0xfffb
017c 4804 |H | Short_Literal 0x4
017d 00db | | Load_Top At_Offset_3
017e e23f | ? | Load 0x1,0x3f
017f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0180 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0x5 = 0x180,0xfffa
0181 4803 |H | Short_Literal 0x3
0182 e404 | | Load 0x2,0x4
0183 e23f | ? | Load 0x1,0x3f
0184 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0185 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0x6 = 0x185,0xfff9
0186 4801 |H | Short_Literal 0x1
0187 e404 | | Load 0x2,0x4
0188 e23f | ? | Load 0x1,0x3f
0189 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
018a 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0x7 = 0x18a,0xfff8
018b 4805 |H | Short_Literal 0x5
018c e404 | | Load 0x2,0x4
018d e23f | ? | Load 0x1,0x3f
018e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
018f 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0x8 = 0x18f,0xfff7
0190 4807 |H | Short_Literal 0x7
0191 e404 | | Load 0x2,0x4
0192 e23f | ? | Load 0x1,0x3f
0193 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0194 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x4.0x9 = 0x194,0xfff6
0195 4806 |H | Short_Literal 0x6
0196 e404 | | Load 0x2,0x4
0197 e23f | ? | Load 0x1,0x3f
0198 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0199 e00b | | Load 0x0,0xb ; Debug Table 0x4.0xa = 0x199,0xfff5
019a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019b 02c7 | | Declare_Variable Any
019c 00d8 | | Load_Top At_Offset_0
019d 1c00 | | Execute_Immediate Run_Utility,0x0
019e e001 | | Load 0x0,0x1 ; Debug Table 0x4.0xb = 0x19e,0xfff4
019f 1b14 | | Execute Package,Field_Read,Field_Number 0x14
01a0 e006 | | Load 0x0,0x6 ; Debug Table 0x4.0xc = 0x1a0,0xfff3
01a1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a2 02ff | | Declare_Variable Variant_Record
01a3 00d8 | | Load_Top At_Offset_0
01a4 1c00 | | Execute_Immediate Run_Utility,0x0
01a5 BODY_0168:
01a5 e00e | | Load 0x0,0xe ; Debug Table 0x4.0xd = 0x1a5,0x1
01a6 180e | | Execute Package,Field_Execute,Field_Number 0xe
01a7 e403 | | Load 0x2,0x3
01a8 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01a9 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0xe = 0x1a9,0x2
01aa a5f9 | | Store_Unchecked 0x2,-0x7
01ab e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0xf = 0x1ab,0x3
01ac 00db | | Load_Top At_Offset_3
01ad 0120 | | Execute Any,Is_Value
01ae 6803 |h | Jump_Zero 0x1b2
01af e00b | | Load 0x0,0xb
01b0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b1 7801 |x | Jump 0x1b3
01b2 00db | | Load_Top At_Offset_3
01b3 e5fa | | Load 0x2,-0x6
01b4 e00b | | Load 0x0,0xb
01b5 184c | L | Execute Package,Field_Execute,Field_Number 0x4c
01b6 c40c | | Store 0x2,0xc
01b7 c5f8 | | Store 0x2,-0x8
01b8 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x10 = 0x1b8,0x4
01b9 e23f | ? | Load 0x1,0x3f
01ba 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01bb 701c |p | Jump_Nonzero 0x1d8
01bc 00cf | | Action Mark_Auxiliary
01bd 7815 |x | Jump 0x1d3
01be 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x11 = 0x1be,0x6
01bf e404 | | Load 0x2,0x4
01c0 e23f | ? | Load 0x1,0x3f
01c1 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01c2 700b |p | Jump_Nonzero 0x1ce
01c3 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x12 = 0x1c3,0x7
01c4 4800 |H | Short_Literal 0x0
01c5 e404 | | Load 0x2,0x4
01c6 e23f | ? | Load 0x1,0x3f
01c7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
01c8 e21a | | Load 0x1,0x1a
01c9 0092 0ad8 | | Action Push_String_Extended,0xad8 ; "Create_Job"
01cb e002 | | Load 0x0,0x2
01cc 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
01cd c5f8 | | Store 0x2,-0x8
01ce e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x13 = 0x1ce,0x8
01cf e23f | ? | Load 0x1,0x3f
01d0 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
01d1 c404 | | Store 0x2,0x4
01d2 00c9 | | Action Pop_Auxiliary_Loop
01d3 e404 | | Load 0x2,0x4 ; Debug Table 0x4.0x14 = 0x1d3,0x5
01d4 e23f | ? | Load 0x1,0x3f
01d5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
01d6 6fe7 |o | Jump_Zero 0x1be
01d7 00ce | | Action Pop_Auxiliary
01d8 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x15 = 0x1d8,0x9
01d9 00ec | | Load_Encached Diana_Tree_Cache
01da e5ff | | Load 0x2,-0x1
01db 823b | ; | Call 0x1,0x3b
01dc c402 | | Store 0x2,0x2
01dd c5f8 | | Store 0x2,-0x8
01de e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x16 = 0x1de,0xa
01df e402 | | Load 0x2,0x2
01e0 e5fd | | Load 0x2,-0x3
01e1 823c | < | Call 0x1,0x3c
01e2 c402 | | Store 0x2,0x2
01e3 c5f8 | | Store 0x2,-0x8
01e4 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x17 = 0x1e4,0xb
01e5 e5f8 | | Load 0x2,-0x8
01e6 e002 | | Load 0x0,0x2
01e7 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01e8 707d |p} | Jump_Nonzero 0x266
01e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x18 = 0x1e9,0xc
01ea e403 | | Load 0x2,0x3
01eb 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01ec 0120 | | Execute Any,Is_Value
01ed 6803 |h | Jump_Zero 0x1f1
01ee e006 | | Load 0x0,0x6
01ef 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01f0 7802 |x | Jump 0x1f3
01f1 e403 | | Load 0x2,0x3
01f2 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01f3 e5fe | | Load 0x2,-0x2
01f4 e402 | | Load 0x2,0x2
01f5 e006 | | Load 0x0,0x6
01f6 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01f7 e403 | | Load 0x2,0x3
01f8 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01f9 00d1 | | Pop_Control Pop_Count_1
01fa e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x19 = 0x1fa,0xd
01fb e223 | # | Load 0x1,0x23
01fc 00da | | Load_Top At_Offset_2
01fd 823d | = | Call 0x1,0x3d
01fe c5f8 | | Store 0x2,-0x8
01ff 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x1a = 0x1ff,0xe
0200 e5f8 | | Load 0x2,-0x8
0201 e002 | | Load 0x0,0x2
0202 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0203 7062 |pb | Jump_Nonzero 0x266
0204 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x1b = 0x204,0xf
0205 e005 | | Load 0x0,0x5
0206 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0207 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0208 e5fd | | Load 0x2,-0x3
0209 823a | : | Call 0x1,0x3a
020a e403 | | Load 0x2,0x3
020b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
020c c5f8 | | Store 0x2,-0x8
020d e402 | | Load 0x2,0x2 ; Debug Table 0x4.0x1c = 0x20d,0x10
020e e403 | | Load 0x2,0x3
020f 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0210 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x1d = 0x210,0x11
0211 e001 | | Load 0x0,0x1
0212 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0213 e40b | | Load 0x2,0xb
0214 e409 | | Load 0x2,0x9
0215 823e | > | Call 0x1,0x3e
0216 005b | [ | Store_Top Discrete,At_Offset_3
0217 c5f8 | | Store 0x2,-0x8
0218 4801 |H | Short_Literal 0x1 ; Debug Table 0x4.0x1e = 0x218,0x12
0219 e5f8 | | Load 0x2,-0x8
021a e002 | | Load 0x0,0x2
021b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
021c 681b |h | Jump_Zero 0x238
021d e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x1f = 0x21d,0x13
021e e002 | | Load 0x0,0x2
021f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0220 c5f8 | | Store 0x2,-0x8
0221 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x20 = 0x221,0x14
0222 01db | | Execute Vector,Length
0223 7008 |p | Jump_Nonzero 0x22c
0224 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x21 = 0x224,0x15
0225 e409 | | Load 0x2,0x9
0226 e219 | | Load 0x1,0x19
0227 e223 | # | Load 0x1,0x23
0228 e002 | | Load 0x0,0x2
0229 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
022a c5f8 | | Store 0x2,-0x8
022b 4507 |E | Exit_Subprogram 0x7
022c e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x22 = 0x22c,0x16
022d 482e |H. | Short_Literal 0x2e
022e e409 | | Load 0x2,0x9
022f 01cb | | Execute Vector,Append
0230 e40b | | Load 0x2,0xb
0231 01cc | | Execute Vector,Catenate
0232 e219 | | Load 0x1,0x19
0233 e223 | # | Load 0x1,0x23
0234 e002 | | Load 0x0,0x2
0235 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0236 c5f8 | | Store 0x2,-0x8
0237 4507 |E | Exit_Subprogram 0x7 ; Debug Table 0x4.0x23 = 0x237,0x17
0238 e408 | | Load 0x2,0x8 ; Debug Table 0x4.0x24 = 0x238,0x18
0239 01db | | Execute Vector,Length
023a 7017 |p | Jump_Nonzero 0x252
023b e009 | | Load 0x0,0x9 ; Debug Table 0x4.0x25 = 0x23b,0x19
023c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
023d 4800 |H | Short_Literal 0x0
023e 4800 |H | Short_Literal 0x0
023f e5fb | | Load 0x2,-0x5
0240 e40a | | Load 0x2,0xa
0241 e409 | | Load 0x2,0x9
0242 e407 | | Load 0x2,0x7
0243 e406 | | Load 0x2,0x6
0244 e405 | | Load 0x2,0x5
0245 e40c | | Load 0x2,0xc
0246 e5fc | | Load 0x2,-0x4
0247 e40d | | Load 0x2,0xd
0248 e00e | | Load 0x0,0xe
0249 180e | | Execute Package,Field_Execute,Field_Number 0xe
024a e403 | | Load 0x2,0x3
024b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
024c 8243 | C | Call 0x1,0x43
024d e403 | | Load 0x2,0x3
024e e242 | B | Load 0x1,0x42
024f 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0250 c5f9 | | Store 0x2,-0x7
0251 4507 |E | Exit_Subprogram 0x7
0252 e009 | | Load 0x0,0x9 ; Debug Table 0x4.0x26 = 0x252,0x1a
0253 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0254 4800 |H | Short_Literal 0x0
0255 4800 |H | Short_Literal 0x0
0256 e5fb | | Load 0x2,-0x5
0257 e40a | | Load 0x2,0xa
0258 e409 | | Load 0x2,0x9
0259 e407 | | Load 0x2,0x7
025a e406 | | Load 0x2,0x6
025b e405 | | Load 0x2,0x5
025c e40c | | Load 0x2,0xc
025d e5fc | | Load 0x2,-0x4
025e e40d | | Load 0x2,0xd
025f e00e | | Load 0x0,0xe
0260 180e | | Execute Package,Field_Execute,Field_Number 0xe
0261 e408 | | Load 0x2,0x8
0262 e403 | | Load 0x2,0x3
0263 e242 | B | Load 0x1,0x42
0264 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0265 c5f9 | | Store 0x2,-0x7
0266 4507 |E | Exit_Subprogram 0x7
0267 TRAP_0168:
0267 4931 |I1 | Short_Literal 0x131
0268 010f | | Execute Exception,Equal
0269 6808 |h | Jump_Zero 0x272
026a e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x27 = 0x26a,0x1b
026b e409 | | Load 0x2,0x9
026c e219 | | Load 0x1,0x19
026d e223 | # | Load 0x1,0x23
026e e002 | | Load 0x0,0x2
026f 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0270 c5f8 | | Store 0x2,-0x8
0271 4507 |E | Exit_Subprogram 0x7
0272 6141 |aA | Indirect_Literal Discrete,0x3b4,{0x00000000, 0x586f5501}
0273 010f | | Execute Exception,Equal
0274 6808 |h | Jump_Zero 0x27d
0275 e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x28 = 0x275,0x1c
0276 e5ff | | Load 0x2,-0x1
0277 e21d | | Load 0x1,0x1d
0278 e223 | # | Load 0x1,0x23
0279 e002 | | Load 0x0,0x2
027a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
027b c5f8 | | Store 0x2,-0x8
027c 4507 |E | Exit_Subprogram 0x7
027d e5f8 | | Load 0x2,-0x8 ; Debug Table 0x4.0x29 = 0x27d,0x1d
027e e00f | | Load 0x0,0xf
027f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0280 e21e | | Load 0x1,0x1e
0281 e223 | # | Load 0x1,0x23
0282 e002 | | Load 0x0,0x2
0283 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0284 c5f8 | | Store 0x2,-0x8
0285 4507 |E | Exit_Subprogram 0x7
0286 0000 0000 | | .XXX[0x2]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b | | .CONST 0x028b ; Address of begin
0289 0004 | | .CONST 0x0004 ; Address of exception handler
028a 0001 | | .CONST 0x0001 ; Number of locals
028b BODY_0288:
028b INIT_0288:
028b 4801 |H | Short_Literal 0x1 ; Debug Table 0x5 = .DEBUG 0x028b,0x0f1c,0x0002,0x0000,0x0057,0xb0d5,0x0000,0x0073
; Debug Table 0x5.0x0 = 0x28b,0x1
028c 00db | | Load_Top At_Offset_3
028d e002 | | Load 0x0,0x2
028e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
028f 0f00 | | Execute_Immediate Equal,0x0
0290 4401 |D | Exit_Subprogram With_Result,0x1
0291 0000 0000 | | .BLANK 0000[0x7]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029d | | .CONST 0x029d ; Address of begin
0299 02ab | | .CONST 0x02ab ; Address of exception handler
029a 0002 | | .CONST 0x0002 ; Number of locals
029b INIT_0298:
029b e001 | | Load 0x0,0x1 ; Debug Table 0x6 = .DEBUG 0x029b,0x0f20,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x007c
; Debug Table 0x6.0x0 = 0x29b,0xffff
029c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
029d BODY_0298:
029d 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x1 = 0x29d,0x1
029e e010 | | Load 0x0,0x10
029f 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
02a0 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
02a1 00cf | | Action Mark_Auxiliary ; Debug Table 0x6.0x2 = 0x2a1,0x2
02a2 7803 |x | Jump 0x2a6
02a3 610c |a | Indirect_Literal Discrete,0x3b0,{0x00000000, 0x00050000} ; Debug Table 0x6.0x3 = 0x2a3,0x3
02a4 00ba | | Action Initiate_Delay
02a5 00c9 | | Action Pop_Auxiliary_Loop
02a6 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x4 = 0x2a6,0x2
02a7 e001 | | Load 0x0,0x1
02a8 1811 | | Execute Package,Field_Execute,Field_Number 0x11
02a9 77f9 |w | Jump_Nonzero 0x2a3
02aa 4502 |E | Exit_Subprogram 0x2
02ab TRAP_0298:
02ab 0007 | | Action Break_Optional
02ac 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x6.0x5 = 0x2ac,0x4
02ad 0000 0000 | | .XXX[0x3]
02af 0000 | |
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02c6 | | .CONST 0x02c6 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0009 | | .CONST 0x0009 ; Number of locals
02b3 INIT_02b0:
02b3 e011 | | Load 0x0,0x11 ; Debug Table 0x7 = .DEBUG 0x02b3,0x0f2e,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0084
; Debug Table 0x7.0x0 = 0x2b3,0xffff
02b4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02b5 02ff | | Declare_Variable Variant_Record
02b6 00d8 | | Load_Top At_Offset_0
02b7 1c00 | | Execute_Immediate Run_Utility,0x0
02b8 e012 | | Load 0x0,0x12 ; Debug Table 0x7.0x1 = 0x2b8,0xfffe
02b9 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02ba 0337 | 7 | Declare_Variable Array
02bb 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x2 = 0x2bb,0xfffd
02bc 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02bd 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x3 = 0x2bd,0xfffc
02be 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02bf 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x4 = 0x2bf,0xfffb
02c0 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02c1 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x5 = 0x2c1,0xfffa
02c2 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
02c3 e244 | D | Load 0x1,0x44 ; Debug Table 0x7.0x6 = 0x2c3,0xfff9
02c4 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
02c5 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x7 = 0x2c5,0xfff8
02c6 BODY_02b0:
02c6 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x8 = 0x2c6,0x1
02c7 e244 | D | Load 0x1,0x44
02c8 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
02c9 e5fd | | Load 0x2,-0x3
02ca e244 | D | Load 0x1,0x44
02cb 181f | | Execute Package,Field_Execute,Field_Number 0x1f
02cc 0033 | 3 | Store_Top Heap_Access,At_Offset_3
02cd 0059 | Y | Store_Top Discrete,At_Offset_1
02ce 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x9 = 0x2ce,0x2
02cf 700b |p | Jump_Nonzero 0x2db
02d0 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0xa = 0x2d0,0x3
02d1 4800 |H | Short_Literal 0x0
02d2 00db | | Load_Top At_Offset_3
02d3 e244 | D | Load 0x1,0x44
02d4 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
02d5 e21b | | Load 0x1,0x1b
02d6 e224 | $ | Load 0x1,0x24
02d7 e002 | | Load 0x0,0x2
02d8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02d9 c5fc | | Store 0x2,-0x4
02da 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0x7.0xb = 0x2da,0x4
02db 00cf | | Action Mark_Auxiliary
02dc 7833 |x3 | Jump 0x310
02dd 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0xc = 0x2dd,0x6
02de 00db | | Load_Top At_Offset_3
02df e244 | D | Load 0x1,0x44
02e0 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02e1 700b |p | Jump_Nonzero 0x2ed
02e2 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0xd = 0x2e2,0x7
02e3 4800 |H | Short_Literal 0x0
02e4 e408 | | Load 0x2,0x8
02e5 e244 | D | Load 0x1,0x44
02e6 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
02e7 e21b | | Load 0x1,0x1b
02e8 e223 | # | Load 0x1,0x23
02e9 e002 | | Load 0x0,0x2
02ea 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
02eb c5fc | | Store 0x2,-0x4
02ec 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0x7.0xe = 0x2ec,0x8
02ed 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0xf = 0x2ed,0x9
02ee e244 | D | Load 0x1,0x44
02ef 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
02f0 4603 |F | Jump_Case 0x3
02f1 7819 |x | Jump 0x30b ; case 0x0
02f2 7802 |x | Jump 0x2f5 ; case 0x1
02f3 780a |x | Jump 0x2fe ; case 0x2
02f4 7810 |x | Jump 0x305 ; case 0x3
02f5 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x10 = 0x2f5,0xb
02f6 4800 |H | Short_Literal 0x0
02f7 e408 | | Load 0x2,0x8
02f8 e244 | D | Load 0x1,0x44
02f9 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
02fa a405 | | Store_Unchecked 0x2,0x5
02fb 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x11 = 0x2fb,0xc
02fc a406 | | Store_Unchecked 0x2,0x6
02fd 780d |x | Jump 0x30b
02fe 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x12 = 0x2fe,0xd
02ff 4800 |H | Short_Literal 0x0
0300 e408 | | Load 0x2,0x8
0301 e244 | D | Load 0x1,0x44
0302 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
0303 a404 | | Store_Unchecked 0x2,0x4
0304 7806 |x | Jump 0x30b
0305 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x13 = 0x305,0xe
0306 4800 |H | Short_Literal 0x0
0307 e408 | | Load 0x2,0x8
0308 e244 | D | Load 0x1,0x44
0309 182f | / | Execute Package,Field_Execute,Field_Number 0x2f
030a a407 | | Store_Unchecked 0x2,0x7
030b 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x14 = 0x30b,0xf
030c e244 | D | Load 0x1,0x44
030d 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
030e 0033 | 3 | Store_Top Heap_Access,At_Offset_3
030f 00c9 | | Action Pop_Auxiliary_Loop
0310 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x15 = 0x310,0x5
0311 e244 | D | Load 0x1,0x44
0312 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0313 6fc9 |o | Jump_Zero 0x2dd
0314 00ce | | Action Pop_Auxiliary
0315 e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x16 = 0x315,0x10
0316 01db | | Execute Vector,Length
0317 7002 |p | Jump_Nonzero 0x31a
0318 00da | | Load_Top At_Offset_2
0319 6861 |ha | Jump_Zero 0x37b
031a e5ff | | Load 0x2,-0x1 ; Debug Table 0x7.0x17 = 0x31a,0x11
031b 01db | | Execute Vector,Length
031c 682e |h. | Jump_Zero 0x34b
031d 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x18 = 0x31d,0x12
031e 6809 |h | Jump_Zero 0x328
031f e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x19 = 0x31f,0x13
0320 0092 0ad9 | | Action Push_String_Extended,0xad9 ; ": can't specify both user and Restore_Identity"
0322 e21b | | Load 0x1,0x1b
0323 e224 | $ | Load 0x1,0x24
0324 e002 | | Load 0x0,0x2
0325 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0326 c5fc | | Store 0x2,-0x4
0327 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0x7.0x1a = 0x327,0x14
0328 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x1b = 0x328,0x15
0329 e402 | | Load 0x2,0x2
032a e00e | | Load 0x0,0xe
032b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
032c e010 | | Load 0x0,0x10
032d 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
032e e5fe | | Load 0x2,-0x2
032f e5ff | | Load 0x2,-0x1
0330 e013 | | Load 0x0,0x13
0331 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0332 00d1 | | Pop_Control Pop_Count_1
0333 c5fc | | Store 0x2,-0x4
0334 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x1c = 0x334,0x16
0335 e5fc | | Load 0x2,-0x4
0336 e002 | | Load 0x0,0x2
0337 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0338 6808 |h | Jump_Zero 0x341
0339 e216 | | Load 0x1,0x16 ; Debug Table 0x7.0x1d = 0x339,0x17
033a 0a01 | | Execute_Immediate Plus,0x1
033b c216 | | Store 0x1,0x16
033c e216 | | Load 0x1,0x16 ; Debug Table 0x7.0x1e = 0x33c,0x18
033d 606e |`n | Indirect_Literal Discrete,0x3ac,{0x00000000, 0x00008000}
033e 0271 | q | Execute Discrete,Times
033f 00ba | | Action Initiate_Delay
0340 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0x7.0x1f = 0x340,0x19
0341 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x20 = 0x341,0x1a
0342 e403 | | Load 0x2,0x3
0343 e014 | | Load 0x0,0x14
0344 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0345 e402 | | Load 0x2,0x2
0346 e015 | | Load 0x0,0x15
0347 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0348 00d1 | | Pop_Control Pop_Count_1
0349 c5fc | | Store 0x2,-0x4
034a 780d |x | Jump 0x358
034b e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x21 = 0x34b,0x1b
034c e403 | | Load 0x2,0x3
034d e014 | | Load 0x0,0x14
034e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
034f e001 | | Load 0x0,0x1
0350 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0351 e011 | | Load 0x0,0x11
0352 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0353 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0354 e015 | | Load 0x0,0x15
0355 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0356 00d1 | | Pop_Control Pop_Count_1
0357 c5fc | | Store 0x2,-0x4
0358 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x22 = 0x358,0x1c
0359 e5fc | | Load 0x2,-0x4
035a e002 | | Load 0x0,0x2
035b 1817 | | Execute Package,Field_Execute,Field_Number 0x17
035c 6801 |h | Jump_Zero 0x35e
035d 4504 |E | Exit_Subprogram 0x4 ; Debug Table 0x7.0x23 = 0x35d,0x1d
035e e405 | | Load 0x2,0x5 ; Debug Table 0x7.0x24 = 0x35e,0x1e
035f 680d |h | Jump_Zero 0x36d
0360 4802 |H | Short_Literal 0x2
0361 e403 | | Load 0x2,0x3
0362 01d7 | | Execute Vector,Field_Read
0363 7009 |p | Jump_Nonzero 0x36d
0364 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x25 = 0x364,0x1f
0365 0092 0ada | | Action Push_String_Extended,0xada ; ": can't run in privileged mode from unprivileged user id"
0367 e21c | | Load 0x1,0x1c
0368 e224 | $ | Load 0x1,0x24
0369 e002 | | Load 0x0,0x2
036a 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
036b c5fc | | Store 0x2,-0x4
036c 4504 |E | Exit_Subprogram 0x4
036d e404 | | Load 0x2,0x4 ; Debug Table 0x7.0x26 = 0x36d,0x20
036e e403 | | Load 0x2,0x3
036f e00e | | Load 0x0,0xe
0370 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0371 e010 | | Load 0x0,0x10
0372 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0373 e405 | | Load 0x2,0x5 ; Debug Table 0x7.0x27 = 0x373,0x21
0374 6805 |h | Jump_Zero 0x37a
0375 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x28 = 0x375,0x22
0376 e00e | | Load 0x0,0xe
0377 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0378 e010 | | Load 0x0,0x10
0379 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
037a 4504 |E | Exit_Subprogram 0x4
037b 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x29 = 0x37b,0x23
037c 6826 |h& | Jump_Zero 0x3a3
037d e405 | | Load 0x2,0x5 ; Debug Table 0x7.0x2a = 0x37d,0x24
037e 681a |h | Jump_Zero 0x399
037f 4802 |H | Short_Literal 0x2 ; Debug Table 0x7.0x2b = 0x37f,0x25
0380 e00e | | Load 0x0,0xe
0381 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0382 e010 | | Load 0x0,0x10
0383 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0384 01d7 | | Execute Vector,Field_Read
0385 680a |h | Jump_Zero 0x390
0386 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x2c = 0x386,0x26
0387 e00e | | Load 0x0,0xe
0388 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0389 e010 | | Load 0x0,0x10
038a 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
038b e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x2d = 0x38b,0x27
038c e002 | | Load 0x0,0x2
038d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
038e c5fc | | Store 0x2,-0x4
038f 4504 |E | Exit_Subprogram 0x4
0390 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x2e = 0x390,0x28
0391 0092 0adb | | Action Push_String_Extended,0xadb ; ": attempt to enable privileged mode"
0393 e21c | | Load 0x1,0x1c
0394 e224 | $ | Load 0x1,0x24
0395 e002 | | Load 0x0,0x2
0396 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0397 c5fc | | Store 0x2,-0x4
0398 4504 |E | Exit_Subprogram 0x4
0399 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x2f = 0x399,0x29
039a e00e | | Load 0x0,0xe
039b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
039c e010 | | Load 0x0,0x10
039d 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
039e e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x30 = 0x39e,0x2a
039f e002 | | Load 0x0,0x2
03a0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03a1 c5fc | | Store 0x2,-0x4
03a2 4504 |E | Exit_Subprogram 0x4
03a3 e5fc | | Load 0x2,-0x4 ; Debug Table 0x7.0x31 = 0x3a3,0x2b
03a4 00ea | | Load_Encached Null_String_Cache
03a5 e21b | | Load 0x1,0x1b
03a6 e224 | $ | Load 0x1,0x24
03a7 e002 | | Load 0x0,0x2
03a8 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
03a9 c5fc | | Store 0x2,-0x4
03aa 4504 |E | Exit_Subprogram 0x4
03ab 0000 | | .XXX[0x1]
03ac 0000 0000 | | .LITERAL {0x00000000, 0x00008000}
03b0 0000 0000 | | .LITERAL {0x00000000, 0x00050000}
03b4 0000 0000 | | .LITERAL {0x00000000, 0x586f5501}
03b8 0000 0000 | | .LITERAL {0x00000000, 0x000011ad}
03bc 0000 0000 | | .LITERAL {0x00000000, 0x00000dc6}
03c0 0000 0000 | | .LITERAL {0x00000000, 0x000007d2}
03c4 0000 0000 | | .LITERAL {0x00000000, 0x00000737}
03c8 0000 0000 | | .LITERAL {0x00000000, 0x00586f55}
03cc 0000 0000 | | .BLANK 0000[0x4]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03f1 | | .CONST 0x03f1 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0009 | | .CONST 0x0009 ; Number of locals
03d3 INIT_03d0:
03d3 0007 | | Action Break_Optional ; Debug Table 0x8 = .DEBUG 0x03d3,0x0f94,0x0002,0x0000,0x0057,0xb0d5,0x0000,0x009b
; Debug Table 0x8.0x0 = 0x3d3,0xffff
03d4 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x1 = 0x3d4,0xfffe
03d5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03d6 02c7 | | Declare_Variable Any
03d7 00d8 | | Load_Top At_Offset_0
03d8 1c00 | | Execute_Immediate Run_Utility,0x0
03d9 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x2 = 0x3d9,0xfffd
03da 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03db 02c7 | | Declare_Variable Any
03dc 00d8 | | Load_Top At_Offset_0
03dd 1c00 | | Execute_Immediate Run_Utility,0x0
03de e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x3 = 0x3de,0xfffc
03df 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03e0 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x4 = 0x3e0,0xfffb
03e1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03e2 02c7 | | Declare_Variable Any
03e3 00d8 | | Load_Top At_Offset_0
03e4 1c00 | | Execute_Immediate Run_Utility,0x0
03e5 e016 | | Load 0x0,0x16 ; Debug Table 0x8.0x5 = 0x3e5,0xfffa
03e6 1b15 | | Execute Package,Field_Read,Field_Number 0x15
03e7 02c7 | | Declare_Variable Any
03e8 00d8 | | Load_Top At_Offset_0
03e9 1c00 | | Execute_Immediate Run_Utility,0x0
03ea e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x6 = 0x3ea,0xfff9
03eb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ec e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x7 = 0x3ec,0xfff8
03ed 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
03ee 1b0f | | Execute Package,Field_Read,Field_Number 0xf
03ef 029f 0923 | #| Declare_Subprogram For_Call,INIT_0920 ; Debug Table 0x8.0x8 = 0x3ef,0xfff7
03f1 BODY_03d0:
03f1 00be | | Action Activate_Tasks
03f2 e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x9 = 0x3f2,0x1
03f3 8409 | | Call 0x2,0x9
03f4 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0xa = 0x3f4,0x2
03f5 8409 | | Call 0x2,0x9
03f6 e5fc | | Load 0x2,-0x4 ; Debug Table 0x8.0xb = 0x3f6,0x3
03f7 01db | | Execute Vector,Length
03f8 0c03 | | Execute_Immediate Greater_Equal,0x3
03f9 6812 |h | Jump_Zero 0x40c
03fa 4801 |H | Short_Literal 0x1
03fb 0092 0adc | | Action Push_String_Extended,0xadc ; "<A"
03fd e5fc | | Load 0x2,-0x4
03fe 01dd | | Execute Vector,First
03ff e5fc | | Load 0x2,-0x4
0400 01dd | | Execute Vector,First
0401 0a01 | | Execute_Immediate Plus,0x1
0402 0248 | H | Execute Discrete,Check_In_Integer
0403 e5fc | | Load 0x2,-0x4
0404 01cf | | Execute Vector,Slice_Read
0405 e017 | | Load 0x0,0x17
0406 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0407 6804 |h | Jump_Zero 0x40c
0408 e016 | | Load 0x0,0x16 ; Debug Table 0x8.0xc = 0x408,0x4
0409 1816 | | Execute Package,Field_Execute,Field_Number 0x16
040a c402 | | Store 0x2,0x2
040b 781c |x | Jump 0x428
040c e005 | | Load 0x0,0x5 ; Debug Table 0x8.0xd = 0x40c,0x5
040d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
040e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
040f e402 | | Load 0x2,0x2
0410 0120 | | Execute Any,Is_Value
0411 6803 |h | Jump_Zero 0x415
0412 e005 | | Load 0x0,0x5
0413 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0414 7801 |x | Jump 0x416
0415 e402 | | Load 0x2,0x2
0416 6225 |b% | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00004000}
0417 e014 | | Load 0x0,0x14
0418 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0419 e00e | | Load 0x0,0xe
041a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
041b e005 | | Load 0x0,0x5
041c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
041d 1816 | | Execute Package,Field_Execute,Field_Number 0x16
041e e5fc | | Load 0x2,-0x4
041f e005 | | Load 0x0,0x5
0420 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0421 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0422 c402 | | Store 0x2,0x2
0423 005a | Z | Store_Top Discrete,At_Offset_2
0424 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0xe = 0x424,0x6
0425 6802 |h | Jump_Zero 0x428
0426 4920 |I | Short_Literal 0x120 ; Debug Table 0x8.0xf = 0x426,0x7
0427 0257 | W | Execute Discrete,Raise
0428 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x10 = 0x428,0x8
0429 1b0d | | Execute Package,Field_Read,Field_Number 0xd
042a e406 | | Load 0x2,0x6
042b 4801 |H | Short_Literal 0x1
042c 4800 |H | Short_Literal 0x0
042d e014 | | Load 0x0,0x14
042e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
042f e402 | | Load 0x2,0x2
0430 e016 | | Load 0x0,0x16
0431 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0432 c406 | | Store 0x2,0x6
0433 005b | [ | Store_Top Discrete,At_Offset_3
0434 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x11 = 0x434,0x9
0435 6802 |h | Jump_Zero 0x438
0436 4930 |I0 | Short_Literal 0x130 ; Debug Table 0x8.0x12 = 0x436,0xa
0437 0257 | W | Execute Discrete,Raise
0438 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x13 = 0x438,0xb
0439 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
043a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
043b e403 | | Load 0x2,0x3
043c 0120 | | Execute Any,Is_Value
043d 6803 |h | Jump_Zero 0x441
043e e005 | | Load 0x0,0x5
043f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0440 7801 |x | Jump 0x442
0441 e403 | | Load 0x2,0x3
0442 61f9 |a | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00004000}
0443 e014 | | Load 0x0,0x14
0444 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0445 e00e | | Load 0x0,0xe
0446 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0447 e005 | | Load 0x0,0x5
0448 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0449 1816 | | Execute Package,Field_Execute,Field_Number 0x16
044a e5ff | | Load 0x2,-0x1
044b e005 | | Load 0x0,0x5
044c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
044d 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
044e c403 | | Store 0x2,0x3
044f 005a | Z | Store_Top Discrete,At_Offset_2
0450 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x14 = 0x450,0xc
0451 6809 |h | Jump_Zero 0x45b
0452 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x15 = 0x452,0xd
0453 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0454 e406 | | Load 0x2,0x6
0455 e016 | | Load 0x0,0x16
0456 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0457 c406 | | Store 0x2,0x6
0458 005b | [ | Store_Top Discrete,At_Offset_3
0459 4920 |I | Short_Literal 0x120 ; Debug Table 0x8.0x16 = 0x459,0xe
045a 0257 | W | Execute Discrete,Raise
045b 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x17 = 0x45b,0xf
045c e403 | | Load 0x2,0x3
045d e016 | | Load 0x0,0x16
045e 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
045f c405 | | Store 0x2,0x5
0460 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x18 = 0x460,0x10
0461 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0462 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0463 e005 | | Load 0x0,0x5
0464 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0465 61d6 |a | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00004000}
0466 e014 | | Load 0x0,0x14
0467 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0468 e00e | | Load 0x0,0xe
0469 1811 | | Execute Package,Field_Execute,Field_Number 0x11
046a e005 | | Load 0x0,0x5
046b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
046c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
046d 4824 |H$ | Short_Literal 0x24
046e e405 | | Load 0x2,0x5
046f e005 | | Load 0x0,0x5
0470 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0471 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0472 0092 0add | | Action Push_String_Extended,0xadd ; "`."
0474 01cc | | Execute Vector,Catenate
0475 e5fe | | Load 0x2,-0x2
0476 01cc | | Execute Vector,Catenate
0477 01cb | | Execute Vector,Append
0478 e005 | | Load 0x0,0x5
0479 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
047a 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
047b c404 | | Store 0x2,0x4
047c 005a | Z | Store_Top Discrete,At_Offset_2
047d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x19 = 0x47d,0x11
047e 682d |h- | Jump_Zero 0x4ac
047f 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1a = 0x47f,0x12
0480 e403 | | Load 0x2,0x3
0481 e016 | | Load 0x0,0x16
0482 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0483 c405 | | Store 0x2,0x5
0484 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x1b = 0x484,0x13
0485 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0486 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0487 e005 | | Load 0x0,0x5
0488 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0489 61b2 |a | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00004000}
048a e014 | | Load 0x0,0x14
048b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
048c e00e | | Load 0x0,0xe
048d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
048e e005 | | Load 0x0,0x5
048f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0490 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0491 4824 |H$ | Short_Literal 0x24
0492 e405 | | Load 0x2,0x5
0493 e005 | | Load 0x0,0x5
0494 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0495 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
0496 0092 0add | | Action Push_String_Extended,0xadd ; "`."
0498 01cc | | Execute Vector,Catenate
0499 e5fe | | Load 0x2,-0x2
049a 01cc | | Execute Vector,Catenate
049b 01cb | | Execute Vector,Append
049c e005 | | Load 0x0,0x5
049d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
049e 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
049f c404 | | Store 0x2,0x4
04a0 005a | Z | Store_Top Discrete,At_Offset_2
04a1 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x1c = 0x4a1,0x14
04a2 6809 |h | Jump_Zero 0x4ac
04a3 e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x1d = 0x4a3,0x15
04a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04a5 e406 | | Load 0x2,0x6
04a6 e016 | | Load 0x0,0x16
04a7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04a8 c406 | | Store 0x2,0x6
04a9 005b | [ | Store_Top Discrete,At_Offset_3
04aa 4920 |I | Short_Literal 0x120 ; Debug Table 0x8.0x1e = 0x4aa,0x16
04ab 0257 | W | Execute Discrete,Raise
04ac e005 | | Load 0x0,0x5 ; Debug Table 0x8.0x1f = 0x4ac,0x17
04ad 1b0d | | Execute Package,Field_Read,Field_Number 0xd
04ae e406 | | Load 0x2,0x6
04af e016 | | Load 0x0,0x16
04b0 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04b1 c406 | | Store 0x2,0x6
04b2 005b | [ | Store_Top Discrete,At_Offset_3
04b3 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x20 = 0x4b3,0x18
04b4 6802 |h | Jump_Zero 0x4b7
04b5 4930 |I0 | Short_Literal 0x130 ; Debug Table 0x8.0x21 = 0x4b5,0x19
04b6 0257 | W | Execute Discrete,Raise
04b7 4822 |H" | Short_Literal 0x22 ; Debug Table 0x8.0x22 = 0x4b7,0x1a
04b8 483b |H; | Short_Literal 0x3b
04b9 e404 | | Load 0x2,0x4
04ba e005 | | Load 0x0,0x5
04bb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
04bc 1837 | 7 | Execute Package,Field_Execute,Field_Number 0x37
04bd 0092 0ade | | Action Push_String_Extended,0xade ; "\x22."
04bf 01cc | | Execute Vector,Catenate
04c0 e5fe | | Load 0x2,-0x2
04c1 01cc | | Execute Vector,Catenate
04c2 e5fd | | Load 0x2,-0x3
04c3 01cc | | Execute Vector,Catenate
04c4 01cb | | Execute Vector,Append
04c5 01ca | | Execute Vector,Prepend
04c6 4404 |D | Exit_Subprogram With_Result,0x4
04c7 0000 | | .XXX[0x1]
04c8 ; --------------------------------------------------------------------------------------
04c8 ; SUBPROGRAM
04c8 ; --------------------------------------------------------------------------------------
04c8 04cb | | .CONST 0x04cb ; Address of begin
04c9 0004 | | .CONST 0x0004 ; Address of exception handler
04ca 0001 | | .CONST 0x0001 ; Number of locals
04cb BODY_04c8:
04cb INIT_04c8:
04cb 4608 |F | Jump_Case 0x8 ; Debug Table 0x9 = .DEBUG 0x04cb,0x0fdc,0x0005,0x0000,0x0058,0x6f55,0x0000,0x010f
04cc 7808 |x | Jump 0x4d5 ; case 0x0
04cd 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
04ce 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
04cf 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
04d0 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
04d1 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
04d2 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
04d3 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x7
04d4 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x8
04d5 00da | | Load_Top At_Offset_2
04d6 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
04d7 0125 | % | Execute Any,Set_Constraint
04d8 00da | | Load_Top At_Offset_2
04d9 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
04da 1c00 | | Execute_Immediate Run_Utility,0x0
04db 4302 |C | Exit_Subprogram From_Utility,0x2
04dc 0000 0000 | | .BLANK 0000[0x4]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e3 | | .CONST 0x04e3 ; Address of begin
04e1 0004 | | .CONST 0x0004 ; Address of exception handler
04e2 0001 | | .CONST 0x0001 ; Number of locals
04e3 BODY_04e0:
04e3 INIT_04e0:
04e3 4603 |F | Jump_Case 0x3 ; Debug Table 0xa = .DEBUG 0x04e3,0x0fde,0x0005,0x0000,0x0058,0x6f55,0x0000,0x012f
04e4 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
04e5 7802 |x | Jump 0x4e8 ; case 0x1
04e6 7805 |x | Jump 0x4ec ; case 0x2
04e7 7809 |x | Jump 0x4f1 ; case 0x3
04e8 00da | | Load_Top At_Offset_2
04e9 0091 0ac0 | | Action Push_String_Extended_Indexed,0xac0 ; "NIL"
04eb 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
04ec 00db | | Load_Top At_Offset_3
04ed 00db | | Load_Top At_Offset_3
04ee 00e0 | | Load_Encached Standard_Cache
04ef 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04f0 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
04f1 00da | | Load_Top At_Offset_2
04f2 00e0 | | Load_Encached Standard_Cache
04f3 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04f4 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
04f5 0000 0000 | | .XXX[0x3]
04f7 0000 | |
04f8 ; --------------------------------------------------------------------------------------
04f8 ; SUBPROGRAM
04f8 ; --------------------------------------------------------------------------------------
04f8 04fb | | .CONST 0x04fb ; Address of begin
04f9 0004 | | .CONST 0x0004 ; Address of exception handler
04fa 0001 | | .CONST 0x0001 ; Number of locals
04fb BODY_04f8:
04fb INIT_04f8:
04fb 4603 |F | Jump_Case 0x3 ; Debug Table 0xb = .DEBUG 0x04fb,0x0fe0,0x0005,0x0000,0x0058,0x6f55,0x0000,0x013b
04fc 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
04fd 7802 |x | Jump 0x500 ; case 0x1
04fe 7805 |x | Jump 0x504 ; case 0x2
04ff 7809 |x | Jump 0x509 ; case 0x3
0500 00da | | Load_Top At_Offset_2
0501 0091 0ac8 | | Action Push_String_Extended_Indexed,0xac8 ; "NONE"
0503 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0504 00db | | Load_Top At_Offset_3
0505 00db | | Load_Top At_Offset_3
0506 00e0 | | Load_Encached Standard_Cache
0507 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0508 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0509 00da | | Load_Top At_Offset_2
050a 00e0 | | Load_Encached Standard_Cache
050b 181c | | Execute Package,Field_Execute,Field_Number 0x1c
050c 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
050d 0000 0000 | | .XXX[0x3]
050f 0000 | |
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 051a | | .CONST 0x051a ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0003 | | .CONST 0x0003 ; Number of locals
0513 INIT_0510:
0513 e5f7 | | Load 0x2,-0x9 ; Debug Table 0xc = .DEBUG 0x0513,0x0fe2,0x2801,0x0002,0x0058,0x6f55,0x0000,0x0143
; Debug Table 0xc.0x0 = 0x513,0xffff
0514 02c7 | | Declare_Variable Any
0515 e5f6 | | Load 0x2,-0xa
0516 c402 | | Store 0x2,0x2
0517 0007 | | Action Break_Optional ; Debug Table 0xc.0x1 = 0x517,0xfffe
0518 029f 093b | ;| Declare_Subprogram For_Call,INIT_0938 ; Debug Table 0xc.0x2 = 0x518,0xfffd
051a BODY_0510:
051a 00cf | | Action Mark_Auxiliary
051b 7811 |x | Jump 0x52d
051c 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x3 = 0x51c,0x2
051d e5f7 | | Load 0x2,-0x9
051e 0119 | | Execute Any,Check_In_Formal_Type
051f 85f9 | | Call 0x2,-0x7
0520 e5f5 | | Load 0x2,-0xb
0521 027b | { | Execute Discrete,Greater_Equal
0522 6804 |h | Jump_Zero 0x527
0523 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x4 = 0x523,0x3
0524 e5f7 | | Load 0x2,-0x9
0525 0119 | | Execute Any,Check_In_Formal_Type
0526 8403 | | Call 0x2,0x3
0527 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x5 = 0x527,0x4
0528 e5f7 | | Load 0x2,-0x9
0529 0119 | | Execute Any,Check_In_Formal_Type
052a 85fe | | Call 0x2,-0x2
052b c402 | | Store 0x2,0x2
052c 00c9 | | Action Pop_Auxiliary_Loop
052d 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x6 = 0x52d,0x1
052e e5f7 | | Load 0x2,-0x9
052f 0119 | | Execute Any,Check_In_Formal_Type
0530 85fd | | Call 0x2,-0x3
0531 6fea |o | Jump_Zero 0x51c
0532 450d |E | Exit_Subprogram 0xd
0533 0000 0000 | | .BLANK 0000[0x5]
0538 ; --------------------------------------------------------------------------------------
0538 ; SUBPROGRAM
0538 ; --------------------------------------------------------------------------------------
0538 053b | ; | .CONST 0x053b ; Address of begin
0539 0004 | | .CONST 0x0004 ; Address of exception handler
053a 0001 | | .CONST 0x0001 ; Number of locals
053b BODY_0538:
053b INIT_0538:
053b e018 | | Load 0x0,0x18 ; Debug Table 0xd = .DEBUG 0x053b,0x0ff2,0x0002,0x0000,0x0058,0x6f55,0x0000,0x025a
; Debug Table 0xd.0x0 = 0x53b,0x1
053c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
053d e018 | | Load 0x0,0x18
053e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
053f 0092 0adf | | Action Push_String_Extended,0xadf ; "*SYSTEM"
0541 01df | | Execute Vector,Equal
0542 00ca | | Action Exit_Nullary_Function
0543 0000 0000 | | .BLANK 0000[0x5]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 054b | K | .CONST 0x054b ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0001 | | .CONST 0x0001 ; Number of locals
054b BODY_0548:
054b INIT_0548:
054b 4801 |H | Short_Literal 0x1 ; Debug Table 0xe = .DEBUG 0x054b,0x0ff6,0x0001,0x0000,0x0058,0x6f55,0x0000,0x026b
; Debug Table 0xe.0x0 = 0x54b,0x1
054c e5fe | | Load 0x2,-0x2
054d e002 | | Load 0x0,0x2
054e 1817 | | Execute Package,Field_Execute,Field_Number 0x17
054f 6806 |h | Jump_Zero 0x556
0550 8234 | 4 | Call 0x1,0x34
0551 6804 |h | Jump_Zero 0x556
0552 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x1 = 0x552,0x2
0553 e00c | | Load 0x0,0xc
0554 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0555 c5fe | | Store 0x2,-0x2
0556 e00b | | Load 0x0,0xb ; Debug Table 0xe.0x2 = 0x556,0x3
0557 180e | | Execute Package,Field_Execute,Field_Number 0xe
0558 e5fe | | Load 0x2,-0x2
0559 e00d | | Load 0x0,0xd
055a 1812 | | Execute Package,Field_Execute,Field_Number 0x12
055b 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x3 = 0x55b,0x4
055c e00b | | Load 0x0,0xb
055d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
055e 680b |h | Jump_Zero 0x56a
055f 00db | | Load_Top At_Offset_3 ; Debug Table 0xe.0x4 = 0x55f,0x5
0560 e002 | | Load 0x0,0x2
0561 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0562 4603 |F | Jump_Case 0x3
0563 4502 |E | Exit_Subprogram 0x2 ; case 0x0
0564 4502 |E | Exit_Subprogram 0x2 ; case 0x1
0565 7801 |x | Jump 0x567 ; case 0x2
0566 7800 |x | Jump 0x567 ; case 0x3
0567 e00b | | Load 0x0,0xb ; Debug Table 0xe.0x5 = 0x567,0x6
0568 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0569 0257 | W | Execute Discrete,Raise
056a 4502 |E | Exit_Subprogram 0x2
056b 0000 0000 | | .BLANK 0000[0x5]
0570 ; --------------------------------------------------------------------------------------
0570 ; SUBPROGRAM
0570 ; --------------------------------------------------------------------------------------
0570 0573 | s | .CONST 0x0573 ; Address of begin
0571 0004 | | .CONST 0x0004 ; Address of exception handler
0572 0001 | | .CONST 0x0001 ; Number of locals
0573 BODY_0570:
0573 INIT_0570:
0573 00da | | Load_Top At_Offset_2 ; Debug Table 0xf = .DEBUG 0x0573,0x1004,0x0002,0x0000,0x0058,0x6f55,0x0000,0x02b8
; Debug Table 0xf.0x0 = 0x573,0x1
0574 00eb | | Load_Encached Diana_Cache
0575 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
0576 4401 |D | Exit_Subprogram With_Result,0x1
0577 0000 | | .XXX[0x1]
0578 ; --------------------------------------------------------------------------------------
0578 ; SUBPROGRAM
0578 ; --------------------------------------------------------------------------------------
0578 057b | { | .CONST 0x057b ; Address of begin
0579 0004 | | .CONST 0x0004 ; Address of exception handler
057a 0001 | | .CONST 0x0001 ; Number of locals
057b BODY_0578:
057b INIT_0578:
057b 00da | | Load_Top At_Offset_2 ; Debug Table 0x10 = .DEBUG 0x057b,0x1008,0x0001,0x0000,0x0058,0x6f55,0x0000,0x02d0
; Debug Table 0x10.0x0 = 0x57b,0x1
057c 680f |h | Jump_Zero 0x58c
057d e5fd | | Load 0x2,-0x3 ; Debug Table 0x10.0x1 = 0x57d,0x2
057e e5fe | | Load 0x2,-0x2
057f 4802 |H | Short_Literal 0x2
0580 e5ff | | Load 0x2,-0x1
0581 e005 | | Load 0x0,0x5
0582 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0583 025e | ^ | Execute Discrete,Convert
0584 1c01 | | Execute_Immediate Run_Utility,0x1
0585 8218 | | Call 0x1,0x18
0586 e223 | # | Load 0x1,0x23
0587 e002 | | Load 0x0,0x2
0588 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0589 c5fd | | Store 0x2,-0x3
058a 6629 |f) | Indirect_Literal Discrete,0x3b4,{0x00000000, 0x586f5501} ; Debug Table 0x10.0x2 = 0x58a,0x3
058b 0257 | W | Execute Discrete,Raise
058c 4503 |E | Exit_Subprogram 0x3
058d 0000 0000 | | .XXX[0x3]
058f 0000 | |
0590 ; --------------------------------------------------------------------------------------
0590 ; SUBPROGRAM
0590 ; --------------------------------------------------------------------------------------
0590 0596 | | .CONST 0x0596 ; Address of begin
0591 0004 | | .CONST 0x0004 ; Address of exception handler
0592 0002 | | .CONST 0x0002 ; Number of locals
0593 INIT_0590:
0593 e005 | | Load 0x0,0x5 ; Debug Table 0x11 = .DEBUG 0x0593,0x1010,0x0001,0x0000,0x0058,0x6f55,0x0000,0x030a
; Debug Table 0x11.0x0 = 0x593,0xffff
0594 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0595 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0596 BODY_0590:
0596 e005 | | Load 0x0,0x5 ; Debug Table 0x11.0x1 = 0x596,0x1
0597 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0598 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0599 e5fe | | Load 0x2,-0x2
059a 0120 | | Execute Any,Is_Value
059b 6803 |h | Jump_Zero 0x59f
059c e005 | | Load 0x0,0x5
059d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
059e 7801 |x | Jump 0x5a0
059f e5fe | | Load 0x2,-0x2
05a0 609b |` | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00004000}
05a1 e014 | | Load 0x0,0x14
05a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05a3 e00e | | Load 0x0,0xe
05a4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05a5 e005 | | Load 0x0,0x5
05a6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05a7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05a8 e5ff | | Load 0x2,-0x1
05a9 e005 | | Load 0x0,0x5
05aa 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05ab 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
05ac c5fe | | Store 0x2,-0x2
05ad 0059 | Y | Store_Top Discrete,At_Offset_1
05ae 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x2 = 0x5ae,0x2
05af 7001 |p | Jump_Nonzero 0x5b1
05b0 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x11.0x3 = 0x5b0,0x3
05b1 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x4 = 0x5b1,0x4
05b2 0092 0ae0 | | Action Push_String_Extended,0xae0 ; "$"
05b4 01df | | Execute Vector,Equal
05b5 681c |h | Jump_Zero 0x5d2
05b6 e005 | | Load 0x0,0x5 ; Debug Table 0x11.0x5 = 0x5b6,0x5
05b7 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05b8 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05b9 e5fe | | Load 0x2,-0x2
05ba 0120 | | Execute Any,Is_Value
05bb 6803 |h | Jump_Zero 0x5bf
05bc e005 | | Load 0x0,0x5
05bd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05be 7801 |x | Jump 0x5c0
05bf e5fe | | Load 0x2,-0x2
05c0 607b |`{ | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00004000}
05c1 e014 | | Load 0x0,0x14
05c2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
05c3 e00e | | Load 0x0,0xe
05c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
05c5 e005 | | Load 0x0,0x5
05c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05c7 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05c8 0092 0ae1 | | Action Push_String_Extended,0xae1 ; "!Machine.Error_Logs"
05ca e005 | | Load 0x0,0x5
05cb 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05cc 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
05cd c5fe | | Store 0x2,-0x2
05ce 0059 | Y | Store_Top Discrete,At_Offset_1
05cf 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x6 = 0x5cf,0x6
05d0 7001 |p | Jump_Nonzero 0x5d2
05d1 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x11.0x7 = 0x5d1,0x7
05d2 e5fd | | Load 0x2,-0x3 ; Debug Table 0x11.0x8 = 0x5d2,0x8
05d3 e5ff | | Load 0x2,-0x1
05d4 0092 0ae2 | | Action Push_String_Extended,0xae2 ; " could not be resovled"
05d6 01cc | | Execute Vector,Catenate
05d7 4802 |H | Short_Literal 0x2
05d8 00db | | Load_Top At_Offset_3
05d9 e005 | | Load 0x0,0x5
05da 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05db 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05dc 025e | ^ | Execute Discrete,Convert
05dd 1c01 | | Execute_Immediate Run_Utility,0x1
05de 8218 | | Call 0x1,0x18
05df e223 | # | Load 0x1,0x23
05e0 e002 | | Load 0x0,0x2
05e1 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
05e2 c5fd | | Store 0x2,-0x3
05e3 65d0 |e | Indirect_Literal Discrete,0x3b4,{0x00000000, 0x586f5501} ; Debug Table 0x11.0x9 = 0x5e3,0x9
05e4 0257 | W | Execute Discrete,Raise
05e5 0000 0000 | | .XXX[0x3]
05e7 0000 | |
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05f5 | | .CONST 0x05f5 ; Address of begin
05e9 0004 | | .CONST 0x0004 ; Address of exception handler
05ea 0004 | | .CONST 0x0004 ; Number of locals
05eb INIT_05e8:
05eb e005 | | Load 0x0,0x5 ; Debug Table 0x12 = .DEBUG 0x05eb,0x1026,0x0001,0x0000,0x0058,0x6f55,0x0000,0x037f
; Debug Table 0x12.0x0 = 0x5eb,0xffff
05ec 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05ed 1b11 | | Execute Package,Field_Read,Field_Number 0x11
05ee e005 | | Load 0x0,0x5 ; Debug Table 0x12.0x1 = 0x5ee,0xfffe
05ef 1b0f | | Execute Package,Field_Read,Field_Number 0xf
05f0 02c7 | | Declare_Variable Any
05f1 00d8 | | Load_Top At_Offset_0
05f2 1c00 | | Execute_Immediate Run_Utility,0x0
05f3 e005 | | Load 0x0,0x5 ; Debug Table 0x12.0x2 = 0x5f3,0xfffd
05f4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05f5 BODY_05e8:
05f5 e5ff | | Load 0x2,-0x1 ; Debug Table 0x12.0x3 = 0x5f5,0x1
05f6 01db | | Execute Vector,Length
05f7 700e |p | Jump_Nonzero 0x606
05f8 e005 | | Load 0x0,0x5 ; Debug Table 0x12.0x4 = 0x5f8,0x2
05f9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
05fa e005 | | Load 0x0,0x5
05fb 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
05fc 1b16 | | Execute Package,Field_Read,Field_Number 0x16
05fd e005 | | Load 0x0,0x5
05fe 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
05ff 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0600 e005 | | Load 0x0,0x5
0601 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0602 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0603 c5fe | | Store 0x2,-0x2
0604 0059 | Y | Store_Top Discrete,At_Offset_1
0605 782c |x, | Jump 0x632
0606 e5fd | | Load 0x2,-0x3 ; Debug Table 0x12.0x5 = 0x606,0x3
0607 00da | | Load_Top At_Offset_2
0608 0120 | | Execute Any,Is_Value
0609 6803 |h | Jump_Zero 0x60d
060a e005 | | Load 0x0,0x5
060b 1b0f | | Execute Package,Field_Read,Field_Number 0xf
060c 7801 |x | Jump 0x60e
060d 00da | | Load_Top At_Offset_2
060e e5ff | | Load 0x2,-0x1
060f 8238 | 8 | Call 0x1,0x38
0610 c403 | | Store 0x2,0x3
0611 c5fd | | Store 0x2,-0x3
0612 e005 | | Load 0x0,0x5 ; Debug Table 0x12.0x6 = 0x612,0x4
0613 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0614 e005 | | Load 0x0,0x5
0615 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0616 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0617 6024 |`$ | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00004000}
0618 e014 | | Load 0x0,0x14
0619 1b0e | | Execute Package,Field_Read,Field_Number 0xe
061a 4800 |H | Short_Literal 0x0
061b e403 | | Load 0x2,0x3
061c e005 | | Load 0x0,0x5
061d 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
061e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
061f c402 | | Store 0x2,0x2
0620 0059 | Y | Store_Top Discrete,At_Offset_1
0621 e5fd | | Load 0x2,-0x3 ; Debug Table 0x12.0x7 = 0x621,0x5
0622 0092 0ae3 | | Action Push_String_Extended,0xae3 ; "Get Context failed"
0624 00da | | Load_Top At_Offset_2
0625 8237 | 7 | Call 0x1,0x37
0626 c5fd | | Store 0x2,-0x3
0627 e005 | | Load 0x0,0x5 ; Debug Table 0x12.0x8 = 0x627,0x6
0628 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0629 e005 | | Load 0x0,0x5
062a 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
062b 1b16 | | Execute Package,Field_Read,Field_Number 0x16
062c e402 | | Load 0x2,0x2
062d e005 | | Load 0x0,0x5
062e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
062f 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0630 c5fe | | Store 0x2,-0x2
0631 0059 | Y | Store_Top Discrete,At_Offset_1
0632 e5fd | | Load 0x2,-0x3 ; Debug Table 0x12.0x9 = 0x632,0x7
0633 0092 0ae4 | | Action Push_String_Extended,0xae4 ; "Get Root Failed"
0635 00da | | Load_Top At_Offset_2
0636 8237 | 7 | Call 0x1,0x37
0637 c5fd | | Store 0x2,-0x3
0638 4502 |E | Exit_Subprogram 0x2
0639 0000 0000 | | .XXX[0x3]
063b 0000 | |
063c 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0640 ; --------------------------------------------------------------------------------------
0640 ; SUBPROGRAM
0640 ; --------------------------------------------------------------------------------------
0640 064a | J | .CONST 0x064a ; Address of begin
0641 0004 | | .CONST 0x0004 ; Address of exception handler
0642 0003 | | .CONST 0x0003 ; Number of locals
0643 INIT_0640:
0643 e005 | | Load 0x0,0x5 ; Debug Table 0x13 = .DEBUG 0x0643,0x103c,0x0001,0x0000,0x0058,0x6f55,0x0000,0x03f6
; Debug Table 0x13.0x0 = 0x643,0xffff
0644 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0645 02c7 | | Declare_Variable Any
0646 00d8 | | Load_Top At_Offset_0
0647 1c00 | | Execute_Immediate Run_Utility,0x0
0648 e005 | | Load 0x0,0x5 ; Debug Table 0x13.0x1 = 0x648,0xfffe
0649 1b0d | | Execute Package,Field_Read,Field_Number 0xd
064a BODY_0640:
064a e5fd | | Load 0x2,-0x3 ; Debug Table 0x13.0x2 = 0x64a,0x1
064b 00da | | Load_Top At_Offset_2
064c 0120 | | Execute Any,Is_Value
064d 6803 |h | Jump_Zero 0x651
064e e005 | | Load 0x0,0x5
064f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0650 7801 |x | Jump 0x652
0651 00da | | Load_Top At_Offset_2
0652 e5ff | | Load 0x2,-0x1
0653 8238 | 8 | Call 0x1,0x38
0654 c402 | | Store 0x2,0x2
0655 c5fd | | Store 0x2,-0x3
0656 e005 | | Load 0x0,0x5 ; Debug Table 0x13.0x3 = 0x656,0x2
0657 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0658 e005 | | Load 0x0,0x5
0659 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
065a 1b11 | | Execute Package,Field_Read,Field_Number 0x11
065b 67e0 |g | Indirect_Literal Discrete,0x63c,{0x00000000, 0x00004000}
065c e014 | | Load 0x0,0x14
065d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
065e 4800 |H | Short_Literal 0x0
065f e402 | | Load 0x2,0x2
0660 e005 | | Load 0x0,0x5
0661 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0662 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0663 c5fe | | Store 0x2,-0x2
0664 0059 | Y | Store_Top Discrete,At_Offset_1
0665 e5fd | | Load 0x2,-0x3 ; Debug Table 0x13.0x4 = 0x665,0x3
0666 0092 0ae3 | | Action Push_String_Extended,0xae3 ; "Get Context failed"
0668 00da | | Load_Top At_Offset_2
0669 8237 | 7 | Call 0x1,0x37
066a c5fd | | Store 0x2,-0x3
066b 4502 |E | Exit_Subprogram 0x2
066c 0000 0000 | | .BLANK 0000[0x4]
0670 ; --------------------------------------------------------------------------------------
0670 ; SUBPROGRAM
0670 ; --------------------------------------------------------------------------------------
0670 0678 | x | .CONST 0x0678 ; Address of begin
0671 0004 | | .CONST 0x0004 ; Address of exception handler
0672 0004 | | .CONST 0x0004 ; Number of locals
0673 INIT_0670:
0673 e019 | | Load 0x0,0x19 ; Debug Table 0x14 = .DEBUG 0x0673,0x1048,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0434
; Debug Table 0x14.0x0 = 0x673,0xffff
0674 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0675 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x14.0x1 = 0x675,0xfffe
0676 029f 096b | k| Declare_Subprogram For_Call,INIT_0968 ; Debug Table 0x14.0x2 = 0x676,0xfffd
0678 BODY_0670:
0678 e019 | | Load 0x0,0x19 ; Debug Table 0x14.0x3 = 0x678,0x1
0679 1b0d | | Execute Package,Field_Read,Field_Number 0xd
067a 00ec | | Load_Encached Diana_Tree_Cache
067b e01a | | Load 0x0,0x1a
067c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
067d e001 | | Load 0x0,0x1
067e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
067f 4800 |H | Short_Literal 0x0
0680 e01b | | Load 0x0,0x1b
0681 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0682 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0683 4803 |H | Short_Literal 0x3
0684 e5ff | | Load 0x2,-0x1
0685 8404 | | Call 0x2,0x4
0686 e01c | | Load 0x0,0x1c
0687 180d | | Execute Package,Field_Execute,Field_Number 0xd
0688 c5fe | | Store 0x2,-0x2
0689 005b | [ | Store_Top Discrete,At_Offset_3
068a 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x4 = 0x68a,0x2
068b 0f02 | | Execute_Immediate Equal,0x2
068c 680c |h | Jump_Zero 0x699
068d e5fd | | Load 0x2,-0x3 ; Debug Table 0x14.0x5 = 0x68d,0x3
068e e5ff | | Load 0x2,-0x1
068f 4802 |H | Short_Literal 0x2
0690 0092 0ae5 | | Action Push_String_Extended,0xae5 ; "Severe parser error"
0692 8218 | | Call 0x1,0x18
0693 e223 | # | Load 0x1,0x23
0694 e002 | | Load 0x0,0x2
0695 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0696 c5fd | | Store 0x2,-0x3
0697 6230 |b0 | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x586f5501} ; Debug Table 0x14.0x6 = 0x697,0x4
0698 0257 | W | Execute Discrete,Raise
0699 4502 |E | Exit_Subprogram 0x2
069a 0000 0000 | | .BLANK 0000[0x6]
06a0 ; --------------------------------------------------------------------------------------
06a0 ; SUBPROGRAM
06a0 ; --------------------------------------------------------------------------------------
06a0 06ba | | .CONST 0x06ba ; Address of begin
06a1 070a | | .CONST 0x070a ; Address of exception handler
06a2 0006 | | .CONST 0x0006 ; Number of locals
06a3 INIT_06a0:
06a3 e007 | | Load 0x0,0x7 ; Debug Table 0x15 = .DEBUG 0x06a3,0x1058,0x0001,0x0000,0x0058,0x6f55,0x0000,0x052c
; Debug Table 0x15.0x0 = 0x6a3,0xffff
06a4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06a5 02c7 | | Declare_Variable Any
06a6 00d8 | | Load_Top At_Offset_0
06a7 1c00 | | Execute_Immediate Run_Utility,0x0
06a8 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x15.0x1 = 0x6a8,0xfffe
06a9 e5fe | | Load 0x2,-0x2
06aa 8236 | 6 | Call 0x1,0x36
06ab 0031 | 1 | Store_Top Heap_Access,At_Offset_1
06ac e005 | | Load 0x0,0x5 ; Debug Table 0x15.0x2 = 0x6ac,0xfffd
06ad 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06ae 1b11 | | Execute Package,Field_Read,Field_Number 0x11
06af e00e | | Load 0x0,0xe
06b0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06b1 e005 | | Load 0x0,0x5
06b2 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06b3 1816 | | Execute Package,Field_Execute,Field_Number 0x16
06b4 0031 | 1 | Store_Top Heap_Access,At_Offset_1
06b5 e005 | | Load 0x0,0x5 ; Debug Table 0x15.0x3 = 0x6b5,0xfffc
06b6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06b7 1b11 | | Execute Package,Field_Read,Field_Number 0x11
06b8 e005 | | Load 0x0,0x5 ; Debug Table 0x15.0x4 = 0x6b8,0xfffb
06b9 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ba BODY_06a0:
06ba e5fd | | Load 0x2,-0x3 ; Debug Table 0x15.0x5 = 0x6ba,0x1
06bb 00da | | Load_Top At_Offset_2
06bc e5ff | | Load 0x2,-0x1
06bd 8239 | 9 | Call 0x1,0x39
06be 0033 | 3 | Store_Top Heap_Access,At_Offset_3
06bf c5fd | | Store 0x2,-0x3
06c0 e005 | | Load 0x0,0x5 ; Debug Table 0x15.0x6 = 0x6c0,0x2
06c1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06c2 e00e | | Load 0x0,0xe
06c3 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06c4 00db | | Load_Top At_Offset_3
06c5 e005 | | Load 0x0,0x5
06c6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06c7 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06c8 0059 | Y | Store_Top Discrete,At_Offset_1
06c9 e5fd | | Load 0x2,-0x3 ; Debug Table 0x15.0x7 = 0x6c9,0x3
06ca 0092 0ae6 | | Action Push_String_Extended,0xae6 ; "Cannot set context to "
06cc e5ff | | Load 0x2,-0x1
06cd 01cc | | Execute Vector,Catenate
06ce 00da | | Load_Top At_Offset_2
06cf 8237 | 7 | Call 0x1,0x37
06d0 c5fd | | Store 0x2,-0x3
06d1 e402 | | Load 0x2,0x2 ; Debug Table 0x15.0x8 = 0x6d1,0x4
06d2 0120 | | Execute Any,Is_Value
06d3 6803 |h | Jump_Zero 0x6d7
06d4 e01d | | Load 0x0,0x1d
06d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06d6 7801 |x | Jump 0x6d8
06d7 e402 | | Load 0x2,0x2
06d8 e403 | | Load 0x2,0x3
06d9 e01e | | Load 0x0,0x1e
06da 180f | | Execute Package,Field_Execute,Field_Number 0xf
06db e014 | | Load 0x0,0x14
06dc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
06dd e220 | | Load 0x1,0x20
06de e00e | | Load 0x0,0xe
06df 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06e0 e01f | | Load 0x0,0x1f
06e1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06e2 e405 | | Load 0x2,0x5
06e3 e21f | | Load 0x1,0x1f
06e4 e01d | | Load 0x0,0x1d
06e5 1b13 | | Execute Package,Field_Read,Field_Number 0x13
06e6 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06e7 180e | | Execute Package,Field_Execute,Field_Number 0xe
06e8 c403 | | Store 0x2,0x3
06e9 c402 | | Store 0x2,0x2
06ea e005 | | Load 0x0,0x5 ; Debug Table 0x15.0x9 = 0x6ea,0x5
06eb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
06ec e00e | | Load 0x0,0xe
06ed 1811 | | Execute Package,Field_Execute,Field_Number 0x11
06ee e404 | | Load 0x2,0x4
06ef e005 | | Load 0x0,0x5
06f0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
06f1 1814 | | Execute Package,Field_Execute,Field_Number 0x14
06f2 0059 | Y | Store_Top Discrete,At_Offset_1
06f3 e402 | | Load 0x2,0x2 ; Debug Table 0x15.0xa = 0x6f3,0x6
06f4 e007 | | Load 0x0,0x7
06f5 181a | | Execute Package,Field_Execute,Field_Number 0x1a
06f6 7012 |p | Jump_Nonzero 0x709
06f7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x15.0xb = 0x6f7,0x7
06f8 0092 0ae7 | | Action Push_String_Extended,0xae7 ; "Semantics"
06fa 4801 |H | Short_Literal 0x1
06fb e402 | | Load 0x2,0x2
06fc e229 | ) | Load 0x1,0x29
06fd e22a | * | Load 0x1,0x2a
06fe 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
06ff 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
0700 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0701 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
0702 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0703 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0704 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
0705 8228 | ( | Call 0x1,0x28
0706 c5fd | | Store 0x2,-0x3
0707 61c0 |a | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x586f5501} ; Debug Table 0x15.0xc = 0x707,0x8
0708 0257 | W | Execute Discrete,Raise
0709 4502 |E | Exit_Subprogram 0x2
070a TRAP_06a0:
070a 61bd |a | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x586f5501}
070b 010f | | Execute Exception,Equal
070c 6802 |h | Jump_Zero 0x70f
070d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x15.0xd = 0x70d,0x9
070e 0101 | | Execute Exception,Reraise
070f e5fd | | Load 0x2,-0x3 ; Debug Table 0x15.0xe = 0x70f,0xa
0710 e020 | | Load 0x0,0x20
0711 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0712 4802 |H | Short_Literal 0x2
0713 0092 0ae8 | | Action Push_String_Extended,0xae8 ; "Unhandled exception in Semantics"
0715 8218 | | Call 0x1,0x18
0716 e223 | # | Load 0x1,0x23
0717 e002 | | Load 0x0,0x2
0718 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0719 c5fd | | Store 0x2,-0x3
071a 61ad |a | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x586f5501} ; Debug Table 0x15.0xf = 0x71a,0xb
071b 0257 | W | Execute Discrete,Raise
071c 0000 0000 | | .BLANK 0000[0x4]
0720 ; --------------------------------------------------------------------------------------
0720 ; SUBPROGRAM
0720 ; --------------------------------------------------------------------------------------
0720 0723 | # | .CONST 0x0723 ; Address of begin
0721 0004 | | .CONST 0x0004 ; Address of exception handler
0722 0001 | | .CONST 0x0001 ; Number of locals
0723 BODY_0720:
0723 INIT_0720:
0723 00da | | Load_Top At_Offset_2 ; Debug Table 0x16 = .DEBUG 0x0723,0x107a,0x0001,0x0000,0x0058,0x6f55,0x0000,0x05dd
; Debug Table 0x16.0x0 = 0x723,0x1
0724 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0725 4603 |F | Jump_Case 0x3
0726 4503 |E | Exit_Subprogram 0x3 ; case 0x0
0727 7802 |x | Jump 0x72a ; case 0x1
0728 780c |x | Jump 0x735 ; case 0x2
0729 781d |x | Jump 0x747 ; case 0x3
072a e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x1 = 0x72a,0x3
072b 00db | | Load_Top At_Offset_3
072c 2e03 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
072d e020 | | Load 0x0,0x20
072e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
072f e21e | | Load 0x1,0x1e
0730 e5fe | | Load 0x2,-0x2
0731 e002 | | Load 0x0,0x2
0732 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0733 c5fd | | Store 0x2,-0x3
0734 4503 |E | Exit_Subprogram 0x3
0735 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x2 = 0x735,0x4
0736 0092 0ae9 | | Action Push_String_Extended,0xae9 ; "Unable to run program"
0738 4802 |H | Short_Literal 0x2
0739 e5ff | | Load 0x2,-0x1
073a 2e02 |. | Execute Variant_Record,Field_Read,Variant,Direct,Field_Number 0x2
073b e229 | ) | Load 0x1,0x29
073c e22a | * | Load 0x1,0x2a
073d 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
073e 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
073f 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
0740 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
0741 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
0742 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
0743 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
0744 8228 | ( | Call 0x1,0x28
0745 c5fd | | Store 0x2,-0x3
0746 4503 |E | Exit_Subprogram 0x3
0747 e5fd | | Load 0x2,-0x3 ; Debug Table 0x16.0x3 = 0x747,0x5
0748 00ea | | Load_Encached Null_String_Cache
0749 e21e | | Load 0x1,0x1e
074a e5fe | | Load 0x2,-0x2
074b e002 | | Load 0x0,0x2
074c 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
074d c5fd | | Store 0x2,-0x3
074e 4503 |E | Exit_Subprogram 0x3
074f 0000 | | .XXX[0x1]
0750 ; --------------------------------------------------------------------------------------
0750 ; SUBPROGRAM
0750 ; --------------------------------------------------------------------------------------
0750 075f | _ | .CONST 0x075f ; Address of begin
0751 0004 | | .CONST 0x0004 ; Address of exception handler
0752 0005 | | .CONST 0x0005 ; Number of locals
0753 INIT_0750:
0753 e011 | | Load 0x0,0x11 ; Debug Table 0x17 = .DEBUG 0x0753,0x1084,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0641
; Debug Table 0x17.0x0 = 0x753,0xffff
0754 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0755 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0756 02ff | | Declare_Variable Variant_Record
0757 00d8 | | Load_Top At_Offset_0
0758 1c00 | | Execute_Immediate Run_Utility,0x0
0759 029f 09bb | | Declare_Subprogram For_Call,INIT_09b8
075b 029f 09d3 | | Declare_Subprogram For_Call,INIT_09d0
075d 029f 09e3 | | Declare_Subprogram For_Call,INIT_09e0
075f BODY_0750:
075f e5fc | | Load 0x2,-0x4 ; Debug Table 0x17.0x1 = 0x75f,0x1
0760 e002 | | Load 0x0,0x2
0761 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0762 c5fc | | Store 0x2,-0x4
0763 e5ff | | Load 0x2,-0x1 ; Debug Table 0x17.0x2 = 0x763,0x2
0764 01db | | Execute Vector,Length
0765 7009 |p | Jump_Nonzero 0x76f
0766 e5fe | | Load 0x2,-0x2 ; Debug Table 0x17.0x3 = 0x766,0x3
0767 01db | | Execute Vector,Length
0768 7004 |p | Jump_Nonzero 0x76d
0769 e00e | | Load 0x0,0xe ; Debug Table 0x17.0x4 = 0x769,0x4
076a 180f | | Execute Package,Field_Execute,Field_Number 0xf
076b a5fd | | Store_Unchecked 0x2,-0x3
076c 4503 |E | Exit_Subprogram 0x3
076d 8403 | | Call 0x2,0x3 ; Debug Table 0x17.0x5 = 0x76d,0x5
076e 4503 |E | Exit_Subprogram 0x3
076f e5fe | | Load 0x2,-0x2 ; Debug Table 0x17.0x6 = 0x76f,0x6
0770 01db | | Execute Vector,Length
0771 701d |p | Jump_Nonzero 0x78f
0772 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x7 = 0x772,0x7
0773 0092 0aea | | Action Push_String_Extended,0xaea ; "network_public"
0775 e5ff | | Load 0x2,-0x1
0776 e017 | | Load 0x0,0x17
0777 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0778 6802 |h | Jump_Zero 0x77b
0779 8404 | | Call 0x2,0x4 ; Debug Table 0x17.0x8 = 0x779,0x8
077a 4503 |E | Exit_Subprogram 0x3
077b 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0x9 = 0x77b,0x9
077c 0092 0aeb | | Action Push_String_Extended,0xaeb ; "public"
077e e5ff | | Load 0x2,-0x1
077f e017 | | Load 0x0,0x17
0780 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0781 6802 |h | Jump_Zero 0x784
0782 8405 | | Call 0x2,0x5 ; Debug Table 0x17.0xa = 0x782,0xa
0783 4503 |E | Exit_Subprogram 0x3
0784 e5fc | | Load 0x2,-0x4 ; Debug Table 0x17.0xb = 0x784,0xb
0785 e001 | | Load 0x0,0x1
0786 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0787 e5ff | | Load 0x2,-0x1
0788 e021 | ! | Load 0x0,0x21
0789 1811 | | Execute Package,Field_Execute,Field_Number 0x11
078a e5ff | | Load 0x2,-0x1
078b 823e | > | Call 0x1,0x3e
078c c5fd | | Store 0x2,-0x3
078d c5fc | | Store 0x2,-0x4
078e 4503 |E | Exit_Subprogram 0x3
078f e5fc | | Load 0x2,-0x4 ; Debug Table 0x17.0xc = 0x78f,0xc
0790 e402 | | Load 0x2,0x2
0791 e014 | | Load 0x0,0x14
0792 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0793 0092 0aec | | Action Push_String_Extended,0xaec ; "!users."
0795 e5ff | | Load 0x2,-0x1
0796 01cc | | Execute Vector,Catenate
0797 0092 0aed | | Action Push_String_Extended,0xaed ; "."
0799 01cc | | Execute Vector,Catenate
079a e5fe | | Load 0x2,-0x2
079b 01cc | | Execute Vector,Catenate
079c e013 | | Load 0x0,0x13
079d 1810 | | Execute Package,Field_Execute,Field_Number 0x10
079e 00d1 | | Pop_Control Pop_Count_1
079f c5fc | | Store 0x2,-0x4
07a0 4801 |H | Short_Literal 0x1 ; Debug Table 0x17.0xd = 0x7a0,0xd
07a1 e5fc | | Load 0x2,-0x4
07a2 e002 | | Load 0x0,0x2
07a3 1817 | | Execute Package,Field_Execute,Field_Number 0x17
07a4 6803 |h | Jump_Zero 0x7a8
07a5 4800 |H | Short_Literal 0x0 ; Debug Table 0x17.0xe = 0x7a5,0xe
07a6 a5fd | | Store_Unchecked 0x2,-0x3
07a7 4503 |E | Exit_Subprogram 0x3
07a8 00db | | Load_Top At_Offset_3 ; Debug Table 0x17.0xf = 0x7a8,0xf
07a9 e013 | | Load 0x0,0x13
07aa 1816 | | Execute Package,Field_Execute,Field_Number 0x16
07ab a5fd | | Store_Unchecked 0x2,-0x3
07ac 4503 |E | Exit_Subprogram 0x3
07ad 0000 0000 | | .XXX[0x3]
07af 0000 | |
07b0 ; --------------------------------------------------------------------------------------
07b0 ; SUBPROGRAM
07b0 ; --------------------------------------------------------------------------------------
07b0 07bd | | .CONST 0x07bd ; Address of begin
07b1 0004 | | .CONST 0x0004 ; Address of exception handler
07b2 0003 | | .CONST 0x0003 ; Number of locals
07b3 INIT_07b0:
07b3 e006 | | Load 0x0,0x6 ; Debug Table 0x18 = .DEBUG 0x07b3,0x10a6,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0742
; Debug Table 0x18.0x0 = 0x7b3,0xffff
07b4 1b0e | | Execute Package,Field_Read,Field_Number 0xe
07b5 02ff | | Declare_Variable Variant_Record
07b6 00d8 | | Load_Top At_Offset_0
07b7 1c00 | | Execute_Immediate Run_Utility,0x0
07b8 e006 | | Load 0x0,0x6 ; Debug Table 0x18.0x1 = 0x7b8,0xfffe
07b9 1b10 | | Execute Package,Field_Read,Field_Number 0x10
07ba 02c7 | | Declare_Variable Any
07bb e5ff | | Load 0x2,-0x1
07bc c403 | | Store 0x2,0x3
07bd BODY_07b0:
07bd 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x18.0x2 = 0x7bd,0x1
07be 00d9 | | Load_Top At_Offset_1
07bf e006 | | Load 0x0,0x6
07c0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
07c1 c403 | | Store 0x2,0x3
07c2 00d1 | | Pop_Control Pop_Count_1
07c3 e5fd | | Load 0x2,-0x3 ; Debug Table 0x18.0x3 = 0x7c3,0x2
07c4 e5fe | | Load 0x2,-0x2
07c5 00db | | Load_Top At_Offset_3
07c6 823d | = | Call 0x1,0x3d
07c7 c5fd | | Store 0x2,-0x3
07c8 4503 |E | Exit_Subprogram 0x3
07c9 0000 0000 | | .BLANK 0000[0x7]
07d0 ; --------------------------------------------------------------------------------------
07d0 ; SUBPROGRAM
07d0 ; --------------------------------------------------------------------------------------
07d0 07df | | .CONST 0x07df ; Address of begin
07d1 0803 | | .CONST 0x0803 ; Address of exception handler
07d2 0004 | | .CONST 0x0004 ; Number of locals
07d3 INIT_07d0:
07d3 e006 | | Load 0x0,0x6 ; Debug Table 0x19 = .DEBUG 0x07d3,0x10b0,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0774
; Debug Table 0x19.0x0 = 0x7d3,0xffff
07d4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
07d5 02c7 | | Declare_Variable Any
07d6 00db | | Load_Top At_Offset_3
07d7 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
07d8 c402 | | Store 0x2,0x2
07d9 e005 | | Load 0x0,0x5 ; Debug Table 0x19.0x1 = 0x7d9,0xfffe
07da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07db e20e | | Load 0x1,0xe ; Debug Table 0x19.0x2 = 0x7db,0xfffd
07dc 02c7 | | Declare_Variable Any
07dd 00d8 | | Load_Top At_Offset_0
07de 1c00 | | Execute_Immediate Run_Utility,0x0
07df BODY_07d0:
07df e005 | | Load 0x0,0x5 ; Debug Table 0x19.0x3 = 0x7df,0x1
07e0 1b0d | | Execute Package,Field_Read,Field_Number 0xd
07e1 e00e | | Load 0x0,0xe
07e2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
07e3 e5ff | | Load 0x2,-0x1
07e4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
07e5 e005 | | Load 0x0,0x5
07e6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
07e7 1814 | | Execute Package,Field_Execute,Field_Number 0x14
07e8 005a | Z | Store_Top Discrete,At_Offset_2
07e9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x4 = 0x7e9,0x2
07ea 0092 0aee | | Action Push_String_Extended,0xaee ; "Context problem"
07ec 00db | | Load_Top At_Offset_3
07ed 8237 | 7 | Call 0x1,0x37
07ee c404 | | Store 0x2,0x4
07ef e5ff | | Load 0x2,-0x1 ; Debug Table 0x19.0x5 = 0x7ef,0x3
07f0 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
07f1 e00e | | Load 0x0,0xe
07f2 180e | | Execute Package,Field_Execute,Field_Number 0xe
07f3 e00b | | Load 0x0,0xb
07f4 185b | [ | Execute Package,Field_Execute,Field_Number 0x5b
07f5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x6 = 0x7f5,0x4
07f6 e018 | | Load 0x0,0x18
07f7 1814 | | Execute Package,Field_Execute,Field_Number 0x14
07f8 e018 | | Load 0x0,0x18
07f9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
07fa e402 | | Load 0x2,0x2
07fb 8240 | @ | Call 0x1,0x40
07fc c404 | | Store 0x2,0x4
07fd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x7 = 0x7fd,0x5
07fe e00b | | Load 0x0,0xb
07ff 180e | | Execute Package,Field_Execute,Field_Number 0xe
0800 8235 | 5 | Call 0x1,0x35
0801 c404 | | Store 0x2,0x4
0802 4503 |E | Exit_Subprogram 0x3
0803 TRAP_07d0:
0803 0007 | | Action Break_Optional
0804 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x19.0x8 = 0x804,0x6
0805 e00b | | Load 0x0,0xb
0806 180e | | Execute Package,Field_Execute,Field_Number 0xe
0807 8235 | 5 | Call 0x1,0x35
0808 c404 | | Store 0x2,0x4
0809 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x19.0x9 = 0x809,0x7
080a 0101 | | Execute Exception,Reraise
080b 0000 0000 | | .BLANK 0000[0x5]
0810 ; --------------------------------------------------------------------------------------
0810 ; SUBPROGRAM
0810 ; --------------------------------------------------------------------------------------
0810 081b | | .CONST 0x081b ; Address of begin
0811 0004 | | .CONST 0x0004 ; Address of exception handler
0812 0006 | | .CONST 0x0006 ; Number of locals
0813 INIT_0810:
0813 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1a = .DEBUG 0x0813,0x10c6,0x0002,0x0000,0x0058,0x6f55,0x0000,0x07db
; Debug Table 0x1a.0x0 = 0x813,0xffff
0814 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1a.0x1 = 0x814,0xfffe
0815 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1a.0x2 = 0x815,0xfffd
0816 0602 | | Execute_Immediate Set_Value_Unchecked,0x2
0817 029f 09f3 | | Declare_Subprogram For_Call,INIT_09f0 ; Debug Table 0x1a.0x3 = 0x817,0xfffc
0819 029f 0a3b | ;| Declare_Subprogram For_Call,INIT_0a38 ; Debug Table 0x1a.0x4 = 0x819,0xfffb
081b BODY_0810:
081b e5ff | | Load 0x2,-0x1 ; Debug Table 0x1a.0x5 = 0x81b,0x1
081c a403 | | Store_Unchecked 0x2,0x3
081d 00cf | | Action Mark_Auxiliary
081e 0007 | | Action Break_Optional ; Debug Table 0x1a.0x6 = 0x81e,0x2
081f e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0x7 = 0x81f,0x3
0820 00eb | | Load_Encached Diana_Cache
0821 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0822 0ba8 | | Execute_Immediate Case_Compare,0xa8
0823 7037 |p7 | Jump_Nonzero 0x85b
0824 0b48 | H | Execute_Immediate Case_Compare,0x48
0825 703a |p: | Jump_Nonzero 0x860
0826 0b4e | N | Execute_Immediate Case_Compare,0x4e
0827 703d |p= | Jump_Nonzero 0x865
0828 0b97 | | Execute_Immediate Case_Compare,0x97
0829 7040 |p@ | Jump_Nonzero 0x86a
082a 0b5b | [ | Execute_Immediate Case_Compare,0x5b
082b 7045 |pE | Jump_Nonzero 0x871
082c 0b53 | S | Execute_Immediate Case_Compare,0x53
082d 7043 |pC | Jump_Nonzero 0x871
082e 0bab | | Execute_Immediate Case_Compare,0xab
082f 7044 |pD | Jump_Nonzero 0x874
0830 0b40 | @ | Execute_Immediate Case_Compare,0x40
0831 7045 |pE | Jump_Nonzero 0x877
0832 0b4a | J | Execute_Immediate Case_Compare,0x4a
0833 704e |pN | Jump_Nonzero 0x882
0834 0b4b | K | Execute_Immediate Case_Compare,0x4b
0835 704f |pO | Jump_Nonzero 0x885
0836 0b4c | L | Execute_Immediate Case_Compare,0x4c
0837 7050 |pP | Jump_Nonzero 0x888
0838 0b4d | M | Execute_Immediate Case_Compare,0x4d
0839 7051 |pQ | Jump_Nonzero 0x88b
083a 0b4f | O | Execute_Immediate Case_Compare,0x4f
083b 7052 |pR | Jump_Nonzero 0x88e
083c 0b50 | P | Execute_Immediate Case_Compare,0x50
083d 7053 |pS | Jump_Nonzero 0x891
083e 0b51 | Q | Execute_Immediate Case_Compare,0x51
083f 7054 |pT | Jump_Nonzero 0x894
0840 0b52 | R | Execute_Immediate Case_Compare,0x52
0841 7055 |pU | Jump_Nonzero 0x897
0842 0b54 | T | Execute_Immediate Case_Compare,0x54
0843 7056 |pV | Jump_Nonzero 0x89a
0844 0b55 | U | Execute_Immediate Case_Compare,0x55
0845 7057 |pW | Jump_Nonzero 0x89d
0846 0b56 | V | Execute_Immediate Case_Compare,0x56
0847 7058 |pX | Jump_Nonzero 0x8a0
0848 0b5a | Z | Execute_Immediate Case_Compare,0x5a
0849 7059 |pY | Jump_Nonzero 0x8a3
084a 0b5c | \ | Execute_Immediate Case_Compare,0x5c
084b 705a |pZ | Jump_Nonzero 0x8a6
084c 0b5d | ] | Execute_Immediate Case_Compare,0x5d
084d 705b |p[ | Jump_Nonzero 0x8a9
084e 0b5e | ^ | Execute_Immediate Case_Compare,0x5e
084f 705c |p\ | Jump_Nonzero 0x8ac
0850 0b5f | _ | Execute_Immediate Case_Compare,0x5f
0851 705d |p] | Jump_Nonzero 0x8af
0852 0b60 | ` | Execute_Immediate Case_Compare,0x60
0853 705e |p^ | Jump_Nonzero 0x8b2
0854 0b57 | W | Execute_Immediate Case_Compare,0x57
0855 705f |p_ | Jump_Nonzero 0x8b5
0856 0b58 | X | Execute_Immediate Case_Compare,0x58
0857 7066 |pf | Jump_Nonzero 0x8be
0858 e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0x8 = 0x858,0x1e
0859 8405 | | Call 0x2,0x5
085a 4401 |D | Exit_Subprogram With_Result,0x1
085b e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0x9 = 0x85b,0x4
085c 00eb | | Load_Encached Diana_Cache
085d 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
085e a403 | | Store_Unchecked 0x2,0x3
085f 7863 |xc | Jump 0x8c3
0860 e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0xa = 0x860,0x5
0861 00eb | | Load_Encached Diana_Cache
0862 18b6 | | Execute Package,Field_Execute,Field_Number 0xb6
0863 a403 | | Store_Unchecked 0x2,0x3
0864 785e |x^ | Jump 0x8c3
0865 e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0xb = 0x865,0x6
0866 00eb | | Load_Encached Diana_Cache
0867 18e1 | | Execute Package,Field_Execute,Field_Number 0xe1
0868 a403 | | Store_Unchecked 0x2,0x3
0869 7859 |xY | Jump 0x8c3
086a e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0xc = 0x86a,0x7
086b 00eb | | Load_Encached Diana_Cache
086c 1889 | | Execute Package,Field_Execute,Field_Number 0x89
086d 00eb | | Load_Encached Diana_Cache
086e 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
086f a403 | | Store_Unchecked 0x2,0x3
0870 7852 |xR | Jump 0x8c3
0871 e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0xd = 0x871,0x8
0872 8406 | | Call 0x2,0x6
0873 4401 |D | Exit_Subprogram With_Result,0x1
0874 0092 0aef | | Action Push_String_Extended,0xaef ; "prompt"
; Debug Table 0x1a.0xe = 0x874,0x9
0876 4401 |D | Exit_Subprogram With_Result,0x1
0877 e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0xf = 0x877,0xa
0878 4975 |Iu | Short_Literal 0x175
0879 00eb | | Load_Encached Diana_Cache
087a 0098 | | Execute Package,Field_Read_Dynamic
087b 181d | | Execute Package,Field_Execute,Field_Number 0x1d
087c 00eb | | Load_Encached Diana_Cache
087d 185a | Z | Execute Package,Field_Execute,Field_Number 0x5a
087e 00eb | | Load_Encached Diana_Cache
087f 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0880 a403 | | Store_Unchecked 0x2,0x3
0881 7841 |xA | Jump 0x8c3
0882 0092 0af0 | | Action Push_String_Extended,0xaf0 ; "loop"
; Debug Table 0x1a.0x10 = 0x882,0xb
0884 4401 |D | Exit_Subprogram With_Result,0x1
0885 0092 0af1 | | Action Push_String_Extended,0xaf1 ; "abort"
; Debug Table 0x1a.0x11 = 0x885,0xc
0887 4401 |D | Exit_Subprogram With_Result,0x1
0888 0092 0af2 | | Action Push_String_Extended,0xaf2 ; "accept"
; Debug Table 0x1a.0x12 = 0x888,0xd
088a 4401 |D | Exit_Subprogram With_Result,0x1
088b 0092 0af3 | | Action Push_String_Extended,0xaf3 ; "assignment"
; Debug Table 0x1a.0x13 = 0x88b,0xe
088d 4401 |D | Exit_Subprogram With_Result,0x1
088e 0092 0af4 | | Action Push_String_Extended,0xaf4 ; "case"
; Debug Table 0x1a.0x14 = 0x88e,0xf
0890 4401 |D | Exit_Subprogram With_Result,0x1
0891 0092 0af5 | | Action Push_String_Extended,0xaf5 ; "machine code"
; Debug Table 0x1a.0x15 = 0x891,0x10
0893 4401 |D | Exit_Subprogram With_Result,0x1
0894 0092 0af6 | | Action Push_String_Extended,0xaf6 ; "conditional entry call"
; Debug Table 0x1a.0x16 = 0x894,0x11
0896 4401 |D | Exit_Subprogram With_Result,0x1
0897 0092 0af7 | | Action Push_String_Extended,0xaf7 ; "delay"
; Debug Table 0x1a.0x17 = 0x897,0x12
0899 4401 |D | Exit_Subprogram With_Result,0x1
089a 0092 0af8 | | Action Push_String_Extended,0xaf8 ; "exit"
; Debug Table 0x1a.0x18 = 0x89a,0x13
089c 4401 |D | Exit_Subprogram With_Result,0x1
089d 0092 0af9 | | Action Push_String_Extended,0xaf9 ; "goto"
; Debug Table 0x1a.0x19 = 0x89d,0x14
089f 4401 |D | Exit_Subprogram With_Result,0x1
08a0 0092 0afa | | Action Push_String_Extended,0xafa ; "if"
; Debug Table 0x1a.0x1a = 0x8a0,0x15
08a2 4401 |D | Exit_Subprogram With_Result,0x1
08a3 0092 0afb | | Action Push_String_Extended,0xafb ; "null"
; Debug Table 0x1a.0x1b = 0x8a3,0x16
08a5 4401 |D | Exit_Subprogram With_Result,0x1
08a6 0092 0afc | | Action Push_String_Extended,0xafc ; "raise"
; Debug Table 0x1a.0x1c = 0x8a6,0x17
08a8 4401 |D | Exit_Subprogram With_Result,0x1
08a9 0092 0afd | | Action Push_String_Extended,0xafd ; "return"
; Debug Table 0x1a.0x1d = 0x8a9,0x18
08ab 4401 |D | Exit_Subprogram With_Result,0x1
08ac 0092 0afe | | Action Push_String_Extended,0xafe ; "selective wait"
; Debug Table 0x1a.0x1e = 0x8ac,0x19
08ae 4401 |D | Exit_Subprogram With_Result,0x1
08af 0092 0aff | | Action Push_String_Extended,0xaff ; "terminate alternative"
; Debug Table 0x1a.0x1f = 0x8af,0x1a
08b1 4401 |D | Exit_Subprogram With_Result,0x1
08b2 0092 0b00 | | Action Push_String_Extended,0xb00 ; "timed entry call"
; Debug Table 0x1a.0x20 = 0x8b2,0x1b
08b4 4401 |D | Exit_Subprogram With_Result,0x1
08b5 e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0x21 = 0x8b5,0x1c
08b6 00eb | | Load_Encached Diana_Cache
08b7 18d0 | | Execute Package,Field_Execute,Field_Number 0xd0
08b8 00eb | | Load_Encached Diana_Cache
08b9 1889 | | Execute Package,Field_Execute,Field_Number 0x89
08ba 00eb | | Load_Encached Diana_Cache
08bb 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
08bc 8405 | | Call 0x2,0x5
08bd 4401 |D | Exit_Subprogram With_Result,0x1
08be e403 | | Load 0x2,0x3 ; Debug Table 0x1a.0x22 = 0x8be,0x1d
08bf 00eb | | Load_Encached Diana_Cache
08c0 18cf | | Execute Package,Field_Execute,Field_Number 0xcf
08c1 8405 | | Call 0x2,0x5
08c2 4401 |D | Exit_Subprogram With_Result,0x1
08c3 00d1 | | Pop_Control Pop_Count_1
08c4 00c9 | | Action Pop_Auxiliary_Loop
08c5 7f59 | Y | Jump 0x81f
08c6 0000 0000 | | .XXX[0x2]
08c8 0000 0000 | | .LITERAL {0x00000000, 0x586f5501}
08cc 0000 0000 | | .BLANK 0000[0x4]
08d0 ; --------------------------------------------------------------------------------------
08d0 ; SUBPROGRAM
08d0 ; --------------------------------------------------------------------------------------
08d0 08d5 | | .CONST 0x08d5 ; Address of begin
08d1 0004 | | .CONST 0x0004 ; Address of exception handler
08d2 0002 | | .CONST 0x0002 ; Number of locals
08d3 INIT_08d0:
08d3 e20d | | Load 0x1,0xd ; Debug Table 0x1b = .DEBUG 0x08d3,0x110e,0x0001,0x0000,0x0058,0x6f55,0x0000,0x114f
; Debug Table 0x1b.0x0 = 0x8d3,0xffff
08d4 0007 | | Action Break_Optional
08d5 BODY_08d0:
08d5 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x1b.0x1 = 0x8d5,0x1
08d6 e20d | | Load 0x1,0xd
08d7 e5fa | | Load 0x2,-0x6
08d8 e5fb | | Load 0x2,-0x5
08d9 e5fc | | Load 0x2,-0x4
08da e5fd | | Load 0x2,-0x3
08db e5fe | | Load 0x2,-0x2
08dc e5ff | | Load 0x2,-0x1
08dd 8211 | | Call 0x1,0x11
08de 005a | Z | Store_Top Discrete,At_Offset_2
08df c5f9 | | Store 0x2,-0x7
08e0 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x1b.0x2 = 0x8e0,0x2
08e1 8212 | | Call 0x1,0x12
08e2 6804 |h | Jump_Zero 0x8e7
08e3 e5f9 | | Load 0x2,-0x7 ; Debug Table 0x1b.0x3 = 0x8e3,0x3
08e4 e002 | | Load 0x0,0x2
08e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
08e6 c5f9 | | Store 0x2,-0x7
08e7 4507 |E | Exit_Subprogram 0x7
08e8 ; --------------------------------------------------------------------------------------
08e8 ; SUBPROGRAM
08e8 ; --------------------------------------------------------------------------------------
08e8 08f3 | | .CONST 0x08f3 ; Address of begin
08e9 0004 | | .CONST 0x0004 ; Address of exception handler
08ea 0003 | | .CONST 0x0003 ; Number of locals
08eb INIT_08e8:
08eb e006 | | Load 0x0,0x6 ; Debug Table 0x1c = .DEBUG 0x08eb,0x1118,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0d48
; Debug Table 0x1c.0x0 = 0x8eb,0xffff
08ec 1b0e | | Execute Package,Field_Read,Field_Number 0xe
08ed 02ff | | Declare_Variable Variant_Record
08ee 00d8 | | Load_Top At_Offset_0
08ef 1c00 | | Execute_Immediate Run_Utility,0x0
08f0 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x1c.0x1 = 0x8f0,0xfffe
08f1 e7ff | | Load 0x3,-0x1
08f2 0031 | 1 | Store_Top Heap_Access,At_Offset_1
08f3 BODY_08e8:
08f3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x1c.0x2 = 0x8f3,0x1
08f4 e7fe | | Load 0x3,-0x2
08f5 00da | | Load_Top At_Offset_2
08f6 e006 | | Load 0x0,0x6
08f7 180f | | Execute Package,Field_Execute,Field_Number 0xf
08f8 00d1 | | Pop_Control Pop_Count_1
08f9 e403 | | Load 0x2,0x3 ; Debug Table 0x1c.0x3 = 0x8f9,0x2
08fa e223 | # | Load 0x1,0x23
08fb 00db | | Load_Top At_Offset_3
08fc 823d | = | Call 0x1,0x3d
08fd c403 | | Store 0x2,0x3
08fe 4503 |E | Exit_Subprogram 0x3
08ff 0000 | | .XXX[0x1]
0900 ; --------------------------------------------------------------------------------------
0900 ; SUBPROGRAM
0900 ; --------------------------------------------------------------------------------------
0900 0903 | | .CONST 0x0903 ; Address of begin
0901 0910 | | .CONST 0x0910 ; Address of exception handler
0902 0001 | | .CONST 0x0001 ; Number of locals
0903 BODY_0900:
0903 INIT_0900:
0903 e403 | | Load 0x2,0x3 ; Debug Table 0x1d = .DEBUG 0x0903,0x1122,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0da6
; Debug Table 0x1d.0x0 = 0x903,0x1
0904 00ec | | Load_Encached Diana_Tree_Cache
0905 e5ff | | Load 0x2,-0x1
0906 823b | ; | Call 0x1,0x3b
0907 c402 | | Store 0x2,0x2
0908 c403 | | Store 0x2,0x3
0909 e403 | | Load 0x2,0x3 ; Debug Table 0x1d.0x1 = 0x909,0x2
090a e402 | | Load 0x2,0x2
090b e5fe | | Load 0x2,-0x2
090c 823c | < | Call 0x1,0x3c
090d c402 | | Store 0x2,0x2
090e c403 | | Store 0x2,0x3
090f 4501 |E | Exit_Subprogram 0x1
0910 TRAP_0900:
0910 0007 | | Action Break_Optional
0911 e404 | | Load 0x2,0x4 ; Debug Table 0x1d.0x2 = 0x911,0x3
0912 e00b | | Load 0x0,0xb
0913 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0914 e403 | | Load 0x2,0x3 ; Debug Table 0x1d.0x3 = 0x914,0x4
0915 e405 | | Load 0x2,0x5
0916 8235 | 5 | Call 0x1,0x35
0917 c403 | | Store 0x2,0x3
0918 00cc | | Action Pop_Block ; Debug Table 0x1d.0x4 = 0x918,0x5
0919 4504 |E | Exit_Subprogram 0x4
091a 0000 0000 | | .BLANK 0000[0x6]
0920 ; --------------------------------------------------------------------------------------
0920 ; SUBPROGRAM
0920 ; --------------------------------------------------------------------------------------
0920 0923 | # | .CONST 0x0923 ; Address of begin
0921 0004 | | .CONST 0x0004 ; Address of exception handler
0922 0001 | | .CONST 0x0001 ; Number of locals
0923 BODY_0920:
0923 INIT_0920:
0923 00da | | Load_Top At_Offset_2 ; Debug Table 0x1e = .DEBUG 0x0923,0x112e,0x0001,0x0000,0x0058,0x6f55,0x0000,0x1006
; Debug Table 0x1e.0x0 = 0x923,0x1
0924 01db | | Execute Vector,Length
0925 0c02 | | Execute_Immediate Greater_Equal,0x2
0926 680e |h | Jump_Zero 0x935
0927 00da | | Load_Top At_Offset_2
0928 01dd | | Execute Vector,First
0929 00db | | Load_Top At_Offset_3
092a 01dd | | Execute Vector,First
092b 0a01 | | Execute_Immediate Plus,0x1
092c 0248 | H | Execute Discrete,Check_In_Integer
092d e7ff | | Load 0x3,-0x1
092e 01cf | | Execute Vector,Slice_Read
092f 0092 0b01 | | Action Push_String_Extended,0xb01 ; ">>"
0931 01df | | Execute Vector,Equal
0932 6802 |h | Jump_Zero 0x935
0933 4921 |I! | Short_Literal 0x121 ; Debug Table 0x1e.0x1 = 0x933,0x2
0934 0257 | W | Execute Discrete,Raise
0935 4502 |E | Exit_Subprogram 0x2
0936 0000 0000 | | .XXX[0x2]
0938 ; --------------------------------------------------------------------------------------
0938 ; SUBPROGRAM
0938 ; --------------------------------------------------------------------------------------
0938 093b | ; | .CONST 0x093b ; Address of begin
0939 0004 | | .CONST 0x0004 ; Address of exception handler
093a 0001 | | .CONST 0x0001 ; Number of locals
093b BODY_0938:
093b INIT_0938:
093b e5f3 | | Load 0x2,-0xd ; Debug Table 0x1f = .DEBUG 0x093b,0x1134,0x0801,0x0002,0x0058,0x6f55,0x0000,0x01bd
; Debug Table 0x1f.0x0 = 0x93b,0x1
093c 4820 |H | Short_Literal 0x20
093d 4820 |H | Short_Literal 0x20
093e 4801 |H | Short_Literal 0x1
093f 48c8 |H | Short_Literal 0xc8
0940 e7ff | | Load 0x3,-0x1
0941 e5f7 | | Load 0x2,-0x9
0942 0119 | | Execute Any,Check_In_Formal_Type
0943 85fa | | Call 0x2,-0x6
0944 e022 | " | Load 0x0,0x22
0945 180d | | Execute Package,Field_Execute,Field_Number 0xd
0946 01cb | | Execute Vector,Append
0947 e7ff | | Load 0x3,-0x1
0948 e5f7 | | Load 0x2,-0x9
0949 0119 | | Execute Any,Check_In_Formal_Type
094a 85fb | | Call 0x2,-0x5
094b 01cc | | Execute Vector,Catenate
094c 01cb | | Execute Vector,Append
094d 4801 |H | Short_Literal 0x1
094e 48c8 |H | Short_Literal 0xc8
094f e7ff | | Load 0x3,-0x1
0950 e5f7 | | Load 0x2,-0x9
0951 0119 | | Execute Any,Check_In_Formal_Type
0952 85fc | | Call 0x2,-0x4
0953 e022 | " | Load 0x0,0x22
0954 180d | | Execute Package,Field_Execute,Field_Number 0xd
0955 01cc | | Execute Vector,Catenate
0956 4802 |H | Short_Literal 0x2
0957 e7ff | | Load 0x3,-0x1
0958 e5f7 | | Load 0x2,-0x9
0959 0119 | | Execute Any,Check_In_Formal_Type
095a 85f9 | | Call 0x2,-0x7
095b e5f8 | | Load 0x2,-0x8
095c 0122 | " | Execute Any,Make_Root_Type
095d 025e | ^ | Execute Discrete,Convert
095e 1c01 | | Execute_Immediate Run_Utility,0x1
095f 8218 | | Call 0x1,0x18
0960 e223 | # | Load 0x1,0x23
0961 e002 | | Load 0x0,0x2
0962 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
0963 c5f3 | | Store 0x2,-0xd
0964 4502 |E | Exit_Subprogram 0x2
0965 0000 0000 | | .XXX[0x3]
0967 0000 | |
0968 ; --------------------------------------------------------------------------------------
0968 ; SUBPROGRAM
0968 ; --------------------------------------------------------------------------------------
0968 096d | m | .CONST 0x096d ; Address of begin
0969 0994 | | .CONST 0x0994 ; Address of exception handler
096a 0002 | | .CONST 0x0002 ; Number of locals
096b INIT_0968:
096b 029f 0a7b | {| Declare_Subprogram For_Call,INIT_0a78 ; Debug Table 0x20 = .DEBUG 0x096b,0x1138,0x0002,0x0000,0x0058,0x6f55,0x0000,0x0451
096d BODY_0968:
096d 00db | | Load_Top At_Offset_3 ; Debug Table 0x20.0x0 = 0x96d,0x1
096e e005 | | Load 0x0,0x5
096f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0970 1830 | 0 | Execute Package,Field_Execute,Field_Number 0x30
0971 460f |F | Jump_Case 0xf
0972 780f |x | Jump 0x982 ; case 0x0
0973 781c |x | Jump 0x990 ; case 0x1
0974 7813 |x | Jump 0x988 ; case 0x2
0975 7812 |x | Jump 0x988 ; case 0x3
0976 7811 |x | Jump 0x988 ; case 0x4
0977 7810 |x | Jump 0x988 ; case 0x5
0978 7811 |x | Jump 0x98a ; case 0x6
0979 7816 |x | Jump 0x990 ; case 0x7
097a 7815 |x | Jump 0x990 ; case 0x8
097b 7814 |x | Jump 0x990 ; case 0x9
097c 7813 |x | Jump 0x990 ; case 0xa
097d 7812 |x | Jump 0x990 ; case 0xb
097e 7811 |x | Jump 0x990 ; case 0xc
097f 7810 |x | Jump 0x990 ; case 0xd
0980 780f |x | Jump 0x990 ; case 0xe
0981 780e |x | Jump 0x990 ; case 0xf
0982 e221 | ! | Load 0x1,0x21 ; Debug Table 0x20.0x1 = 0x982,0x2
0983 e7ff | | Load 0x3,-0x1
0984 01cc | | Execute Vector,Catenate
0985 e222 | " | Load 0x1,0x22
0986 01cc | | Execute Vector,Catenate
0987 4401 |D | Exit_Subprogram With_Result,0x1
0988 8602 | | Call 0x3,0x2 ; Debug Table 0x20.0x2 = 0x988,0x3
0989 7808 |x | Jump 0x992
098a e00e | | Load 0x0,0xe ; Debug Table 0x20.0x3 = 0x98a,0x4
098b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
098c 4803 |H | Short_Literal 0x3
098d e023 | # | Load 0x0,0x23
098e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
098f 4401 |D | Exit_Subprogram With_Result,0x1
0990 6737 |g7 | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x586f5501} ; Debug Table 0x20.0x4 = 0x990,0x5
0991 0257 | W | Execute Discrete,Raise
0992 4831 |H1 | Short_Literal 0x31
0993 0257 | W | Execute Discrete,Raise
0994 TRAP_0968:
0994 6733 |g3 | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x586f5501}
0995 010f | | Execute Exception,Equal
0996 6810 |h | Jump_Zero 0x9a7
0997 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x20.0x5 = 0x997,0x6
0998 e5fd | | Load 0x2,-0x3
0999 0120 | | Execute Any,Is_Value
099a 6803 |h | Jump_Zero 0x99e
099b e024 | $ | Load 0x0,0x24
099c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
099d 7801 |x | Jump 0x99f
099e e5fd | | Load 0x2,-0x3
099f e00e | | Load 0x0,0xe
09a0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
09a1 e024 | $ | Load 0x0,0x24
09a2 1819 | | Execute Package,Field_Execute,Field_Number 0x19
09a3 c5fd | | Store 0x2,-0x3
09a4 c403 | | Store 0x2,0x3
09a5 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x20.0x6 = 0x9a5,0x7
09a6 0101 | | Execute Exception,Reraise
09a7 e5fd | | Load 0x2,-0x3 ; Debug Table 0x20.0x7 = 0x9a7,0x8
09a8 e002 | | Load 0x0,0x2
09a9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
09aa c5fd | | Store 0x2,-0x3
09ab e221 | ! | Load 0x1,0x21 ; Debug Table 0x20.0x8 = 0x9ab,0x9
09ac e7ff | | Load 0x3,-0x1
09ad 01cc | | Execute Vector,Catenate
09ae e222 | " | Load 0x1,0x22
09af 01cc | | Execute Vector,Catenate
09b0 4401 |D | Exit_Subprogram With_Result,0x1
09b1 0000 0000 | | .BLANK 0000[0x7]
09b8 ; --------------------------------------------------------------------------------------
09b8 ; SUBPROGRAM
09b8 ; --------------------------------------------------------------------------------------
09b8 09bb | | .CONST 0x09bb ; Address of begin
09b9 09c7 | | .CONST 0x09c7 ; Address of exception handler
09ba 0001 | | .CONST 0x0001 ; Number of locals
09bb BODY_09b8:
09bb INIT_09b8:
09bb e5fc | | Load 0x2,-0x4 ; Debug Table 0x21 = .DEBUG 0x09bb,0x114c,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0692
; Debug Table 0x21.0x0 = 0x9bb,0x1
09bc e001 | | Load 0x0,0x1
09bd 1b14 | | Execute Package,Field_Read,Field_Number 0x14
09be e5fe | | Load 0x2,-0x2
09bf e018 | | Load 0x0,0x18
09c0 1819 | | Execute Package,Field_Execute,Field_Number 0x19
09c1 e018 | | Load 0x0,0x18
09c2 181c | | Execute Package,Field_Execute,Field_Number 0x1c
09c3 823e | > | Call 0x1,0x3e
09c4 c5fd | | Store 0x2,-0x3
09c5 c5fc | | Store 0x2,-0x4
09c6 4501 |E | Exit_Subprogram 0x1
09c7 TRAP_09b8:
09c7 0007 | | Action Break_Optional
09c8 e00e | | Load 0x0,0xe ; Debug Table 0x21.0x1 = 0x9c8,0x2
09c9 180f | | Execute Package,Field_Execute,Field_Number 0xf
09ca a5fd | | Store_Unchecked 0x2,-0x3
09cb 4501 |E | Exit_Subprogram 0x1
09cc 0000 0000 | | .BLANK 0000[0x4]
09d0 ; --------------------------------------------------------------------------------------
09d0 ; SUBPROGRAM
09d0 ; --------------------------------------------------------------------------------------
09d0 09d3 | | .CONST 0x09d3 ; Address of begin
09d1 09da | | .CONST 0x09da ; Address of exception handler
09d2 0001 | | .CONST 0x0001 ; Number of locals
09d3 BODY_09d0:
09d3 INIT_09d0:
09d3 e021 | ! | Load 0x0,0x21 ; Debug Table 0x22 = .DEBUG 0x09d3,0x1152,0x0004,0x0000,0x0058,0x6f55,0x0000,0x06c3
; Debug Table 0x22.0x0 = 0x9d3,0x1
09d4 1819 | | Execute Package,Field_Execute,Field_Number 0x19
09d5 e011 | | Load 0x0,0x11
09d6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
09d7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
09d8 a5fd | | Store_Unchecked 0x2,-0x3
09d9 4501 |E | Exit_Subprogram 0x1
09da TRAP_09d0:
09da 0007 | | Action Break_Optional
09db e00e | | Load 0x0,0xe ; Debug Table 0x22.0x1 = 0x9db,0x2
09dc 180f | | Execute Package,Field_Execute,Field_Number 0xf
09dd a5fd | | Store_Unchecked 0x2,-0x3
09de 4501 |E | Exit_Subprogram 0x1
09df 0000 | | .XXX[0x1]
09e0 ; --------------------------------------------------------------------------------------
09e0 ; SUBPROGRAM
09e0 ; --------------------------------------------------------------------------------------
09e0 09e3 | | .CONST 0x09e3 ; Address of begin
09e1 09ea | | .CONST 0x09ea ; Address of exception handler
09e2 0001 | | .CONST 0x0001 ; Number of locals
09e3 BODY_09e0:
09e3 INIT_09e0:
09e3 e021 | ! | Load 0x0,0x21 ; Debug Table 0x23 = .DEBUG 0x09e3,0x1158,0x0004,0x0000,0x0058,0x6f55,0x0000,0x06ea
; Debug Table 0x23.0x0 = 0x9e3,0x1
09e4 181a | | Execute Package,Field_Execute,Field_Number 0x1a
09e5 e011 | | Load 0x0,0x11
09e6 1b13 | | Execute Package,Field_Read,Field_Number 0x13
09e7 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
09e8 a5fd | | Store_Unchecked 0x2,-0x3
09e9 4501 |E | Exit_Subprogram 0x1
09ea TRAP_09e0:
09ea 0007 | | Action Break_Optional
09eb e00e | | Load 0x0,0xe ; Debug Table 0x23.0x1 = 0x9eb,0x2
09ec 180f | | Execute Package,Field_Execute,Field_Number 0xf
09ed a5fd | | Store_Unchecked 0x2,-0x3
09ee 4501 |E | Exit_Subprogram 0x1
09ef 0000 | | .XXX[0x1]
09f0 ; --------------------------------------------------------------------------------------
09f0 ; SUBPROGRAM
09f0 ; --------------------------------------------------------------------------------------
09f0 09f5 | | .CONST 0x09f5 ; Address of begin
09f1 0004 | | .CONST 0x0004 ; Address of exception handler
09f2 0002 | | .CONST 0x0002 ; Number of locals
09f3 INIT_09f0:
09f3 029f 0aab | | Declare_Subprogram For_Call,INIT_0aa8 ; Debug Table 0x24 = .DEBUG 0x09f3,0x115e,0x0002,0x0000,0x0058,0x6f55,0x0000,0x07f7
09f5 BODY_09f0:
09f5 00db | | Load_Top At_Offset_3 ; Debug Table 0x24.0x0 = 0x9f5,0x1
09f6 00eb | | Load_Encached Diana_Cache
09f7 1814 | | Execute Package,Field_Execute,Field_Number 0x14
09f8 0b12 | | Execute_Immediate Case_Compare,0x12
09f9 7018 |p | Jump_Nonzero 0xa12
09fa 0b0b | | Execute_Immediate Case_Compare,0xb
09fb 7020 |p | Jump_Nonzero 0xa1c
09fc 0b14 | | Execute_Immediate Case_Compare,0x14
09fd 701e |p | Jump_Nonzero 0xa1c
09fe 0b15 | | Execute_Immediate Case_Compare,0x15
09ff 701c |p | Jump_Nonzero 0xa1c
0a00 0b17 | | Execute_Immediate Case_Compare,0x17
0a01 7027 |p' | Jump_Nonzero 0xa29
0a02 0b16 | | Execute_Immediate Case_Compare,0x16
0a03 7025 |p% | Jump_Nonzero 0xa29
0a04 0b18 | | Execute_Immediate Case_Compare,0x18
0a05 7023 |p# | Jump_Nonzero 0xa29
0a06 0b59 | Y | Execute_Immediate Case_Compare,0x59
0a07 7021 |p! | Jump_Nonzero 0xa29
0a08 0b27 | ' | Execute_Immediate Case_Compare,0x27
0a09 701f |p | Jump_Nonzero 0xa29
0a0a e7ff | | Load 0x3,-0x1 ; Debug Table 0x24.0x1 = 0xa0a,0x9
0a0b 00eb | | Load_Encached Diana_Cache
0a0c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a0d 00eb | | Load_Encached Diana_Cache
0a0e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a0f 025e | ^ | Execute Discrete,Convert
0a10 1c01 | | Execute_Immediate Run_Utility,0x1
0a11 4401 |D | Exit_Subprogram With_Result,0x1
0a12 e404 | | Load 0x2,0x4 ; Debug Table 0x24.0x2 = 0xa12,0x2
0a13 0f01 | | Execute_Immediate Equal,0x1
0a14 6805 |h | Jump_Zero 0xa1a
0a15 e7ff | | Load 0x3,-0x1 ; Debug Table 0x24.0x3 = 0xa15,0x3
0a16 00eb | | Load_Encached Diana_Cache
0a17 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0
0a18 8405 | | Call 0x2,0x5
0a19 4401 |D | Exit_Subprogram With_Result,0x1
0a1a 8602 | | Call 0x3,0x2 ; Debug Table 0x24.0x4 = 0xa1a,0x4
0a1b 7816 |x | Jump 0xa32
0a1c e404 | | Load 0x2,0x4 ; Debug Table 0x24.0x5 = 0xa1c,0x5
0a1d 0aff | | Execute_Immediate Plus,-0x1
0a1e c404 | | Store 0x2,0x4
0a1f 4822 |H" | Short_Literal 0x22 ; Debug Table 0x24.0x6 = 0xa1f,0x6
0a20 4822 |H" | Short_Literal 0x22
0a21 e7ff | | Load 0x3,-0x1
0a22 00eb | | Load_Encached Diana_Cache
0a23 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0a24 00eb | | Load_Encached Diana_Cache
0a25 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0a26 01ca | | Execute Vector,Prepend
0a27 01cb | | Execute Vector,Append
0a28 4401 |D | Exit_Subprogram With_Result,0x1
0a29 e404 | | Load 0x2,0x4 ; Debug Table 0x24.0x7 = 0xa29,0x7
0a2a 0aff | | Execute_Immediate Plus,-0x1
0a2b c404 | | Store 0x2,0x4
0a2c e7ff | | Load 0x3,-0x1 ; Debug Table 0x24.0x8 = 0xa2c,0x8
0a2d 00eb | | Load_Encached Diana_Cache
0a2e 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
0a2f 00eb | | Load_Encached Diana_Cache
0a30 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0a31 4401 |D | Exit_Subprogram With_Result,0x1
0a32 00d1 | | Pop_Control Pop_Count_1
0a33 4831 |H1 | Short_Literal 0x31
0a34 0257 | W | Execute Discrete,Raise
0a35 0000 0000 | | .XXX[0x3]
0a37 0000 | |
0a38 ; --------------------------------------------------------------------------------------
0a38 ; SUBPROGRAM
0a38 ; --------------------------------------------------------------------------------------
0a38 0a40 | @ | .CONST 0x0a40 ; Address of begin
0a39 0004 | | .CONST 0x0004 ; Address of exception handler
0a3a 0003 | | .CONST 0x0003 ; Number of locals
0a3b INIT_0a38:
0a3b 00ee | | Load_Encached Diana_Seq_Type_Cache ; Debug Table 0x25 = .DEBUG 0x0a3b,0x1172,0x0002,0x0000,0x0058,0x6f55,0x0000,0x08af
; Debug Table 0x25.0x0 = 0xa3b,0xffff
0a3c 00db | | Load_Top At_Offset_3 ; Debug Table 0x25.0x1 = 0xa3c,0xfffe
0a3d 00eb | | Load_Encached Diana_Cache
0a3e 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
0a3f 8405 | | Call 0x2,0x5
0a40 BODY_0a38:
0a40 e7ff | | Load 0x3,-0x1 ; Debug Table 0x25.0x2 = 0xa40,0x1
0a41 00eb | | Load_Encached Diana_Cache
0a42 18d9 | | Execute Package,Field_Execute,Field_Number 0xd9
0a43 00eb | | Load_Encached Diana_Cache
0a44 1889 | | Execute Package,Field_Execute,Field_Number 0x89
0a45 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0a46 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x25.0x3 = 0xa46,0x2
0a47 00eb | | Load_Encached Diana_Cache
0a48 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0a49 6802 |h | Jump_Zero 0xa4c
0a4a 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x25.0x4 = 0xa4a,0x3
0a4b 4401 |D | Exit_Subprogram With_Result,0x1
0a4c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x25.0x5 = 0xa4c,0x4
0a4d 4975 |Iu | Short_Literal 0x175
0a4e 00eb | | Load_Encached Diana_Cache
0a4f 0098 | | Execute Package,Field_Read_Dynamic
0a50 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0a51 6810 |h | Jump_Zero 0xa62
0a52 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x25.0x6 = 0xa52,0x5
0a53 0092 0b02 | | Action Push_String_Extended,0xb02 ; "("
0a55 01cc | | Execute Vector,Catenate
0a56 4801 |H | Short_Literal 0x1
0a57 4814 |H | Short_Literal 0x14
0a58 e602 | | Load 0x3,0x2
0a59 00eb | | Load_Encached Diana_Cache
0a5a 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0a5b e022 | " | Load 0x0,0x22
0a5c 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a5d 01cc | | Execute Vector,Catenate
0a5e 0092 0b03 | | Action Push_String_Extended,0xb03 ; ")"
0a60 01cc | | Execute Vector,Catenate
0a61 4401 |D | Exit_Subprogram With_Result,0x1
0a62 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x25.0x7 = 0xa62,0x6
0a63 0092 0b02 | | Action Push_String_Extended,0xb02 ; "("
0a65 01cc | | Execute Vector,Catenate
0a66 4801 |H | Short_Literal 0x1
0a67 4814 |H | Short_Literal 0x14
0a68 e602 | | Load 0x3,0x2
0a69 00eb | | Load_Encached Diana_Cache
0a6a 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
0a6b e022 | " | Load 0x0,0x22
0a6c 180d | | Execute Package,Field_Execute,Field_Number 0xd
0a6d 01cc | | Execute Vector,Catenate
0a6e 0092 0b04 | | Action Push_String_Extended,0xb04 ; ", ...)"
0a70 01cc | | Execute Vector,Catenate
0a71 4401 |D | Exit_Subprogram With_Result,0x1
0a72 0000 0000 | | .BLANK 0000[0x6]
0a78 ; --------------------------------------------------------------------------------------
0a78 ; SUBPROGRAM
0a78 ; --------------------------------------------------------------------------------------
0a78 0a80 | | .CONST 0x0a80 ; Address of begin
0a79 0004 | | .CONST 0x0004 ; Address of exception handler
0a7a 0003 | | .CONST 0x0003 ; Number of locals
0a7b INIT_0a78:
0a7b e005 | | Load 0x0,0x5 ; Debug Table 0x26 = .DEBUG 0x0a7b,0x1184,0x0004,0x0000,0x0058,0x6f55,0x0000,0x04b8
; Debug Table 0x26.0x0 = 0xa7b,0xffff
0a7c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a7d e005 | | Load 0x0,0x5 ; Debug Table 0x26.0x1 = 0xa7d,0xfffe
0a7e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a7f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a80 BODY_0a78:
0a80 e005 | | Load 0x0,0x5 ; Debug Table 0x26.0x2 = 0xa80,0x1
0a81 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a82 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0a83 e005 | | Load 0x0,0x5
0a84 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a85 6036 |`6 | Indirect_Literal Discrete,0xabc,{0x00000000, 0x00004000}
0a86 e014 | | Load 0x0,0x14
0a87 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0a88 e00e | | Load 0x0,0xe
0a89 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0a8a e005 | | Load 0x0,0x5
0a8b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a8c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0a8d e7ff | | Load 0x3,-0x1
0a8e e005 | | Load 0x0,0x5
0a8f 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a90 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
0a91 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0a92 0059 | Y | Store_Top Discrete,At_Offset_1
0a93 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x26.0x3 = 0xa93,0x2
0a94 6802 |h | Jump_Zero 0xa97
0a95 6632 |f2 | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x586f5501} ; Debug Table 0x26.0x4 = 0xa95,0x3
0a96 0257 | W | Execute Discrete,Raise
0a97 483b |H; | Short_Literal 0x3b ; Debug Table 0x26.0x5 = 0xa97,0x4
0a98 e221 | ! | Load 0x1,0x21
0a99 00db | | Load_Top At_Offset_3
0a9a e005 | | Load 0x0,0x5
0a9b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0a9c 1843 | C | Execute Package,Field_Execute,Field_Number 0x43
0a9d 01cc | | Execute Vector,Catenate
0a9e 01cb | | Execute Vector,Append
0a9f e222 | " | Load 0x1,0x22
0aa0 01cc | | Execute Vector,Catenate
0aa1 00cb | | Action Pop_Block_With_Result
0aa2 4401 |D | Exit_Subprogram With_Result,0x1
0aa3 0000 0000 | | .BLANK 0000[0x5]
0aa8 ; --------------------------------------------------------------------------------------
0aa8 ; SUBPROGRAM
0aa8 ; --------------------------------------------------------------------------------------
0aa8 0ab3 | | .CONST 0x0ab3 ; Address of begin
0aa9 0004 | | .CONST 0x0004 ; Address of exception handler
0aaa 0003 | | .CONST 0x0003 ; Number of locals
0aab INIT_0aa8:
0aab e7ff | | Load 0x3,-0x1 ; Debug Table 0x27 = .DEBUG 0x0aab,0x1192,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0846
; Debug Table 0x27.0x0 = 0xaab,0xffff
0aac 00eb | | Load_Encached Diana_Cache
0aad 18c0 | | Execute Package,Field_Execute,Field_Number 0xc0
0aae 8405 | | Call 0x2,0x5
0aaf e7ff | | Load 0x3,-0x1 ; Debug Table 0x27.0x1 = 0xaaf,0xfffe
0ab0 00eb | | Load_Encached Diana_Cache
0ab1 18d4 | | Execute Package,Field_Execute,Field_Number 0xd4
0ab2 8405 | | Call 0x2,0x5
0ab3 BODY_0aa8:
0ab3 482e |H. | Short_Literal 0x2e ; Debug Table 0x27.0x2 = 0xab3,0x1
0ab4 00d9 | | Load_Top At_Offset_1
0ab5 01cb | | Execute Vector,Append
0ab6 00da | | Load_Top At_Offset_2
0ab7 01cc | | Execute Vector,Catenate
0ab8 00cb | | Action Pop_Block_With_Result
0ab9 4401 |D | Exit_Subprogram With_Result,0x1
0aba 0000 0000 | | .XXX[0x2]
0abc 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
0ac0 ; --------------------------------------------------------------------------------------
0ac0 ; STRING TABLE
0ac0 ; --------------------------------------------------------------------------------------
0ac0 008c | | .STRTAB 0x008c->0x0b06 ; "NIL"
0ac1 008d | | .STRTAB 0x008d->0x0b07 ; "NAME_DISPLAY"
0ac2 0097 | | .STRTAB 0x0097->0x0b0d ; "OUTPUT"
0ac3 009b | | .STRTAB 0x009b->0x0b10 ; "INPUT"
0ac4 009e | | .STRTAB 0x009e->0x0b13 ; "ERROR"
0ac5 00a1 | | .STRTAB 0x00a1->0x0b15 ; "USER"
0ac6 00a3 | | .STRTAB 0x00a3->0x0b17 ; "SESSION"
0ac7 00a8 | | .STRTAB 0x00a8->0x0b1b ; "PASSWORD"
0ac8 00ae | | .STRTAB 0x00ae->0x0b1f ; "NONE"
0ac9 00b0 | | .STRTAB 0x00b0->0x0b21 ; "PRIVILEGED"
0aca 00b8 | | .STRTAB 0x00b8->0x0b26 ; "PRESERVE_PRIVILEGE"
0acb 00c8 | | .STRTAB 0x00c8->0x0b2f ; "RESTORE_IDENTITY"
0acc 00d6 | | .STRTAB 0x00d6->0x0b37 ; "Invalid User Identity"
0acd 00e9 | | .STRTAB 0x00e9->0x0b41 ; "Option Error"
0ace 00f3 | | .STRTAB 0x00f3->0x0b47 ; "Invalid Option String"
0acf 0106 | | .STRTAB 0x0106->0x0b52 ; "Access Violation"
0ad0 0114 | | .STRTAB 0x0114->0x0b5a ; "Invalid Program"
0ad1 0121 | ! | .STRTAB 0x0121->0x0b61 ; "Unexpected Exception"
0ad2 0133 | 3 | .STRTAB 0x0133->0x0b6b ; "procedure Created_For_Program_Run is begin \x0a"
0ad3 015d | ] | .STRTAB 0x015d->0x0b81 ; "\x0a end;"
0ad4 0161 | a | .STRTAB 0x0161->0x0b84 ; "Program"
0ad5 0166 | f | .STRTAB 0x0166->0x0b88 ; "Change_Identity"
0ad6 0173 | s | .STRTAB 0x0173->0x0b8f ; "Output..Session => Directory_String_Name"
0ad7 0199 | | .STRTAB 0x0199->0x0ba3 ; "Privileged..Restore_Identity => Boolean_Valued"
0ad8 01c5 | | .STRTAB 0x01c5->0x0bba ; "Create_Job"
0ad9 01cd | | .STRTAB 0x01cd->0x0bbf ; ": can't specify both user and Restore_Identity"
0ada 01f9 | | .STRTAB 0x01f9->0x0bd6 ; ": can't run in privileged mode from unprivileged user id"
0adb 022f | / | .STRTAB 0x022f->0x0bf2 ; ": attempt to enable privileged mode"
0adc 0250 | P | .STRTAB 0x0250->0x0c04 ; "<A"
0add 0250 | P | .STRTAB 0x0250->0x0c05 ; "`."
; "`."
0ade 0250 | P | .STRTAB 0x0250->0x0c06 ; "\x22."
0adf 0250 | P | .STRTAB 0x0250->0x0c07 ; "*SYSTEM"
0ae0 0255 | U | .STRTAB 0x0255->0x0c0a ; "$"
0ae1 0254 | T | .STRTAB 0x0254->0x0c0b ; "!Machine.Error_Logs"
0ae2 0265 | e | .STRTAB 0x0265->0x0c14 ; " could not be resovled"
0ae3 0279 | y | .STRTAB 0x0279->0x0c1f ; "Get Context failed"
; "Get Context failed"
0ae4 0289 | | .STRTAB 0x0289->0x0c28 ; "Get Root Failed"
0ae5 0296 | | .STRTAB 0x0296->0x0c30 ; "Severe parser error"
0ae6 02a7 | | .STRTAB 0x02a7->0x0c39 ; "Cannot set context to "
0ae7 02bb | | .STRTAB 0x02bb->0x0c44 ; "Semantics"
0ae8 02c2 | | .STRTAB 0x02c2->0x0c49 ; "Unhandled exception in Semantics"
0ae9 02e0 | | .STRTAB 0x02e0->0x0c59 ; "Unable to run program"
0aea 02f3 | | .STRTAB 0x02f3->0x0c63 ; "network_public"
0aeb 02ff | | .STRTAB 0x02ff->0x0c6a ; "public"
0aec 0303 | | .STRTAB 0x0303->0x0c6d ; "!users."
0aed 0308 | | .STRTAB 0x0308->0x0c71 ; "."
0aee 0307 | | .STRTAB 0x0307->0x0c71 ; "Context problem"
0aef 0314 | | .STRTAB 0x0314->0x0c79 ; "prompt"
0af0 0318 | | .STRTAB 0x0318->0x0c7c ; "loop"
0af1 031a | | .STRTAB 0x031a->0x0c7e ; "abort"
0af2 031d | | .STRTAB 0x031d->0x0c80 ; "accept"
0af3 0321 | ! | .STRTAB 0x0321->0x0c83 ; "assignment"
0af4 0329 | ) | .STRTAB 0x0329->0x0c88 ; "case"
0af5 032b | + | .STRTAB 0x032b->0x0c8a ; "machine code"
0af6 0335 | 5 | .STRTAB 0x0335->0x0c90 ; "conditional entry call"
0af7 0349 | I | .STRTAB 0x0349->0x0c9b ; "delay"
0af8 034c | L | .STRTAB 0x034c->0x0c9e ; "exit"
0af9 034e | N | .STRTAB 0x034e->0x0ca0 ; "goto"
0afa 0350 | P | .STRTAB 0x0350->0x0ca2 ; "if"
0afb 0350 | P | .STRTAB 0x0350->0x0ca3 ; "null"
0afc 0352 | R | .STRTAB 0x0352->0x0ca5 ; "raise"
0afd 0355 | U | .STRTAB 0x0355->0x0ca7 ; "return"
0afe 0359 | Y | .STRTAB 0x0359->0x0caa ; "selective wait"
0aff 0365 | e | .STRTAB 0x0365->0x0cb1 ; "terminate alternative"
0b00 0378 | x | .STRTAB 0x0378->0x0cbc ; "timed entry call"
0b01 0386 | | .STRTAB 0x0386->0x0cc4 ; ">>"
0b02 0386 | | .STRTAB 0x0386->0x0cc5 ; "("
; "("
0b03 0385 | | .STRTAB 0x0385->0x0cc5 ; ")"
0b04 0384 | | .STRTAB 0x0384->0x0cc6 ; ", ...)"
0b05 0388 | | .STREND 0x0388->0x0cc9
0b06 4e49 4c4e |NILN| .STRTAB_STRINGS
0cc9 0000 0000 | | .BLANK 0000[0x7]
0cd0 ; --------------------------------------------------------------------------------------
0cd0 ; Debug Table
0cd0 ; --------------------------------------------------------------------------------------
0cd0 0003 0028 | (| .CONST 0x0003,0x0028
0cd2 000b 0e12 | | .DEBUG 0x000b,0x0e12,0x8000,0x0000,0x0057,0xb0d5,0x0000,0x0007
0cda 0021 0e2a | ! *| .DEBUG 0x0021,0x0e2a,0x8000,0x0000,0x0058,0x6f55,0x0000,0x0049
0ce2 00fb 0e98 | | .DEBUG 0x00fb,0x0e98,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0014
0cea 0133 0eb2 | 3 | .DEBUG 0x0133,0x0eb2,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0027
0cf2 016b 0ec6 | k | .DEBUG 0x016b,0x0ec6,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0049
0cfa 028b 0f1c | | .DEBUG 0x028b,0x0f1c,0x0002,0x0000,0x0057,0xb0d5,0x0000,0x0073
0d02 029b 0f20 | | .DEBUG 0x029b,0x0f20,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x007c
0d0a 02b3 0f2e | .| .DEBUG 0x02b3,0x0f2e,0x0001,0x0000,0x0057,0xb0d5,0x0000,0x0084
0d12 03d3 0f94 | | .DEBUG 0x03d3,0x0f94,0x0002,0x0000,0x0057,0xb0d5,0x0000,0x009b
0d1a 04cb 0fdc | | .DEBUG 0x04cb,0x0fdc,0x0005,0x0000,0x0058,0x6f55,0x0000,0x010f
0d22 04e3 0fde | | .DEBUG 0x04e3,0x0fde,0x0005,0x0000,0x0058,0x6f55,0x0000,0x012f
0d2a 04fb 0fe0 | | .DEBUG 0x04fb,0x0fe0,0x0005,0x0000,0x0058,0x6f55,0x0000,0x013b
0d32 0513 0fe2 | | .DEBUG 0x0513,0x0fe2,0x2801,0x0002,0x0058,0x6f55,0x0000,0x0143
0d3a 053b 0ff2 | ; | .DEBUG 0x053b,0x0ff2,0x0002,0x0000,0x0058,0x6f55,0x0000,0x025a
0d42 054b 0ff6 | K | .DEBUG 0x054b,0x0ff6,0x0001,0x0000,0x0058,0x6f55,0x0000,0x026b
0d4a 0573 1004 | s | .DEBUG 0x0573,0x1004,0x0002,0x0000,0x0058,0x6f55,0x0000,0x02b8
0d52 057b 1008 | { | .DEBUG 0x057b,0x1008,0x0001,0x0000,0x0058,0x6f55,0x0000,0x02d0
0d5a 0593 1010 | | .DEBUG 0x0593,0x1010,0x0001,0x0000,0x0058,0x6f55,0x0000,0x030a
0d62 05eb 1026 | &| .DEBUG 0x05eb,0x1026,0x0001,0x0000,0x0058,0x6f55,0x0000,0x037f
0d6a 0643 103c | C <| .DEBUG 0x0643,0x103c,0x0001,0x0000,0x0058,0x6f55,0x0000,0x03f6
0d72 0673 1048 | s H| .DEBUG 0x0673,0x1048,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0434
0d7a 06a3 1058 | X| .DEBUG 0x06a3,0x1058,0x0001,0x0000,0x0058,0x6f55,0x0000,0x052c
0d82 0723 107a | # z| .DEBUG 0x0723,0x107a,0x0001,0x0000,0x0058,0x6f55,0x0000,0x05dd
0d8a 0753 1084 | S | .DEBUG 0x0753,0x1084,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0641
0d92 07b3 10a6 | | .DEBUG 0x07b3,0x10a6,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0742
0d9a 07d3 10b0 | | .DEBUG 0x07d3,0x10b0,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0774
0da2 0813 10c6 | | .DEBUG 0x0813,0x10c6,0x0002,0x0000,0x0058,0x6f55,0x0000,0x07db
0daa 08d3 110e | | .DEBUG 0x08d3,0x110e,0x0001,0x0000,0x0058,0x6f55,0x0000,0x114f
0db2 08eb 1118 | | .DEBUG 0x08eb,0x1118,0x0001,0x0000,0x0058,0x6f55,0x0000,0x0d48
0dba 0903 1122 | "| .DEBUG 0x0903,0x1122,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0da6
0dc2 0923 112e | # .| .DEBUG 0x0923,0x112e,0x0001,0x0000,0x0058,0x6f55,0x0000,0x1006
0dca 093b 1134 | ; 4| .DEBUG 0x093b,0x1134,0x0801,0x0002,0x0058,0x6f55,0x0000,0x01bd
0dd2 096b 1138 | k 8| .DEBUG 0x096b,0x1138,0x0002,0x0000,0x0058,0x6f55,0x0000,0x0451
0dda 09bb 114c | L| .DEBUG 0x09bb,0x114c,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0692
0de2 09d3 1152 | R| .DEBUG 0x09d3,0x1152,0x0004,0x0000,0x0058,0x6f55,0x0000,0x06c3
0dea 09e3 1158 | X| .DEBUG 0x09e3,0x1158,0x0004,0x0000,0x0058,0x6f55,0x0000,0x06ea
0df2 09f3 115e | ^| .DEBUG 0x09f3,0x115e,0x0002,0x0000,0x0058,0x6f55,0x0000,0x07f7
0dfa 0a3b 1172 | ; r| .DEBUG 0x0a3b,0x1172,0x0002,0x0000,0x0058,0x6f55,0x0000,0x08af
0e02 0a7b 1184 | { | .DEBUG 0x0a7b,0x1184,0x0004,0x0000,0x0058,0x6f55,0x0000,0x04b8
0e0a 0aab 1192 | | .DEBUG 0x0aab,0x1192,0x0004,0x0000,0x0058,0x6f55,0x0000,0x0846
0e12 ; --------------------------------------------------------------------------------------
0e12 ; Debug3 Subtable 0x0
0e12 ; --------------------------------------------------------------------------------------
0e12 000b 0000 | | .DBG3TAB 0x000b,0x0000
0e14 000b ffff | | .CONST 0x000b,0xffff
0e16 000e fffe | | .CONST 0x000e,0xfffe
0e18 0011 fffd | | .CONST 0x0011,0xfffd
0e1a 0013 fffc | | .CONST 0x0013,0xfffc
0e1c 0015 fffb | | .CONST 0x0015,0xfffb
0e1e 0017 fffa | | .CONST 0x0017,0xfffa
0e20 0019 fff9 | | .CONST 0x0019,0xfff9
0e22 001b fff8 | | .CONST 0x001b,0xfff8
0e24 001d fff7 | | .CONST 0x001d,0xfff7
0e26 001f fff6 | | .CONST 0x001f,0xfff6
0e28 0020 fff5 | | .CONST 0x0020,0xfff5
0e2a ; --------------------------------------------------------------------------------------
0e2a ; Debug3 Subtable 0x1
0e2a ; --------------------------------------------------------------------------------------
0e2a 0036 0000 | 6 | .DBG3TAB 0x0036,0x0000
0e2c 0021 ffff | ! | .CONST 0x0021,0xffff
0e2e 0022 fffe | " | .CONST 0x0022,0xfffe
0e30 0023 fffd | # | .CONST 0x0023,0xfffd
0e32 0024 fffc | $ | .CONST 0x0024,0xfffc
0e34 0025 fffb | % | .CONST 0x0025,0xfffb
0e36 0026 fffa | & | .CONST 0x0026,0xfffa
0e38 0027 fff9 | ' | .CONST 0x0027,0xfff9
0e3a 0028 fff8 | ( | .CONST 0x0028,0xfff8
0e3c 002a fff7 | * | .CONST 0x002a,0xfff7
0e3e 002c fff6 | , | .CONST 0x002c,0xfff6
0e40 002f fff5 | / | .CONST 0x002f,0xfff5
0e42 0036 fff4 | 6 | .CONST 0x0036,0xfff4
0e44 003d fff3 | = | .CONST 0x003d,0xfff3
0e46 0044 fff2 | D | .CONST 0x0044,0xfff2
0e48 004b fff1 | K | .CONST 0x004b,0xfff1
0e4a 0052 fff0 | R | .CONST 0x0052,0xfff0
0e4c 0059 ffef | Y | .CONST 0x0059,0xffef
0e4e 005b ffee | [ | .CONST 0x005b,0xffee
0e50 005e ffed | ^ | .CONST 0x005e,0xffed
0e52 0060 ffec | ` | .CONST 0x0060,0xffec
0e54 0062 ffeb | b | .CONST 0x0062,0xffeb
0e56 0064 ffea | d | .CONST 0x0064,0xffea
0e58 0066 ffe9 | f | .CONST 0x0066,0xffe9
0e5a 0072 ffe8 | r | .CONST 0x0072,0xffe8
0e5c 0077 ffe7 | w | .CONST 0x0077,0xffe7
0e5e 007c ffe6 | | | .CONST 0x007c,0xffe6
0e60 007e ffe5 | ~ | .CONST 0x007e,0xffe5
0e62 0080 ffe4 | | .CONST 0x0080,0xffe4
0e64 0096 ffe3 | | .CONST 0x0096,0xffe3
0e66 0098 ffe2 | | .CONST 0x0098,0xffe2
0e68 009a ffe1 | | .CONST 0x009a,0xffe1
0e6a 009c ffe0 | | .CONST 0x009c,0xffe0
0e6c 009e ffdf | | .CONST 0x009e,0xffdf
0e6e 00a0 ffde | | .CONST 0x00a0,0xffde
0e70 00a2 ffdd | | .CONST 0x00a2,0xffdd
0e72 00a4 ffdc | | .CONST 0x00a4,0xffdc
0e74 00a6 ffdb | | .CONST 0x00a6,0xffdb
0e76 00a8 ffda | | .CONST 0x00a8,0xffda
0e78 00aa ffd9 | | .CONST 0x00aa,0xffd9
0e7a 00ac ffd8 | | .CONST 0x00ac,0xffd8
0e7c 00bc ffd7 | | .CONST 0x00bc,0xffd7
0e7e 00be ffd6 | | .CONST 0x00be,0xffd6
0e80 00c0 ffd5 | | .CONST 0x00c0,0xffd5
0e82 00c9 ffd4 | | .CONST 0x00c9,0xffd4
0e84 00cb ffd3 | | .CONST 0x00cb,0xffd3
0e86 00cd ffd2 | | .CONST 0x00cd,0xffd2
0e88 00cf ffd1 | | .CONST 0x00cf,0xffd1
0e8a 00d1 ffd0 | | .CONST 0x00d1,0xffd0
0e8c 00d3 ffcf | | .CONST 0x00d3,0xffcf
0e8e 00e3 ffce | | .CONST 0x00e3,0xffce
0e90 00e5 ffcd | | .CONST 0x00e5,0xffcd
0e92 00e7 ffcc | | .CONST 0x00e7,0xffcc
0e94 00e9 ffcb | | .CONST 0x00e9,0xffcb
0e96 00eb ffca | | .CONST 0x00eb,0xffca
0e98 ; --------------------------------------------------------------------------------------
0e98 ; Debug3 Subtable 0x2
0e98 ; --------------------------------------------------------------------------------------
0e98 0005 0007 | | .DBG3TAB 0x0005,0x0007
0e9a 00fb ffff | | .CONST 0x00fb,0xffff
0e9c 00fc fffe | | .CONST 0x00fc,0xfffe
0e9e 0100 fffd | | .CONST 0x0100,0xfffd
0ea0 0105 fffc | | .CONST 0x0105,0xfffc
0ea2 010a fffb | | .CONST 0x010a,0xfffb
0ea4 010e 0001 | | .CONST 0x010e,0x0001
0ea6 011b 0002 | | .CONST 0x011b,0x0002
0ea8 011e 0003 | | .CONST 0x011e,0x0003
0eaa 011f 0004 | | .CONST 0x011f,0x0004
0eac 0124 0005 | $ | .CONST 0x0124,0x0005
0eae 0127 0006 | ' | .CONST 0x0127,0x0006
0eb0 012a 0007 | * | .CONST 0x012a,0x0007
0eb2 ; --------------------------------------------------------------------------------------
0eb2 ; Debug3 Subtable 0x3
0eb2 ; --------------------------------------------------------------------------------------
0eb2 0002 0007 | | .DBG3TAB 0x0002,0x0007
0eb4 0133 ffff | 3 | .CONST 0x0133,0xffff
0eb6 0135 fffe | 5 | .CONST 0x0135,0xfffe
0eb8 0139 0001 | 9 | .CONST 0x0139,0x0001
0eba 0144 0002 | D | .CONST 0x0144,0x0002
0ebc 0149 0003 | I | .CONST 0x0149,0x0003
0ebe 014d 0004 | M | .CONST 0x014d,0x0004
0ec0 0152 0005 | R | .CONST 0x0152,0x0005
0ec2 0157 0006 | W | .CONST 0x0157,0x0006
0ec4 015f 0007 | _ | .CONST 0x015f,0x0007
0ec6 ; --------------------------------------------------------------------------------------
0ec6 ; Debug3 Subtable 0x4
0ec6 ; --------------------------------------------------------------------------------------
0ec6 000d 001d | | .DBG3TAB 0x000d,0x001d
0ec8 016b ffff | k | .CONST 0x016b,0xffff
0eca 016c fffe | l | .CONST 0x016c,0xfffe
0ecc 0170 fffd | p | .CONST 0x0170,0xfffd
0ece 0176 fffc | v | .CONST 0x0176,0xfffc
0ed0 017b fffb | { | .CONST 0x017b,0xfffb
0ed2 0180 fffa | | .CONST 0x0180,0xfffa
0ed4 0185 fff9 | | .CONST 0x0185,0xfff9
0ed6 018a fff8 | | .CONST 0x018a,0xfff8
0ed8 018f fff7 | | .CONST 0x018f,0xfff7
0eda 0194 fff6 | | .CONST 0x0194,0xfff6
0edc 0199 fff5 | | .CONST 0x0199,0xfff5
0ede 019e fff4 | | .CONST 0x019e,0xfff4
0ee0 01a0 fff3 | | .CONST 0x01a0,0xfff3
0ee2 01a5 0001 | | .CONST 0x01a5,0x0001
0ee4 01a9 0002 | | .CONST 0x01a9,0x0002
0ee6 01ab 0003 | | .CONST 0x01ab,0x0003
0ee8 01b8 0004 | | .CONST 0x01b8,0x0004
0eea 01be 0006 | | .CONST 0x01be,0x0006
0eec 01c3 0007 | | .CONST 0x01c3,0x0007
0eee 01ce 0008 | | .CONST 0x01ce,0x0008
0ef0 01d3 0005 | | .CONST 0x01d3,0x0005
0ef2 01d8 0009 | | .CONST 0x01d8,0x0009
0ef4 01de 000a | | .CONST 0x01de,0x000a
0ef6 01e4 000b | | .CONST 0x01e4,0x000b
0ef8 01e9 000c | | .CONST 0x01e9,0x000c
0efa 01fa 000d | | .CONST 0x01fa,0x000d
0efc 01ff 000e | | .CONST 0x01ff,0x000e
0efe 0204 000f | | .CONST 0x0204,0x000f
0f00 020d 0010 | | .CONST 0x020d,0x0010
0f02 0210 0011 | | .CONST 0x0210,0x0011
0f04 0218 0012 | | .CONST 0x0218,0x0012
0f06 021d 0013 | | .CONST 0x021d,0x0013
0f08 0221 0014 | ! | .CONST 0x0221,0x0014
0f0a 0224 0015 | $ | .CONST 0x0224,0x0015
0f0c 022c 0016 | , | .CONST 0x022c,0x0016
0f0e 0237 0017 | 7 | .CONST 0x0237,0x0017
0f10 0238 0018 | 8 | .CONST 0x0238,0x0018
0f12 023b 0019 | ; | .CONST 0x023b,0x0019
0f14 0252 001a | R | .CONST 0x0252,0x001a
0f16 026a 001b | j | .CONST 0x026a,0x001b
0f18 0275 001c | u | .CONST 0x0275,0x001c
0f1a 027d 001d | } | .CONST 0x027d,0x001d
0f1c ; --------------------------------------------------------------------------------------
0f1c ; Debug3 Subtable 0x5
0f1c ; --------------------------------------------------------------------------------------
0f1c 0000 0001 | | .DBG3TAB 0x0000,0x0001
0f1e 028b 0001 | | .CONST 0x028b,0x0001
0f20 ; --------------------------------------------------------------------------------------
0f20 ; Debug3 Subtable 0x6
0f20 ; --------------------------------------------------------------------------------------
0f20 0001 0005 | | .DBG3TAB 0x0001,0x0005
0f22 029b ffff | | .CONST 0x029b,0xffff
0f24 029d 0001 | | .CONST 0x029d,0x0001
0f26 02a1 0002 | | .CONST 0x02a1,0x0002
0f28 02a3 0003 | | .CONST 0x02a3,0x0003
0f2a 02a6 0002 | | .CONST 0x02a6,0x0002
0f2c 02ac 0004 | | .CONST 0x02ac,0x0004
0f2e ; --------------------------------------------------------------------------------------
0f2e ; Debug3 Subtable 0x7
0f2e ; --------------------------------------------------------------------------------------
0f2e 0008 002a | *| .DBG3TAB 0x0008,0x002a
0f30 02b3 ffff | | .CONST 0x02b3,0xffff
0f32 02b8 fffe | | .CONST 0x02b8,0xfffe
0f34 02bb fffd | | .CONST 0x02bb,0xfffd
0f36 02bd fffc | | .CONST 0x02bd,0xfffc
0f38 02bf fffb | | .CONST 0x02bf,0xfffb
0f3a 02c1 fffa | | .CONST 0x02c1,0xfffa
0f3c 02c3 fff9 | | .CONST 0x02c3,0xfff9
0f3e 02c5 fff8 | | .CONST 0x02c5,0xfff8
0f40 02c6 0001 | | .CONST 0x02c6,0x0001
0f42 02ce 0002 | | .CONST 0x02ce,0x0002
0f44 02d0 0003 | | .CONST 0x02d0,0x0003
0f46 02da 0004 | | .CONST 0x02da,0x0004
0f48 02dd 0006 | | .CONST 0x02dd,0x0006
0f4a 02e2 0007 | | .CONST 0x02e2,0x0007
0f4c 02ec 0008 | | .CONST 0x02ec,0x0008
0f4e 02ed 0009 | | .CONST 0x02ed,0x0009
0f50 02f5 000b | | .CONST 0x02f5,0x000b
0f52 02fb 000c | | .CONST 0x02fb,0x000c
0f54 02fe 000d | | .CONST 0x02fe,0x000d
0f56 0305 000e | | .CONST 0x0305,0x000e
0f58 030b 000f | | .CONST 0x030b,0x000f
0f5a 0310 0005 | | .CONST 0x0310,0x0005
0f5c 0315 0010 | | .CONST 0x0315,0x0010
0f5e 031a 0011 | | .CONST 0x031a,0x0011
0f60 031d 0012 | | .CONST 0x031d,0x0012
0f62 031f 0013 | | .CONST 0x031f,0x0013
0f64 0327 0014 | ' | .CONST 0x0327,0x0014
0f66 0328 0015 | ( | .CONST 0x0328,0x0015
0f68 0334 0016 | 4 | .CONST 0x0334,0x0016
0f6a 0339 0017 | 9 | .CONST 0x0339,0x0017
0f6c 033c 0018 | < | .CONST 0x033c,0x0018
0f6e 0340 0019 | @ | .CONST 0x0340,0x0019
0f70 0341 001a | A | .CONST 0x0341,0x001a
0f72 034b 001b | K | .CONST 0x034b,0x001b
0f74 0358 001c | X | .CONST 0x0358,0x001c
0f76 035d 001d | ] | .CONST 0x035d,0x001d
0f78 035e 001e | ^ | .CONST 0x035e,0x001e
0f7a 0364 001f | d | .CONST 0x0364,0x001f
0f7c 036d 0020 | m | .CONST 0x036d,0x0020
0f7e 0373 0021 | s !| .CONST 0x0373,0x0021
0f80 0375 0022 | u "| .CONST 0x0375,0x0022
0f82 037b 0023 | { #| .CONST 0x037b,0x0023
0f84 037d 0024 | } $| .CONST 0x037d,0x0024
0f86 037f 0025 | %| .CONST 0x037f,0x0025
0f88 0386 0026 | &| .CONST 0x0386,0x0026
0f8a 038b 0027 | '| .CONST 0x038b,0x0027
0f8c 0390 0028 | (| .CONST 0x0390,0x0028
0f8e 0399 0029 | )| .CONST 0x0399,0x0029
0f90 039e 002a | *| .CONST 0x039e,0x002a
0f92 03a3 002b | +| .CONST 0x03a3,0x002b
0f94 ; --------------------------------------------------------------------------------------
0f94 ; Debug3 Subtable 0x8
0f94 ; --------------------------------------------------------------------------------------
0f94 0009 001a | | .DBG3TAB 0x0009,0x001a
0f96 03d3 ffff | | .CONST 0x03d3,0xffff
0f98 03d4 fffe | | .CONST 0x03d4,0xfffe
0f9a 03d9 fffd | | .CONST 0x03d9,0xfffd
0f9c 03de fffc | | .CONST 0x03de,0xfffc
0f9e 03e0 fffb | | .CONST 0x03e0,0xfffb
0fa0 03e5 fffa | | .CONST 0x03e5,0xfffa
0fa2 03ea fff9 | | .CONST 0x03ea,0xfff9
0fa4 03ec fff8 | | .CONST 0x03ec,0xfff8
0fa6 03ef fff7 | | .CONST 0x03ef,0xfff7
0fa8 03f2 0001 | | .CONST 0x03f2,0x0001
0faa 03f4 0002 | | .CONST 0x03f4,0x0002
0fac 03f6 0003 | | .CONST 0x03f6,0x0003
0fae 0408 0004 | | .CONST 0x0408,0x0004
0fb0 040c 0005 | | .CONST 0x040c,0x0005
0fb2 0424 0006 | $ | .CONST 0x0424,0x0006
0fb4 0426 0007 | & | .CONST 0x0426,0x0007
0fb6 0428 0008 | ( | .CONST 0x0428,0x0008
0fb8 0434 0009 | 4 | .CONST 0x0434,0x0009
0fba 0436 000a | 6 | .CONST 0x0436,0x000a
0fbc 0438 000b | 8 | .CONST 0x0438,0x000b
0fbe 0450 000c | P | .CONST 0x0450,0x000c
0fc0 0452 000d | R | .CONST 0x0452,0x000d
0fc2 0459 000e | Y | .CONST 0x0459,0x000e
0fc4 045b 000f | [ | .CONST 0x045b,0x000f
0fc6 0460 0010 | ` | .CONST 0x0460,0x0010
0fc8 047d 0011 | } | .CONST 0x047d,0x0011
0fca 047f 0012 | | .CONST 0x047f,0x0012
0fcc 0484 0013 | | .CONST 0x0484,0x0013
0fce 04a1 0014 | | .CONST 0x04a1,0x0014
0fd0 04a3 0015 | | .CONST 0x04a3,0x0015
0fd2 04aa 0016 | | .CONST 0x04aa,0x0016
0fd4 04ac 0017 | | .CONST 0x04ac,0x0017
0fd6 04b3 0018 | | .CONST 0x04b3,0x0018
0fd8 04b5 0019 | | .CONST 0x04b5,0x0019
0fda 04b7 001a | | .CONST 0x04b7,0x001a
0fdc ; --------------------------------------------------------------------------------------
0fdc ; Debug3 Subtable 0x9
0fdc ; --------------------------------------------------------------------------------------
0fdc 0000 0000 | | .DBG3TAB 0x0000,0x0000
0fde ; --------------------------------------------------------------------------------------
0fde ; Debug3 Subtable 0xa
0fde ; --------------------------------------------------------------------------------------
0fde 0000 0000 | | .DBG3TAB 0x0000,0x0000
0fe0 ; --------------------------------------------------------------------------------------
0fe0 ; Debug3 Subtable 0xb
0fe0 ; --------------------------------------------------------------------------------------
0fe0 0000 0000 | | .DBG3TAB 0x0000,0x0000
0fe2 ; --------------------------------------------------------------------------------------
0fe2 ; Debug3 Subtable 0xc
0fe2 ; --------------------------------------------------------------------------------------
0fe2 0003 0004 | | .DBG3TAB 0x0003,0x0004
0fe4 0513 ffff | | .CONST 0x0513,0xffff
0fe6 0517 fffe | | .CONST 0x0517,0xfffe
0fe8 0518 fffd | | .CONST 0x0518,0xfffd
0fea 051c 0002 | | .CONST 0x051c,0x0002
0fec 0523 0003 | # | .CONST 0x0523,0x0003
0fee 0527 0004 | ' | .CONST 0x0527,0x0004
0ff0 052d 0001 | - | .CONST 0x052d,0x0001
0ff2 ; --------------------------------------------------------------------------------------
0ff2 ; Debug3 Subtable 0xd
0ff2 ; --------------------------------------------------------------------------------------
0ff2 0000 0001 | | .DBG3TAB 0x0000,0x0001
0ff4 053b 0001 | ; | .CONST 0x053b,0x0001
0ff6 ; --------------------------------------------------------------------------------------
0ff6 ; Debug3 Subtable 0xe
0ff6 ; --------------------------------------------------------------------------------------
0ff6 0000 0006 | | .DBG3TAB 0x0000,0x0006
0ff8 054b 0001 | K | .CONST 0x054b,0x0001
0ffa 0552 0002 | R | .CONST 0x0552,0x0002
0ffc 0556 0003 | V | .CONST 0x0556,0x0003
0ffe 055b 0004 | [ | .CONST 0x055b,0x0004
1000 055f 0005 | _ | .CONST 0x055f,0x0005
1002 0567 0006 | g | .CONST 0x0567,0x0006
1004 ; --------------------------------------------------------------------------------------
1004 ; Debug3 Subtable 0xf
1004 ; --------------------------------------------------------------------------------------
1004 0000 0001 | | .DBG3TAB 0x0000,0x0001
1006 0573 0001 | s | .CONST 0x0573,0x0001
1008 ; --------------------------------------------------------------------------------------
1008 ; Debug3 Subtable 0x10
1008 ; --------------------------------------------------------------------------------------
1008 0000 0003 | | .DBG3TAB 0x0000,0x0003
100a 057b 0001 | { | .CONST 0x057b,0x0001
100c 057d 0002 | } | .CONST 0x057d,0x0002
100e 058a 0003 | | .CONST 0x058a,0x0003
1010 ; --------------------------------------------------------------------------------------
1010 ; Debug3 Subtable 0x11
1010 ; --------------------------------------------------------------------------------------
1010 0001 0009 | | .DBG3TAB 0x0001,0x0009
1012 0593 ffff | | .CONST 0x0593,0xffff
1014 0596 0001 | | .CONST 0x0596,0x0001
1016 05ae 0002 | | .CONST 0x05ae,0x0002
1018 05b0 0003 | | .CONST 0x05b0,0x0003
101a 05b1 0004 | | .CONST 0x05b1,0x0004
101c 05b6 0005 | | .CONST 0x05b6,0x0005
101e 05cf 0006 | | .CONST 0x05cf,0x0006
1020 05d1 0007 | | .CONST 0x05d1,0x0007
1022 05d2 0008 | | .CONST 0x05d2,0x0008
1024 05e3 0009 | | .CONST 0x05e3,0x0009
1026 ; --------------------------------------------------------------------------------------
1026 ; Debug3 Subtable 0x12
1026 ; --------------------------------------------------------------------------------------
1026 0003 0007 | | .DBG3TAB 0x0003,0x0007
1028 05eb ffff | | .CONST 0x05eb,0xffff
102a 05ee fffe | | .CONST 0x05ee,0xfffe
102c 05f3 fffd | | .CONST 0x05f3,0xfffd
102e 05f5 0001 | | .CONST 0x05f5,0x0001
1030 05f8 0002 | | .CONST 0x05f8,0x0002
1032 0606 0003 | | .CONST 0x0606,0x0003
1034 0612 0004 | | .CONST 0x0612,0x0004
1036 0621 0005 | ! | .CONST 0x0621,0x0005
1038 0627 0006 | ' | .CONST 0x0627,0x0006
103a 0632 0007 | 2 | .CONST 0x0632,0x0007
103c ; --------------------------------------------------------------------------------------
103c ; Debug3 Subtable 0x13
103c ; --------------------------------------------------------------------------------------
103c 0002 0003 | | .DBG3TAB 0x0002,0x0003
103e 0643 ffff | C | .CONST 0x0643,0xffff
1040 0648 fffe | H | .CONST 0x0648,0xfffe
1042 064a 0001 | J | .CONST 0x064a,0x0001
1044 0656 0002 | V | .CONST 0x0656,0x0002
1046 0665 0003 | e | .CONST 0x0665,0x0003
1048 ; --------------------------------------------------------------------------------------
1048 ; Debug3 Subtable 0x14
1048 ; --------------------------------------------------------------------------------------
1048 0003 0004 | | .DBG3TAB 0x0003,0x0004
104a 0673 ffff | s | .CONST 0x0673,0xffff
104c 0675 fffe | u | .CONST 0x0675,0xfffe
104e 0676 fffd | v | .CONST 0x0676,0xfffd
1050 0678 0001 | x | .CONST 0x0678,0x0001
1052 068a 0002 | | .CONST 0x068a,0x0002
1054 068d 0003 | | .CONST 0x068d,0x0003
1056 0697 0004 | | .CONST 0x0697,0x0004
1058 ; --------------------------------------------------------------------------------------
1058 ; Debug3 Subtable 0x15
1058 ; --------------------------------------------------------------------------------------
1058 0005 000b | | .DBG3TAB 0x0005,0x000b
105a 06a3 ffff | | .CONST 0x06a3,0xffff
105c 06a8 fffe | | .CONST 0x06a8,0xfffe
105e 06ac fffd | | .CONST 0x06ac,0xfffd
1060 06b5 fffc | | .CONST 0x06b5,0xfffc
1062 06b8 fffb | | .CONST 0x06b8,0xfffb
1064 06ba 0001 | | .CONST 0x06ba,0x0001
1066 06c0 0002 | | .CONST 0x06c0,0x0002
1068 06c9 0003 | | .CONST 0x06c9,0x0003
106a 06d1 0004 | | .CONST 0x06d1,0x0004
106c 06ea 0005 | | .CONST 0x06ea,0x0005
106e 06f3 0006 | | .CONST 0x06f3,0x0006
1070 06f7 0007 | | .CONST 0x06f7,0x0007
1072 0707 0008 | | .CONST 0x0707,0x0008
1074 070d 0009 | | .CONST 0x070d,0x0009
1076 070f 000a | | .CONST 0x070f,0x000a
1078 071a 000b | | .CONST 0x071a,0x000b
107a ; --------------------------------------------------------------------------------------
107a ; Debug3 Subtable 0x16
107a ; --------------------------------------------------------------------------------------
107a 0000 0004 | | .DBG3TAB 0x0000,0x0004
107c 0723 0001 | # | .CONST 0x0723,0x0001
107e 072a 0003 | * | .CONST 0x072a,0x0003
1080 0735 0004 | 5 | .CONST 0x0735,0x0004
1082 0747 0005 | G | .CONST 0x0747,0x0005
1084 ; --------------------------------------------------------------------------------------
1084 ; Debug3 Subtable 0x17
1084 ; --------------------------------------------------------------------------------------
1084 0001 000f | | .DBG3TAB 0x0001,0x000f
1086 0753 ffff | S | .CONST 0x0753,0xffff
1088 075f 0001 | _ | .CONST 0x075f,0x0001
108a 0763 0002 | c | .CONST 0x0763,0x0002
108c 0766 0003 | f | .CONST 0x0766,0x0003
108e 0769 0004 | i | .CONST 0x0769,0x0004
1090 076d 0005 | m | .CONST 0x076d,0x0005
1092 076f 0006 | o | .CONST 0x076f,0x0006
1094 0772 0007 | r | .CONST 0x0772,0x0007
1096 0779 0008 | y | .CONST 0x0779,0x0008
1098 077b 0009 | { | .CONST 0x077b,0x0009
109a 0782 000a | | .CONST 0x0782,0x000a
109c 0784 000b | | .CONST 0x0784,0x000b
109e 078f 000c | | .CONST 0x078f,0x000c
10a0 07a0 000d | | .CONST 0x07a0,0x000d
10a2 07a5 000e | | .CONST 0x07a5,0x000e
10a4 07a8 000f | | .CONST 0x07a8,0x000f
10a6 ; --------------------------------------------------------------------------------------
10a6 ; Debug3 Subtable 0x18
10a6 ; --------------------------------------------------------------------------------------
10a6 0002 0002 | | .DBG3TAB 0x0002,0x0002
10a8 07b3 ffff | | .CONST 0x07b3,0xffff
10aa 07b8 fffe | | .CONST 0x07b8,0xfffe
10ac 07bd 0001 | | .CONST 0x07bd,0x0001
10ae 07c3 0002 | | .CONST 0x07c3,0x0002
10b0 ; --------------------------------------------------------------------------------------
10b0 ; Debug3 Subtable 0x19
10b0 ; --------------------------------------------------------------------------------------
10b0 0003 0007 | | .DBG3TAB 0x0003,0x0007
10b2 07d3 ffff | | .CONST 0x07d3,0xffff
10b4 07d9 fffe | | .CONST 0x07d9,0xfffe
10b6 07db fffd | | .CONST 0x07db,0xfffd
10b8 07df 0001 | | .CONST 0x07df,0x0001
10ba 07e9 0002 | | .CONST 0x07e9,0x0002
10bc 07ef 0003 | | .CONST 0x07ef,0x0003
10be 07f5 0004 | | .CONST 0x07f5,0x0004
10c0 07fd 0005 | | .CONST 0x07fd,0x0005
10c2 0804 0006 | | .CONST 0x0804,0x0006
10c4 0809 0007 | | .CONST 0x0809,0x0007
10c6 ; --------------------------------------------------------------------------------------
10c6 ; Debug3 Subtable 0x1a
10c6 ; --------------------------------------------------------------------------------------
10c6 0005 001e | | .DBG3TAB 0x0005,0x001e
10c8 0813 ffff | | .CONST 0x0813,0xffff
10ca 0814 fffe | | .CONST 0x0814,0xfffe
10cc 0815 fffd | | .CONST 0x0815,0xfffd
10ce 0817 fffc | | .CONST 0x0817,0xfffc
10d0 0819 fffb | | .CONST 0x0819,0xfffb
10d2 081b 0001 | | .CONST 0x081b,0x0001
10d4 081e 0002 | | .CONST 0x081e,0x0002
10d6 081f 0003 | | .CONST 0x081f,0x0003
10d8 0858 001e | X | .CONST 0x0858,0x001e
10da 085b 0004 | [ | .CONST 0x085b,0x0004
10dc 0860 0005 | ` | .CONST 0x0860,0x0005
10de 0865 0006 | e | .CONST 0x0865,0x0006
10e0 086a 0007 | j | .CONST 0x086a,0x0007
10e2 0871 0008 | q | .CONST 0x0871,0x0008
10e4 0874 0009 | t | .CONST 0x0874,0x0009
10e6 0877 000a | w | .CONST 0x0877,0x000a
10e8 0882 000b | | .CONST 0x0882,0x000b
10ea 0885 000c | | .CONST 0x0885,0x000c
10ec 0888 000d | | .CONST 0x0888,0x000d
10ee 088b 000e | | .CONST 0x088b,0x000e
10f0 088e 000f | | .CONST 0x088e,0x000f
10f2 0891 0010 | | .CONST 0x0891,0x0010
10f4 0894 0011 | | .CONST 0x0894,0x0011
10f6 0897 0012 | | .CONST 0x0897,0x0012
10f8 089a 0013 | | .CONST 0x089a,0x0013
10fa 089d 0014 | | .CONST 0x089d,0x0014
10fc 08a0 0015 | | .CONST 0x08a0,0x0015
10fe 08a3 0016 | | .CONST 0x08a3,0x0016
1100 08a6 0017 | | .CONST 0x08a6,0x0017
1102 08a9 0018 | | .CONST 0x08a9,0x0018
1104 08ac 0019 | | .CONST 0x08ac,0x0019
1106 08af 001a | | .CONST 0x08af,0x001a
1108 08b2 001b | | .CONST 0x08b2,0x001b
110a 08b5 001c | | .CONST 0x08b5,0x001c
110c 08be 001d | | .CONST 0x08be,0x001d
110e ; --------------------------------------------------------------------------------------
110e ; Debug3 Subtable 0x1b
110e ; --------------------------------------------------------------------------------------
110e 0001 0003 | | .DBG3TAB 0x0001,0x0003
1110 08d3 ffff | | .CONST 0x08d3,0xffff
1112 08d5 0001 | | .CONST 0x08d5,0x0001
1114 08e0 0002 | | .CONST 0x08e0,0x0002
1116 08e3 0003 | | .CONST 0x08e3,0x0003
1118 ; --------------------------------------------------------------------------------------
1118 ; Debug3 Subtable 0x1c
1118 ; --------------------------------------------------------------------------------------
1118 0002 0002 | | .DBG3TAB 0x0002,0x0002
111a 08eb ffff | | .CONST 0x08eb,0xffff
111c 08f0 fffe | | .CONST 0x08f0,0xfffe
111e 08f3 0001 | | .CONST 0x08f3,0x0001
1120 08f9 0002 | | .CONST 0x08f9,0x0002
1122 ; --------------------------------------------------------------------------------------
1122 ; Debug3 Subtable 0x1d
1122 ; --------------------------------------------------------------------------------------
1122 0000 0005 | | .DBG3TAB 0x0000,0x0005
1124 0903 0001 | | .CONST 0x0903,0x0001
1126 0909 0002 | | .CONST 0x0909,0x0002
1128 0911 0003 | | .CONST 0x0911,0x0003
112a 0914 0004 | | .CONST 0x0914,0x0004
112c 0918 0005 | | .CONST 0x0918,0x0005
112e ; --------------------------------------------------------------------------------------
112e ; Debug3 Subtable 0x1e
112e ; --------------------------------------------------------------------------------------
112e 0000 0002 | | .DBG3TAB 0x0000,0x0002
1130 0923 0001 | # | .CONST 0x0923,0x0001
1132 0933 0002 | 3 | .CONST 0x0933,0x0002
1134 ; --------------------------------------------------------------------------------------
1134 ; Debug3 Subtable 0x1f
1134 ; --------------------------------------------------------------------------------------
1134 0000 0001 | | .DBG3TAB 0x0000,0x0001
1136 093b 0001 | ; | .CONST 0x093b,0x0001
1138 ; --------------------------------------------------------------------------------------
1138 ; Debug3 Subtable 0x20
1138 ; --------------------------------------------------------------------------------------
1138 0000 0009 | | .DBG3TAB 0x0000,0x0009
113a 096d 0001 | m | .CONST 0x096d,0x0001
113c 0982 0002 | | .CONST 0x0982,0x0002
113e 0988 0003 | | .CONST 0x0988,0x0003
1140 098a 0004 | | .CONST 0x098a,0x0004
1142 0990 0005 | | .CONST 0x0990,0x0005
1144 0997 0006 | | .CONST 0x0997,0x0006
1146 09a5 0007 | | .CONST 0x09a5,0x0007
1148 09a7 0008 | | .CONST 0x09a7,0x0008
114a 09ab 0009 | | .CONST 0x09ab,0x0009
114c ; --------------------------------------------------------------------------------------
114c ; Debug3 Subtable 0x21
114c ; --------------------------------------------------------------------------------------
114c 0000 0002 | | .DBG3TAB 0x0000,0x0002
114e 09bb 0001 | | .CONST 0x09bb,0x0001
1150 09c8 0002 | | .CONST 0x09c8,0x0002
1152 ; --------------------------------------------------------------------------------------
1152 ; Debug3 Subtable 0x22
1152 ; --------------------------------------------------------------------------------------
1152 0000 0002 | | .DBG3TAB 0x0000,0x0002
1154 09d3 0001 | | .CONST 0x09d3,0x0001
1156 09db 0002 | | .CONST 0x09db,0x0002
1158 ; --------------------------------------------------------------------------------------
1158 ; Debug3 Subtable 0x23
1158 ; --------------------------------------------------------------------------------------
1158 0000 0002 | | .DBG3TAB 0x0000,0x0002
115a 09e3 0001 | | .CONST 0x09e3,0x0001
115c 09eb 0002 | | .CONST 0x09eb,0x0002
115e ; --------------------------------------------------------------------------------------
115e ; Debug3 Subtable 0x24
115e ; --------------------------------------------------------------------------------------
115e 0000 0009 | | .DBG3TAB 0x0000,0x0009
1160 09f5 0001 | | .CONST 0x09f5,0x0001
1162 0a0a 0009 | | .CONST 0x0a0a,0x0009
1164 0a12 0002 | | .CONST 0x0a12,0x0002
1166 0a15 0003 | | .CONST 0x0a15,0x0003
1168 0a1a 0004 | | .CONST 0x0a1a,0x0004
116a 0a1c 0005 | | .CONST 0x0a1c,0x0005
116c 0a1f 0006 | | .CONST 0x0a1f,0x0006
116e 0a29 0007 | ) | .CONST 0x0a29,0x0007
1170 0a2c 0008 | , | .CONST 0x0a2c,0x0008
1172 ; --------------------------------------------------------------------------------------
1172 ; Debug3 Subtable 0x25
1172 ; --------------------------------------------------------------------------------------
1172 0002 0006 | | .DBG3TAB 0x0002,0x0006
1174 0a3b ffff | ; | .CONST 0x0a3b,0xffff
1176 0a3c fffe | < | .CONST 0x0a3c,0xfffe
1178 0a40 0001 | @ | .CONST 0x0a40,0x0001
117a 0a46 0002 | F | .CONST 0x0a46,0x0002
117c 0a4a 0003 | J | .CONST 0x0a4a,0x0003
117e 0a4c 0004 | L | .CONST 0x0a4c,0x0004
1180 0a52 0005 | R | .CONST 0x0a52,0x0005
1182 0a62 0006 | b | .CONST 0x0a62,0x0006
1184 ; --------------------------------------------------------------------------------------
1184 ; Debug3 Subtable 0x26
1184 ; --------------------------------------------------------------------------------------
1184 0002 0004 | | .DBG3TAB 0x0002,0x0004
1186 0a7b ffff | { | .CONST 0x0a7b,0xffff
1188 0a7d fffe | } | .CONST 0x0a7d,0xfffe
118a 0a80 0001 | | .CONST 0x0a80,0x0001
118c 0a93 0002 | | .CONST 0x0a93,0x0002
118e 0a95 0003 | | .CONST 0x0a95,0x0003
1190 0a97 0004 | | .CONST 0x0a97,0x0004
1192 ; --------------------------------------------------------------------------------------
1192 ; Debug3 Subtable 0x27
1192 ; --------------------------------------------------------------------------------------
1192 0002 0001 | | .DBG3TAB 0x0002,0x0001
1194 0aab ffff | | .CONST 0x0aab,0xffff
1196 0aaf fffe | | .CONST 0x0aaf,0xfffe
1198 0ab3 0001 | | .CONST 0x0ab3,0x0001
119a 0000 0000 | | .BLANK 0000[0x66]