|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 9216 (0x2400) Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 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,0x005a,0x54d5,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 INIT_00f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0x11,0xfffd 0013 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x13,0xfffc 0015 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x15,0xfffb 0017 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x17,0xfffa 0019 029a 029b | | Declare_Subprogram INIT_0298,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x19,0xfff9 001b 029a 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1b,0xfff8 001d 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated ; 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,0x005a,0x54e5,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 INIT_04c8,For_Call 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 INIT_04e0,For_Call 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 INIT_04f8,For_Call 007b 03fd | | Declare_Type Discrete,Defined 007c 029b 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Unelaborated ; 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, 0x005a54e5} 0093 4a2b |J+ | Short_Literal 0x22b 0094 4800 |H | Short_Literal 0x0 0095 0007 | | Action Break_Optional 0096 029d 053b | ;| Declare_Subprogram INIT_0538,For_Outer_Call ; Debug Table 0x1.0x1c = 0x96,0xffe3 0098 029d 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call ; Debug Table 0x1.0x1d = 0x98,0xffe2 009a 029d 0573 | s| Declare_Subprogram INIT_0570,For_Outer_Call ; Debug Table 0x1.0x1e = 0x9a,0xffe1 009c 029d 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call ; Debug Table 0x1.0x1f = 0x9c,0xffe0 009e 029d 0593 | | Declare_Subprogram INIT_0590,For_Outer_Call ; Debug Table 0x1.0x20 = 0x9e,0xffdf 00a0 029d 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call ; Debug Table 0x1.0x21 = 0xa0,0xffde 00a2 029d 0643 | C| Declare_Subprogram INIT_0640,For_Outer_Call ; Debug Table 0x1.0x22 = 0xa2,0xffdd 00a4 029d 0673 | s| Declare_Subprogram INIT_0670,For_Outer_Call ; Debug Table 0x1.0x23 = 0xa4,0xffdc 00a6 029d 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call ; Debug Table 0x1.0x24 = 0xa6,0xffdb 00a8 029d 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call ; Debug Table 0x1.0x25 = 0xa8,0xffda 00aa 029d 0753 | S| Declare_Subprogram INIT_0750,For_Outer_Call ; Debug Table 0x1.0x26 = 0xaa,0xffd9 00ac 631b |c | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x005a54e5} ; 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 INIT_07b0,For_Outer_Call ; Debug Table 0x1.0x28 = 0xbc,0xffd7 00be 029d 07d3 | | Declare_Subprogram INIT_07d0,For_Outer_Call ; Debug Table 0x1.0x29 = 0xbe,0xffd6 00c0 6307 |c | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x005a54e5} ; 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 INIT_0810,For_Outer_Call ; 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, 0x005a54e5} ; 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 INIT_08d0,For_Outer_Call ; Debug Table 0x1.0x34 = 0xe9,0xffcb 00eb 62dc |b | Indirect_Literal Discrete,0x3c8,{0x00000000, 0x005a54e5} ; 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,0x005a,0x54d5,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 INIT_08e8,For_Call ; Debug Table 0x2.0x4 = 0x10a,0xfffb 010c 029f 0903 | | Declare_Subprogram INIT_0900,For_Call 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_Suprogram New_Top_Offset 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,0x005a,0x54d5,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 0x4 015b 4507 |E | Exit_Suprogram New_Top_Offset 0x7 ; case 0x0 015c 4507 |E | Exit_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x005a,0x54d5,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 0x7 0272 6141 |aA | Indirect_Literal Discrete,0x3b4,{0x00000000, 0x5a54e501} 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x005a,0x54d5,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_Value,New_Top_Offset 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,0x005a,0x54d5,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_Suprogram New_Top_Offset 0x2 02ab TRAP_0298: 02ab 0007 | | Action Break_Optional 02ac 4502 |E | Exit_Suprogram New_Top_Offset 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,0x005a,0x54d5,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 0x4 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 0x4 03ab 0000 | | .XXX[0x1] 03ac 0000 0000 | | .LITERAL {0x00000000, 0x00008000} 03b0 0000 0000 | | .LITERAL {0x00000000, 0x00050000} 03b4 0000 0000 | | .LITERAL {0x00000000, 0x5a54e501} 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, 0x005a54e5} 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,0x005a,0x54d5,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 INIT_0920,For_Call ; 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_Value,New_Top_Offset 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 0x9 ; Debug Table 0x9 = .DEBUG 0x04cb,0x0fdc,0x0005,0x0000,0x005a,0x54e5,0x0000,0x010f 04cc 7808 |x | Jump 0x4d5 ; case 0x0 04cd 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1 04ce 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2 04cf 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3 04d0 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4 04d1 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5 04d2 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6 04d3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7 04d4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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 0x4 ; Debug Table 0xa = .DEBUG 0x04e3,0x0fde,0x0005,0x0000,0x005a,0x54e5,0x0000,0x012f 04e4 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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,New_Top_Offset 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,New_Top_Offset 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 0x4 ; Debug Table 0xb = .DEBUG 0x04fb,0x0fe0,0x0005,0x0000,0x005a,0x54e5,0x0000,0x013b 04fc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 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,New_Top_Offset 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,New_Top_Offset 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,New_Top_Offset 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,0x005a,0x54e5,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 INIT_0938,For_Call ; 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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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,0x005a,0x54e5,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 0x4 0563 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; case 0x0 0564 4502 |E | Exit_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Value,New_Top_Offset 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,0x005a,0x54e5,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, 0x5a54e501} ; Debug Table 0x10.0x2 = 0x58a,0x3 058b 0257 | W | Execute Discrete,Raise 058c 4503 |E | Exit_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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, 0x5a54e501} ; 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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 INIT_0968,For_Call ; 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, 0x5a54e501} ; Debug Table 0x14.0x6 = 0x697,0x4 0698 0257 | W | Execute Discrete,Raise 0699 4502 |E | Exit_Suprogram New_Top_Offset 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,0x005a,0x54e5,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, 0x5a54e501} ; Debug Table 0x15.0xc = 0x707,0x8 0708 0257 | W | Execute Discrete,Raise 0709 4502 |E | Exit_Suprogram New_Top_Offset 0x2 070a TRAP_06a0: 070a 61bd |a | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x5a54e501} 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, 0x5a54e501} ; 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,0x005a,0x54e5,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 0x4 0726 4503 |E | Exit_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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 INIT_09b8,For_Call 075b 029f 09d3 | | Declare_Subprogram INIT_09d0,For_Call 075d 029f 09e3 | | Declare_Subprogram INIT_09e0,For_Call 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_Suprogram New_Top_Offset 0x3 076d 8403 | | Call 0x2,0x3 ; Debug Table 0x17.0x5 = 0x76d,0x5 076e 4503 |E | Exit_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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 INIT_09f0,For_Call ; Debug Table 0x1a.0x3 = 0x817,0xfffc 0819 029f 0a3b | ;| Declare_Subprogram INIT_0a38,For_Call ; 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_Value,New_Top_Offset 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_Value,New_Top_Offset 0x1 0874 0092 0aef | | Action Push_String_Extended,0xaef ; "prompt" ; Debug Table 0x1a.0xe = 0x874,0x9 0876 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 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_Value,New_Top_Offset 0x1 0885 0092 0af1 | | Action Push_String_Extended,0xaf1 ; "abort" ; Debug Table 0x1a.0x11 = 0x885,0xc 0887 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0888 0092 0af2 | | Action Push_String_Extended,0xaf2 ; "accept" ; Debug Table 0x1a.0x12 = 0x888,0xd 088a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 088b 0092 0af3 | | Action Push_String_Extended,0xaf3 ; "assignment" ; Debug Table 0x1a.0x13 = 0x88b,0xe 088d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 088e 0092 0af4 | | Action Push_String_Extended,0xaf4 ; "case" ; Debug Table 0x1a.0x14 = 0x88e,0xf 0890 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0891 0092 0af5 | | Action Push_String_Extended,0xaf5 ; "machine code" ; Debug Table 0x1a.0x15 = 0x891,0x10 0893 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0894 0092 0af6 | | Action Push_String_Extended,0xaf6 ; "conditional entry call" ; Debug Table 0x1a.0x16 = 0x894,0x11 0896 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0897 0092 0af7 | | Action Push_String_Extended,0xaf7 ; "delay" ; Debug Table 0x1a.0x17 = 0x897,0x12 0899 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 089a 0092 0af8 | | Action Push_String_Extended,0xaf8 ; "exit" ; Debug Table 0x1a.0x18 = 0x89a,0x13 089c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 089d 0092 0af9 | | Action Push_String_Extended,0xaf9 ; "goto" ; Debug Table 0x1a.0x19 = 0x89d,0x14 089f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a0 0092 0afa | | Action Push_String_Extended,0xafa ; "if" ; Debug Table 0x1a.0x1a = 0x8a0,0x15 08a2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a3 0092 0afb | | Action Push_String_Extended,0xafb ; "null" ; Debug Table 0x1a.0x1b = 0x8a3,0x16 08a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a6 0092 0afc | | Action Push_String_Extended,0xafc ; "raise" ; Debug Table 0x1a.0x1c = 0x8a6,0x17 08a8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08a9 0092 0afd | | Action Push_String_Extended,0xafd ; "return" ; Debug Table 0x1a.0x1d = 0x8a9,0x18 08ab 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08ac 0092 0afe | | Action Push_String_Extended,0xafe ; "selective wait" ; Debug Table 0x1a.0x1e = 0x8ac,0x19 08ae 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08af 0092 0aff | | Action Push_String_Extended,0xaff ; "terminate alternative" ; Debug Table 0x1a.0x1f = 0x8af,0x1a 08b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08b2 0092 0b00 | | Action Push_String_Extended,0xb00 ; "timed entry call" ; Debug Table 0x1a.0x20 = 0x8b2,0x1b 08b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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, 0x5a54e501} 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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 INIT_0a78,For_Call ; Debug Table 0x20 = .DEBUG 0x096b,0x1138,0x0002,0x0000,0x005a,0x54e5,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 0x10 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_Value,New_Top_Offset 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_Value,New_Top_Offset 0x1 0990 6737 |g7 | Indirect_Literal Discrete,0x8c8,{0x00000000, 0x5a54e501} ; 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, 0x5a54e501} 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_Value,New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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,0x005a,0x54e5,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_Suprogram New_Top_Offset 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_Suprogram New_Top_Offset 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 INIT_0aa8,For_Call ; Debug Table 0x24 = .DEBUG 0x09f3,0x115e,0x0002,0x0000,0x005a,0x54e5,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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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,0x005a,0x54e5,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_Value,New_Top_Offset 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_Value,New_Top_Offset 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_Value,New_Top_Offset 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,0x005a,0x54e5,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, 0x5a54e501} ; 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_Value,New_Top_Offset 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,0x005a,0x54e5,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_Value,New_Top_Offset 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" 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,0x005a,0x54d5,0x0000,0x0007 0cda 0021 0e2a | ! *| .DEBUG 0x0021,0x0e2a,0x8000,0x0000,0x005a,0x54e5,0x0000,0x0049 0ce2 00fb 0e98 | | .DEBUG 0x00fb,0x0e98,0x0001,0x0000,0x005a,0x54d5,0x0000,0x0014 0cea 0133 0eb2 | 3 | .DEBUG 0x0133,0x0eb2,0x0001,0x0000,0x005a,0x54d5,0x0000,0x0027 0cf2 016b 0ec6 | k | .DEBUG 0x016b,0x0ec6,0x0001,0x0000,0x005a,0x54d5,0x0000,0x0049 0cfa 028b 0f1c | | .DEBUG 0x028b,0x0f1c,0x0002,0x0000,0x005a,0x54d5,0x0000,0x0073 0d02 029b 0f20 | | .DEBUG 0x029b,0x0f20,0x0001,0x0000,0x005a,0x54d5,0x0000,0x007c 0d0a 02b3 0f2e | .| .DEBUG 0x02b3,0x0f2e,0x0001,0x0000,0x005a,0x54d5,0x0000,0x0084 0d12 03d3 0f94 | | .DEBUG 0x03d3,0x0f94,0x0002,0x0000,0x005a,0x54d5,0x0000,0x009b 0d1a 04cb 0fdc | | .DEBUG 0x04cb,0x0fdc,0x0005,0x0000,0x005a,0x54e5,0x0000,0x010f 0d22 04e3 0fde | | .DEBUG 0x04e3,0x0fde,0x0005,0x0000,0x005a,0x54e5,0x0000,0x012f 0d2a 04fb 0fe0 | | .DEBUG 0x04fb,0x0fe0,0x0005,0x0000,0x005a,0x54e5,0x0000,0x013b 0d32 0513 0fe2 | | .DEBUG 0x0513,0x0fe2,0x2801,0x0002,0x005a,0x54e5,0x0000,0x0143 0d3a 053b 0ff2 | ; | .DEBUG 0x053b,0x0ff2,0x0002,0x0000,0x005a,0x54e5,0x0000,0x025a 0d42 054b 0ff6 | K | .DEBUG 0x054b,0x0ff6,0x0001,0x0000,0x005a,0x54e5,0x0000,0x026b 0d4a 0573 1004 | s | .DEBUG 0x0573,0x1004,0x0002,0x0000,0x005a,0x54e5,0x0000,0x02b8 0d52 057b 1008 | { | .DEBUG 0x057b,0x1008,0x0001,0x0000,0x005a,0x54e5,0x0000,0x02d0 0d5a 0593 1010 | | .DEBUG 0x0593,0x1010,0x0001,0x0000,0x005a,0x54e5,0x0000,0x030a 0d62 05eb 1026 | &| .DEBUG 0x05eb,0x1026,0x0001,0x0000,0x005a,0x54e5,0x0000,0x037f 0d6a 0643 103c | C <| .DEBUG 0x0643,0x103c,0x0001,0x0000,0x005a,0x54e5,0x0000,0x03f6 0d72 0673 1048 | s H| .DEBUG 0x0673,0x1048,0x0001,0x0000,0x005a,0x54e5,0x0000,0x0434 0d7a 06a3 1058 | X| .DEBUG 0x06a3,0x1058,0x0001,0x0000,0x005a,0x54e5,0x0000,0x052c 0d82 0723 107a | # z| .DEBUG 0x0723,0x107a,0x0001,0x0000,0x005a,0x54e5,0x0000,0x05dd 0d8a 0753 1084 | S | .DEBUG 0x0753,0x1084,0x0001,0x0000,0x005a,0x54e5,0x0000,0x0641 0d92 07b3 10a6 | | .DEBUG 0x07b3,0x10a6,0x0001,0x0000,0x005a,0x54e5,0x0000,0x0742 0d9a 07d3 10b0 | | .DEBUG 0x07d3,0x10b0,0x0001,0x0000,0x005a,0x54e5,0x0000,0x0774 0da2 0813 10c6 | | .DEBUG 0x0813,0x10c6,0x0002,0x0000,0x005a,0x54e5,0x0000,0x07db 0daa 08d3 110e | | .DEBUG 0x08d3,0x110e,0x0001,0x0000,0x005a,0x54e5,0x0000,0x114f 0db2 08eb 1118 | | .DEBUG 0x08eb,0x1118,0x0001,0x0000,0x005a,0x54e5,0x0000,0x0d48 0dba 0903 1122 | "| .DEBUG 0x0903,0x1122,0x0004,0x0000,0x005a,0x54e5,0x0000,0x0da6 0dc2 0923 112e | # .| .DEBUG 0x0923,0x112e,0x0001,0x0000,0x005a,0x54e5,0x0000,0x1006 0dca 093b 1134 | ; 4| .DEBUG 0x093b,0x1134,0x0801,0x0002,0x005a,0x54e5,0x0000,0x01bd 0dd2 096b 1138 | k 8| .DEBUG 0x096b,0x1138,0x0002,0x0000,0x005a,0x54e5,0x0000,0x0451 0dda 09bb 114c | L| .DEBUG 0x09bb,0x114c,0x0004,0x0000,0x005a,0x54e5,0x0000,0x0692 0de2 09d3 1152 | R| .DEBUG 0x09d3,0x1152,0x0004,0x0000,0x005a,0x54e5,0x0000,0x06c3 0dea 09e3 1158 | X| .DEBUG 0x09e3,0x1158,0x0004,0x0000,0x005a,0x54e5,0x0000,0x06ea 0df2 09f3 115e | ^| .DEBUG 0x09f3,0x115e,0x0002,0x0000,0x005a,0x54e5,0x0000,0x07f7 0dfa 0a3b 1172 | ; r| .DEBUG 0x0a3b,0x1172,0x0002,0x0000,0x005a,0x54e5,0x0000,0x08af 0e02 0a7b 1184 | { | .DEBUG 0x0a7b,0x1184,0x0004,0x0000,0x005a,0x54e5,0x0000,0x04b8 0e0a 0aab 1192 | | .DEBUG 0x0aab,0x1192,0x0004,0x0000,0x005a,0x54e5,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]