|
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: 4096 (0x1000)
Notes: 00_class, 580b_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 580b |X | .CONST 0x580b ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0450 | P | .CONST 0x0450 ; 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 0003 | | .CONST 0x0003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0068 | h | .CONST 0x0068 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x04d2,0x8000,0x0000,0x0038,0xbd56,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 0083 | | Declare_Subprogram INIT_0080,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xf,0xfffd
0011 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0x11,0xfffc
0013 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x13,0xfffb
0015 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x15,0xfffa
0017 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x6 = 0x17,0xfff9
0019 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x19,0xfff8
001b 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1b,0xfff7
001d 029a 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1d,0xfff6
001f 00bf | | Action Accept_Activation
0020 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0020,0x04e8,0x8000,0x0000,0x0039,0x3666,0x0000,0x0031
; Debug Table 0x1.0x0 = 0x20,0xffff
0021 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x21,0xfffe
0022 0007 | | Action Break_Optional ; Debug Table 0x1.0x2 = 0x22,0xfffd
0023 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x23,0xfffc
0024 0007 | | Action Break_Optional ; Debug Table 0x1.0x4 = 0x24,0xfffb
0025 0007 | | Action Break_Optional ; Debug Table 0x1.0x5 = 0x25,0xfffa
0026 0007 | | Action Break_Optional ; Debug Table 0x1.0x6 = 0x26,0xfff9
0027 0007 | | Action Break_Optional ; Debug Table 0x1.0x7 = 0x27,0xfff8
0028 0007 | | Action Break_Optional ; Debug Table 0x1.0x8 = 0x28,0xfff7
0029 0007 | | Action Break_Optional ; Debug Table 0x1.0x9 = 0x29,0xfff6
002a e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xa = 0x2a,0xfff5
002b 1912 | | Execute Package,Field_Reference,Field_Number 0x12
002c 0007 | | Action Break_Optional
002d e002 | | Load 0x0,0x2 ; Debug Table 0x1.0xb = 0x2d,0xfff4
002e 1912 | | Execute Package,Field_Reference,Field_Number 0x12
002f 0007 | | Action Break_Optional
0030 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xc = 0x30,0xfff3
0031 191e | | Execute Package,Field_Reference,Field_Number 0x1e
0032 0007 | | Action Break_Optional
0033 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0xd = 0x33,0xfff2
0034 1918 | | Execute Package,Field_Reference,Field_Number 0x18
0035 0007 | | Action Break_Optional
0036 6379 |cy | Indirect_Literal Discrete,0x3b0,{0x00000000, 0x00393666} ; Debug Table 0x1.0xe = 0x36,0xfff1
0037 4896 |H | Short_Literal 0x96
0038 4865 |He | Short_Literal 0x65
0039 00ec | | Load_Encached Diana_Tree_Cache
003a 00ec | | Load_Encached Diana_Tree_Cache
003b 00eb | | Load_Encached Diana_Cache
003c 1917 | | Execute Package,Field_Reference,Field_Number 0x17
003d e003 | | Load 0x0,0x3
003e 0387 | | Declare_Variable Package
003f 00d8 | | Load_Top At_Offset_0
0040 020f | | Execute Module,Activate
0041 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0xf = 0x41,0xfff0
0042 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0043 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x1.0x10 = 0x43,0xffef
0044 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0045 e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x11 = 0x45,0xffee
0046 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0047 02ff | | Declare_Variable Variant_Record
0048 e004 | | Load 0x0,0x4
0049 180f | | Execute Package,Field_Execute,Field_Number 0xf
004a 00d9 | | Load_Top At_Offset_1
004b 016d | m | Execute Variant_Record,Structure_Write
004c 029d 02ab | | Declare_Subprogram INIT_02a8,For_Outer_Call ; Debug Table 0x1.0x12 = 0x4c,0xffed
004e 029d 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call ; Debug Table 0x1.0x13 = 0x4e,0xffec
0050 029d 02c3 | | Declare_Subprogram INIT_02c0,For_Outer_Call ; Debug Table 0x1.0x14 = 0x50,0xffeb
0052 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x15 = 0x52,0xffea
0053 00c7 | | Action Elaborate_Subprogram
0054 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x16 = 0x54,0xffe9
0055 00c7 | | Action Elaborate_Subprogram
0056 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x17 = 0x56,0xffe8
0057 00c7 | | Action Elaborate_Subprogram
0058 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x18 = 0x58,0xffe7
0059 00c7 | | Action Elaborate_Subprogram
005a 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x19 = 0x5a,0xffe6
005b 00c7 | | Action Elaborate_Subprogram
005c 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x1a = 0x5c,0xffe5
005d 00c7 | | Action Elaborate_Subprogram
005e 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x1b = 0x5e,0xffe4
005f 00c7 | | Action Elaborate_Subprogram
0060 029d 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call ; Debug Table 0x1.0x1c = 0x60,0xffe3
0062 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x1d = 0x62,0xffe2
0063 00c7 | | Action Elaborate_Subprogram
0064 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x1e = 0x64,0xffe1
0065 00c7 | | Action Elaborate_Subprogram
0066 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0x1f = 0x66,0xffe0
0067 00c7 | | Action Elaborate_Subprogram
0068 BODY_0008:
0068 e21b | | Load 0x1,0x1b ; Debug Table 0x1.0x20 = 0x68,0x1
0069 1b13 | | Execute Package,Field_Read,Field_Number 0x13
006a 4865 |He | Short_Literal 0x65
006b e21b | | Load 0x1,0x1b
006c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
006d c21c | | Store 0x1,0x1c
006e 00bc | | Action Signal_Activated
006f 00bb | | Action Signal_Completion
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0074 | t | .CONST 0x0074 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x2 = .DEBUG 0x0073,0x052c,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0006
; Debug Table 0x2.0x0 = 0x73,0x1
0074 TRAP_0070:
0074 0007 | | Action Break_Optional
0075 e005 | | Load 0x0,0x5 ; Debug Table 0x2.0x1 = 0x75,0x2
0076 180d | | Execute Package,Field_Execute,Field_Number 0xd
0077 8220 | | Call 0x1,0x20
0078 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0079 0000 0000 | | .BLANK 0000[0x7]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0083 | | .CONST 0x0083 ; Address of begin
0081 0084 | | .CONST 0x0084 ; Address of exception handler
0082 0001 | | .CONST 0x0001 ; Number of locals
0083 BODY_0080:
0083 INIT_0080:
0083 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x3 = .DEBUG 0x0083,0x0532,0x0001,0x0000,0x0038,0xbd56,0x0000,0x000a
; Debug Table 0x3.0x0 = 0x83,0x1
0084 TRAP_0080:
0084 0007 | | Action Break_Optional
0085 e005 | | Load 0x0,0x5 ; Debug Table 0x3.0x1 = 0x85,0x2
0086 180d | | Execute Package,Field_Execute,Field_Number 0xd
0087 8220 | | Call 0x1,0x20
0088 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0089 0000 0000 | | .BLANK 0000[0x7]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 009b | | .CONST 0x009b ; Address of begin
0091 009e | | .CONST 0x009e ; Address of exception handler
0092 0003 | | .CONST 0x0003 ; Number of locals
0093 INIT_0090:
0093 e006 | | Load 0x0,0x6 ; Debug Table 0x4 = .DEBUG 0x0093,0x0538,0x0001,0x0000,0x0038,0xbd56,0x0000,0x000e
; Debug Table 0x4.0x0 = 0x93,0xffff
0094 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0095 02c7 | | Declare_Variable Any
0096 00d8 | | Load_Top At_Offset_0
0097 1c00 | | Execute_Immediate Run_Utility,0x0
0098 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4.0x1 = 0x98,0xfffe
0099 8217 | | Call 0x1,0x17
009a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
009b BODY_0090:
009b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x2 = 0x9b,0x1
009c 8218 | | Call 0x1,0x18
009d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
009e TRAP_0090:
009e 0007 | | Action Break_Optional
009f e005 | | Load 0x0,0x5 ; Debug Table 0x4.0x3 = 0x9f,0x2
00a0 180d | | Execute Package,Field_Execute,Field_Number 0xd
00a1 8220 | | Call 0x1,0x20
00a2 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00a3 0000 0000 | | .BLANK 0000[0x5]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00b4 | | .CONST 0x00b4 ; Address of begin
00a9 0118 | | .CONST 0x0118 ; Address of exception handler
00aa 0006 | | .CONST 0x0006 ; Number of locals
00ab INIT_00a8:
00ab 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x00ab,0x0542,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0012
; Debug Table 0x5.0x0 = 0xab,0xffff
00ac 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x1 = 0xac,0xfffe
00ad e006 | | Load 0x0,0x6 ; Debug Table 0x5.0x2 = 0xad,0xfffd
00ae 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00af 02c7 | | Declare_Variable Any
00b0 00d8 | | Load_Top At_Offset_0
00b1 1c00 | | Execute_Immediate Run_Utility,0x0
00b2 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x3 = 0xb2,0xfffc
00b3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5.0x4 = 0xb3,0xfffb
00b4 BODY_00a8:
00b4 8217 | | Call 0x1,0x17 ; Debug Table 0x5.0x5 = 0xb4,0x1
00b5 e007 | | Load 0x0,0x7
00b6 180d | | Execute Package,Field_Execute,Field_Number 0xd
00b7 7002 |p | Jump_Nonzero 0xba
00b8 8219 | | Call 0x1,0x19 ; Debug Table 0x5.0x6 = 0xb8,0x2
00b9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x5.0x7 = 0xb9,0x3
00ba 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x5.0x8 = 0xba,0x4
00bb 00ec | | Load_Encached Diana_Tree_Cache
00bc e008 | | Load 0x0,0x8
00bd 180e | | Execute Package,Field_Execute,Field_Number 0xe
00be 0033 | 3 | Store_Top Heap_Access,At_Offset_3
00bf c403 | | Store 0x2,0x3
00c0 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x9 = 0xc0,0x5
00c1 6802 |h | Jump_Zero 0xc4
00c2 8219 | | Call 0x1,0x19 ; Debug Table 0x5.0xa = 0xc2,0x6
00c3 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x5.0xb = 0xc3,0x7
00c4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xc = 0xc4,0x8
00c5 00eb | | Load_Encached Diana_Cache
00c6 18e9 | | Execute Package,Field_Execute,Field_Number 0xe9
00c7 a402 | | Store_Unchecked 0x2,0x2
00c8 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0xd = 0xc8,0x9
00c9 00eb | | Load_Encached Diana_Cache
00ca 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00cb 0f49 | I | Execute_Immediate Equal,0x49
00cc 680a |h | Jump_Zero 0xd7
00cd 00eb | | Load_Encached Diana_Cache ; Debug Table 0x5.0xe = 0xcd,0xa
00ce 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00cf e402 | | Load 0x2,0x2
00d0 00eb | | Load_Encached Diana_Cache
00d1 188d | | Execute Package,Field_Execute,Field_Number 0x8d
00d2 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0xf = 0xd2,0xb
00d3 00eb | | Load_Encached Diana_Cache
00d4 18e5 | | Execute Package,Field_Execute,Field_Number 0xe5
00d5 a402 | | Store_Unchecked 0x2,0x2
00d6 7810 |x | Jump 0xe7
00d7 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0x10 = 0xd7,0xc
00d8 e402 | | Load 0x2,0x2
00d9 4974 |It | Short_Literal 0x174
00da 00eb | | Load_Encached Diana_Cache
00db 0098 | | Execute Package,Field_Read_Dynamic
00dc 180f | | Execute Package,Field_Execute,Field_Number 0xf
00dd e402 | | Load 0x2,0x2 ; Debug Table 0x5.0x11 = 0xdd,0xd
00de 00eb | | Load_Encached Diana_Cache
00df 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00e0 4849 |HI | Short_Literal 0x49
00e1 00eb | | Load_Encached Diana_Cache
00e2 187d | } | Execute Package,Field_Execute,Field_Number 0x7d
00e3 00da | | Load_Top At_Offset_2
00e4 494a |IJ | Short_Literal 0x14a
00e5 00eb | | Load_Encached Diana_Cache
00e6 0096 | | Execute Package,Entry
00e7 8217 | | Call 0x1,0x17 ; Debug Table 0x5.0x12 = 0xe7,0xe
00e8 00eb | | Load_Encached Diana_Cache
00e9 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00ea e402 | | Load 0x2,0x2
00eb 00eb | | Load_Encached Diana_Cache
00ec 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00ed 027f | | Execute Discrete,Equal
00ee 7002 |p | Jump_Nonzero 0xf1
00ef 8219 | | Call 0x1,0x19 ; Debug Table 0x5.0x13 = 0xef,0xf
00f0 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x5.0x14 = 0xf0,0x10
00f1 8217 | | Call 0x1,0x17 ; Debug Table 0x5.0x15 = 0xf1,0x11
00f2 4976 |Iv | Short_Literal 0x176
00f3 00eb | | Load_Encached Diana_Cache
00f4 0098 | | Execute Package,Field_Read_Dynamic
00f5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00f6 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00f7 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x16 = 0xf7,0x12
00f8 0120 | | Execute Any,Is_Value
00f9 6803 |h | Jump_Zero 0xfd
00fa e009 | | Load 0x0,0x9
00fb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00fc 7801 |x | Jump 0xfe
00fd 00da | | Load_Top At_Offset_2
00fe e21e | | Load 0x1,0x1e
00ff e00a | | Load 0x0,0xa
0100 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0101 4800 |H | Short_Literal 0x0
0102 e00b | | Load 0x0,0xb
0103 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0104 821a | | Call 0x1,0x1a
0105 e406 | | Load 0x2,0x6
0106 e405 | | Load 0x2,0x5
0107 e00c | | Load 0x0,0xc
0108 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0109 e009 | | Load 0x0,0x9
010a 1b13 | | Execute Package,Field_Read,Field_Number 0x13
010b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
010c 180f | | Execute Package,Field_Execute,Field_Number 0xf
010d c404 | | Store 0x2,0x4
010e 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x17 = 0x10e,0x13
010f 8218 | | Call 0x1,0x18
0110 e21c | | Load 0x1,0x1c ; Debug Table 0x5.0x18 = 0x110,0x14
0111 4800 |H | Short_Literal 0x0
0112 00db | | Load_Top At_Offset_3
0113 8217 | | Call 0x1,0x17
0114 e21b | | Load 0x1,0x1b
0115 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0116 c21c | | Store 0x1,0x1c
0117 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0118 TRAP_00a8:
0118 0007 | | Action Break_Optional
0119 e005 | | Load 0x0,0x5 ; Debug Table 0x5.0x19 = 0x119,0x15
011a 180d | | Execute Package,Field_Execute,Field_Number 0xd
011b 8220 | | Call 0x1,0x20
011c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
011d 0000 0000 | | .XXX[0x3]
011f 0000 | |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 012a | * | .CONST 0x012a ; Address of begin
0121 015a | Z | .CONST 0x015a ; Address of exception handler
0122 0004 | | .CONST 0x0004 ; Number of locals
0123 INIT_0120:
0123 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x6 = .DEBUG 0x0123,0x0578,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0016
; Debug Table 0x6.0x0 = 0x123,0xffff
0124 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6.0x1 = 0x124,0xfffe
0125 e006 | | Load 0x0,0x6 ; Debug Table 0x6.0x2 = 0x125,0xfffd
0126 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0127 02c7 | | Declare_Variable Any
0128 00d8 | | Load_Top At_Offset_0
0129 1c00 | | Execute_Immediate Run_Utility,0x0
012a BODY_0120:
012a 8217 | | Call 0x1,0x17 ; Debug Table 0x6.0x3 = 0x12a,0x1
012b 00eb | | Load_Encached Diana_Cache
012c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
012d 0fab | | Execute_Immediate Equal,-0x55
012e 7006 |p | Jump_Nonzero 0x135
012f 8217 | | Call 0x1,0x17
0130 e007 | | Load 0x0,0x7
0131 180d | | Execute Package,Field_Execute,Field_Number 0xd
0132 7002 |p | Jump_Nonzero 0x135
0133 8219 | | Call 0x1,0x19 ; Debug Table 0x6.0x4 = 0x133,0x2
0134 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x6.0x5 = 0x134,0x3
0135 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x6.0x6 = 0x135,0x4
0136 00ec | | Load_Encached Diana_Tree_Cache
0137 e008 | | Load 0x0,0x8
0138 180d | | Execute Package,Field_Execute,Field_Number 0xd
0139 c402 | | Store 0x2,0x2
013a 005a | Z | Store_Top Discrete,At_Offset_2
013b 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x7 = 0x13b,0x5
013c 6802 |h | Jump_Zero 0x13f
013d 8219 | | Call 0x1,0x19 ; Debug Table 0x6.0x8 = 0x13d,0x6
013e 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x6.0x9 = 0x13e,0x7
013f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0xa = 0x13f,0x8
0140 0120 | | Execute Any,Is_Value
0141 6803 |h | Jump_Zero 0x145
0142 e009 | | Load 0x0,0x9
0143 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0144 7801 |x | Jump 0x146
0145 00d8 | | Load_Top At_Offset_0
0146 00db | | Load_Top At_Offset_3
0147 e21e | | Load 0x1,0x1e
0148 e00a | | Load 0x0,0xa
0149 1b0e | | Execute Package,Field_Read,Field_Number 0xe
014a 4800 |H | Short_Literal 0x0
014b e00b | | Load 0x0,0xb
014c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
014d 821a | | Call 0x1,0x1a
014e 8217 | | Call 0x1,0x17
014f e00c | | Load 0x0,0xc
0150 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0151 e009 | | Load 0x0,0x9
0152 1b13 | | Execute Package,Field_Read,Field_Number 0x13
0153 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0154 180e | | Execute Package,Field_Execute,Field_Number 0xe
0155 c402 | | Store 0x2,0x2
0156 c404 | | Store 0x2,0x4
0157 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0xb = 0x157,0x9
0158 8218 | | Call 0x1,0x18
0159 4501 |E | Exit_Suprogram New_Top_Offset 0x1
015a TRAP_0120:
015a 0007 | | Action Break_Optional
015b e005 | | Load 0x0,0x5 ; Debug Table 0x6.0xc = 0x15b,0xa
015c 180d | | Execute Package,Field_Execute,Field_Number 0xd
015d 8220 | | Call 0x1,0x20
015e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
015f 0000 | | .XXX[0x1]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 016a | j | .CONST 0x016a ; Address of begin
0161 0196 | | .CONST 0x0196 ; Address of exception handler
0162 0004 | | .CONST 0x0004 ; Number of locals
0163 INIT_0160:
0163 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7 = .DEBUG 0x0163,0x0594,0x0001,0x0000,0x0038,0xbd56,0x0000,0x001a
; Debug Table 0x7.0x0 = 0x163,0xffff
0164 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x7.0x1 = 0x164,0xfffe
0165 e006 | | Load 0x0,0x6 ; Debug Table 0x7.0x2 = 0x165,0xfffd
0166 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0167 02c7 | | Declare_Variable Any
0168 00d8 | | Load_Top At_Offset_0
0169 1c00 | | Execute_Immediate Run_Utility,0x0
016a BODY_0160:
016a 8217 | | Call 0x1,0x17 ; Debug Table 0x7.0x3 = 0x16a,0x1
016b 00eb | | Load_Encached Diana_Cache
016c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
016d 0fab | | Execute_Immediate Equal,-0x55
016e 7002 |p | Jump_Nonzero 0x171
016f 8219 | | Call 0x1,0x19 ; Debug Table 0x7.0x4 = 0x16f,0x2
0170 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x7.0x5 = 0x170,0x3
0171 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x7.0x6 = 0x171,0x4
0172 00ec | | Load_Encached Diana_Tree_Cache
0173 e008 | | Load 0x0,0x8
0174 180f | | Execute Package,Field_Execute,Field_Number 0xf
0175 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0176 005b | [ | Store_Top Discrete,At_Offset_3
0177 00da | | Load_Top At_Offset_2 ; Debug Table 0x7.0x7 = 0x177,0x5
0178 6802 |h | Jump_Zero 0x17b
0179 8219 | | Call 0x1,0x19 ; Debug Table 0x7.0x8 = 0x179,0x6
017a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x7.0x9 = 0x17a,0x7
017b 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xa = 0x17b,0x8
017c 0120 | | Execute Any,Is_Value
017d 6803 |h | Jump_Zero 0x181
017e e009 | | Load 0x0,0x9
017f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0180 7801 |x | Jump 0x182
0181 00d8 | | Load_Top At_Offset_0
0182 00da | | Load_Top At_Offset_2
0183 e21e | | Load 0x1,0x1e
0184 e00a | | Load 0x0,0xa
0185 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0186 4800 |H | Short_Literal 0x0
0187 e00b | | Load 0x0,0xb
0188 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0189 821a | | Call 0x1,0x1a
018a 8217 | | Call 0x1,0x17
018b e00c | | Load 0x0,0xc
018c 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
018d e009 | | Load 0x0,0x9
018e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
018f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0190 180e | | Execute Package,Field_Execute,Field_Number 0xe
0191 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0192 c404 | | Store 0x2,0x4
0193 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xb = 0x193,0x9
0194 8218 | | Call 0x1,0x18
0195 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0196 TRAP_0160:
0196 0007 | | Action Break_Optional
0197 e005 | | Load 0x0,0x5 ; Debug Table 0x7.0xc = 0x197,0xa
0198 180d | | Execute Package,Field_Execute,Field_Number 0xd
0199 8220 | | Call 0x1,0x20
019a 4501 |E | Exit_Suprogram New_Top_Offset 0x1
019b 0000 0000 | | .BLANK 0000[0x5]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01ac | | .CONST 0x01ac ; Address of begin
01a1 01dd | | .CONST 0x01dd ; Address of exception handler
01a2 0005 | | .CONST 0x0005 ; Number of locals
01a3 INIT_01a0:
01a3 e00d | | Load 0x0,0xd ; Debug Table 0x8 = .DEBUG 0x01a3,0x05b0,0x0001,0x0000,0x0038,0xbd56,0x0000,0x001e
; Debug Table 0x8.0x0 = 0x1a3,0xffff
01a4 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01a5 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01a6 4801 |H | Short_Literal 0x1 ; Debug Table 0x8.0x1 = 0x1a6,0xfffe
01a7 48c8 |H | Short_Literal 0xc8
01a8 00e9 | | Load_Encached String_Cache
01a9 0334 | 4 | Declare_Variable Array,With_Constraint
01aa 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x8.0x2 = 0x1aa,0xfffd
01ab 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x3 = 0x1ab,0xfffc
01ac BODY_01a0:
01ac 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "type name: "
; Debug Table 0x8.0x4 = 0x1ac,0x1
01ae e002 | | Load 0x0,0x2
01af 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b0 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x8.0x5 = 0x1b0,0x2
01b1 00db | | Load_Top At_Offset_3
01b2 4801 |H | Short_Literal 0x1
01b3 e001 | | Load 0x0,0x1
01b4 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01b5 00d1 | | Pop_Control Pop_Count_1
01b6 005a | Z | Store_Top Discrete,At_Offset_2
01b7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x6 = 0x1b7,0x3
01b8 7005 |p | Jump_Nonzero 0x1be
01b9 0092 03e8 | | Action Push_String_Extended,0x3e8 ; "no name given"
; Debug Table 0x8.0x7 = 0x1b9,0x4
01bb e00e | | Load 0x0,0xe
01bc 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
01bd 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x8.0x8 = 0x1bd,0x5
01be 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x8.0x9 = 0x1be,0x6
01bf e00d | | Load 0x0,0xd
01c0 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01c1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01c2 4801 |H | Short_Literal 0x1
01c3 e404 | | Load 0x2,0x4
01c4 e403 | | Load 0x2,0x3
01c5 01cf | | Execute Vector,Slice_Read
01c6 e00f | | Load 0x0,0xf
01c7 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01c8 c402 | | Store 0x2,0x2
01c9 0031 | 1 | Store_Top Heap_Access,At_Offset_1
01ca 0092 03e9 | | Action Push_String_Extended,0x3e9 ; "results: "
; Debug Table 0x8.0xa = 0x1ca,0x7
01cc e402 | | Load 0x2,0x2
01cd e00d | | Load 0x0,0xd
01ce 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01cf 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01d0 025e | ^ | Execute Discrete,Convert
01d1 1c01 | | Execute_Immediate Run_Utility,0x1
01d2 01cc | | Execute Vector,Catenate
01d3 e002 | | Load 0x0,0x2
01d4 180e | | Execute Package,Field_Execute,Field_Number 0xe
01d5 e002 | | Load 0x0,0x2 ; Debug Table 0x8.0xb = 0x1d5,0x8
01d6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01d7 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xc = 0x1d7,0x9
01d8 7003 |p | Jump_Nonzero 0x1dc
01d9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xd = 0x1d9,0xa
01da e002 | | Load 0x0,0x2
01db 181e | | Execute Package,Field_Execute,Field_Number 0x1e
01dc 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01dd TRAP_01a0:
01dd 0007 | | Action Break_Optional
01de e005 | | Load 0x0,0x5 ; Debug Table 0x8.0xe = 0x1de,0xb
01df 180d | | Execute Package,Field_Execute,Field_Number 0xd
01e0 8220 | | Call 0x1,0x20
01e1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01e2 0000 0000 | | .BLANK 0000[0x6]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01f5 | | .CONST 0x01f5 ; Address of begin
01e9 020d | | .CONST 0x020d ; Address of exception handler
01ea 0003 | | .CONST 0x0003 ; Number of locals
01eb INIT_01e8:
01eb e00a | | Load 0x0,0xa ; Debug Table 0x9 = .DEBUG 0x01eb,0x05d0,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0022
; Debug Table 0x9.0x0 = 0x1eb,0xffff
01ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ed 02c7 | | Declare_Variable Any
01ee 00d8 | | Load_Top At_Offset_0
01ef 1c00 | | Execute_Immediate Run_Utility,0x0
01f0 e010 | | Load 0x0,0x10 ; Debug Table 0x9.0x1 = 0x1f0,0xfffe
01f1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01f2 02c7 | | Declare_Variable Any
01f3 00d8 | | Load_Top At_Offset_0
01f4 1c00 | | Execute_Immediate Run_Utility,0x0
01f5 BODY_01e8:
01f5 e011 | | Load 0x0,0x11 ; Debug Table 0x9.0x2 = 0x1f5,0x1
01f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01f7 e00a | | Load 0x0,0xa
01f8 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01f9 c402 | | Store 0x2,0x2
01fa 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x3 = 0x1fa,0x2
01fb 821a | | Call 0x1,0x1a
01fc e5ff | | Load 0x2,-0x1
01fd e010 | | Load 0x0,0x10
01fe 180f | | Execute Package,Field_Execute,Field_Number 0xf
01ff c403 | | Store 0x2,0x3
0200 4801 |H | Short_Literal 0x1 ; Debug Table 0x9.0x4 = 0x200,0x3
0201 4801 |H | Short_Literal 0x1
0202 4801 |H | Short_Literal 0x1
0203 00db | | Load_Top At_Offset_3
0204 e002 | | Load 0x0,0x2
0205 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0206 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x9.0x5 = 0x206,0x4
0207 4801 |H | Short_Literal 0x1
0208 4800 |H | Short_Literal 0x0
0209 e00a | | Load 0x0,0xa
020a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
020b c402 | | Store 0x2,0x2
020c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
020d TRAP_01e8:
020d 0007 | | Action Break_Optional
020e e005 | | Load 0x0,0x5 ; Debug Table 0x9.0x6 = 0x20e,0x5
020f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0210 8220 | | Call 0x1,0x20
0211 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x7 = 0x211,0x6
0212 4801 |H | Short_Literal 0x1
0213 4800 |H | Short_Literal 0x0
0214 e00a | | Load 0x0,0xa
0215 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0216 c402 | | Store 0x2,0x2
0217 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 022b | + | .CONST 0x022b ; Address of begin
0219 0283 | | .CONST 0x0283 ; Address of exception handler
021a 0006 | | .CONST 0x0006 ; Number of locals
021b INIT_0218:
021b 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xa = .DEBUG 0x021b,0x05e2,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0030
; Debug Table 0xa.0x0 = 0x21b,0xffff
021c 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x1 = 0x21c,0xfffe
021d 4864 |Hd | Short_Literal 0x64
021e 00e9 | | Load_Encached String_Cache
021f 0334 | 4 | Declare_Variable Array,With_Constraint
0220 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xa.0x2 = 0x220,0xfffd
0221 e00a | | Load 0x0,0xa ; Debug Table 0xa.0x3 = 0x221,0xfffc
0222 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0223 02c7 | | Declare_Variable Any
0224 00d8 | | Load_Top At_Offset_0
0225 1c00 | | Execute_Immediate Run_Utility,0x0
0226 e010 | | Load 0x0,0x10 ; Debug Table 0xa.0x4 = 0x226,0xfffb
0227 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0228 02c7 | | Declare_Variable Any
0229 00d8 | | Load_Top At_Offset_0
022a 1c00 | | Execute_Immediate Run_Utility,0x0
022b BODY_0218:
022b 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xa.0x5 = 0x22b,0x1
022c e403 | | Load 0x2,0x3
022d 4801 |H | Short_Literal 0x1
022e e001 | | Load 0x0,0x1
022f 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0230 00d1 | | Pop_Control Pop_Count_1
0231 005b | [ | Store_Top Discrete,At_Offset_3
0232 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x6 = 0x232,0x2
0233 7002 |p | Jump_Nonzero 0x236
0234 8219 | | Call 0x1,0x19 ; Debug Table 0xa.0x7 = 0x234,0x3
0235 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0xa.0x8 = 0x235,0x4
0236 e5fd | | Load 0x2,-0x3 ; Debug Table 0xa.0x9 = 0x236,0x5
0237 7012 |p | Jump_Nonzero 0x24a
0238 00eb | | Load_Encached Diana_Cache ; Debug Table 0xa.0xa = 0x238,0x6
0239 1812 | | Execute Package,Field_Execute,Field_Number 0x12
023a 00eb | | Load_Encached Diana_Cache
023b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
023c 4801 |H | Short_Literal 0x1
023d e404 | | Load 0x2,0x4
023e e403 | | Load 0x2,0x3
023f 01cf | | Execute Vector,Slice_Read
0240 00eb | | Load_Encached Diana_Cache
0241 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
0242 482f |H/ | Short_Literal 0x2f
0243 00eb | | Load_Encached Diana_Cache
0244 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
0245 483b |H; | Short_Literal 0x3b
0246 00eb | | Load_Encached Diana_Cache
0247 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
0248 a402 | | Store_Unchecked 0x2,0x2
0249 7817 |x | Jump 0x261
024a 00eb | | Load_Encached Diana_Cache ; Debug Table 0xa.0xb = 0x24a,0x7
024b 1812 | | Execute Package,Field_Execute,Field_Number 0x12
024c 00eb | | Load_Encached Diana_Cache
024d 1857 | W | Execute Package,Field_Execute,Field_Number 0x57
024e 4894 |H | Short_Literal 0x94
024f 00eb | | Load_Encached Diana_Cache
0250 187f | | Execute Package,Field_Execute,Field_Number 0x7f
0251 487b |H{ | Short_Literal 0x7b
0252 00eb | | Load_Encached Diana_Cache
0253 187c | | | Execute Package,Field_Execute,Field_Number 0x7c
0254 4801 |H | Short_Literal 0x1
0255 e404 | | Load 0x2,0x4
0256 e403 | | Load 0x2,0x3
0257 01cf | | Execute Vector,Slice_Read
0258 00eb | | Load_Encached Diana_Cache
0259 182e | . | Execute Package,Field_Execute,Field_Number 0x2e
025a 482c |H, | Short_Literal 0x2c
025b 00eb | | Load_Encached Diana_Cache
025c 1879 | y | Execute Package,Field_Execute,Field_Number 0x79
025d 483d |H= | Short_Literal 0x3d
025e 00eb | | Load_Encached Diana_Cache
025f 187e | ~ | Execute Package,Field_Execute,Field_Number 0x7e
0260 a402 | | Store_Unchecked 0x2,0x2
0261 e011 | | Load 0x0,0x11 ; Debug Table 0xa.0xc = 0x261,0x8
0262 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0263 e00a | | Load 0x0,0xa
0264 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0265 c405 | | Store 0x2,0x5
0266 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0xd = 0x266,0x9
0267 821a | | Call 0x1,0x1a
0268 e5ff | | Load 0x2,-0x1
0269 e402 | | Load 0x2,0x2
026a e010 | | Load 0x0,0x10
026b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
026c c406 | | Store 0x2,0x6
026d e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0xe = 0x26d,0xa
026e 6807 |h | Jump_Zero 0x276
026f 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0xf = 0x26f,0xb
0270 4801 |H | Short_Literal 0x1
0271 4801 |H | Short_Literal 0x1
0272 00db | | Load_Top At_Offset_3
0273 e002 | | Load 0x0,0x2
0274 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0275 7806 |x | Jump 0x27c
0276 4801 |H | Short_Literal 0x1 ; Debug Table 0xa.0x10 = 0x276,0xc
0277 4801 |H | Short_Literal 0x1
0278 4801 |H | Short_Literal 0x1
0279 00db | | Load_Top At_Offset_3
027a e002 | | Load 0x0,0x2
027b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
027c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x11 = 0x27c,0xd
027d 4801 |H | Short_Literal 0x1
027e 4800 |H | Short_Literal 0x0
027f e00a | | Load 0x0,0xa
0280 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0281 c405 | | Store 0x2,0x5
0282 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0283 TRAP_0218:
0283 0007 | | Action Break_Optional
0284 e005 | | Load 0x0,0x5 ; Debug Table 0xa.0x12 = 0x284,0xe
0285 180d | | Execute Package,Field_Execute,Field_Number 0xd
0286 8220 | | Call 0x1,0x20
0287 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x13 = 0x287,0xf
0288 4801 |H | Short_Literal 0x1
0289 4800 |H | Short_Literal 0x0
028a e00a | | Load 0x0,0xa
028b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
028c c405 | | Store 0x2,0x5
028d 4504 |E | Exit_Suprogram New_Top_Offset 0x4
028e 0000 0000 | | .XXX[0x2]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0295 | | .CONST 0x0295 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0003 | | .CONST 0x0003 ; Number of locals
0293 INIT_0290:
0293 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb = .DEBUG 0x0293,0x060c,0x0002,0x0000,0x0038,0xbd56,0x0000,0x0042
; Debug Table 0xb.0x0 = 0x293,0xffff
0294 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0xb.0x1 = 0x294,0xfffe
0295 BODY_0290:
0295 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xb.0x2 = 0x295,0x1
0296 00d9 | | Load_Top At_Offset_1
0297 8217 | | Call 0x1,0x17
0298 e21c | | Load 0x1,0x1c
0299 e21b | | Load 0x1,0x1b
029a 1816 | | Execute Package,Field_Execute,Field_Number 0x16
029b 0032 | 2 | Store_Top Heap_Access,At_Offset_2
029c 005a | Z | Store_Top Discrete,At_Offset_2
029d 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xb.0x3 = 0x29d,0x2
029e 6802 |h | Jump_Zero 0x2a1
029f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xb.0x4 = 0x29f,0x3
02a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02a1 00eb | | Load_Encached Diana_Cache ; Debug Table 0xb.0x5 = 0x2a1,0x4
02a2 1812 | | Execute Package,Field_Execute,Field_Number 0x12
02a3 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02a4 0000 0000 | | .BLANK 0000[0x4]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab | | .CONST 0x02ab ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0001 | | .CONST 0x0001 ; Number of locals
02ab BODY_02a8:
02ab INIT_02a8:
02ab e21e | | Load 0x1,0x1e ; Debug Table 0xc = .DEBUG 0x02ab,0x061a,0x0002,0x0000,0x0039,0x3666,0x0000,0x00c4
; Debug Table 0xc.0x0 = 0x2ab,0x1
02ac 02fd | | Declare_Variable Variant_Record,Duplicate
02ad 00ca | | Action Exit_Nullary_Function
02ae 0000 0000 | | .XXX[0x2]
02b0 ; --------------------------------------------------------------------------------------
02b0 ; SUBPROGRAM
02b0 ; --------------------------------------------------------------------------------------
02b0 02b3 | | .CONST 0x02b3 ; Address of begin
02b1 0004 | | .CONST 0x0004 ; Address of exception handler
02b2 0001 | | .CONST 0x0001 ; Number of locals
02b3 BODY_02b0:
02b3 INIT_02b0:
02b3 e002 | | Load 0x0,0x2 ; Debug Table 0xd = .DEBUG 0x02b3,0x061e,0x0001,0x0000,0x0039,0x3666,0x0000,0x00d1
; Debug Table 0xd.0x0 = 0x2b3,0x1
02b4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02b5 0092 03ea | | Action Push_String_Extended,0x3ea ; "*** exception: "
; Debug Table 0xd.0x1 = 0x2b5,0x2
02b7 00db | | Load_Top At_Offset_3
02b8 01cc | | Execute Vector,Catenate
02b9 e002 | | Load 0x0,0x2
02ba 180e | | Execute Package,Field_Execute,Field_Number 0xe
02bb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02bc 0000 0000 | | .BLANK 0000[0x4]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02e1 | | .CONST 0x02e1 ; Address of begin
02c1 0004 | | .CONST 0x0004 ; Address of exception handler
02c2 000b | | .CONST 0x000b ; Number of locals
02c3 INIT_02c0:
02c3 e00d | | Load 0x0,0xd ; Debug Table 0xe = .DEBUG 0x02c3,0x0624,0x0002,0x0000,0x0039,0x3666,0x0000,0x00ef
; Debug Table 0xe.0x0 = 0x2c3,0xffff
02c4 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02c5 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x1 = 0x2c5,0xfffe
02c6 48c8 |H | Short_Literal 0xc8
02c7 00e9 | | Load_Encached String_Cache
02c8 0334 | 4 | Declare_Variable Array,With_Constraint
02c9 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xe.0x2 = 0x2c9,0xfffd
02ca 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0x3 = 0x2ca,0xfffc
02cb e00d | | Load 0x0,0xd ; Debug Table 0xe.0x4 = 0x2cb,0xfffb
02cc 1b14 | | Execute Package,Field_Read,Field_Number 0x14
02cd 02ff | | Declare_Variable Variant_Record
02ce 00d8 | | Load_Top At_Offset_0
02cf 1c00 | | Execute_Immediate Run_Utility,0x0
02d0 e00d | | Load 0x0,0xd ; Debug Table 0xe.0x5 = 0x2d0,0xfffa
02d1 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02d2 02c7 | | Declare_Variable Any
02d3 00d8 | | Load_Top At_Offset_0
02d4 1c00 | | Execute_Immediate Run_Utility,0x0
02d5 e00d | | Load 0x0,0xd ; Debug Table 0xe.0x6 = 0x2d5,0xfff9
02d6 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
02d7 1b17 | | Execute Package,Field_Read,Field_Number 0x17
02d8 00f1 | | Load_Encached Diana_Temp_Seq ; Debug Table 0xe.0x7 = 0x2d8,0xfff8
02d9 e006 | | Load 0x0,0x6 ; Debug Table 0xe.0x8 = 0x2d9,0xfff7
02da 1b0d | | Execute Package,Field_Read,Field_Number 0xd
02db 02c7 | | Declare_Variable Any
02dc 00d8 | | Load_Top At_Offset_0
02dd 1c00 | | Execute_Immediate Run_Utility,0x0
02de e00d | | Load 0x0,0xd ; Debug Table 0xe.0x9 = 0x2de,0xfff6
02df 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
02e0 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02e1 BODY_02c0:
02e1 e21d | | Load 0x1,0x1d ; Debug Table 0xe.0xa = 0x2e1,0x1
02e2 680d |h | Jump_Zero 0x2f0
02e3 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0xb = 0x2e3,0x2
02e4 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02e5 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xe.0xc = 0x2e5,0x3
02e6 0092 03eb | | Action Push_String_Extended,0x3eb ; "use current switch file"
02e8 e001 | | Load 0x0,0x1
02e9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02ea c405 | | Store 0x2,0x5
02eb e405 | | Load 0x2,0x5 ; Debug Table 0xe.0xd = 0x2eb,0x4
02ec 6803 |h | Jump_Zero 0x2f0
02ed e21e | | Load 0x1,0x1e ; Debug Table 0xe.0xe = 0x2ed,0x5
02ee 02fd | | Declare_Variable Variant_Record,Duplicate
02ef 00ca | | Action Exit_Nullary_Function
02f0 e002 | | Load 0x0,0x2 ; Debug Table 0xe.0xf = 0x2f0,0x6
02f1 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02f2 0092 03ec | | Action Push_String_Extended,0x3ec ; "name of switch file: "
; Debug Table 0xe.0x10 = 0x2f2,0x7
02f4 e002 | | Load 0x0,0x2
02f5 180e | | Execute Package,Field_Execute,Field_Number 0xe
02f6 00e2 | | Load_Encached Integer_Cache ; Debug Table 0xe.0x11 = 0x2f6,0x8
02f7 e403 | | Load 0x2,0x3
02f8 4801 |H | Short_Literal 0x1
02f9 e001 | | Load 0x0,0x1
02fa 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02fb 00d1 | | Pop_Control Pop_Count_1
02fc c404 | | Store 0x2,0x4
02fd e404 | | Load 0x2,0x4 ; Debug Table 0xe.0x12 = 0x2fd,0x9
02fe 7007 |p | Jump_Nonzero 0x306
02ff 0092 03e8 | | Action Push_String_Extended,0x3e8 ; "no name given"
; Debug Table 0xe.0x13 = 0x2ff,0xa
0301 e00e | | Load 0x0,0xe
0302 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0303 e004 | | Load 0x0,0x4 ; Debug Table 0xe.0x14 = 0x303,0xb
0304 180f | | Execute Package,Field_Execute,Field_Number 0xf
0305 00ca | | Action Exit_Nullary_Function
0306 e407 | | Load 0x2,0x7 ; Debug Table 0xe.0x15 = 0x306,0xc
0307 0120 | | Execute Any,Is_Value
0308 6803 |h | Jump_Zero 0x30c
0309 e00d | | Load 0x0,0xd
030a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
030b 7801 |x | Jump 0x30d
030c e407 | | Load 0x2,0x7
030d e00d | | Load 0x0,0xd
030e 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
030f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0310 4801 |H | Short_Literal 0x1
0311 e404 | | Load 0x2,0x4
0312 e403 | | Load 0x2,0x3
0313 01cf | | Execute Vector,Slice_Read
0314 e00f | | Load 0x0,0xf
0315 180f | | Execute Package,Field_Execute,Field_Number 0xf
0316 005a | Z | Store_Top Discrete,At_Offset_2
0317 c407 | | Store 0x2,0x7
0318 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xe.0x16 = 0x318,0xd
0319 701d |p | Jump_Nonzero 0x337
031a e00d | | Load 0x0,0xd ; Debug Table 0xe.0x17 = 0x31a,0xe
031b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
031c e406 | | Load 0x2,0x6
031d 608e |` | Indirect_Literal Discrete,0x3ac,{0x00000000, 0x00028000}
031e e00a | | Load 0x0,0xa
031f 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0320 4800 |H | Short_Literal 0x0
0321 e407 | | Load 0x2,0x7
0322 e00d | | Load 0x0,0xd
0323 1b39 | 9 | Execute Package,Field_Read,Field_Number 0x39
0324 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0325 00d1 | | Pop_Control Pop_Count_1
0326 c402 | | Store 0x2,0x2
0327 e402 | | Load 0x2,0x2 ; Debug Table 0xe.0x18 = 0x327,0xf
0328 6807 |h | Jump_Zero 0x330
0329 0092 03ed | | Action Push_String_Extended,0x3ed ; "can't get version of switch file"
; Debug Table 0xe.0x19 = 0x329,0x10
032b e00e | | Load 0x0,0xe
032c 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
032d e004 | | Load 0x0,0x4 ; Debug Table 0xe.0x1a = 0x32d,0x11
032e 180f | | Execute Package,Field_Execute,Field_Number 0xf
032f 00ca | | Action Exit_Nullary_Function
0330 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x1b = 0x330,0x12
0331 a21d | | Store_Unchecked 0x1,0x1d
0332 e406 | | Load 0x2,0x6 ; Debug Table 0xe.0x1c = 0x332,0x13
0333 e21e | | Load 0x1,0x1e
0334 016d | m | Execute Variant_Record,Structure_Write
0335 e406 | | Load 0x2,0x6 ; Debug Table 0xe.0x1d = 0x335,0x14
0336 00ca | | Action Exit_Nullary_Function
0337 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x1e = 0x337,0x15
0338 e403 | | Load 0x2,0x3
0339 01d7 | | Execute Vector,Field_Read
033a 0f2e | . | Execute_Immediate Equal,0x2e
033b 682e |h. | Jump_Zero 0x36a
033c e00d | | Load 0x0,0xd ; Debug Table 0xe.0x1f = 0x33c,0x16
033d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
033e 00f1 | | Load_Encached Diana_Temp_Seq
033f e00d | | Load 0x0,0xd
0340 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
0341 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0342 e40a | | Load 0x2,0xa
0343 0120 | | Execute Any,Is_Value
0344 6803 |h | Jump_Zero 0x348
0345 e006 | | Load 0x0,0x6
0346 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0347 7801 |x | Jump 0x349
0348 e40a | | Load 0x2,0xa
0349 e406 | | Load 0x2,0x6
034a 6061 |`a | Indirect_Literal Discrete,0x3ac,{0x00000000, 0x00028000}
034b e00a | | Load 0x0,0xa
034c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
034d 4800 |H | Short_Literal 0x0
034e e00d | | Load 0x0,0xd
034f 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
0350 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0351 e00d | | Load 0x0,0xd
0352 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0353 6054 |`T | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x7fffffff}
0354 4ffc |O | Short_Literal -0x4
0355 4ffd |O | Short_Literal -0x3
0356 e00d | | Load 0x0,0xd
0357 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0358 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0359 e00d | | Load 0x0,0xd
035a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
035b e012 | | Load 0x0,0x12
035c 180f | | Execute Package,Field_Execute,Field_Number 0xf
035d 4802 |H | Short_Literal 0x2
035e e404 | | Load 0x2,0x4
035f e403 | | Load 0x2,0x3
0360 01cf | | Execute Vector,Slice_Read
0361 e00d | | Load 0x0,0xd
0362 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
0363 180f | | Execute Package,Field_Execute,Field_Number 0xf
0364 00d1 | | Pop_Control Pop_Count_1
0365 c40a | | Store 0x2,0xa
0366 c408 | | Store 0x2,0x8
0367 c409 | | Store 0x2,0x9
0368 c402 | | Store 0x2,0x2
0369 782b |x+ | Jump 0x395
036a e00d | | Load 0x0,0xd ; Debug Table 0xe.0x20 = 0x36a,0x17
036b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
036c 00f1 | | Load_Encached Diana_Temp_Seq
036d e00d | | Load 0x0,0xd
036e 1b38 | 8 | Execute Package,Field_Read,Field_Number 0x38
036f 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0370 e40a | | Load 0x2,0xa
0371 0120 | | Execute Any,Is_Value
0372 6803 |h | Jump_Zero 0x376
0373 e006 | | Load 0x0,0x6
0374 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0375 7801 |x | Jump 0x377
0376 e40a | | Load 0x2,0xa
0377 e406 | | Load 0x2,0x6
0378 6033 |`3 | Indirect_Literal Discrete,0x3ac,{0x00000000, 0x00028000}
0379 e00a | | Load 0x0,0xa
037a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
037b 4800 |H | Short_Literal 0x0
037c e00d | | Load 0x0,0xd
037d 1b34 | 4 | Execute Package,Field_Read,Field_Number 0x34
037e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
037f e00d | | Load 0x0,0xd
0380 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0381 6026 |`& | Indirect_Literal Discrete,0x3a8,{0x00000000, 0x7fffffff}
0382 4ffc |O | Short_Literal -0x4
0383 4ffd |O | Short_Literal -0x3
0384 8217 | | Call 0x1,0x17
0385 e00d | | Load 0x0,0xd
0386 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0387 e012 | | Load 0x0,0x12
0388 180f | | Execute Package,Field_Execute,Field_Number 0xf
0389 4801 |H | Short_Literal 0x1
038a e404 | | Load 0x2,0x4
038b e403 | | Load 0x2,0x3
038c 01cf | | Execute Vector,Slice_Read
038d e00d | | Load 0x0,0xd
038e 1b3b | ; | Execute Package,Field_Read,Field_Number 0x3b
038f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0390 00d1 | | Pop_Control Pop_Count_1
0391 c40a | | Store 0x2,0xa
0392 c408 | | Store 0x2,0x8
0393 c409 | | Store 0x2,0x9
0394 c402 | | Store 0x2,0x2
0395 e402 | | Load 0x2,0x2 ; Debug Table 0xe.0x21 = 0x395,0x18
0396 6807 |h | Jump_Zero 0x39e
0397 0092 03ee | | Action Push_String_Extended,0x3ee ; "can't create switch file"
; Debug Table 0xe.0x22 = 0x397,0x19
0399 e00e | | Load 0x0,0xe
039a 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
039b e004 | | Load 0x0,0x4 ; Debug Table 0xe.0x23 = 0x39b,0x1a
039c 180f | | Execute Package,Field_Execute,Field_Number 0xf
039d 00ca | | Action Exit_Nullary_Function
039e 4801 |H | Short_Literal 0x1 ; Debug Table 0xe.0x24 = 0x39e,0x1b
039f a21d | | Store_Unchecked 0x1,0x1d
03a0 e406 | | Load 0x2,0x6 ; Debug Table 0xe.0x25 = 0x3a0,0x1c
03a1 e21e | | Load 0x1,0x1e
03a2 016d | m | Execute Variant_Record,Structure_Write
03a3 e406 | | Load 0x2,0x6 ; Debug Table 0xe.0x26 = 0x3a3,0x1d
03a4 00ca | | Action Exit_Nullary_Function
03a5 0000 0000 | | .XXX[0x3]
03a7 0000 | |
03a8 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
03ac 0000 0000 | | .LITERAL {0x00000000, 0x00028000}
03b0 0000 0000 | | .LITERAL {0x00000000, 0x00393666}
03b4 0000 0000 | | .BLANK 0000[0x4]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03be | | .CONST 0x03be ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0002 | | .CONST 0x0002 ; Number of locals
03bb INIT_03b8:
03bb 00ef | | Load_Encached Diana_Sequence_Cache ; Debug Table 0xf = .DEBUG 0x03bb,0x0674,0x0001,0x0000,0x0039,0x3666,0x0000,0x04b9
; Debug Table 0xf.0x0 = 0x3bb,0xffff
03bc 00db | | Load_Top At_Offset_3
03bd 0031 | 1 | Store_Top Heap_Access,At_Offset_1
03be BODY_03b8:
03be 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x1 = 0x3be,0x1
03bf 00eb | | Load_Encached Diana_Cache
03c0 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03c1 6805 |h | Jump_Zero 0x3c7
03c2 0092 03ef | | Action Push_String_Extended,0x3ef ; "No affected units"
; Debug Table 0xf.0x2 = 0x3c2,0x2
03c4 e002 | | Load 0x0,0x2
03c5 180e | | Execute Package,Field_Execute,Field_Number 0xe
03c6 781d |x | Jump 0x3e4
03c7 0092 03f0 | | Action Push_String_Extended,0x3f0 ; "Affected units: "
; Debug Table 0xf.0x3 = 0x3c7,0x3
03c9 e002 | | Load 0x0,0x2
03ca 180e | | Execute Package,Field_Execute,Field_Number 0xe
03cb 00cf | | Action Mark_Auxiliary
03cc 0007 | | Action Break_Optional ; Debug Table 0xf.0x4 = 0x3cc,0x4
03cd 4802 |H | Short_Literal 0x2 ; Debug Table 0xf.0x5 = 0x3cd,0x5
03ce 4800 |H | Short_Literal 0x0
03cf 4801 |H | Short_Literal 0x1
03d0 4801 |H | Short_Literal 0x1
03d1 e402 | | Load 0x2,0x2
03d2 00eb | | Load_Encached Diana_Cache
03d3 1865 | e | Execute Package,Field_Execute,Field_Number 0x65
03d4 e013 | | Load 0x0,0x13
03d5 1b13 | | Execute Package,Field_Read,Field_Number 0x13
03d6 1816 | | Execute Package,Field_Execute,Field_Number 0x16
03d7 e002 | | Load 0x0,0x2
03d8 1820 | | Execute Package,Field_Execute,Field_Number 0x20
03d9 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x6 = 0x3d9,0x6
03da 00eb | | Load_Encached Diana_Cache
03db 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
03dc 0032 | 2 | Store_Top Heap_Access,At_Offset_2
03dd 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x7 = 0x3dd,0x7
03de 00eb | | Load_Encached Diana_Cache
03df 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
03e0 7002 |p | Jump_Nonzero 0x3e3
03e1 00c9 | | Action Pop_Auxiliary_Loop
03e2 7fea | | Jump 0x3cd
03e3 00ce | | Action Pop_Auxiliary
03e4 e002 | | Load 0x0,0x2 ; Debug Table 0xf.0x8 = 0x3e4,0x8
03e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03e6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03e7 ; --------------------------------------------------------------------------------------
03e7 ; STRING TABLE
03e7 ; --------------------------------------------------------------------------------------
03e7 0016 | | .STRTAB 0x0016->0x03f2 ; "type name: "
03e8 001f | | .STRTAB 0x001f->0x03f7 ; "no name given"
03e9 002a | * | .STRTAB 0x002a->0x03fe ; "results: "
03ea 0031 | 1 | .STRTAB 0x0031->0x0402 ; "*** exception: "
03eb 003e | > | .STRTAB 0x003e->0x040a ; "use current switch file"
03ec 0053 | S | .STRTAB 0x0053->0x0415 ; "name of switch file: "
03ed 0066 | f | .STRTAB 0x0066->0x0420 ; "can't get version of switch file"
03ee 0084 | | .STRTAB 0x0084->0x0430 ; "can't create switch file"
03ef 009a | | .STRTAB 0x009a->0x043c ; "No affected units"
03f0 00a9 | | .STRTAB 0x00a9->0x0444 ; "Affected units: "
03f1 00b7 | | .STREND 0x00b7->0x044c
03f2 7479 7065 |type| .STRTAB_STRINGS
044d 0000 0000 | | .XXX[0x3]
044f 0000 | |
0450 ; --------------------------------------------------------------------------------------
0450 ; Debug Table
0450 ; --------------------------------------------------------------------------------------
0450 0003 0010 | | .CONST 0x0003,0x0010
0452 000b 04d2 | | .DEBUG 0x000b,0x04d2,0x8000,0x0000,0x0038,0xbd56,0x0000,0x0005
045a 0020 04e8 | | .DEBUG 0x0020,0x04e8,0x8000,0x0000,0x0039,0x3666,0x0000,0x0031
0462 0073 052c | s ,| .DEBUG 0x0073,0x052c,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0006
046a 0083 0532 | 2| .DEBUG 0x0083,0x0532,0x0001,0x0000,0x0038,0xbd56,0x0000,0x000a
0472 0093 0538 | 8| .DEBUG 0x0093,0x0538,0x0001,0x0000,0x0038,0xbd56,0x0000,0x000e
047a 00ab 0542 | B| .DEBUG 0x00ab,0x0542,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0012
0482 0123 0578 | # x| .DEBUG 0x0123,0x0578,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0016
048a 0163 0594 | c | .DEBUG 0x0163,0x0594,0x0001,0x0000,0x0038,0xbd56,0x0000,0x001a
0492 01a3 05b0 | | .DEBUG 0x01a3,0x05b0,0x0001,0x0000,0x0038,0xbd56,0x0000,0x001e
049a 01eb 05d0 | | .DEBUG 0x01eb,0x05d0,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0022
04a2 021b 05e2 | | .DEBUG 0x021b,0x05e2,0x0001,0x0000,0x0038,0xbd56,0x0000,0x0030
04aa 0293 060c | | .DEBUG 0x0293,0x060c,0x0002,0x0000,0x0038,0xbd56,0x0000,0x0042
04b2 02ab 061a | | .DEBUG 0x02ab,0x061a,0x0002,0x0000,0x0039,0x3666,0x0000,0x00c4
04ba 02b3 061e | | .DEBUG 0x02b3,0x061e,0x0001,0x0000,0x0039,0x3666,0x0000,0x00d1
04c2 02c3 0624 | $| .DEBUG 0x02c3,0x0624,0x0002,0x0000,0x0039,0x3666,0x0000,0x00ef
04ca 03bb 0674 | t| .DEBUG 0x03bb,0x0674,0x0001,0x0000,0x0039,0x3666,0x0000,0x04b9
04d2 ; --------------------------------------------------------------------------------------
04d2 ; Debug3 Subtable 0x0
04d2 ; --------------------------------------------------------------------------------------
04d2 000a 0000 | | .DBG3TAB 0x000a,0x0000
04d4 000b ffff | | .CONST 0x000b,0xffff
04d6 000d fffe | | .CONST 0x000d,0xfffe
04d8 000f fffd | | .CONST 0x000f,0xfffd
04da 0011 fffc | | .CONST 0x0011,0xfffc
04dc 0013 fffb | | .CONST 0x0013,0xfffb
04de 0015 fffa | | .CONST 0x0015,0xfffa
04e0 0017 fff9 | | .CONST 0x0017,0xfff9
04e2 0019 fff8 | | .CONST 0x0019,0xfff8
04e4 001b fff7 | | .CONST 0x001b,0xfff7
04e6 001d fff6 | | .CONST 0x001d,0xfff6
04e8 ; --------------------------------------------------------------------------------------
04e8 ; Debug3 Subtable 0x1
04e8 ; --------------------------------------------------------------------------------------
04e8 0020 0001 | | .DBG3TAB 0x0020,0x0001
04ea 0020 ffff | | .CONST 0x0020,0xffff
04ec 0021 fffe | ! | .CONST 0x0021,0xfffe
04ee 0022 fffd | " | .CONST 0x0022,0xfffd
04f0 0023 fffc | # | .CONST 0x0023,0xfffc
04f2 0024 fffb | $ | .CONST 0x0024,0xfffb
04f4 0025 fffa | % | .CONST 0x0025,0xfffa
04f6 0026 fff9 | & | .CONST 0x0026,0xfff9
04f8 0027 fff8 | ' | .CONST 0x0027,0xfff8
04fa 0028 fff7 | ( | .CONST 0x0028,0xfff7
04fc 0029 fff6 | ) | .CONST 0x0029,0xfff6
04fe 002a fff5 | * | .CONST 0x002a,0xfff5
0500 002d fff4 | - | .CONST 0x002d,0xfff4
0502 0030 fff3 | 0 | .CONST 0x0030,0xfff3
0504 0033 fff2 | 3 | .CONST 0x0033,0xfff2
0506 0036 fff1 | 6 | .CONST 0x0036,0xfff1
0508 0041 fff0 | A | .CONST 0x0041,0xfff0
050a 0043 ffef | C | .CONST 0x0043,0xffef
050c 0045 ffee | E | .CONST 0x0045,0xffee
050e 004c ffed | L | .CONST 0x004c,0xffed
0510 004e ffec | N | .CONST 0x004e,0xffec
0512 0050 ffeb | P | .CONST 0x0050,0xffeb
0514 0052 ffea | R | .CONST 0x0052,0xffea
0516 0054 ffe9 | T | .CONST 0x0054,0xffe9
0518 0056 ffe8 | V | .CONST 0x0056,0xffe8
051a 0058 ffe7 | X | .CONST 0x0058,0xffe7
051c 005a ffe6 | Z | .CONST 0x005a,0xffe6
051e 005c ffe5 | \ | .CONST 0x005c,0xffe5
0520 005e ffe4 | ^ | .CONST 0x005e,0xffe4
0522 0060 ffe3 | ` | .CONST 0x0060,0xffe3
0524 0062 ffe2 | b | .CONST 0x0062,0xffe2
0526 0064 ffe1 | d | .CONST 0x0064,0xffe1
0528 0066 ffe0 | f | .CONST 0x0066,0xffe0
052a 0068 0001 | h | .CONST 0x0068,0x0001
052c ; --------------------------------------------------------------------------------------
052c ; Debug3 Subtable 0x2
052c ; --------------------------------------------------------------------------------------
052c 0000 0002 | | .DBG3TAB 0x0000,0x0002
052e 0073 0001 | s | .CONST 0x0073,0x0001
0530 0075 0002 | u | .CONST 0x0075,0x0002
0532 ; --------------------------------------------------------------------------------------
0532 ; Debug3 Subtable 0x3
0532 ; --------------------------------------------------------------------------------------
0532 0000 0002 | | .DBG3TAB 0x0000,0x0002
0534 0083 0001 | | .CONST 0x0083,0x0001
0536 0085 0002 | | .CONST 0x0085,0x0002
0538 ; --------------------------------------------------------------------------------------
0538 ; Debug3 Subtable 0x4
0538 ; --------------------------------------------------------------------------------------
0538 0002 0002 | | .DBG3TAB 0x0002,0x0002
053a 0093 ffff | | .CONST 0x0093,0xffff
053c 0098 fffe | | .CONST 0x0098,0xfffe
053e 009b 0001 | | .CONST 0x009b,0x0001
0540 009f 0002 | | .CONST 0x009f,0x0002
0542 ; --------------------------------------------------------------------------------------
0542 ; Debug3 Subtable 0x5
0542 ; --------------------------------------------------------------------------------------
0542 0005 0015 | | .DBG3TAB 0x0005,0x0015
0544 00ab ffff | | .CONST 0x00ab,0xffff
0546 00ac fffe | | .CONST 0x00ac,0xfffe
0548 00ad fffd | | .CONST 0x00ad,0xfffd
054a 00b2 fffc | | .CONST 0x00b2,0xfffc
054c 00b3 fffb | | .CONST 0x00b3,0xfffb
054e 00b4 0001 | | .CONST 0x00b4,0x0001
0550 00b8 0002 | | .CONST 0x00b8,0x0002
0552 00b9 0003 | | .CONST 0x00b9,0x0003
0554 00ba 0004 | | .CONST 0x00ba,0x0004
0556 00c0 0005 | | .CONST 0x00c0,0x0005
0558 00c2 0006 | | .CONST 0x00c2,0x0006
055a 00c3 0007 | | .CONST 0x00c3,0x0007
055c 00c4 0008 | | .CONST 0x00c4,0x0008
055e 00c8 0009 | | .CONST 0x00c8,0x0009
0560 00cd 000a | | .CONST 0x00cd,0x000a
0562 00d2 000b | | .CONST 0x00d2,0x000b
0564 00d7 000c | | .CONST 0x00d7,0x000c
0566 00dd 000d | | .CONST 0x00dd,0x000d
0568 00e7 000e | | .CONST 0x00e7,0x000e
056a 00ef 000f | | .CONST 0x00ef,0x000f
056c 00f0 0010 | | .CONST 0x00f0,0x0010
056e 00f1 0011 | | .CONST 0x00f1,0x0011
0570 00f7 0012 | | .CONST 0x00f7,0x0012
0572 010e 0013 | | .CONST 0x010e,0x0013
0574 0110 0014 | | .CONST 0x0110,0x0014
0576 0119 0015 | | .CONST 0x0119,0x0015
0578 ; --------------------------------------------------------------------------------------
0578 ; Debug3 Subtable 0x6
0578 ; --------------------------------------------------------------------------------------
0578 0003 000a | | .DBG3TAB 0x0003,0x000a
057a 0123 ffff | # | .CONST 0x0123,0xffff
057c 0124 fffe | $ | .CONST 0x0124,0xfffe
057e 0125 fffd | % | .CONST 0x0125,0xfffd
0580 012a 0001 | * | .CONST 0x012a,0x0001
0582 0133 0002 | 3 | .CONST 0x0133,0x0002
0584 0134 0003 | 4 | .CONST 0x0134,0x0003
0586 0135 0004 | 5 | .CONST 0x0135,0x0004
0588 013b 0005 | ; | .CONST 0x013b,0x0005
058a 013d 0006 | = | .CONST 0x013d,0x0006
058c 013e 0007 | > | .CONST 0x013e,0x0007
058e 013f 0008 | ? | .CONST 0x013f,0x0008
0590 0157 0009 | W | .CONST 0x0157,0x0009
0592 015b 000a | [ | .CONST 0x015b,0x000a
0594 ; --------------------------------------------------------------------------------------
0594 ; Debug3 Subtable 0x7
0594 ; --------------------------------------------------------------------------------------
0594 0003 000a | | .DBG3TAB 0x0003,0x000a
0596 0163 ffff | c | .CONST 0x0163,0xffff
0598 0164 fffe | d | .CONST 0x0164,0xfffe
059a 0165 fffd | e | .CONST 0x0165,0xfffd
059c 016a 0001 | j | .CONST 0x016a,0x0001
059e 016f 0002 | o | .CONST 0x016f,0x0002
05a0 0170 0003 | p | .CONST 0x0170,0x0003
05a2 0171 0004 | q | .CONST 0x0171,0x0004
05a4 0177 0005 | w | .CONST 0x0177,0x0005
05a6 0179 0006 | y | .CONST 0x0179,0x0006
05a8 017a 0007 | z | .CONST 0x017a,0x0007
05aa 017b 0008 | { | .CONST 0x017b,0x0008
05ac 0193 0009 | | .CONST 0x0193,0x0009
05ae 0197 000a | | .CONST 0x0197,0x000a
05b0 ; --------------------------------------------------------------------------------------
05b0 ; Debug3 Subtable 0x8
05b0 ; --------------------------------------------------------------------------------------
05b0 0004 000b | | .DBG3TAB 0x0004,0x000b
05b2 01a3 ffff | | .CONST 0x01a3,0xffff
05b4 01a6 fffe | | .CONST 0x01a6,0xfffe
05b6 01aa fffd | | .CONST 0x01aa,0xfffd
05b8 01ab fffc | | .CONST 0x01ab,0xfffc
05ba 01ac 0001 | | .CONST 0x01ac,0x0001
05bc 01b0 0002 | | .CONST 0x01b0,0x0002
05be 01b7 0003 | | .CONST 0x01b7,0x0003
05c0 01b9 0004 | | .CONST 0x01b9,0x0004
05c2 01bd 0005 | | .CONST 0x01bd,0x0005
05c4 01be 0006 | | .CONST 0x01be,0x0006
05c6 01ca 0007 | | .CONST 0x01ca,0x0007
05c8 01d5 0008 | | .CONST 0x01d5,0x0008
05ca 01d7 0009 | | .CONST 0x01d7,0x0009
05cc 01d9 000a | | .CONST 0x01d9,0x000a
05ce 01de 000b | | .CONST 0x01de,0x000b
05d0 ; --------------------------------------------------------------------------------------
05d0 ; Debug3 Subtable 0x9
05d0 ; --------------------------------------------------------------------------------------
05d0 0002 0006 | | .DBG3TAB 0x0002,0x0006
05d2 01eb ffff | | .CONST 0x01eb,0xffff
05d4 01f0 fffe | | .CONST 0x01f0,0xfffe
05d6 01f5 0001 | | .CONST 0x01f5,0x0001
05d8 01fa 0002 | | .CONST 0x01fa,0x0002
05da 0200 0003 | | .CONST 0x0200,0x0003
05dc 0206 0004 | | .CONST 0x0206,0x0004
05de 020e 0005 | | .CONST 0x020e,0x0005
05e0 0211 0006 | | .CONST 0x0211,0x0006
05e2 ; --------------------------------------------------------------------------------------
05e2 ; Debug3 Subtable 0xa
05e2 ; --------------------------------------------------------------------------------------
05e2 0005 000f | | .DBG3TAB 0x0005,0x000f
05e4 021b ffff | | .CONST 0x021b,0xffff
05e6 021c fffe | | .CONST 0x021c,0xfffe
05e8 0220 fffd | | .CONST 0x0220,0xfffd
05ea 0221 fffc | ! | .CONST 0x0221,0xfffc
05ec 0226 fffb | & | .CONST 0x0226,0xfffb
05ee 022b 0001 | + | .CONST 0x022b,0x0001
05f0 0232 0002 | 2 | .CONST 0x0232,0x0002
05f2 0234 0003 | 4 | .CONST 0x0234,0x0003
05f4 0235 0004 | 5 | .CONST 0x0235,0x0004
05f6 0236 0005 | 6 | .CONST 0x0236,0x0005
05f8 0238 0006 | 8 | .CONST 0x0238,0x0006
05fa 024a 0007 | J | .CONST 0x024a,0x0007
05fc 0261 0008 | a | .CONST 0x0261,0x0008
05fe 0266 0009 | f | .CONST 0x0266,0x0009
0600 026d 000a | m | .CONST 0x026d,0x000a
0602 026f 000b | o | .CONST 0x026f,0x000b
0604 0276 000c | v | .CONST 0x0276,0x000c
0606 027c 000d | | | .CONST 0x027c,0x000d
0608 0284 000e | | .CONST 0x0284,0x000e
060a 0287 000f | | .CONST 0x0287,0x000f
060c ; --------------------------------------------------------------------------------------
060c ; Debug3 Subtable 0xb
060c ; --------------------------------------------------------------------------------------
060c 0002 0004 | | .DBG3TAB 0x0002,0x0004
060e 0293 ffff | | .CONST 0x0293,0xffff
0610 0294 fffe | | .CONST 0x0294,0xfffe
0612 0295 0001 | | .CONST 0x0295,0x0001
0614 029d 0002 | | .CONST 0x029d,0x0002
0616 029f 0003 | | .CONST 0x029f,0x0003
0618 02a1 0004 | | .CONST 0x02a1,0x0004
061a ; --------------------------------------------------------------------------------------
061a ; Debug3 Subtable 0xc
061a ; --------------------------------------------------------------------------------------
061a 0000 0001 | | .DBG3TAB 0x0000,0x0001
061c 02ab 0001 | | .CONST 0x02ab,0x0001
061e ; --------------------------------------------------------------------------------------
061e ; Debug3 Subtable 0xd
061e ; --------------------------------------------------------------------------------------
061e 0000 0002 | | .DBG3TAB 0x0000,0x0002
0620 02b3 0001 | | .CONST 0x02b3,0x0001
0622 02b5 0002 | | .CONST 0x02b5,0x0002
0624 ; --------------------------------------------------------------------------------------
0624 ; Debug3 Subtable 0xe
0624 ; --------------------------------------------------------------------------------------
0624 000a 001d | | .DBG3TAB 0x000a,0x001d
0626 02c3 ffff | | .CONST 0x02c3,0xffff
0628 02c5 fffe | | .CONST 0x02c5,0xfffe
062a 02c9 fffd | | .CONST 0x02c9,0xfffd
062c 02ca fffc | | .CONST 0x02ca,0xfffc
062e 02cb fffb | | .CONST 0x02cb,0xfffb
0630 02d0 fffa | | .CONST 0x02d0,0xfffa
0632 02d5 fff9 | | .CONST 0x02d5,0xfff9
0634 02d8 fff8 | | .CONST 0x02d8,0xfff8
0636 02d9 fff7 | | .CONST 0x02d9,0xfff7
0638 02de fff6 | | .CONST 0x02de,0xfff6
063a 02e1 0001 | | .CONST 0x02e1,0x0001
063c 02e3 0002 | | .CONST 0x02e3,0x0002
063e 02e5 0003 | | .CONST 0x02e5,0x0003
0640 02eb 0004 | | .CONST 0x02eb,0x0004
0642 02ed 0005 | | .CONST 0x02ed,0x0005
0644 02f0 0006 | | .CONST 0x02f0,0x0006
0646 02f2 0007 | | .CONST 0x02f2,0x0007
0648 02f6 0008 | | .CONST 0x02f6,0x0008
064a 02fd 0009 | | .CONST 0x02fd,0x0009
064c 02ff 000a | | .CONST 0x02ff,0x000a
064e 0303 000b | | .CONST 0x0303,0x000b
0650 0306 000c | | .CONST 0x0306,0x000c
0652 0318 000d | | .CONST 0x0318,0x000d
0654 031a 000e | | .CONST 0x031a,0x000e
0656 0327 000f | ' | .CONST 0x0327,0x000f
0658 0329 0010 | ) | .CONST 0x0329,0x0010
065a 032d 0011 | - | .CONST 0x032d,0x0011
065c 0330 0012 | 0 | .CONST 0x0330,0x0012
065e 0332 0013 | 2 | .CONST 0x0332,0x0013
0660 0335 0014 | 5 | .CONST 0x0335,0x0014
0662 0337 0015 | 7 | .CONST 0x0337,0x0015
0664 033c 0016 | < | .CONST 0x033c,0x0016
0666 036a 0017 | j | .CONST 0x036a,0x0017
0668 0395 0018 | | .CONST 0x0395,0x0018
066a 0397 0019 | | .CONST 0x0397,0x0019
066c 039b 001a | | .CONST 0x039b,0x001a
066e 039e 001b | | .CONST 0x039e,0x001b
0670 03a0 001c | | .CONST 0x03a0,0x001c
0672 03a3 001d | | .CONST 0x03a3,0x001d
0674 ; --------------------------------------------------------------------------------------
0674 ; Debug3 Subtable 0xf
0674 ; --------------------------------------------------------------------------------------
0674 0001 0008 | | .DBG3TAB 0x0001,0x0008
0676 03bb ffff | | .CONST 0x03bb,0xffff
0678 03be 0001 | | .CONST 0x03be,0x0001
067a 03c2 0002 | | .CONST 0x03c2,0x0002
067c 03c7 0003 | | .CONST 0x03c7,0x0003
067e 03cc 0004 | | .CONST 0x03cc,0x0004
0680 03cd 0005 | | .CONST 0x03cd,0x0005
0682 03d9 0006 | | .CONST 0x03d9,0x0006
0684 03dd 0007 | | .CONST 0x03dd,0x0007
0686 03e4 0008 | | .CONST 0x03e4,0x0008
0688 0000 0000 | | .BLANK 0000[0x178]