|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00)
Notes: 00_class, 5812_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_6148f2
└─⟦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 5812 |X | .CONST 0x5812 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 02c0 | | .CONST 0x02c0 ; Offset of debug table
0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction
0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion
0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments)
0007 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00a7 | | .CONST 0x00a7 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0039 | 9 | .CONST 0x0039 ; Number of locals
000b INIT_0008:
000b 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible ; Debug Table 0x0 = .DEBUG 0x000b,0x0362,0x0000,0x0000,0x004c,0x50d6,0x0000,0x0eaa
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 00c4 | | Action Make_Default ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x2 = 0xd,0xfffd
000f 029a 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xf,0xfffc
0011 629a |b | Indirect_Literal Discrete,0x2ac,{0x00000000, 0x4c50d608} ; Debug Table 0x0.0x4 = 0x11,0xfffb
0012 0129 | ) | Execute Any,Make_Visible
0013 029a 0123 | #| Declare_Subprogram INIT_0120,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x5 = 0x13,0xfffa
0015 0007 | | Action Break_Optional ; Debug Table 0x0.0x6 = 0x15,0xfff9
0016 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x16,0xfff8
0018 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x0.0x8 = 0x18,0xfff7
0019 0129 | ) | Execute Any,Make_Visible
001a 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1a,0xfff6
001c 029a 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x1c,0xfff5
001e 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x1e,0xfff4
0020 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x20,0xfff3
0022 03a9 | | Declare_Type Heap_Access,Indirect_Literal,Visible ; Debug Table 0x0.0xd = 0x22,0xfff2
0023 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x23,0xfff1
0025 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x25,0xfff0
0027 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x10 = 0x27,0xffef
0029 029a 022b | +| Declare_Subprogram INIT_0228,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x29,0xffee
002b 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x2b,0xffed
002d 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x13 = 0x2d,0xffec
002f 6278 |bx | Indirect_Literal Discrete,0x2a8,{0x00000000, 0x4c50d609} ; Debug Table 0x0.0x14 = 0x2f,0xffeb
0030 0129 | ) | Execute Any,Make_Visible
0031 4804 |H | Short_Literal 0x4 ; Debug Table 0x0.0x15 = 0x31,0xffea
0032 032a | * | Declare_Type Record,Incomplete
0033 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x16 = 0x33,0xffe9
0034 02a0 | | Declare_Subprogram Null_Subprogram
0035 e20d | | Load 0x1,0xd
0036 03a3 | | Complete_Type Heap_Access,By_Defining
0037 0007 | | Action Break_Optional ; Debug Table 0x0.0x17 = 0x37,0xffe8
0038 e20d | | Load 0x1,0xd ; Debug Table 0x0.0x18 = 0x38,0xffe7
0039 0129 | ) | Execute Any,Make_Visible
003a c20e | | Store 0x1,0xe
003b 00e4 | | Load_Encached Positive_Cache ; Debug Table 0x0.0x19 = 0x3b,0xffe6
003c 00e3 | | Load_Encached Natural_Cache
003d 4800 |H | Short_Literal 0x0
003e 4802 |H | Short_Literal 0x2
003f 4802 |H | Short_Literal 0x2
0040 4807 |H | Short_Literal 0x7
0041 0318 | | Declare_Type Variant_Record,Incomplete
0042 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x1a = 0x42,0xffe5
0043 02a0 | | Declare_Subprogram Null_Subprogram
0044 e219 | | Load 0x1,0x19
0045 03a3 | | Complete_Type Heap_Access,By_Defining
0046 00bf | | Action Accept_Activation ; Debug Table 0x0.0x1b = 0x46,0xffe4
0047 03a5 | | Declare_Type Heap_Access,Indirect_Literal,Values_Relative ; Debug Table 0x1 = .DEBUG 0x0047,0x039c,0x0000,0x0000,0x004c,0x5836,0x0000,0x0004
; Debug Table 0x1.0x0 = 0x47,0xffff
0048 e219 | | Load 0x1,0x19
0049 00d9 | | Load_Top At_Offset_1
004a 03a2 | | Complete_Type Heap_Access,By_Renaming
004b 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x4b,0xfffe
004c 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x1.0x2 = 0x4c,0xfffd
004d 00e3 | | Load_Encached Natural_Cache
004e 00da | | Load_Top At_Offset_2
004f 00e9 | | Load_Encached String_Cache
0050 00e9 | | Load_Encached String_Cache
0051 029f 024b | K| Declare_Subprogram INIT_0248,For_Call
0053 4800 |H | Short_Literal 0x0
0054 4802 |H | Short_Literal 0x2
0055 4803 |H | Short_Literal 0x3
0056 e222 | " | Load 0x1,0x22
0057 0307 | | Complete_Type Variant_Record,By_Defining
0058 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x3 = 0x58,0xfffc
0059 190f | | Execute Package,Field_Reference,Field_Number 0xf
005a 00c6 | | Action Check_Subprogram_Elaborated
005b 00d9 | | Load_Top At_Offset_1
005c 00d9 | | Load_Top At_Offset_1
005d 6246 |bF | Indirect_Literal Discrete,0x2a4,{0x00000000, 0x004c5836}
005e 483d |H= | Short_Literal 0x3d
005f 4800 |H | Short_Literal 0x0
0060 0007 | | Action Break_Optional
0061 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x4 = 0x61,0xfffb
0062 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0063 00c6 | | Action Check_Subprogram_Elaborated
0064 e222 | " | Load 0x1,0x22
0065 e223 | # | Load 0x1,0x23
0066 623d |b= | Indirect_Literal Discrete,0x2a4,{0x00000000, 0x004c5836}
0067 4848 |HH | Short_Literal 0x48
0068 4800 |H | Short_Literal 0x0
0069 0007 | | Action Break_Optional
006a 00e2 | | Load_Encached Integer_Cache ; Debug Table 0x1.0x5 = 0x6a,0xfffa
006b e223 | # | Load 0x1,0x23
006c e002 | | Load 0x0,0x2
006d 1b13 | | Execute Package,Field_Read,Field_Number 0x13
006e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006f e002 | | Load 0x0,0x2
0070 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0071 029f 027b | {| Declare_Subprogram INIT_0278,For_Call
0073 e221 | ! | Load 0x1,0x21
0074 0326 | & | Complete_Type Record,By_Defining
0075 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x6 = 0x75,0xfff9
0076 190f | | Execute Package,Field_Reference,Field_Number 0xf
0077 00c6 | | Action Check_Subprogram_Elaborated
0078 e221 | ! | Load 0x1,0x21
0079 e20d | | Load 0x1,0xd
007a 6229 |b) | Indirect_Literal Discrete,0x2a4,{0x00000000, 0x004c5836}
007b 486e |Hn | Short_Literal 0x6e
007c 4800 |H | Short_Literal 0x0
007d 0007 | | Action Break_Optional
007e e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x7 = 0x7e,0xfff8
007f 1910 | | Execute Package,Field_Reference,Field_Number 0x10
0080 00c6 | | Action Check_Subprogram_Elaborated
0081 e221 | ! | Load 0x1,0x21
0082 e20d | | Load 0x1,0xd
0083 6220 |b | Indirect_Literal Discrete,0x2a4,{0x00000000, 0x004c5836}
0084 4879 |Hy | Short_Literal 0x79
0085 4800 |H | Short_Literal 0x0
0086 0007 | | Action Break_Optional
0087 029d 0293 | | Declare_Subprogram INIT_0290,For_Outer_Call ; Debug Table 0x1.0x8 = 0x87,0xfff7
0089 029d 02b3 | | Declare_Subprogram INIT_02b0,For_Outer_Call ; Debug Table 0x1.0x9 = 0x89,0xfff6
008b 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0xa = 0x8b,0xfff5
008c 00c7 | | Action Elaborate_Subprogram
008d 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0xb = 0x8d,0xfff4
008e 00c7 | | Action Elaborate_Subprogram
008f 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0xc = 0x8f,0xfff3
0090 00c7 | | Action Elaborate_Subprogram
0091 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0xd = 0x91,0xfff2
0092 00c7 | | Action Elaborate_Subprogram
0093 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xe = 0x93,0xfff1
0094 00c7 | | Action Elaborate_Subprogram
0095 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xf = 0x95,0xfff0
0096 00c7 | | Action Elaborate_Subprogram
0097 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x10 = 0x97,0xffef
0098 00c7 | | Action Elaborate_Subprogram
0099 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x11 = 0x99,0xffee
009a 00c7 | | Action Elaborate_Subprogram
009b 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0x12 = 0x9b,0xffed
009c 00c7 | | Action Elaborate_Subprogram
009d 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0x13 = 0x9d,0xffec
009e 00c7 | | Action Elaborate_Subprogram
009f 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x14 = 0x9f,0xffeb
00a0 00c7 | | Action Elaborate_Subprogram
00a1 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0x15 = 0xa1,0xffea
00a2 00c7 | | Action Elaborate_Subprogram
00a3 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x16 = 0xa3,0xffe9
00a4 00c7 | | Action Elaborate_Subprogram
00a5 1d1f | | Execute_Immediate Reference_Lex_1,0x1f ; Debug Table 0x1.0x17 = 0xa5,0xffe8
00a6 00c7 | | Action Elaborate_Subprogram
00a7 BODY_0008:
00a7 00bc | | Action Signal_Activated
00a8 00bb | | Action Signal_Completion
00a9 0000 0000 | | .BLANK 0000[0x7]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b7 | | .CONST 0x00b7 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0002 | | .CONST 0x0002 ; Number of locals
00b3 INIT_00b0:
00b3 e221 | ! | Load 0x1,0x21 ; Debug Table 0x2 = .DEBUG 0x00b3,0x03ce,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0eb3
; Debug Table 0x2.0x0 = 0xb3,0xffff
00b4 0322 | " | Declare_Variable Record
00b5 00d8 | | Load_Top At_Offset_0
00b6 1c00 | | Execute_Immediate Run_Utility,0x0
00b7 BODY_00b0:
00b7 e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x1 = 0xb7,0x1
00b8 6809 |h | Jump_Zero 0xc2
00b9 e5fe | | Load 0x2,-0x2
00ba 0217 | | Execute Heap_Access,All_Reference
00bb 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00bc 61e3 |a | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x0013e958}
00bd 027f | | Execute Discrete,Equal
00be 6803 |h | Jump_Zero 0xc2
00bf e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x2 = 0xbf,0x2
00c0 8210 | | Call 0x1,0x10
00c1 c5fe | | Store 0x2,-0x2
00c2 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x3 = 0xc2,0x3
00c3 00d9 | | Load_Top At_Offset_1
00c4 e22e | . | Load 0x1,0x2e
00c5 e22f | / | Load 0x1,0x2f
00c6 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
00c7 e001 | | Load 0x0,0x1
00c8 180f | | Execute Package,Field_Execute,Field_Number 0xf
00c9 a5fe | | Store_Unchecked 0x2,-0x2
00ca e5fe | | Load 0x2,-0x2 ; Debug Table 0x2.0x4 = 0xca,0x4
00cb 0219 | | Execute Heap_Access,All_Read
00cc 00d8 | | Load_Top At_Offset_0
00cd 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
00ce e5ff | | Load 0x2,-0x1
00cf e002 | | Load 0x0,0x2
00d0 1b13 | | Execute Package,Field_Read,Field_Number 0x13
00d1 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d2 00d9 | | Load_Top At_Offset_1
00d3 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
00d4 00d1 | | Pop_Control Pop_Count_1
00d5 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x5 = 0xd5,0x5
00d6 e5fe | | Load 0x2,-0x2
00d7 0217 | | Execute Heap_Access,All_Reference
00d8 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
00d9 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00da 0000 0000 | | .BLANK 0000[0x6]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e7 | | .CONST 0x00e7 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0003 | | .CONST 0x0003 ; Number of locals
00e3 INIT_00e0:
00e3 e223 | # | Load 0x1,0x23 ; Debug Table 0x3 = .DEBUG 0x00e3,0x03dc,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0ebf
; Debug Table 0x3.0x0 = 0xe3,0xffff
00e4 0007 | | Action Break_Optional
00e5 e223 | # | Load 0x1,0x23 ; Debug Table 0x3.0x1 = 0xe5,0xfffe
00e6 0007 | | Action Break_Optional
00e7 BODY_00e0:
00e7 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x2 = 0xe7,0x1
00e8 7001 |p | Jump_Nonzero 0xea
00e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 ; Debug Table 0x3.0x3 = 0xe9,0x2
00ea e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x4 = 0xea,0x3
00eb 0217 | | Execute Heap_Access,All_Reference
00ec 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00ed 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00ee 00cf | | Action Mark_Auxiliary
00ef 7812 |x | Jump 0x102
00f0 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x5 = 0xf0,0x5
00f1 0217 | | Execute Heap_Access,All_Reference
00f2 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
00f3 0032 | 2 | Store_Top Heap_Access,At_Offset_2
00f4 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0x6 = 0xf4,0x6
00f5 00db | | Load_Top At_Offset_3
00f6 0217 | | Execute Heap_Access,All_Reference
00f7 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
00f8 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x7 = 0xf8,0x7
00f9 e229 | ) | Load 0x1,0x29
00fa e22a | * | Load 0x1,0x2a
00fb 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
00fc e001 | | Load 0x0,0x1
00fd 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00fe 0033 | 3 | Store_Top Heap_Access,At_Offset_3
00ff 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x8 = 0xff,0x8
0100 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0101 00c9 | | Action Pop_Auxiliary_Loop
0102 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x9 = 0x102,0x4
0103 77ec |w | Jump_Nonzero 0xf0
0104 00ce | | Action Pop_Auxiliary
0105 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0xa = 0x105,0x9
0106 0219 | | Execute Heap_Access,All_Read
0107 00d8 | | Load_Top At_Offset_0
0108 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0109 4801 |H | Short_Literal 0x1
010a e002 | | Load 0x0,0x2
010b 1b13 | | Execute Package,Field_Read,Field_Number 0x13
010c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
010d 00d9 | | Load_Top At_Offset_1
010e 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
010f 00d1 | | Pop_Control Pop_Count_1
0110 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xb = 0x110,0xa
0111 e5ff | | Load 0x2,-0x1
0112 0217 | | Execute Heap_Access,All_Reference
0113 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0114 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0xc = 0x114,0xb
0115 e233 | 3 | Load 0x1,0x33
0116 e234 | 4 | Load 0x1,0x34
0117 1d35 | 5 | Execute_Immediate Reference_Lex_1,0x35
0118 e001 | | Load 0x0,0x1
0119 1810 | | Execute Package,Field_Execute,Field_Number 0x10
011a c5ff | | Store 0x2,-0x1
011b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
011c 0000 0000 | | .BLANK 0000[0x4]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x0123,0x03f8,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0eca
; Debug Table 0x4.0x0 = 0x123,0x1
0124 8238 | 8 | Call 0x1,0x38
0125 00da | | Load_Top At_Offset_2 ; Debug Table 0x4.0x1 = 0x125,0x2
0126 0217 | | Execute Heap_Access,All_Reference
0127 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0128 021d | | Execute Heap_Access,Is_Null
0129 4800 |H | Short_Literal 0x0
012a e5ff | | Load 0x2,-0x1
012b 0217 | | Execute Heap_Access,All_Reference
012c 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
012d e002 | | Load 0x0,0x2
012e 1b13 | | Execute Package,Field_Read,Field_Number 0x13
012f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0130 0279 | y | Execute Discrete,And
0131 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0132 0000 0000 | | .BLANK 0000[0x6]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 014c | L | .CONST 0x014c ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0005 | | .CONST 0x0005 ; Number of locals
013b INIT_0138:
013b e223 | # | Load 0x1,0x23 ; Debug Table 0x5 = .DEBUG 0x013b,0x03fe,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0ed9
; Debug Table 0x5.0x0 = 0x13b,0xffff
013c e5fc | | Load 0x2,-0x4
013d 0217 | | Execute Heap_Access,All_Reference
013e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
013f 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0140 e223 | # | Load 0x1,0x23 ; Debug Table 0x5.0x1 = 0x140,0xfffe
0141 0007 | | Action Break_Optional
0142 e223 | # | Load 0x1,0x23 ; Debug Table 0x5.0x2 = 0x142,0xfffd
0143 0007 | | Action Break_Optional
0144 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x3 = 0x144,0xfffc
0145 01db | | Execute Vector,Length
0146 e5fe | | Load 0x2,-0x2
0147 01db | | Execute Vector,Length
0148 e222 | " | Load 0x1,0x22
0149 1c08 | | Execute_Immediate Run_Utility,0x8
014a 00d8 | | Load_Top At_Offset_0
014b 1c00 | | Execute_Immediate Run_Utility,0x0
014c BODY_0138:
014c e5fc | | Load 0x2,-0x4 ; Debug Table 0x5.0x4 = 0x14c,0x1
014d 8238 | 8 | Call 0x1,0x38
014e e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x5 = 0x14e,0x2
014f 00d9 | | Load_Top At_Offset_1
0150 2906 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x6
0151 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0x6 = 0x151,0x3
0152 00d9 | | Load_Top At_Offset_1
0153 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7
0154 e5fd | | Load 0x2,-0x3 ; Debug Table 0x5.0x7 = 0x154,0x4
0155 00d9 | | Load_Top At_Offset_1
0156 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0157 e5fc | | Load 0x2,-0x4 ; Debug Table 0x5.0x8 = 0x157,0x5
0158 0217 | | Execute Heap_Access,All_Reference
0159 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
015a 00d9 | | Load_Top At_Offset_1
015b e224 | $ | Load 0x1,0x24
015c e225 | % | Load 0x1,0x25
015d 1d26 | & | Execute_Immediate Reference_Lex_1,0x26
015e e001 | | Load 0x0,0x1
015f 180f | | Execute Package,Field_Execute,Field_Number 0xf
0160 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0161 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x9 = 0x161,0x6
0162 7005 |p | Jump_Nonzero 0x168
0163 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xa = 0x163,0x7
0164 e5fc | | Load 0x2,-0x4
0165 0217 | | Execute Heap_Access,All_Reference
0166 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0167 4504 |E | Exit_Suprogram New_Top_Offset 0x4 ; Debug Table 0x5.0xb = 0x167,0x8
0168 00cf | | Action Mark_Auxiliary
0169 7807 |x | Jump 0x171
016a e402 | | Load 0x2,0x2 ; Debug Table 0x5.0xc = 0x16a,0xa
016b a403 | | Store_Unchecked 0x2,0x3
016c e402 | | Load 0x2,0x2 ; Debug Table 0x5.0xd = 0x16c,0xb
016d 0217 | | Execute Heap_Access,All_Reference
016e 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
016f a402 | | Store_Unchecked 0x2,0x2
0170 00c9 | | Action Pop_Auxiliary_Loop
0171 e402 | | Load 0x2,0x2 ; Debug Table 0x5.0xe = 0x171,0x9
0172 6806 |h | Jump_Zero 0x179
0173 e5fd | | Load 0x2,-0x3
0174 e402 | | Load 0x2,0x2
0175 0217 | | Execute Heap_Access,All_Reference
0176 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
0177 027d | } | Execute Discrete,Greater
0178 77f1 |w | Jump_Nonzero 0x16a
0179 00ce | | Action Pop_Auxiliary
017a 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0xf = 0x17a,0xc
017b 7005 |p | Jump_Nonzero 0x181
017c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x10 = 0x17c,0xd
017d 00db | | Load_Top At_Offset_3
017e 0217 | | Execute Heap_Access,All_Reference
017f 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0180 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0181 00db | | Load_Top At_Offset_3 ; Debug Table 0x5.0x11 = 0x181,0xe
0182 00da | | Load_Top At_Offset_2
0183 0217 | | Execute Heap_Access,All_Reference
0184 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0185 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0x12 = 0x185,0xf
0186 7005 |p | Jump_Nonzero 0x18c
0187 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x13 = 0x187,0x10
0188 e5fc | | Load 0x2,-0x4
0189 0217 | | Execute Heap_Access,All_Reference
018a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
018b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
018c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x14 = 0x18c,0x11
018d 00db | | Load_Top At_Offset_3
018e 0217 | | Execute Heap_Access,All_Reference
018f 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0190 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0191 0000 0000 | | .BLANK 0000[0x7]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019d | | .CONST 0x019d ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0002 | | .CONST 0x0002 ; Number of locals
019b INIT_0198:
019b e219 | | Load 0x1,0x19 ; Debug Table 0x6 = .DEBUG 0x019b,0x042a,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f04
; Debug Table 0x6.0x0 = 0x19b,0xffff
019c 0007 | | Action Break_Optional
019d BODY_0198:
019d 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x1 = 0x19d,0x1
019e 8238 | 8 | Call 0x1,0x38
019f e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x2 = 0x19f,0x2
01a0 8238 | 8 | Call 0x1,0x38
01a1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x3 = 0x1a1,0x3
01a2 e5ff | | Load 0x2,-0x1
01a3 821a | | Call 0x1,0x1a
01a4 0031 | 1 | Store_Top Heap_Access,At_Offset_1
01a5 00cf | | Action Mark_Auxiliary
01a6 780d |x | Jump 0x1b4
01a7 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x4 = 0x1a7,0x5
01a8 00da | | Load_Top At_Offset_2
01a9 821d | | Call 0x1,0x1d
01aa 00db | | Load_Top At_Offset_3
01ab 821c | | Call 0x1,0x1c
01ac e402 | | Load 0x2,0x2
01ad 821b | | Call 0x1,0x1b
01ae 8213 | | Call 0x1,0x13
01af c5fe | | Store 0x2,-0x2
01b0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x5 = 0x1b0,0x6
01b1 821e | | Call 0x1,0x1e
01b2 0032 | 2 | Store_Top Heap_Access,At_Offset_2
01b3 00c9 | | Action Pop_Auxiliary_Loop
01b4 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x6.0x6 = 0x1b4,0x4
01b5 821f | | Call 0x1,0x1f
01b6 6ff0 |o | Jump_Zero 0x1a7
01b7 00ce | | Action Pop_Auxiliary
01b8 e5fe | | Load 0x2,-0x2 ; Debug Table 0x6.0x7 = 0x1b8,0x7
01b9 e5ff | | Load 0x2,-0x1
01ba 8217 | | Call 0x1,0x17
01bb 8216 | | Call 0x1,0x16
01bc c5fe | | Store 0x2,-0x2
01bd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01be 0000 0000 | | .XXX[0x2]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01c3 | | .CONST 0x01c3 ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0001 | | .CONST 0x0001 ; Number of locals
01c3 BODY_01c0:
01c3 INIT_01c0:
01c3 00db | | Load_Top At_Offset_3 ; Debug Table 0x7 = .DEBUG 0x01c3,0x043c,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f10
; Debug Table 0x7.0x0 = 0x1c3,0x1
01c4 8238 | 8 | Call 0x1,0x38
01c5 00db | | Load_Top At_Offset_3 ; Debug Table 0x7.0x1 = 0x1c5,0x2
01c6 0219 | | Execute Heap_Access,All_Read
01c7 00d8 | | Load_Top At_Offset_0
01c8 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01c9 4801 |H | Short_Literal 0x1
01ca e5ff | | Load 0x2,-0x1
01cb e002 | | Load 0x0,0x2
01cc 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01cd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ce 00d9 | | Load_Top At_Offset_1
01cf 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01d0 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01d1 0000 0000 | | .BLANK 0000[0x7]
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01db | | .CONST 0x01db ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0001 | | .CONST 0x0001 ; Number of locals
01db BODY_01d8:
01db INIT_01d8:
01db 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x01db,0x0442,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f1e
; Debug Table 0x8.0x0 = 0x1db,0x1
01dc 8238 | 8 | Call 0x1,0x38
01dd 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x1 = 0x1dd,0x2
01de 0217 | | Execute Heap_Access,All_Reference
01df 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01e1 0000 0000 | | .BLANK 0000[0x7]
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x01eb,0x0448,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f29
; Debug Table 0x9.0x0 = 0x1eb,0x1
01ec 8238 | 8 | Call 0x1,0x38
01ed 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x1 = 0x1ed,0x2
01ee 00db | | Load_Top At_Offset_3
01ef 0217 | | Execute Heap_Access,All_Reference
01f0 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
01f1 e002 | | Load 0x0,0x2
01f2 1b13 | | Execute Package,Field_Read,Field_Number 0x13
01f3 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01f4 c5fe | | Store 0x2,-0x2
01f5 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01f6 0000 0000 | | .XXX[0x2]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x01fb,0x044e,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f3b
; Debug Table 0xa.0x0 = 0x1fb,0x1
01fc 8238 | 8 | Call 0x1,0x38
01fd 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x1 = 0x1fd,0x2
01fe 0217 | | Execute Heap_Access,All_Reference
01ff 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0200 a5fe | | Store_Unchecked 0x2,-0x2
0201 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0202 0000 0000 | | .BLANK 0000[0x6]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x020b,0x0454,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f47
; Debug Table 0xb.0x0 = 0x20b,0x1
020c 8239 | 9 | Call 0x1,0x39
020d 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1 = 0x20d,0x2
020e 0217 | | Execute Heap_Access,All_Reference
020f 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6
0210 0335 | 5 | Declare_Variable Array,Duplicate
0211 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0212 0000 0000 | | .BLANK 0000[0x6]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x021b,0x045a,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f50
; Debug Table 0xc.0x0 = 0x21b,0x1
021c 8239 | 9 | Call 0x1,0x39
021d 00da | | Load_Top At_Offset_2 ; Debug Table 0xc.0x1 = 0x21d,0x2
021e 0217 | | Execute Heap_Access,All_Reference
021f 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7
0220 0335 | 5 | Declare_Variable Array,Duplicate
0221 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0222 0000 0000 | | .BLANK 0000[0x6]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b 00da | | Load_Top At_Offset_2 ; Debug Table 0xd = .DEBUG 0x022b,0x0460,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f59
; Debug Table 0xd.0x0 = 0x22b,0x1
022c 0217 | | Execute Heap_Access,All_Reference
022d 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
022e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 00da | | Load_Top At_Offset_2 ; Debug Table 0xe = .DEBUG 0x0233,0x0464,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f62
; Debug Table 0xe.0x0 = 0x233,0x1
0234 8239 | 9 | Call 0x1,0x39
0235 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x1 = 0x235,0x2
0236 0217 | | Execute Heap_Access,All_Reference
0237 2c05 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x5
0238 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0239 4501 |E | Exit_Suprogram New_Top_Offset 0x1
023a 0000 0000 | | .BLANK 0000[0x6]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 00da | | Load_Top At_Offset_2 ; Debug Table 0xf = .DEBUG 0x0243,0x046a,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f6a
; Debug Table 0xf.0x0 = 0x243,0x1
0244 021d | | Execute Heap_Access,Is_Null
0245 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0246 0000 0000 | | .XXX[0x2]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b 4608 |F | Jump_Case 0x9 ; Debug Table 0x10 = .DEBUG 0x024b,0x046e,0x0005,0x0000,0x004c,0x5836,0x0000,0x000f
024c 7808 |x | Jump 0x255 ; case 0x0
024d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
024e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
024f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0250 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0251 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
0252 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
0253 7805 |x | Jump 0x259 ; case 0x7
0254 7812 |x | Jump 0x267 ; case 0x8
0255 604a |`J | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x0013e958}
0256 00db | | Load_Top At_Offset_3
0257 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0258 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0259 e5fd | | Load 0x2,-0x3
025a e5fe | | Load 0x2,-0x2
025b 4801 |H | Short_Literal 0x1
025c e5fd | | Load 0x2,-0x3
025d 00e9 | | Load_Encached String_Cache
025e 035b | [ | Declare_Type Array,Constrained
025f 4801 |H | Short_Literal 0x1
0260 e5fe | | Load 0x2,-0x2
0261 00e9 | | Load_Encached String_Cache
0262 035b | [ | Declare_Type Array,Constrained
0263 4802 |H | Short_Literal 0x2
0264 e5ff | | Load 0x2,-0x1
0265 031b | | Declare_Type Variant_Record,Constrained
0266 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
0267 e5fd | | Load 0x2,-0x3
0268 e5fe | | Load 0x2,-0x2
0269 e5ff | | Load 0x2,-0x1
026a 02fc | | Declare_Variable Variant_Record,With_Constraint
026b 4801 |H | Short_Literal 0x1
026c e5fd | | Load 0x2,-0x3
026d 00e9 | | Load_Encached String_Cache
026e 0334 | 4 | Declare_Variable Array,With_Constraint
026f 2d06 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x6
0270 4801 |H | Short_Literal 0x1
0271 e5fe | | Load 0x2,-0x2
0272 00e9 | | Load_Encached String_Cache
0273 0334 | 4 | Declare_Variable Array,With_Constraint
0274 2d07 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x7
0275 016a | j | QQ_execute Variant_Record,XXX
0276 4203 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x3
0277 0000 | | .XXX[0x1]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b 4608 |F | Jump_Case 0x9 ; Debug Table 0x11 = .DEBUG 0x027b,0x0470,0x0005,0x0000,0x004c,0x5836,0x0000,0x0053
027c 7808 |x | Jump 0x285 ; case 0x0
027d 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
027e 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
027f 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0280 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0281 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
0282 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
0283 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
0284 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
0285 601a |` | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x0013e958}
0286 00db | | Load_Top At_Offset_3
0287 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0288 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0289 0000 0000 | | .BLANK 0000[0x7]
0290 ; --------------------------------------------------------------------------------------
0290 ; SUBPROGRAM
0290 ; --------------------------------------------------------------------------------------
0290 0293 | | .CONST 0x0293 ; Address of begin
0291 0004 | | .CONST 0x0004 ; Address of exception handler
0292 0001 | | .CONST 0x0001 ; Number of locals
0293 BODY_0290:
0293 INIT_0290:
0293 00da | | Load_Top At_Offset_2 ; Debug Table 0x12 = .DEBUG 0x0293,0x0472,0x0001,0x0000,0x004c,0x5836,0x0000,0x0084
; Debug Table 0x12.0x0 = 0x293,0x1
0294 e20d | | Load 0x1,0xd
0295 021f | | Execute Heap_Access,Equal
0296 7006 |p | Jump_Nonzero 0x29d
0297 00da | | Load_Top At_Offset_2
0298 0217 | | Execute Heap_Access,All_Reference
0299 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
029a 6005 |` | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x0013e958}
029b 027e | ~ | Execute Discrete,Not_Equal
029c 6802 |h | Jump_Zero 0x29f
029d e211 | | Load 0x1,0x11 ; Debug Table 0x12.0x1 = 0x29d,0x2
029e 0257 | W | Execute Discrete,Raise
029f 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02a0 0000 0000 | | .LITERAL {0x00000000, 0x0013e958}
02a4 0000 0000 | | .LITERAL {0x00000000, 0x004c5836}
02a8 0000 0000 | | .LITERAL {0x00000000, 0x4c50d609}
02ac 0000 0000 | | .LITERAL {0x00000000, 0x4c50d608}
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 00da | | Load_Top At_Offset_2 ; Debug Table 0x13 = .DEBUG 0x02b3,0x0478,0x0001,0x0000,0x004c,0x5836,0x0000,0x00a3
; Debug Table 0x13.0x0 = 0x2b3,0x1
02b4 6806 |h | Jump_Zero 0x2bb
02b5 00da | | Load_Top At_Offset_2
02b6 0217 | | Execute Heap_Access,All_Reference
02b7 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
02b8 67e7 |g | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x0013e958}
02b9 027e | ~ | Execute Discrete,Not_Equal
02ba 6802 |h | Jump_Zero 0x2bd
02bb e220 | | Load 0x1,0x20 ; Debug Table 0x13.0x1 = 0x2bb,0x2
02bc 0257 | W | Execute Discrete,Raise
02bd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02be 0000 0000 | | .XXX[0x2]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; Debug Table
02c0 ; --------------------------------------------------------------------------------------
02c0 0003 0014 | | .CONST 0x0003,0x0014
02c2 000b 0362 | b| .DEBUG 0x000b,0x0362,0x0000,0x0000,0x004c,0x50d6,0x0000,0x0eaa
02ca 0047 039c | G | .DEBUG 0x0047,0x039c,0x0000,0x0000,0x004c,0x5836,0x0000,0x0004
02d2 00b3 03ce | | .DEBUG 0x00b3,0x03ce,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0eb3
02da 00e3 03dc | | .DEBUG 0x00e3,0x03dc,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0ebf
02e2 0123 03f8 | # | .DEBUG 0x0123,0x03f8,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0eca
02ea 013b 03fe | ; | .DEBUG 0x013b,0x03fe,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0ed9
02f2 019b 042a | *| .DEBUG 0x019b,0x042a,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f04
02fa 01c3 043c | <| .DEBUG 0x01c3,0x043c,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f10
0302 01db 0442 | B| .DEBUG 0x01db,0x0442,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f1e
030a 01eb 0448 | H| .DEBUG 0x01eb,0x0448,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f29
0312 01fb 044e | N| .DEBUG 0x01fb,0x044e,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f3b
031a 020b 0454 | T| .DEBUG 0x020b,0x0454,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f47
0322 021b 045a | Z| .DEBUG 0x021b,0x045a,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f50
032a 022b 0460 | + `| .DEBUG 0x022b,0x0460,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f59
0332 0233 0464 | 3 d| .DEBUG 0x0233,0x0464,0x0001,0x0000,0x004c,0x50d6,0x0000,0x0f62
033a 0243 046a | C j| .DEBUG 0x0243,0x046a,0x0002,0x0000,0x004c,0x50d6,0x0000,0x0f6a
0342 024b 046e | K n| .DEBUG 0x024b,0x046e,0x0005,0x0000,0x004c,0x5836,0x0000,0x000f
034a 027b 0470 | { p| .DEBUG 0x027b,0x0470,0x0005,0x0000,0x004c,0x5836,0x0000,0x0053
0352 0293 0472 | r| .DEBUG 0x0293,0x0472,0x0001,0x0000,0x004c,0x5836,0x0000,0x0084
035a 02b3 0478 | x| .DEBUG 0x02b3,0x0478,0x0001,0x0000,0x004c,0x5836,0x0000,0x00a3
0362 ; --------------------------------------------------------------------------------------
0362 ; Debug3 Subtable 0x0
0362 ; --------------------------------------------------------------------------------------
0362 001c 0000 | | .DBG3TAB 0x001c,0x0000
0364 000b ffff | | .CONST 0x000b,0xffff
0366 000c fffe | | .CONST 0x000c,0xfffe
0368 000d fffd | | .CONST 0x000d,0xfffd
036a 000f fffc | | .CONST 0x000f,0xfffc
036c 0011 fffb | | .CONST 0x0011,0xfffb
036e 0013 fffa | | .CONST 0x0013,0xfffa
0370 0015 fff9 | | .CONST 0x0015,0xfff9
0372 0016 fff8 | | .CONST 0x0016,0xfff8
0374 0018 fff7 | | .CONST 0x0018,0xfff7
0376 001a fff6 | | .CONST 0x001a,0xfff6
0378 001c fff5 | | .CONST 0x001c,0xfff5
037a 001e fff4 | | .CONST 0x001e,0xfff4
037c 0020 fff3 | | .CONST 0x0020,0xfff3
037e 0022 fff2 | " | .CONST 0x0022,0xfff2
0380 0023 fff1 | # | .CONST 0x0023,0xfff1
0382 0025 fff0 | % | .CONST 0x0025,0xfff0
0384 0027 ffef | ' | .CONST 0x0027,0xffef
0386 0029 ffee | ) | .CONST 0x0029,0xffee
0388 002b ffed | + | .CONST 0x002b,0xffed
038a 002d ffec | - | .CONST 0x002d,0xffec
038c 002f ffeb | / | .CONST 0x002f,0xffeb
038e 0031 ffea | 1 | .CONST 0x0031,0xffea
0390 0033 ffe9 | 3 | .CONST 0x0033,0xffe9
0392 0037 ffe8 | 7 | .CONST 0x0037,0xffe8
0394 0038 ffe7 | 8 | .CONST 0x0038,0xffe7
0396 003b ffe6 | ; | .CONST 0x003b,0xffe6
0398 0042 ffe5 | B | .CONST 0x0042,0xffe5
039a 0046 ffe4 | F | .CONST 0x0046,0xffe4
039c ; --------------------------------------------------------------------------------------
039c ; Debug3 Subtable 0x1
039c ; --------------------------------------------------------------------------------------
039c 0018 0000 | | .DBG3TAB 0x0018,0x0000
039e 0047 ffff | G | .CONST 0x0047,0xffff
03a0 004b fffe | K | .CONST 0x004b,0xfffe
03a2 004c fffd | L | .CONST 0x004c,0xfffd
03a4 0058 fffc | X | .CONST 0x0058,0xfffc
03a6 0061 fffb | a | .CONST 0x0061,0xfffb
03a8 006a fffa | j | .CONST 0x006a,0xfffa
03aa 0075 fff9 | u | .CONST 0x0075,0xfff9
03ac 007e fff8 | ~ | .CONST 0x007e,0xfff8
03ae 0087 fff7 | | .CONST 0x0087,0xfff7
03b0 0089 fff6 | | .CONST 0x0089,0xfff6
03b2 008b fff5 | | .CONST 0x008b,0xfff5
03b4 008d fff4 | | .CONST 0x008d,0xfff4
03b6 008f fff3 | | .CONST 0x008f,0xfff3
03b8 0091 fff2 | | .CONST 0x0091,0xfff2
03ba 0093 fff1 | | .CONST 0x0093,0xfff1
03bc 0095 fff0 | | .CONST 0x0095,0xfff0
03be 0097 ffef | | .CONST 0x0097,0xffef
03c0 0099 ffee | | .CONST 0x0099,0xffee
03c2 009b ffed | | .CONST 0x009b,0xffed
03c4 009d ffec | | .CONST 0x009d,0xffec
03c6 009f ffeb | | .CONST 0x009f,0xffeb
03c8 00a1 ffea | | .CONST 0x00a1,0xffea
03ca 00a3 ffe9 | | .CONST 0x00a3,0xffe9
03cc 00a5 ffe8 | | .CONST 0x00a5,0xffe8
03ce ; --------------------------------------------------------------------------------------
03ce ; Debug3 Subtable 0x2
03ce ; --------------------------------------------------------------------------------------
03ce 0001 0005 | | .DBG3TAB 0x0001,0x0005
03d0 00b3 ffff | | .CONST 0x00b3,0xffff
03d2 00b7 0001 | | .CONST 0x00b7,0x0001
03d4 00bf 0002 | | .CONST 0x00bf,0x0002
03d6 00c2 0003 | | .CONST 0x00c2,0x0003
03d8 00ca 0004 | | .CONST 0x00ca,0x0004
03da 00d5 0005 | | .CONST 0x00d5,0x0005
03dc ; --------------------------------------------------------------------------------------
03dc ; Debug3 Subtable 0x3
03dc ; --------------------------------------------------------------------------------------
03dc 0002 000b | | .DBG3TAB 0x0002,0x000b
03de 00e3 ffff | | .CONST 0x00e3,0xffff
03e0 00e5 fffe | | .CONST 0x00e5,0xfffe
03e2 00e7 0001 | | .CONST 0x00e7,0x0001
03e4 00e9 0002 | | .CONST 0x00e9,0x0002
03e6 00ea 0003 | | .CONST 0x00ea,0x0003
03e8 00f0 0005 | | .CONST 0x00f0,0x0005
03ea 00f4 0006 | | .CONST 0x00f4,0x0006
03ec 00f8 0007 | | .CONST 0x00f8,0x0007
03ee 00ff 0008 | | .CONST 0x00ff,0x0008
03f0 0102 0004 | | .CONST 0x0102,0x0004
03f2 0105 0009 | | .CONST 0x0105,0x0009
03f4 0110 000a | | .CONST 0x0110,0x000a
03f6 0114 000b | | .CONST 0x0114,0x000b
03f8 ; --------------------------------------------------------------------------------------
03f8 ; Debug3 Subtable 0x4
03f8 ; --------------------------------------------------------------------------------------
03f8 0000 0002 | | .DBG3TAB 0x0000,0x0002
03fa 0123 0001 | # | .CONST 0x0123,0x0001
03fc 0125 0002 | % | .CONST 0x0125,0x0002
03fe ; --------------------------------------------------------------------------------------
03fe ; Debug3 Subtable 0x5
03fe ; --------------------------------------------------------------------------------------
03fe 0004 0011 | | .DBG3TAB 0x0004,0x0011
0400 013b ffff | ; | .CONST 0x013b,0xffff
0402 0140 fffe | @ | .CONST 0x0140,0xfffe
0404 0142 fffd | B | .CONST 0x0142,0xfffd
0406 0144 fffc | D | .CONST 0x0144,0xfffc
0408 014c 0001 | L | .CONST 0x014c,0x0001
040a 014e 0002 | N | .CONST 0x014e,0x0002
040c 0151 0003 | Q | .CONST 0x0151,0x0003
040e 0154 0004 | T | .CONST 0x0154,0x0004
0410 0157 0005 | W | .CONST 0x0157,0x0005
0412 0161 0006 | a | .CONST 0x0161,0x0006
0414 0163 0007 | c | .CONST 0x0163,0x0007
0416 0167 0008 | g | .CONST 0x0167,0x0008
0418 016a 000a | j | .CONST 0x016a,0x000a
041a 016c 000b | l | .CONST 0x016c,0x000b
041c 0171 0009 | q | .CONST 0x0171,0x0009
041e 017a 000c | z | .CONST 0x017a,0x000c
0420 017c 000d | | | .CONST 0x017c,0x000d
0422 0181 000e | | .CONST 0x0181,0x000e
0424 0185 000f | | .CONST 0x0185,0x000f
0426 0187 0010 | | .CONST 0x0187,0x0010
0428 018c 0011 | | .CONST 0x018c,0x0011
042a ; --------------------------------------------------------------------------------------
042a ; Debug3 Subtable 0x6
042a ; --------------------------------------------------------------------------------------
042a 0001 0007 | | .DBG3TAB 0x0001,0x0007
042c 019b ffff | | .CONST 0x019b,0xffff
042e 019d 0001 | | .CONST 0x019d,0x0001
0430 019f 0002 | | .CONST 0x019f,0x0002
0432 01a1 0003 | | .CONST 0x01a1,0x0003
0434 01a7 0005 | | .CONST 0x01a7,0x0005
0436 01b0 0006 | | .CONST 0x01b0,0x0006
0438 01b4 0004 | | .CONST 0x01b4,0x0004
043a 01b8 0007 | | .CONST 0x01b8,0x0007
043c ; --------------------------------------------------------------------------------------
043c ; Debug3 Subtable 0x7
043c ; --------------------------------------------------------------------------------------
043c 0000 0002 | | .DBG3TAB 0x0000,0x0002
043e 01c3 0001 | | .CONST 0x01c3,0x0001
0440 01c5 0002 | | .CONST 0x01c5,0x0002
0442 ; --------------------------------------------------------------------------------------
0442 ; Debug3 Subtable 0x8
0442 ; --------------------------------------------------------------------------------------
0442 0000 0002 | | .DBG3TAB 0x0000,0x0002
0444 01db 0001 | | .CONST 0x01db,0x0001
0446 01dd 0002 | | .CONST 0x01dd,0x0002
0448 ; --------------------------------------------------------------------------------------
0448 ; Debug3 Subtable 0x9
0448 ; --------------------------------------------------------------------------------------
0448 0000 0002 | | .DBG3TAB 0x0000,0x0002
044a 01eb 0001 | | .CONST 0x01eb,0x0001
044c 01ed 0002 | | .CONST 0x01ed,0x0002
044e ; --------------------------------------------------------------------------------------
044e ; Debug3 Subtable 0xa
044e ; --------------------------------------------------------------------------------------
044e 0000 0002 | | .DBG3TAB 0x0000,0x0002
0450 01fb 0001 | | .CONST 0x01fb,0x0001
0452 01fd 0002 | | .CONST 0x01fd,0x0002
0454 ; --------------------------------------------------------------------------------------
0454 ; Debug3 Subtable 0xb
0454 ; --------------------------------------------------------------------------------------
0454 0000 0002 | | .DBG3TAB 0x0000,0x0002
0456 020b 0001 | | .CONST 0x020b,0x0001
0458 020d 0002 | | .CONST 0x020d,0x0002
045a ; --------------------------------------------------------------------------------------
045a ; Debug3 Subtable 0xc
045a ; --------------------------------------------------------------------------------------
045a 0000 0002 | | .DBG3TAB 0x0000,0x0002
045c 021b 0001 | | .CONST 0x021b,0x0001
045e 021d 0002 | | .CONST 0x021d,0x0002
0460 ; --------------------------------------------------------------------------------------
0460 ; Debug3 Subtable 0xd
0460 ; --------------------------------------------------------------------------------------
0460 0000 0001 | | .DBG3TAB 0x0000,0x0001
0462 022b 0001 | + | .CONST 0x022b,0x0001
0464 ; --------------------------------------------------------------------------------------
0464 ; Debug3 Subtable 0xe
0464 ; --------------------------------------------------------------------------------------
0464 0000 0002 | | .DBG3TAB 0x0000,0x0002
0466 0233 0001 | 3 | .CONST 0x0233,0x0001
0468 0235 0002 | 5 | .CONST 0x0235,0x0002
046a ; --------------------------------------------------------------------------------------
046a ; Debug3 Subtable 0xf
046a ; --------------------------------------------------------------------------------------
046a 0000 0001 | | .DBG3TAB 0x0000,0x0001
046c 0243 0001 | C | .CONST 0x0243,0x0001
046e ; --------------------------------------------------------------------------------------
046e ; Debug3 Subtable 0x10
046e ; --------------------------------------------------------------------------------------
046e 0000 0000 | | .DBG3TAB 0x0000,0x0000
0470 ; --------------------------------------------------------------------------------------
0470 ; Debug3 Subtable 0x11
0470 ; --------------------------------------------------------------------------------------
0470 0000 0000 | | .DBG3TAB 0x0000,0x0000
0472 ; --------------------------------------------------------------------------------------
0472 ; Debug3 Subtable 0x12
0472 ; --------------------------------------------------------------------------------------
0472 0000 0002 | | .DBG3TAB 0x0000,0x0002
0474 0293 0001 | | .CONST 0x0293,0x0001
0476 029d 0002 | | .CONST 0x029d,0x0002
0478 ; --------------------------------------------------------------------------------------
0478 ; Debug3 Subtable 0x13
0478 ; --------------------------------------------------------------------------------------
0478 0000 0002 | | .DBG3TAB 0x0000,0x0002
047a 02b3 0001 | | .CONST 0x02b3,0x0001
047c 02bb 0002 | | .CONST 0x02bb,0x0002
047e 0000 0000 | | .BLANK 0000[0x182]