|
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, 5811_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 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 02d0 | | .CONST 0x02d0 ; 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 0099 | | .CONST 0x0099 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 002e | . | .CONST 0x002e ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x038a,0x8000,0x0000,0x0037,0x4164,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 0007 | | Action Break_Optional ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x3 = 0xe,0xfffc
000f 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0010 0129 | ) | Execute Any,Make_Visible
0011 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x4 = 0x11,0xfffb
0012 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0013 0129 | ) | Execute Any,Make_Visible
0014 e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x5 = 0x14,0xfffa
0015 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0016 0129 | ) | Execute Any,Make_Visible
0017 e002 | | Load 0x0,0x2 ; Debug Table 0x0.0x6 = 0x17,0xfff9
0018 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0019 0129 | ) | Execute Any,Make_Visible
001a 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x7 = 0x1a,0xfff8
001c 029a 00b3 | | Declare_Subprogram INIT_00b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x8 = 0x1c,0xfff7
001e 029a 00c3 | | Declare_Subprogram INIT_00c0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x9 = 0x1e,0xfff6
0020 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xa = 0x20,0xfff5
0022 029a 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xb = 0x22,0xfff4
0024 029a 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xc = 0x24,0xfff3
0026 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xd = 0x26,0xfff2
0028 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xe = 0x28,0xfff1
002a 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0xf = 0x2a,0xfff0
002c 029a 0143 | C| Declare_Subprogram INIT_0140,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x10 = 0x2c,0xffef
002e 029a 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x11 = 0x2e,0xffee
0030 029a 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x12 = 0x30,0xffed
0032 029a 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x13 = 0x32,0xffec
0034 029a 01db | | Declare_Subprogram INIT_01d8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x14 = 0x34,0xffeb
0036 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x15 = 0x36,0xffea
0037 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0038 0129 | ) | Execute Any,Make_Visible
0039 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x16 = 0x39,0xffe9
003b 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x17 = 0x3b,0xffe8
003d 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x18 = 0x3d,0xffe7
003f e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x19 = 0x3f,0xffe6
0040 191a | | Execute Package,Field_Reference,Field_Number 0x1a
0041 0129 | ) | Execute Any,Make_Visible
0042 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1a = 0x42,0xffe5
0043 191b | | Execute Package,Field_Reference,Field_Number 0x1b
0044 0129 | ) | Execute Any,Make_Visible
0045 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x1b = 0x45,0xffe4
0046 191c | | Execute Package,Field_Reference,Field_Number 0x1c
0047 0129 | ) | Execute Any,Make_Visible
0048 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1c = 0x48,0xffe3
004a 029a 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1d = 0x4a,0xffe2
004c 00bf | | Action Accept_Activation
004d e003 | | Load 0x0,0x3 ; Debug Table 0x1 = .DEBUG 0x004d,0x03c8,0x8000,0x0000,0x0037,0x4174,0x0000,0x000d
; Debug Table 0x1.0x0 = 0x4d,0xffff
004e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
004f e004 | | Load 0x0,0x4 ; Debug Table 0x1.0x1 = 0x4f,0xfffe
0050 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0051 626a |bj | Indirect_Literal Discrete,0x2bc,{0x00000000, 0x00374174} ; Debug Table 0x1.0x2 = 0x51,0xfffd
0052 481a |H | Short_Literal 0x1a
0053 00e8 | | Load_Encached Character_Cache
0054 e001 | | Load 0x0,0x1
0055 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0056 0387 | | Declare_Variable Package
0057 00d8 | | Load_Top At_Offset_0
0058 020f | | Execute Module,Activate
0059 6262 |bb | Indirect_Literal Discrete,0x2bc,{0x00000000, 0x00374174} ; Debug Table 0x1.0x3 = 0x59,0xfffc
005a 4822 |H" | Short_Literal 0x22
005b e20f | | Load 0x1,0xf
005c e001 | | Load 0x0,0x1
005d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
005e 0387 | | Declare_Variable Package
005f 00d8 | | Load_Top At_Offset_0
0060 020f | | Execute Module,Activate
0061 625a |bZ | Indirect_Literal Discrete,0x2bc,{0x00000000, 0x00374174} ; Debug Table 0x1.0x4 = 0x61,0xfffb
0062 482a |H* | Short_Literal 0x2a
0063 e228 | ( | Load 0x1,0x28
0064 e001 | | Load 0x0,0x1
0065 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0066 0387 | | Declare_Variable Package
0067 00d8 | | Load_Top At_Offset_0
0068 020f | | Execute Module,Activate
0069 6252 |bR | Indirect_Literal Discrete,0x2bc,{0x00000000, 0x00374174} ; Debug Table 0x1.0x5 = 0x69,0xfffa
006a 4832 |H2 | Short_Literal 0x32
006b e229 | ) | Load 0x1,0x29
006c e001 | | Load 0x0,0x1
006d 1b14 | | Execute Package,Field_Read,Field_Number 0x14
006e 0387 | | Declare_Variable Package
006f 00d8 | | Load_Top At_Offset_0
0070 020f | | Execute Module,Activate
0071 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x6 = 0x71,0xfff9
0072 00c7 | | Action Elaborate_Subprogram
0073 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x7 = 0x73,0xfff8
0074 00c7 | | Action Elaborate_Subprogram
0075 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x8 = 0x75,0xfff7
0076 00c7 | | Action Elaborate_Subprogram
0077 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 ; Debug Table 0x1.0x9 = 0x77,0xfff6
0078 00c7 | | Action Elaborate_Subprogram
0079 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0xa = 0x79,0xfff5
007a 00c7 | | Action Elaborate_Subprogram
007b 1d1b | | Execute_Immediate Reference_Lex_1,0x1b ; Debug Table 0x1.0xb = 0x7b,0xfff4
007c 00c7 | | Action Elaborate_Subprogram
007d 1d1a | | Execute_Immediate Reference_Lex_1,0x1a ; Debug Table 0x1.0xc = 0x7d,0xfff3
007e 00c7 | | Action Elaborate_Subprogram
007f 1d1d | | Execute_Immediate Reference_Lex_1,0x1d ; Debug Table 0x1.0xd = 0x7f,0xfff2
0080 00c7 | | Action Elaborate_Subprogram
0081 1d16 | | Execute_Immediate Reference_Lex_1,0x16 ; Debug Table 0x1.0xe = 0x81,0xfff1
0082 00c7 | | Action Elaborate_Subprogram
0083 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0xf = 0x83,0xfff0
0084 00c7 | | Action Elaborate_Subprogram
0085 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x10 = 0x85,0xffef
0086 00c7 | | Action Elaborate_Subprogram
0087 1d18 | | Execute_Immediate Reference_Lex_1,0x18 ; Debug Table 0x1.0x11 = 0x87,0xffee
0088 00c7 | | Action Elaborate_Subprogram
0089 1d1c | | Execute_Immediate Reference_Lex_1,0x1c ; Debug Table 0x1.0x12 = 0x89,0xffed
008a 00c7 | | Action Elaborate_Subprogram
008b 029d 025b | [| Declare_Subprogram INIT_0258,For_Outer_Call ; Debug Table 0x1.0x13 = 0x8b,0xffec
008d 1d1e | | Execute_Immediate Reference_Lex_1,0x1e ; Debug Table 0x1.0x14 = 0x8d,0xffeb
008e 00c7 | | Action Elaborate_Subprogram
008f 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0x15 = 0x8f,0xffea
0090 00c7 | | Action Elaborate_Subprogram
0091 1d20 | | Execute_Immediate Reference_Lex_1,0x20 ; Debug Table 0x1.0x16 = 0x91,0xffe9
0092 00c7 | | Action Elaborate_Subprogram
0093 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 ; Debug Table 0x1.0x17 = 0x93,0xffe8
0094 00c7 | | Action Elaborate_Subprogram
0095 1d26 | & | Execute_Immediate Reference_Lex_1,0x26 ; Debug Table 0x1.0x18 = 0x95,0xffe7
0096 00c7 | | Action Elaborate_Subprogram
0097 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27 ; Debug Table 0x1.0x19 = 0x97,0xffe6
0098 00c7 | | Action Elaborate_Subprogram
0099 BODY_0008:
0099 00bc | | Action Signal_Activated
009a 00bb | | Action Signal_Completion
009b 0000 0000 | | .BLANK 0000[0x5]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 00db | | Load_Top At_Offset_3 ; Debug Table 0x2 = .DEBUG 0x00a3,0x03fe,0x0001,0x0000,0x0037,0x4164,0x0000,0x0033
; Debug Table 0x2.0x0 = 0xa3,0x1
00a4 4865 |He | Short_Literal 0x65
00a5 e5ff | | Load 0x2,-0x1
00a6 4800 |H | Short_Literal 0x0
00a7 e001 | | Load 0x0,0x1
00a8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00a9 c5fe | | Store 0x2,-0x2
00aa 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00ab 0000 0000 | | .BLANK 0000[0x5]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3 | | .CONST 0x00b3 ; Address of begin
00b1 0004 | | .CONST 0x0004 ; Address of exception handler
00b2 0001 | | .CONST 0x0001 ; Number of locals
00b3 BODY_00b0:
00b3 INIT_00b0:
00b3 00db | | Load_Top At_Offset_3 ; Debug Table 0x3 = .DEBUG 0x00b3,0x0402,0x0001,0x0000,0x0037,0x4164,0x0000,0x003f
; Debug Table 0x3.0x0 = 0xb3,0x1
00b4 4865 |He | Short_Literal 0x65
00b5 e5ff | | Load 0x2,-0x1
00b6 4801 |H | Short_Literal 0x1
00b7 e001 | | Load 0x0,0x1
00b8 1810 | | Execute Package,Field_Execute,Field_Number 0x10
00b9 c5fe | | Store 0x2,-0x2
00ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00bb 0000 0000 | | .BLANK 0000[0x5]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3 | | .CONST 0x00c3 ; Address of begin
00c1 0004 | | .CONST 0x0004 ; Address of exception handler
00c2 0001 | | .CONST 0x0001 ; Number of locals
00c3 BODY_00c0:
00c3 INIT_00c0:
00c3 00da | | Load_Top At_Offset_2 ; Debug Table 0x4 = .DEBUG 0x00c3,0x0406,0x0001,0x0000,0x0037,0x4164,0x0000,0x004b
; Debug Table 0x4.0x0 = 0xc3,0x1
00c4 4801 |H | Short_Literal 0x1
00c5 e001 | | Load 0x0,0x1
00c6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00c7 c5ff | | Store 0x2,-0x1
00c8 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00c9 0000 0000 | | .BLANK 0000[0x7]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 00db | | Load_Top At_Offset_3 ; Debug Table 0x5 = .DEBUG 0x00d3,0x040a,0x0001,0x0000,0x0037,0x4164,0x0000,0x0053
; Debug Table 0x5.0x0 = 0xd3,0x1
00d4 00db | | Load_Top At_Offset_3
00d5 e22a | * | Load 0x1,0x2a
00d6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00d7 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00db | | .CONST 0x00db ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0001 | | .CONST 0x0001 ; Number of locals
00db BODY_00d8:
00db INIT_00d8:
00db 00db | | Load_Top At_Offset_3 ; Debug Table 0x6 = .DEBUG 0x00db,0x040e,0x0001,0x0000,0x0037,0x4164,0x0000,0x005f
; Debug Table 0x6.0x0 = 0xdb,0x1
00dc 01dc | | Execute Vector,Last
00dd e5fe | | Load 0x2,-0x2
00de 01dd | | Execute Vector,First
00df 0263 | c | Execute Discrete,Above_Bound
00e0 7007 |p | Jump_Nonzero 0xe8
00e1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x6.0x1 = 0xe1,0x2
00e2 e5fe | | Load 0x2,-0x2
00e3 01d7 | | Execute Vector,Field_Read
00e4 e5ff | | Load 0x2,-0x1
00e5 e22a | * | Load 0x1,0x2a
00e6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00e7 3ff9 |? | Loop_Increasing 0xe1
00e8 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00e9 0000 0000 | | .BLANK 0000[0x7]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f3 | | .CONST 0x00f3 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0001 | | .CONST 0x0001 ; Number of locals
00f3 BODY_00f0:
00f3 INIT_00f0:
00f3 480a |H | Short_Literal 0xa ; Debug Table 0x7 = .DEBUG 0x00f3,0x0414,0x0001,0x0000,0x0037,0x4164,0x0000,0x006b
; Debug Table 0x7.0x0 = 0xf3,0x1
00f4 00db | | Load_Top At_Offset_3
00f5 e22a | * | Load 0x1,0x2a
00f6 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00f7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fb | | .CONST 0x00fb ; Address of begin
00f9 0004 | | .CONST 0x0004 ; Address of exception handler
00fa 0001 | | .CONST 0x0001 ; Number of locals
00fb BODY_00f8:
00fb INIT_00f8:
00fb 00db | | Load_Top At_Offset_3 ; Debug Table 0x8 = .DEBUG 0x00fb,0x0418,0x0001,0x0000,0x0037,0x4164,0x0000,0x0073
; Debug Table 0x8.0x0 = 0xfb,0x1
00fc 00db | | Load_Top At_Offset_3
00fd e22b | + | Load 0x1,0x2b
00fe 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00ff 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 00db | | Load_Top At_Offset_3 ; Debug Table 0x9 = .DEBUG 0x0103,0x041c,0x0001,0x0000,0x0037,0x4164,0x0000,0x007f
; Debug Table 0x9.0x0 = 0x103,0x1
0104 01db | | Execute Vector,Length
0105 61b2 |a | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x00000400}
0106 027f | | Execute Discrete,Equal
0107 680c |h | Jump_Zero 0x114
0108 00db | | Load_Top At_Offset_3
0109 01dd | | Execute Vector,First
010a 0f01 | | Execute_Immediate Equal,0x1
010b 6808 |h | Jump_Zero 0x114
010c 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x1 = 0x10c,0x2
010d e003 | | Load 0x0,0x3
010e 1b0f | | Execute Package,Field_Read,Field_Number 0xf
010f 01c3 | | Execute Vector,Check_In_Type
0110 00db | | Load_Top At_Offset_3
0111 e22c | , | Load 0x1,0x2c
0112 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0113 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0114 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x2 = 0x114,0x3
0115 01db | | Execute Vector,Length
0116 0ffb | | Execute_Immediate Equal,-0x5
0117 680c |h | Jump_Zero 0x124
0118 00db | | Load_Top At_Offset_3
0119 01dd | | Execute Vector,First
011a 0f01 | | Execute_Immediate Equal,0x1
011b 6808 |h | Jump_Zero 0x124
011c 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x3 = 0x11c,0x4
011d e004 | | Load 0x0,0x4
011e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011f 01c3 | | Execute Vector,Check_In_Type
0120 00db | | Load_Top At_Offset_3
0121 e22d | - | Load 0x1,0x2d
0122 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0123 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0124 00db | | Load_Top At_Offset_3 ; Debug Table 0x9.0x4 = 0x124,0x5
0125 01d9 | | Execute Vector,Reverse_Bounds
0126 0263 | c | Execute Discrete,Above_Bound
0127 7007 |p | Jump_Nonzero 0x12f
0128 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x5 = 0x128,0x6
0129 e5fe | | Load 0x2,-0x2
012a 01d7 | | Execute Vector,Field_Read
012b e5ff | | Load 0x2,-0x1
012c e22b | + | Load 0x1,0x2b
012d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
012e 3ff9 |? | Loop_Increasing 0x128
012f 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133 | 3 | .CONST 0x0133 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0001 | | .CONST 0x0001 ; Number of locals
0133 BODY_0130:
0133 INIT_0130:
0133 4800 |H | Short_Literal 0x0 ; Debug Table 0xa = .DEBUG 0x0133,0x042a,0x0001,0x0000,0x0037,0x4164,0x0000,0x008b
; Debug Table 0xa.0x0 = 0x133,0x1
0134 00db | | Load_Top At_Offset_3
0135 e22a | * | Load 0x1,0x2a
0136 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0137 a5fe | | Store_Unchecked 0x2,-0x2
0138 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0139 0000 0000 | | .BLANK 0000[0x7]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0143 | C | .CONST 0x0143 ; Address of begin
0141 0004 | | .CONST 0x0004 ; Address of exception handler
0142 0001 | | .CONST 0x0001 ; Number of locals
0143 BODY_0140:
0143 INIT_0140:
0143 4800 |H | Short_Literal 0x0 ; Debug Table 0xb = .DEBUG 0x0143,0x042e,0x0001,0x0000,0x0037,0x4164,0x0000,0x0097
; Debug Table 0xb.0x0 = 0x143,0x1
0144 00db | | Load_Top At_Offset_3
0145 e22b | + | Load 0x1,0x2b
0146 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0147 a5fe | | Store_Unchecked 0x2,-0x2
0148 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0149 0000 0000 | | .BLANK 0000[0x7]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0158 | X | .CONST 0x0158 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0003 | | .CONST 0x0003 ; Number of locals
0153 INIT_0150:
0153 00db | | Load_Top At_Offset_3 ; Debug Table 0xc = .DEBUG 0x0153,0x0432,0x0001,0x0000,0x0037,0x4164,0x0000,0x00a3
; Debug Table 0xc.0x0 = 0x153,0xffff
0154 01dd | | Execute Vector,First
0155 00e3 | | Load_Encached Natural_Cache
0156 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0157 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xc.0x1 = 0x157,0xfffe
0158 BODY_0150:
0158 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x2 = 0x158,0x1
0159 01db | | Execute Vector,Length
015a 615d |a] | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x00000400}
015b 027f | | Execute Discrete,Equal
015c 6807 |h | Jump_Zero 0x164
015d 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x3 = 0x15d,0x2
015e e5ff | | Load 0x2,-0x1
015f e22c | , | Load 0x1,0x2c
0160 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0161 e5fe | | Load 0x2,-0x2
0162 01d4 | | Execute Vector,Structure_Write
0163 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0164 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x4 = 0x164,0x3
0165 01db | | Execute Vector,Length
0166 0ffb | | Execute_Immediate Equal,-0x5
0167 6807 |h | Jump_Zero 0x16f
0168 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x5 = 0x168,0x4
0169 e5ff | | Load 0x2,-0x1
016a e22d | - | Load 0x1,0x2d
016b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
016c e5fe | | Load 0x2,-0x2
016d 01d4 | | Execute Vector,Structure_Write
016e 4502 |E | Exit_Suprogram New_Top_Offset 0x2
016f 0007 | | Action Break_Optional ; Debug Table 0xc.0x6 = 0x16f,0x5
0170 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0x7 = 0x170,0x6
0171 6146 |aF | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x00000400}
0172 0273 | s | Execute Discrete,Plus
0173 0248 | H | Execute Discrete,Check_In_Integer
0174 0aff | | Execute_Immediate Plus,-0x1
0175 0059 | Y | Store_Top Discrete,At_Offset_1
0176 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0x8 = 0x176,0x7
0177 e5fe | | Load 0x2,-0x2
0178 01dc | | Execute Vector,Last
0179 027d | } | Execute Discrete,Greater
017a 700d |p | Jump_Nonzero 0x188
017b 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x9 = 0x17b,0x8
017c e5ff | | Load 0x2,-0x1
017d e22c | , | Load 0x1,0x2c
017e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
017f 00da | | Load_Top At_Offset_2
0180 00da | | Load_Top At_Offset_2
0181 e5fe | | Load 0x2,-0x2
0182 01ce | | Execute Vector,Slice_Write
0183 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0xa = 0x183,0x9
0184 6133 |a3 | Indirect_Literal Discrete,0x2b8,{0x00000000, 0x00000400}
0185 0273 | s | Execute Discrete,Plus
0186 005a | Z | Store_Top Discrete,At_Offset_2
0187 7fe8 | | Jump 0x170
0188 0007 | | Action Break_Optional ; Debug Table 0xc.0xb = 0x188,0xa
0189 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0xc = 0x189,0xb
018a 48fb |H | Short_Literal 0xfb
018b 0273 | s | Execute Discrete,Plus
018c 0248 | H | Execute Discrete,Check_In_Integer
018d 0aff | | Execute_Immediate Plus,-0x1
018e 0059 | Y | Store_Top Discrete,At_Offset_1
018f 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xc.0xd = 0x18f,0xc
0190 e5fe | | Load 0x2,-0x2
0191 01dc | | Execute Vector,Last
0192 027d | } | Execute Discrete,Greater
0193 700d |p | Jump_Nonzero 0x1a1
0194 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0xe = 0x194,0xd
0195 e5ff | | Load 0x2,-0x1
0196 e22d | - | Load 0x1,0x2d
0197 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0198 00da | | Load_Top At_Offset_2
0199 00da | | Load_Top At_Offset_2
019a e5fe | | Load 0x2,-0x2
019b 01ce | | Execute Vector,Slice_Write
019c 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xc.0xf = 0x19c,0xe
019d 48fb |H | Short_Literal 0xfb
019e 0273 | s | Execute Discrete,Plus
019f 005a | Z | Store_Top Discrete,At_Offset_2
01a0 7fe8 | | Jump 0x189
01a1 e5fe | | Load 0x2,-0x2 ; Debug Table 0xc.0x10 = 0x1a1,0xf
01a2 01dc | | Execute Vector,Last
01a3 00da | | Load_Top At_Offset_2
01a4 0263 | c | Execute Discrete,Above_Bound
01a5 7008 |p | Jump_Nonzero 0x1ae
01a6 4800 |H | Short_Literal 0x0 ; Debug Table 0xc.0x11 = 0x1a6,0x10
01a7 e5ff | | Load 0x2,-0x1
01a8 e22b | + | Load 0x1,0x2b
01a9 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01aa 00d9 | | Load_Top At_Offset_1
01ab e5fe | | Load 0x2,-0x2
01ac 01d6 | | Execute Vector,Field_Write
01ad 3ff8 |? | Loop_Increasing 0x1a6
01ae 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01af 0000 | | .XXX[0x1]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01c1 | | .CONST 0x01c1 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0003 | | .CONST 0x0003 ; Number of locals
01b3 INIT_01b0:
01b3 e001 | | Load 0x0,0x1 ; Debug Table 0xd = .DEBUG 0x01b3,0x0458,0x0002,0x0000,0x0037,0x4164,0x0000,0x00af
; Debug Table 0xd.0x0 = 0x1b3,0xffff
01b4 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
01b5 0248 | H | Execute Discrete,Check_In_Integer
01b6 00e2 | | Load_Encached Integer_Cache
01b7 03f1 | | Declare_Variable Discrete,With_Value
01b8 4800 |H | Short_Literal 0x0 ; Debug Table 0xd.0x1 = 0x1b8,0xfffe
01b9 e5ff | | Load 0x2,-0x1
01ba e001 | | Load 0x0,0x1
01bb 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01bc 0248 | H | Execute Discrete,Check_In_Integer
01bd 0aff | | Execute_Immediate Plus,-0x1
01be 0248 | H | Execute Discrete,Check_In_Integer
01bf 00e2 | | Load_Encached Integer_Cache
01c0 03f1 | | Declare_Variable Discrete,With_Value
01c1 BODY_01b0:
01c1 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xd.0x2 = 0x1c1,0x1
01c2 00da | | Load_Top At_Offset_2
01c3 0272 | r | Execute Discrete,Minus
01c4 0a07 | | Execute_Immediate Plus,0x7
01c5 0248 | H | Execute Discrete,Check_In_Integer
01c6 09fd | | Execute_Immediate Binary_Scale,-0x3
01c7 00e3 | | Load_Encached Natural_Cache
01c8 025b | [ | Execute Discrete,Check_In_Type
01c9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01ca 0000 0000 | | .BLANK 0000[0x6]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3 | | .CONST 0x01d3 ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0001 | | .CONST 0x0001 ; Number of locals
01d3 BODY_01d0:
01d3 INIT_01d0:
01d3 4800 |H | Short_Literal 0x0 ; Debug Table 0xe = .DEBUG 0x01d3,0x0460,0x0002,0x0000,0x0037,0x4164,0x0000,0x00b8
; Debug Table 0xe.0x0 = 0x1d3,0x1
01d4 00db | | Load_Top At_Offset_3
01d5 e001 | | Load 0x0,0x1
01d6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01d7 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01e3 | | .CONST 0x01e3 ; Address of begin
01d9 0004 | | .CONST 0x0004 ; Address of exception handler
01da 0003 | | .CONST 0x0003 ; Number of locals
01db INIT_01d8:
01db e20d | | Load 0x1,0xd ; Debug Table 0xf = .DEBUG 0x01db,0x0464,0x0001,0x0000,0x0037,0x4164,0x0000,0x00c1
; Debug Table 0xf.0x0 = 0x1db,0xffff
01dc 02c7 | | Declare_Variable Any
01dd 00d8 | | Load_Top At_Offset_0
01de 1c00 | | Execute_Immediate Run_Utility,0x0
01df e20d | | Load 0x1,0xd ; Debug Table 0xf.0x1 = 0x1df,0xfffe
01e0 02c7 | | Declare_Variable Any
01e1 00d8 | | Load_Top At_Offset_0
01e2 1c00 | | Execute_Immediate Run_Utility,0x0
01e3 BODY_01d8:
01e3 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x2 = 0x1e3,0x1
01e4 e5ff | | Load 0x2,-0x1
01e5 8211 | | Call 0x1,0x11
01e6 c402 | | Store 0x2,0x2
01e7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x3 = 0x1e7,0x2
01e8 e5fe | | Load 0x2,-0x2
01e9 8212 | | Call 0x1,0x12
01ea c403 | | Store 0x2,0x3
01eb 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x4 = 0x1eb,0x3
01ec 00da | | Load_Top At_Offset_2
01ed 822e | . | Call 0x1,0x2e
01ee c402 | | Store 0x2,0x2
01ef c403 | | Store 0x2,0x3
01f0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xf.0x5 = 0x1f0,0x4
01f1 8213 | | Call 0x1,0x13
01f2 c402 | | Store 0x2,0x2
01f3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xf.0x6 = 0x1f3,0x5
01f4 8213 | | Call 0x1,0x13
01f5 c403 | | Store 0x2,0x3
01f6 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01f7 0000 | | .XXX[0x1]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01ff | | .CONST 0x01ff ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0002 | | .CONST 0x0002 ; Number of locals
01fb INIT_01f8:
01fb e20d | | Load 0x1,0xd ; Debug Table 0x10 = .DEBUG 0x01fb,0x0474,0x0002,0x0000,0x0037,0x4164,0x0000,0x00d9
; Debug Table 0x10.0x0 = 0x1fb,0xffff
01fc 02c7 | | Declare_Variable Any
01fd 00d8 | | Load_Top At_Offset_0
01fe 1c00 | | Execute_Immediate Run_Utility,0x0
01ff BODY_01f8:
01ff 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x1 = 0x1ff,0x1
0200 e5ff | | Load 0x2,-0x1
0201 8211 | | Call 0x1,0x11
0202 c402 | | Store 0x2,0x2
0203 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x10.0x2 = 0x203,0x2
0204 8213 | | Call 0x1,0x13
0205 c402 | | Store 0x2,0x2
0206 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x3 = 0x206,0x3
0207 0335 | 5 | Declare_Variable Array,Duplicate
0208 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0209 0000 0000 | | .BLANK 0000[0x7]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 021c | | .CONST 0x021c ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0005 | | .CONST 0x0005 ; Number of locals
0213 INIT_0210:
0213 00f0 | | Load_Encached Segment_Cache ; Debug Table 0x11 = .DEBUG 0x0213,0x047e,0x0002,0x0000,0x0037,0x4164,0x0000,0x00e2
; Debug Table 0x11.0x0 = 0x213,0xffff
0214 e20d | | Load 0x1,0xd ; Debug Table 0x11.0x1 = 0x214,0xfffe
0215 02c7 | | Declare_Variable Any
0216 00d8 | | Load_Top At_Offset_0
0217 1c00 | | Execute_Immediate Run_Utility,0x0
0218 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x11.0x2 = 0x218,0xfffd
0219 0007 | | Action Break_Optional ; Debug Table 0x11.0x3 = 0x219,0xfffc
021a 029f 028b | | Declare_Subprogram INIT_0288,For_Call ; Debug Table 0x11.0x4 = 0x21a,0xfffb
021c BODY_0210:
021c 00da | | Load_Top At_Offset_2 ; Debug Table 0x11.0x5 = 0x21c,0x1
021d e5ff | | Load 0x2,-0x1
021e 8211 | | Call 0x1,0x11
021f c403 | | Store 0x2,0x3
0220 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x6 = 0x220,0x2
0221 00db | | Load_Top At_Offset_3
0222 e001 | | Load 0x0,0x1
0223 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0224 a402 | | Store_Unchecked 0x2,0x2
0225 4800 |H | Short_Literal 0x0 ; Debug Table 0x11.0x7 = 0x225,0x3
0226 00db | | Load_Top At_Offset_3
0227 e001 | | Load 0x0,0x1
0228 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0229 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
022a 00da | | Load_Top At_Offset_2 ; Debug Table 0x11.0x8 = 0x22a,0x4
022b 8213 | | Call 0x1,0x13
022c c403 | | Store 0x2,0x3
022d 00db | | Load_Top At_Offset_3 ; Debug Table 0x11.0x9 = 0x22d,0x5
022e 8405 | | Call 0x2,0x5
022f 4820 |H | Short_Literal 0x20
0230 480a |H | Short_Literal 0xa
0231 480a |H | Short_Literal 0xa
0232 e404 | | Load 0x2,0x4
0233 0a01 | | Execute_Immediate Plus,0x1
0234 e005 | | Load 0x0,0x5
0235 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0236 01cc | | Execute Vector,Catenate
0237 0092 02c0 | | Action Push_String_Extended,0x2c0 ; " "
0239 01cc | | Execute Vector,Catenate
023a e5ff | | Load 0x2,-0x1
023b 01cc | | Execute Vector,Catenate
023c 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
023d 0000 0000 | | .XXX[0x3]
023f 0000 | |
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 0x12 = .DEBUG 0x0243,0x0494,0x0001,0x0000,0x0037,0x4164,0x0000,0x00eb
; Debug Table 0x12.0x0 = 0x243,0x1
0244 e001 | | Load 0x0,0x1
0245 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0246 c5ff | | Store 0x2,-0x1
0247 4501 |E | Exit_Suprogram New_Top_Offset 0x1
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 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x13 = .DEBUG 0x024b,0x0498,0x0001,0x0000,0x0037,0x4164,0x0000,0x0119
; Debug Table 0x13.0x0 = 0x24b,0x1
024c 0000 0000 | | .BLANK 0000[0x4]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 0253 | S | .CONST 0x0253 ; Address of begin
0251 0004 | | .CONST 0x0004 ; Address of exception handler
0252 0001 | | .CONST 0x0001 ; Number of locals
0253 BODY_0250:
0253 INIT_0250:
0253 00ea | | Load_Encached Null_String_Cache ; Debug Table 0x14 = .DEBUG 0x0253,0x049c,0x0002,0x0000,0x0037,0x4164,0x0000,0x0121
; Debug Table 0x14.0x0 = 0x253,0x1
0254 00ca | | Action Exit_Nullary_Function
0255 0000 0000 | | .XXX[0x3]
0257 0000 | |
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0277 | w | .CONST 0x0277 ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0005 | | .CONST 0x0005 ; Number of locals
025b INIT_0258:
025b e001 | | Load 0x0,0x1 ; Debug Table 0x15 = .DEBUG 0x025b,0x04a0,0x0001,0x0000,0x0037,0x4174,0x0000,0x026e
; Debug Table 0x15.0x0 = 0x25b,0xffff
025c 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
025d 0248 | H | Execute Discrete,Check_In_Integer
025e 00e2 | | Load_Encached Integer_Cache
025f 03f1 | | Declare_Variable Discrete,With_Value
0260 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x1 = 0x260,0xfffe
0261 e5ff | | Load 0x2,-0x1
0262 e001 | | Load 0x0,0x1
0263 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0264 0248 | H | Execute Discrete,Check_In_Integer
0265 0aff | | Execute_Immediate Plus,-0x1
0266 0248 | H | Execute Discrete,Check_In_Integer
0267 00e2 | | Load_Encached Integer_Cache
0268 03f1 | | Declare_Variable Discrete,With_Value
0269 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x15.0x2 = 0x269,0xfffd
026a 00d9 | | Load_Top At_Offset_1
026b 00e1 | | Load_Encached Boolean_Cache
026c 02a0 | | Declare_Subprogram Null_Subprogram
026d 4801 |H | Short_Literal 0x1
026e 035d | ] | Declare_Type Array,Defined
026f 604c |`L | Indirect_Literal Discrete,0x2bc,{0x00000000, 0x00374174} ; Debug Table 0x15.0x3 = 0x26f,0xfffc
0270 4aa0 |J | Short_Literal 0x2a0
0271 00da | | Load_Top At_Offset_2
0272 e001 | | Load 0x0,0x1
0273 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0274 0387 | | Declare_Variable Package
0275 00d8 | | Load_Top At_Offset_0
0276 020f | | Execute Module,Activate
0277 BODY_0258:
0277 00da | | Load_Top At_Offset_2 ; Debug Table 0x15.0x4 = 0x277,0x1
0278 e402 | | Load 0x2,0x2
0279 027b | { | Execute Discrete,Greater_Equal
027a 6807 |h | Jump_Zero 0x282
027b 4800 |H | Short_Literal 0x0 ; Debug Table 0x15.0x5 = 0x27b,0x2
027c e5ff | | Load 0x2,-0x1
027d 00da | | Load_Top At_Offset_2
027e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
027f e5fe | | Load 0x2,-0x2
0280 00da | | Load_Top At_Offset_2
0281 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0282 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0283 0000 0000 | | .BLANK 0000[0x5]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028e | | .CONST 0x028e ; Address of begin
0289 0004 | | .CONST 0x0004 ; Address of exception handler
028a 0002 | | .CONST 0x0002 ; Number of locals
028b INIT_0288:
028b e006 | | Load 0x0,0x6 ; Debug Table 0x16 = .DEBUG 0x028b,0x04ae,0x0002,0x0000,0x0037,0x4174,0x0000,0x0361
; Debug Table 0x16.0x0 = 0x28b,0xffff
028c 1b14 | | Execute Package,Field_Read,Field_Number 0x14
028d 0322 | " | Declare_Variable Record
028e BODY_0288:
028e 00db | | Load_Top At_Offset_3 ; Debug Table 0x16.0x1 = 0x28e,0x1
028f e007 | | Load 0x0,0x7
0290 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0291 00d9 | | Load_Top At_Offset_1
0292 017d | } | Execute Record,Structure_Write
0293 0092 02c1 | | Action Push_String_Extended,0x2c1 ; "[16#"
; Debug Table 0x16.0x2 = 0x293,0x2
0295 4830 |H0 | Short_Literal 0x30
0296 4802 |H | Short_Literal 0x2
0297 4810 |H | Short_Literal 0x10
0298 e602 | | Load 0x3,0x2
0299 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
029a e005 | | Load 0x0,0x5
029b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
029c 01cc | | Execute Vector,Catenate
029d 0092 02c2 | | Action Push_String_Extended,0x2c2 ; "#, "
029f 01cc | | Execute Vector,Catenate
02a0 00d9 | | Load_Top At_Offset_1
02a1 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
02a2 e006 | | Load 0x0,0x6
02a3 1b12 | | Execute Package,Field_Read,Field_Number 0x12
02a4 025e | ^ | Execute Discrete,Convert
02a5 1c01 | | Execute_Immediate Run_Utility,0x1
02a6 01cc | | Execute Vector,Catenate
02a7 0092 02c3 | | Action Push_String_Extended,0x2c3 ; ", 16#"
02a9 01cc | | Execute Vector,Catenate
02aa 4830 |H0 | Short_Literal 0x30
02ab 4806 |H | Short_Literal 0x6
02ac 4810 |H | Short_Literal 0x10
02ad e602 | | Load 0x3,0x2
02ae 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
02af e005 | | Load 0x0,0x5
02b0 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02b1 01cc | | Execute Vector,Catenate
02b2 0092 02c4 | | Action Push_String_Extended,0x2c4 ; "#] "
02b4 01cc | | Execute Vector,Catenate
02b5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
02b6 0000 0000 | | .XXX[0x2]
02b8 0000 0000 | | .LITERAL {0x00000000, 0x00000400}
02bc 0000 0000 | | .LITERAL {0x00000000, 0x00374174}
02c0 ; --------------------------------------------------------------------------------------
02c0 ; STRING TABLE
02c0 ; --------------------------------------------------------------------------------------
02c0 000c | | .STRTAB 0x000c->0x02c6 ; " "
02c1 000c | | .STRTAB 0x000c->0x02c7 ; "[16#"
02c2 000e | | .STRTAB 0x000e->0x02c9 ; "#, "
02c3 000f | | .STRTAB 0x000f->0x02ca ; ", 16#"
02c4 0012 | | .STRTAB 0x0012->0x02cd ; "#] "
02c5 0014 | | .STREND 0x0014->0x02cf
02c6 2020 5b31 | [1| .STRTAB_STRINGS
02cf 0000 | | .XXX[0x1]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug Table
02d0 ; --------------------------------------------------------------------------------------
02d0 0003 0017 | | .CONST 0x0003,0x0017
02d2 000b 038a | | .DEBUG 0x000b,0x038a,0x8000,0x0000,0x0037,0x4164,0x0000,0x0009
02da 004d 03c8 | M | .DEBUG 0x004d,0x03c8,0x8000,0x0000,0x0037,0x4174,0x0000,0x000d
02e2 00a3 03fe | | .DEBUG 0x00a3,0x03fe,0x0001,0x0000,0x0037,0x4164,0x0000,0x0033
02ea 00b3 0402 | | .DEBUG 0x00b3,0x0402,0x0001,0x0000,0x0037,0x4164,0x0000,0x003f
02f2 00c3 0406 | | .DEBUG 0x00c3,0x0406,0x0001,0x0000,0x0037,0x4164,0x0000,0x004b
02fa 00d3 040a | | .DEBUG 0x00d3,0x040a,0x0001,0x0000,0x0037,0x4164,0x0000,0x0053
0302 00db 040e | | .DEBUG 0x00db,0x040e,0x0001,0x0000,0x0037,0x4164,0x0000,0x005f
030a 00f3 0414 | | .DEBUG 0x00f3,0x0414,0x0001,0x0000,0x0037,0x4164,0x0000,0x006b
0312 00fb 0418 | | .DEBUG 0x00fb,0x0418,0x0001,0x0000,0x0037,0x4164,0x0000,0x0073
031a 0103 041c | | .DEBUG 0x0103,0x041c,0x0001,0x0000,0x0037,0x4164,0x0000,0x007f
0322 0133 042a | 3 *| .DEBUG 0x0133,0x042a,0x0001,0x0000,0x0037,0x4164,0x0000,0x008b
032a 0143 042e | C .| .DEBUG 0x0143,0x042e,0x0001,0x0000,0x0037,0x4164,0x0000,0x0097
0332 0153 0432 | S 2| .DEBUG 0x0153,0x0432,0x0001,0x0000,0x0037,0x4164,0x0000,0x00a3
033a 01b3 0458 | X| .DEBUG 0x01b3,0x0458,0x0002,0x0000,0x0037,0x4164,0x0000,0x00af
0342 01d3 0460 | `| .DEBUG 0x01d3,0x0460,0x0002,0x0000,0x0037,0x4164,0x0000,0x00b8
034a 01db 0464 | d| .DEBUG 0x01db,0x0464,0x0001,0x0000,0x0037,0x4164,0x0000,0x00c1
0352 01fb 0474 | t| .DEBUG 0x01fb,0x0474,0x0002,0x0000,0x0037,0x4164,0x0000,0x00d9
035a 0213 047e | ~| .DEBUG 0x0213,0x047e,0x0002,0x0000,0x0037,0x4164,0x0000,0x00e2
0362 0243 0494 | C | .DEBUG 0x0243,0x0494,0x0001,0x0000,0x0037,0x4164,0x0000,0x00eb
036a 024b 0498 | K | .DEBUG 0x024b,0x0498,0x0001,0x0000,0x0037,0x4164,0x0000,0x0119
0372 0253 049c | S | .DEBUG 0x0253,0x049c,0x0002,0x0000,0x0037,0x4164,0x0000,0x0121
037a 025b 04a0 | [ | .DEBUG 0x025b,0x04a0,0x0001,0x0000,0x0037,0x4174,0x0000,0x026e
0382 028b 04ae | | .DEBUG 0x028b,0x04ae,0x0002,0x0000,0x0037,0x4174,0x0000,0x0361
038a ; --------------------------------------------------------------------------------------
038a ; Debug3 Subtable 0x0
038a ; --------------------------------------------------------------------------------------
038a 001e 0000 | | .DBG3TAB 0x001e,0x0000
038c 000b ffff | | .CONST 0x000b,0xffff
038e 000c fffe | | .CONST 0x000c,0xfffe
0390 000d fffd | | .CONST 0x000d,0xfffd
0392 000e fffc | | .CONST 0x000e,0xfffc
0394 0011 fffb | | .CONST 0x0011,0xfffb
0396 0014 fffa | | .CONST 0x0014,0xfffa
0398 0017 fff9 | | .CONST 0x0017,0xfff9
039a 001a fff8 | | .CONST 0x001a,0xfff8
039c 001c fff7 | | .CONST 0x001c,0xfff7
039e 001e fff6 | | .CONST 0x001e,0xfff6
03a0 0020 fff5 | | .CONST 0x0020,0xfff5
03a2 0022 fff4 | " | .CONST 0x0022,0xfff4
03a4 0024 fff3 | $ | .CONST 0x0024,0xfff3
03a6 0026 fff2 | & | .CONST 0x0026,0xfff2
03a8 0028 fff1 | ( | .CONST 0x0028,0xfff1
03aa 002a fff0 | * | .CONST 0x002a,0xfff0
03ac 002c ffef | , | .CONST 0x002c,0xffef
03ae 002e ffee | . | .CONST 0x002e,0xffee
03b0 0030 ffed | 0 | .CONST 0x0030,0xffed
03b2 0032 ffec | 2 | .CONST 0x0032,0xffec
03b4 0034 ffeb | 4 | .CONST 0x0034,0xffeb
03b6 0036 ffea | 6 | .CONST 0x0036,0xffea
03b8 0039 ffe9 | 9 | .CONST 0x0039,0xffe9
03ba 003b ffe8 | ; | .CONST 0x003b,0xffe8
03bc 003d ffe7 | = | .CONST 0x003d,0xffe7
03be 003f ffe6 | ? | .CONST 0x003f,0xffe6
03c0 0042 ffe5 | B | .CONST 0x0042,0xffe5
03c2 0045 ffe4 | E | .CONST 0x0045,0xffe4
03c4 0048 ffe3 | H | .CONST 0x0048,0xffe3
03c6 004a ffe2 | J | .CONST 0x004a,0xffe2
03c8 ; --------------------------------------------------------------------------------------
03c8 ; Debug3 Subtable 0x1
03c8 ; --------------------------------------------------------------------------------------
03c8 001a 0000 | | .DBG3TAB 0x001a,0x0000
03ca 004d ffff | M | .CONST 0x004d,0xffff
03cc 004f fffe | O | .CONST 0x004f,0xfffe
03ce 0051 fffd | Q | .CONST 0x0051,0xfffd
03d0 0059 fffc | Y | .CONST 0x0059,0xfffc
03d2 0061 fffb | a | .CONST 0x0061,0xfffb
03d4 0069 fffa | i | .CONST 0x0069,0xfffa
03d6 0071 fff9 | q | .CONST 0x0071,0xfff9
03d8 0073 fff8 | s | .CONST 0x0073,0xfff8
03da 0075 fff7 | u | .CONST 0x0075,0xfff7
03dc 0077 fff6 | w | .CONST 0x0077,0xfff6
03de 0079 fff5 | y | .CONST 0x0079,0xfff5
03e0 007b fff4 | { | .CONST 0x007b,0xfff4
03e2 007d fff3 | } | .CONST 0x007d,0xfff3
03e4 007f fff2 | | .CONST 0x007f,0xfff2
03e6 0081 fff1 | | .CONST 0x0081,0xfff1
03e8 0083 fff0 | | .CONST 0x0083,0xfff0
03ea 0085 ffef | | .CONST 0x0085,0xffef
03ec 0087 ffee | | .CONST 0x0087,0xffee
03ee 0089 ffed | | .CONST 0x0089,0xffed
03f0 008b ffec | | .CONST 0x008b,0xffec
03f2 008d ffeb | | .CONST 0x008d,0xffeb
03f4 008f ffea | | .CONST 0x008f,0xffea
03f6 0091 ffe9 | | .CONST 0x0091,0xffe9
03f8 0093 ffe8 | | .CONST 0x0093,0xffe8
03fa 0095 ffe7 | | .CONST 0x0095,0xffe7
03fc 0097 ffe6 | | .CONST 0x0097,0xffe6
03fe ; --------------------------------------------------------------------------------------
03fe ; Debug3 Subtable 0x2
03fe ; --------------------------------------------------------------------------------------
03fe 0000 0001 | | .DBG3TAB 0x0000,0x0001
0400 00a3 0001 | | .CONST 0x00a3,0x0001
0402 ; --------------------------------------------------------------------------------------
0402 ; Debug3 Subtable 0x3
0402 ; --------------------------------------------------------------------------------------
0402 0000 0001 | | .DBG3TAB 0x0000,0x0001
0404 00b3 0001 | | .CONST 0x00b3,0x0001
0406 ; --------------------------------------------------------------------------------------
0406 ; Debug3 Subtable 0x4
0406 ; --------------------------------------------------------------------------------------
0406 0000 0001 | | .DBG3TAB 0x0000,0x0001
0408 00c3 0001 | | .CONST 0x00c3,0x0001
040a ; --------------------------------------------------------------------------------------
040a ; Debug3 Subtable 0x5
040a ; --------------------------------------------------------------------------------------
040a 0000 0001 | | .DBG3TAB 0x0000,0x0001
040c 00d3 0001 | | .CONST 0x00d3,0x0001
040e ; --------------------------------------------------------------------------------------
040e ; Debug3 Subtable 0x6
040e ; --------------------------------------------------------------------------------------
040e 0000 0002 | | .DBG3TAB 0x0000,0x0002
0410 00db 0001 | | .CONST 0x00db,0x0001
0412 00e1 0002 | | .CONST 0x00e1,0x0002
0414 ; --------------------------------------------------------------------------------------
0414 ; Debug3 Subtable 0x7
0414 ; --------------------------------------------------------------------------------------
0414 0000 0001 | | .DBG3TAB 0x0000,0x0001
0416 00f3 0001 | | .CONST 0x00f3,0x0001
0418 ; --------------------------------------------------------------------------------------
0418 ; Debug3 Subtable 0x8
0418 ; --------------------------------------------------------------------------------------
0418 0000 0001 | | .DBG3TAB 0x0000,0x0001
041a 00fb 0001 | | .CONST 0x00fb,0x0001
041c ; --------------------------------------------------------------------------------------
041c ; Debug3 Subtable 0x9
041c ; --------------------------------------------------------------------------------------
041c 0000 0006 | | .DBG3TAB 0x0000,0x0006
041e 0103 0001 | | .CONST 0x0103,0x0001
0420 010c 0002 | | .CONST 0x010c,0x0002
0422 0114 0003 | | .CONST 0x0114,0x0003
0424 011c 0004 | | .CONST 0x011c,0x0004
0426 0124 0005 | $ | .CONST 0x0124,0x0005
0428 0128 0006 | ( | .CONST 0x0128,0x0006
042a ; --------------------------------------------------------------------------------------
042a ; Debug3 Subtable 0xa
042a ; --------------------------------------------------------------------------------------
042a 0000 0001 | | .DBG3TAB 0x0000,0x0001
042c 0133 0001 | 3 | .CONST 0x0133,0x0001
042e ; --------------------------------------------------------------------------------------
042e ; Debug3 Subtable 0xb
042e ; --------------------------------------------------------------------------------------
042e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0430 0143 0001 | C | .CONST 0x0143,0x0001
0432 ; --------------------------------------------------------------------------------------
0432 ; Debug3 Subtable 0xc
0432 ; --------------------------------------------------------------------------------------
0432 0002 0010 | | .DBG3TAB 0x0002,0x0010
0434 0153 ffff | S | .CONST 0x0153,0xffff
0436 0157 fffe | W | .CONST 0x0157,0xfffe
0438 0158 0001 | X | .CONST 0x0158,0x0001
043a 015d 0002 | ] | .CONST 0x015d,0x0002
043c 0164 0003 | d | .CONST 0x0164,0x0003
043e 0168 0004 | h | .CONST 0x0168,0x0004
0440 016f 0005 | o | .CONST 0x016f,0x0005
0442 0170 0006 | p | .CONST 0x0170,0x0006
0444 0176 0007 | v | .CONST 0x0176,0x0007
0446 017b 0008 | { | .CONST 0x017b,0x0008
0448 0183 0009 | | .CONST 0x0183,0x0009
044a 0188 000a | | .CONST 0x0188,0x000a
044c 0189 000b | | .CONST 0x0189,0x000b
044e 018f 000c | | .CONST 0x018f,0x000c
0450 0194 000d | | .CONST 0x0194,0x000d
0452 019c 000e | | .CONST 0x019c,0x000e
0454 01a1 000f | | .CONST 0x01a1,0x000f
0456 01a6 0010 | | .CONST 0x01a6,0x0010
0458 ; --------------------------------------------------------------------------------------
0458 ; Debug3 Subtable 0xd
0458 ; --------------------------------------------------------------------------------------
0458 0002 0001 | | .DBG3TAB 0x0002,0x0001
045a 01b3 ffff | | .CONST 0x01b3,0xffff
045c 01b8 fffe | | .CONST 0x01b8,0xfffe
045e 01c1 0001 | | .CONST 0x01c1,0x0001
0460 ; --------------------------------------------------------------------------------------
0460 ; Debug3 Subtable 0xe
0460 ; --------------------------------------------------------------------------------------
0460 0000 0001 | | .DBG3TAB 0x0000,0x0001
0462 01d3 0001 | | .CONST 0x01d3,0x0001
0464 ; --------------------------------------------------------------------------------------
0464 ; Debug3 Subtable 0xf
0464 ; --------------------------------------------------------------------------------------
0464 0002 0005 | | .DBG3TAB 0x0002,0x0005
0466 01db ffff | | .CONST 0x01db,0xffff
0468 01df fffe | | .CONST 0x01df,0xfffe
046a 01e3 0001 | | .CONST 0x01e3,0x0001
046c 01e7 0002 | | .CONST 0x01e7,0x0002
046e 01eb 0003 | | .CONST 0x01eb,0x0003
0470 01f0 0004 | | .CONST 0x01f0,0x0004
0472 01f3 0005 | | .CONST 0x01f3,0x0005
0474 ; --------------------------------------------------------------------------------------
0474 ; Debug3 Subtable 0x10
0474 ; --------------------------------------------------------------------------------------
0474 0001 0003 | | .DBG3TAB 0x0001,0x0003
0476 01fb ffff | | .CONST 0x01fb,0xffff
0478 01ff 0001 | | .CONST 0x01ff,0x0001
047a 0203 0002 | | .CONST 0x0203,0x0002
047c 0206 0003 | | .CONST 0x0206,0x0003
047e ; --------------------------------------------------------------------------------------
047e ; Debug3 Subtable 0x11
047e ; --------------------------------------------------------------------------------------
047e 0005 0005 | | .DBG3TAB 0x0005,0x0005
0480 0213 ffff | | .CONST 0x0213,0xffff
0482 0214 fffe | | .CONST 0x0214,0xfffe
0484 0218 fffd | | .CONST 0x0218,0xfffd
0486 0219 fffc | | .CONST 0x0219,0xfffc
0488 021a fffb | | .CONST 0x021a,0xfffb
048a 021c 0001 | | .CONST 0x021c,0x0001
048c 0220 0002 | | .CONST 0x0220,0x0002
048e 0225 0003 | % | .CONST 0x0225,0x0003
0490 022a 0004 | * | .CONST 0x022a,0x0004
0492 022d 0005 | - | .CONST 0x022d,0x0005
0494 ; --------------------------------------------------------------------------------------
0494 ; Debug3 Subtable 0x12
0494 ; --------------------------------------------------------------------------------------
0494 0000 0001 | | .DBG3TAB 0x0000,0x0001
0496 0243 0001 | C | .CONST 0x0243,0x0001
0498 ; --------------------------------------------------------------------------------------
0498 ; Debug3 Subtable 0x13
0498 ; --------------------------------------------------------------------------------------
0498 0000 0001 | | .DBG3TAB 0x0000,0x0001
049a 024b 0001 | K | .CONST 0x024b,0x0001
049c ; --------------------------------------------------------------------------------------
049c ; Debug3 Subtable 0x14
049c ; --------------------------------------------------------------------------------------
049c 0000 0001 | | .DBG3TAB 0x0000,0x0001
049e 0253 0001 | S | .CONST 0x0253,0x0001
04a0 ; --------------------------------------------------------------------------------------
04a0 ; Debug3 Subtable 0x15
04a0 ; --------------------------------------------------------------------------------------
04a0 0004 0002 | | .DBG3TAB 0x0004,0x0002
04a2 025b ffff | [ | .CONST 0x025b,0xffff
04a4 0260 fffe | ` | .CONST 0x0260,0xfffe
04a6 0269 fffd | i | .CONST 0x0269,0xfffd
04a8 026f fffc | o | .CONST 0x026f,0xfffc
04aa 0277 0001 | w | .CONST 0x0277,0x0001
04ac 027b 0002 | { | .CONST 0x027b,0x0002
04ae ; --------------------------------------------------------------------------------------
04ae ; Debug3 Subtable 0x16
04ae ; --------------------------------------------------------------------------------------
04ae 0001 0002 | | .DBG3TAB 0x0001,0x0002
04b0 028b ffff | | .CONST 0x028b,0xffff
04b2 028e 0001 | | .CONST 0x028e,0x0001
04b4 0293 0002 | | .CONST 0x0293,0x0002
04b6 0000 0000 | | .BLANK 0000[0x14a]