|
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: 2048 (0x800)
Notes: 00_class, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0178 | x | .CONST 0x0178 ; 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 0001 | | .CONST 0x0001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0030 | 0 | .CONST 0x0030 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0013 | | .CONST 0x0013 ; Number of locals
000b INIT_0008:
000b 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x01ba,0x8000,0x0000,0x0056,0xcc35,0x0000,0x0005
; Debug Table 0x0.0x0 = 0xb,0xffff
; Debug Table 0x0.0x1 = 0xb,0xfffe
; Debug Table 0x0.0x2 = 0xb,0xfffd
; Debug Table 0x0.0x3 = 0xb,0xfffc
000d 00bf | | Action Accept_Activation
000e 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1 = .DEBUG 0x000e,0x01c4,0x8000,0x0000,0x0056,0xcdc5,0x0000,0x0009
; Debug Table 0x1.0x0 = 0xe,0xffff
; Debug Table 0x1.0x1 = 0xe,0xfffe
000f 00e3 | | Load_Encached Natural_Cache
0010 00e1 | | Load_Encached Boolean_Cache
0011 00e1 | | Load_Encached Boolean_Cache
0012 00e9 | | Load_Encached String_Cache
0013 029f 0073 | s| Declare_Subprogram INIT_0070,For_Call
0015 4800 |H | Short_Literal 0x0
0016 4801 |H | Short_Literal 0x1
0017 4803 |H | Short_Literal 0x3
0018 4800 |H | Short_Literal 0x0
0019 4801 |H | Short_Literal 0x1
001a 4801 |H | Short_Literal 0x1
001b 031d | | Declare_Type Variant_Record,Defined
001c 029b 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Unelaborated ; Debug Table 0x1.0x2 = 0x1c,0xfffd
001e 6145 |aE | Indirect_Literal Discrete,0x164,{0x00000000, 0x0056cdc5} ; Debug Table 0x1.0x3 = 0x1e,0xfffc
001f 483e |H> | Short_Literal 0x3e
0020 00db | | Load_Top At_Offset_3
0021 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0022 e001 | | Load 0x0,0x1
0023 0387 | | Declare_Variable Package
0024 00d8 | | Load_Top At_Offset_0
0025 020f | | Execute Module,Activate
0026 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x4 = 0x26,0xfffb
0027 00c7 | | Action Elaborate_Subprogram
0028 029d 00e3 | | Declare_Subprogram INIT_00e0,For_Outer_Call ; Debug Table 0x1.0x5 = 0x28,0xfffa
002a 029d 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call ; Debug Table 0x1.0x6 = 0x2a,0xfff9
002c 029d 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call ; Debug Table 0x1.0x7 = 0x2c,0xfff8
002e 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x8 = 0x2e,0xfff7
002f 00c7 | | Action Elaborate_Subprogram
0030 BODY_0008:
0030 00bc | | Action Signal_Activated
0031 00bb | | Action Signal_Completion
0032 0000 0000 | | .BLANK 0000[0x6]
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0047 | G | .CONST 0x0047 ; Address of begin
0039 0060 | ` | .CONST 0x0060 ; Address of exception handler
003a 0003 | | .CONST 0x0003 ; Number of locals
003b INIT_0038:
003b 00db | | Load_Top At_Offset_3 ; Debug Table 0x2 = .DEBUG 0x003b,0x01d8,0x0002,0x0000,0x0056,0xcc35,0x0000,0x0013
; Debug Table 0x2.0x0 = 0x3b,0xffff
003c e20e | | Load 0x1,0xe
003d 1c08 | | Execute_Immediate Run_Utility,0x8
003e 00d8 | | Load_Top At_Offset_0
003f 1c00 | | Execute_Immediate Run_Utility,0x0
0040 e002 | | Load 0x0,0x2 ; Debug Table 0x2.0x1 = 0x40,0xfffe
0041 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0042 0322 | " | Declare_Variable Record
0043 e002 | | Load 0x0,0x2
0044 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0045 00d9 | | Load_Top At_Offset_1
0046 017d | } | Execute Record,Structure_Write
0047 BODY_0038:
0047 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x2 = 0x47,0x1
0048 6805 |h | Jump_Zero 0x4e
0049 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x3 = 0x49,0x2
004a 4801 |H | Short_Literal 0x1
004b e002 | | Load 0x0,0x2
004c 1819 | | Execute Package,Field_Execute,Field_Number 0x19
004d 00d1 | | Pop_Control Pop_Count_1
004e 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x4 = 0x4e,0x3
004f 4801 |H | Short_Literal 0x1
0050 e002 | | Load 0x0,0x2
0051 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0052 00d1 | | Pop_Control Pop_Count_1
0053 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x5 = 0x53,0x4
0054 00d9 | | Load_Top At_Offset_1
0055 e5ff | | Load 0x2,-0x1
0056 e210 | | Load 0x1,0x10
0057 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0058 00d1 | | Pop_Control Pop_Count_1
0059 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x6 = 0x59,0x5
005a 00da | | Load_Top At_Offset_2
005b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
005c 00db | | Load_Top At_Offset_3
005d 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
005e 01cf | | Execute Vector,Slice_Read
005f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0060 TRAP_0038:
0060 60ff |` | Indirect_Literal Discrete,0x160,{0x00000000, 0x56cdc501}
0061 010f | | Execute Exception,Equal
0062 6807 |h | Jump_Zero 0x6a
0063 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x7 = 0x63,0x6
0064 00db | | Load_Top At_Offset_3
0065 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0066 e402 | | Load 0x2,0x2
0067 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
0068 01cf | | Execute Vector,Slice_Read
0069 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
006a 0092 0168 | h| Action Push_String_Extended,0x168 ; "Internal PP Error"
; Debug Table 0x2.0x8 = 0x6a,0x7
006c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
006d 0000 0000 | | .XXX[0x3]
006f 0000 | |
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0073 | s | .CONST 0x0073 ; Address of begin
0071 0004 | | .CONST 0x0004 ; Address of exception handler
0072 0001 | | .CONST 0x0001 ; Number of locals
0073 BODY_0070:
0073 INIT_0070:
0073 4608 |F | Jump_Case 0x9 ; Debug Table 0x3 = .DEBUG 0x0073,0x01ec,0x0005,0x0000,0x0056,0xcdc5,0x0000,0x000d
0074 7808 |x | Jump 0x7d ; case 0x0
0075 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
0076 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0077 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0078 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0079 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
007a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
007b 780b |x | Jump 0x87 ; case 0x7
007c 7813 |x | Jump 0x90 ; case 0x8
007d 4800 |H | Short_Literal 0x0
007e 00db | | Load_Top At_Offset_3
007f 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0080 4800 |H | Short_Literal 0x0
0081 00db | | Load_Top At_Offset_3
0082 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0083 4800 |H | Short_Literal 0x0
0084 00db | | Load_Top At_Offset_3
0085 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0086 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
0087 00db | | Load_Top At_Offset_3
0088 4801 |H | Short_Literal 0x1
0089 e5fe | | Load 0x2,-0x2
008a 00e9 | | Load_Encached String_Cache
008b 035b | [ | Declare_Type Array,Constrained
008c 4801 |H | Short_Literal 0x1
008d e5ff | | Load 0x2,-0x1
008e 031b | | Declare_Type Variant_Record,Constrained
008f 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
0090 00db | | Load_Top At_Offset_3
0091 00db | | Load_Top At_Offset_3
0092 02fc | | Declare_Variable Variant_Record,With_Constraint
0093 4801 |H | Short_Literal 0x1
0094 e5fe | | Load 0x2,-0x2
0095 00e9 | | Load_Encached String_Cache
0096 0334 | 4 | Declare_Variable Array,With_Constraint
0097 2d05 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x5
0098 016a | j | QQ_execute Variant_Record,XXX
0099 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
009a 0000 0000 | | .BLANK 0000[0x6]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00ae | | .CONST 0x00ae ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0004 | | .CONST 0x0004 ; Number of locals
00a3 INIT_00a0:
00a3 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x4 = .DEBUG 0x00a3,0x01ee,0x0001,0x0000,0x0056,0xcdc5,0x0000,0x0030
; Debug Table 0x4.0x0 = 0xa3,0xffff
00a4 e003 | | Load 0x0,0x3 ; Debug Table 0x4.0x1 = 0xa4,0xfffe
00a5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00a6 02ff | | Declare_Variable Variant_Record
00a7 00d8 | | Load_Top At_Offset_0
00a8 1c00 | | Execute_Immediate Run_Utility,0x0
00a9 e002 | | Load 0x0,0x2 ; Debug Table 0x4.0x2 = 0xa9,0xfffd
00aa 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00ab 0322 | " | Declare_Variable Record
00ac 00d8 | | Load_Top At_Offset_0
00ad 1c00 | | Execute_Immediate Run_Utility,0x0
00ae BODY_00a0:
00ae e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x3 = 0xae,0x1
00af 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00b0 0b07 | | Execute_Immediate Case_Compare,0x7
00b1 7006 |p | Jump_Nonzero 0xb8
00b2 00d8 | | Load_Top At_Offset_0
00b3 4800 |H | Short_Literal 0x0
00b4 4806 |H | Short_Literal 0x6
00b5 0262 | b | Execute Discrete,In_Range
00b6 7010 |p | Jump_Nonzero 0xc7
00b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x4.0x4 = 0xb7,0x8
00b8 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x4.0x5 = 0xb8,0x2
00b9 00db | | Load_Top At_Offset_3
00ba 00ec | | Load_Encached Diana_Tree_Cache
00bb e5ff | | Load 0x2,-0x1
00bc e004 | | Load 0x0,0x4
00bd 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00be c402 | | Store 0x2,0x2
00bf 00d2 | | Pop_Control Pop_Count_2
00c0 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x6 = 0xc0,0x3
00c1 00da | | Load_Top At_Offset_2
00c2 e402 | | Load 0x2,0x2
00c3 e210 | | Load 0x1,0x10
00c4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00c5 00d1 | | Pop_Control Pop_Count_1
00c6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00c7 e5ff | | Load 0x2,-0x1 ; Debug Table 0x4.0x7 = 0xc7,0x4
00c8 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00c9 0b05 | | Execute_Immediate Case_Compare,0x5
00ca 7009 |p | Jump_Nonzero 0xd4
00cb 0b06 | | Execute_Immediate Case_Compare,0x6
00cc 700b |p | Jump_Nonzero 0xd8
00cd e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x8 = 0xcd,0x7
00ce e5ff | | Load 0x2,-0x1
00cf e004 | | Load 0x0,0x4
00d0 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00d1 8213 | | Call 0x1,0x13
00d2 00d1 | | Pop_Control Pop_Count_1
00d3 7807 |x | Jump 0xdb
00d4 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0x9 = 0xd4,0x5
00d5 8211 | | Call 0x1,0x11
00d6 00d1 | | Pop_Control Pop_Count_1
00d7 7803 |x | Jump 0xdb
00d8 e5fe | | Load 0x2,-0x2 ; Debug Table 0x4.0xa = 0xd8,0x6
00d9 8212 | | Call 0x1,0x12
00da 00d1 | | Pop_Control Pop_Count_1
00db 00d1 | | Pop_Control Pop_Count_1
00dc 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00dd 0000 0000 | | .XXX[0x3]
00df 0000 | |
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 4801 |H | Short_Literal 0x1 ; Debug Table 0x5 = .DEBUG 0x00e3,0x0206,0x0001,0x0000,0x0056,0xcdc5,0x0000,0x00ab
; Debug Table 0x5.0x0 = 0xe3,0x1
00e4 00db | | Load_Top At_Offset_3
00e5 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
00e6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00e7 0000 | | .XXX[0x1]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb 4801 |H | Short_Literal 0x1 ; Debug Table 0x6 = .DEBUG 0x00eb,0x020a,0x0001,0x0000,0x0056,0xcdc5,0x0000,0x00bc
; Debug Table 0x6.0x0 = 0xeb,0x1
00ec 00db | | Load_Top At_Offset_3
00ed 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
00ee 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00ef 0000 | | .XXX[0x1]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f6 | | .CONST 0x00f6 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0002 | | .CONST 0x0002 ; Number of locals
00f3 INIT_00f0:
00f3 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x00f3,0x020e,0x0001,0x0000,0x0056,0xcdc5,0x0000,0x00cd
; Debug Table 0x7.0x0 = 0xf3,0xffff
00f4 e005 | | Load 0x0,0x5
00f5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00f6 BODY_00f0:
00f6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0x1 = 0xf6,0x1
00f7 01db | | Execute Vector,Length
00f8 0c01 | | Execute_Immediate Greater_Equal,0x1
00f9 681a |h | Jump_Zero 0x114
00fa e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x2 = 0xfa,0x2
00fb 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
00fc 6806 |h | Jump_Zero 0x103
00fd 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x3 = 0xfd,0x3
00fe e5fe | | Load 0x2,-0x2
00ff 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0100 4801 |H | Short_Literal 0x1 ; Debug Table 0x7.0x4 = 0x100,0x4
0101 e5fe | | Load 0x2,-0x2
0102 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0103 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x5 = 0x103,0x5
0104 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0105 680e |h | Jump_Zero 0x114
0106 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x6 = 0x106,0x6
0107 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0108 0a01 | | Execute_Immediate Plus,0x1
0109 e5fe | | Load 0x2,-0x2
010a 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
010b 4820 |H | Short_Literal 0x20 ; Debug Table 0x7.0x7 = 0x10b,0x7
010c e5fe | | Load 0x2,-0x2
010d 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
010e e5fe | | Load 0x2,-0x2
010f 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
0110 01d6 | | Execute Vector,Field_Write
0111 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x8 = 0x111,0x8
0112 e5fe | | Load 0x2,-0x2
0113 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0114 e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0x9 = 0x114,0x9
0115 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0116 e5fe | | Load 0x2,-0x2
0117 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0118 0272 | r | Execute Discrete,Minus
0119 00d9 | | Load_Top At_Offset_1
011a 01db | | Execute Vector,Length
011b 027d | } | Execute Discrete,Greater
011c 6816 |h | Jump_Zero 0x133
011d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xa = 0x11d,0xa
011e e5fe | | Load 0x2,-0x2
011f 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0120 0a01 | | Execute_Immediate Plus,0x1
0121 0248 | H | Execute Discrete,Check_In_Integer
0122 e5fe | | Load 0x2,-0x2
0123 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0124 00db | | Load_Top At_Offset_3
0125 01db | | Execute Vector,Length
0126 0273 | s | Execute Discrete,Plus
0127 0248 | H | Execute Discrete,Check_In_Integer
0128 e5fe | | Load 0x2,-0x2
0129 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
012a 01ce | | Execute Vector,Slice_Write
012b e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0xb = 0x12b,0xb
012c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
012d 00d9 | | Load_Top At_Offset_1
012e 01db | | Execute Vector,Length
012f 0273 | s | Execute Discrete,Plus
0130 e5fe | | Load 0x2,-0x2
0131 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0132 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0133 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x7.0xc = 0x133,0xc
0134 01dd | | Execute Vector,First
0135 00d9 | | Load_Top At_Offset_1
0136 01dd | | Execute Vector,First
0137 e5fe | | Load 0x2,-0x2
0138 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0139 0273 | s | Execute Discrete,Plus
013a 0248 | H | Execute Discrete,Check_In_Integer
013b e5fe | | Load 0x2,-0x2
013c 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
013d 0272 | r | Execute Discrete,Minus
013e 0afb | | Execute_Immediate Plus,-0x5
013f 0248 | H | Execute Discrete,Check_In_Integer
0140 00da | | Load_Top At_Offset_2
0141 01cf | | Execute Vector,Slice_Read
0142 e5fe | | Load 0x2,-0x2
0143 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0144 0a01 | | Execute_Immediate Plus,0x1
0145 0248 | H | Execute Discrete,Check_In_Integer
0146 e5fe | | Load 0x2,-0x2
0147 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0148 0afc | | Execute_Immediate Plus,-0x4
0149 0248 | H | Execute Discrete,Check_In_Integer
014a e5fe | | Load 0x2,-0x2
014b 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
014c 01ce | | Execute Vector,Slice_Write
014d e5fe | | Load 0x2,-0x2 ; Debug Table 0x7.0xd = 0x14d,0xd
014e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
014f e5fe | | Load 0x2,-0x2
0150 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0151 0092 0169 | i| Action Push_String_Extended,0x169 ; " ..."
; Debug Table 0x7.0xe = 0x151,0xe
0153 e5fe | | Load 0x2,-0x2
0154 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0155 0afd | | Execute_Immediate Plus,-0x3
0156 0248 | H | Execute Discrete,Check_In_Integer
0157 e5fe | | Load 0x2,-0x2
0158 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0159 e5fe | | Load 0x2,-0x2
015a 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5
015b 01ce | | Execute Vector,Slice_Write
015c 6003 |` | Indirect_Literal Discrete,0x160,{0x00000000, 0x56cdc501} ; Debug Table 0x7.0xf = 0x15c,0xf
015d 0257 | W | Execute Discrete,Raise
015e 0000 0000 | | .XXX[0x2]
0160 0000 0000 | | .LITERAL {0x00000000, 0x56cdc501}
0164 0000 0000 | | .LITERAL {0x00000000, 0x0056cdc5}
0168 ; --------------------------------------------------------------------------------------
0168 ; STRING TABLE
0168 ; --------------------------------------------------------------------------------------
0168 0006 | | .STRTAB 0x0006->0x016b ; "Internal PP Error"
0169 0015 | | .STRTAB 0x0015->0x0173 ; " ..."
016a 0017 | | .STREND 0x0017->0x0175
016b 496e 7465 |Inte| .STRTAB_STRINGS
0176 0000 0000 | | .XXX[0x2]
0178 ; --------------------------------------------------------------------------------------
0178 ; Debug Table
0178 ; --------------------------------------------------------------------------------------
0178 0003 0008 | | .CONST 0x0003,0x0008
017a 000b 01ba | | .DEBUG 0x000b,0x01ba,0x8000,0x0000,0x0056,0xcc35,0x0000,0x0005
0182 000e 01c4 | | .DEBUG 0x000e,0x01c4,0x8000,0x0000,0x0056,0xcdc5,0x0000,0x0009
018a 003b 01d8 | ; | .DEBUG 0x003b,0x01d8,0x0002,0x0000,0x0056,0xcc35,0x0000,0x0013
0192 0073 01ec | s | .DEBUG 0x0073,0x01ec,0x0005,0x0000,0x0056,0xcdc5,0x0000,0x000d
019a 00a3 01ee | | .DEBUG 0x00a3,0x01ee,0x0001,0x0000,0x0056,0xcdc5,0x0000,0x0030
01a2 00e3 0206 | | .DEBUG 0x00e3,0x0206,0x0001,0x0000,0x0056,0xcdc5,0x0000,0x00ab
01aa 00eb 020a | | .DEBUG 0x00eb,0x020a,0x0001,0x0000,0x0056,0xcdc5,0x0000,0x00bc
01b2 00f3 020e | | .DEBUG 0x00f3,0x020e,0x0001,0x0000,0x0056,0xcdc5,0x0000,0x00cd
01ba ; --------------------------------------------------------------------------------------
01ba ; Debug3 Subtable 0x0
01ba ; --------------------------------------------------------------------------------------
01ba 0004 0000 | | .DBG3TAB 0x0004,0x0000
01bc 000b ffff | | .CONST 0x000b,0xffff
01be 000b fffe | | .CONST 0x000b,0xfffe
01c0 000b fffd | | .CONST 0x000b,0xfffd
01c2 000b fffc | | .CONST 0x000b,0xfffc
01c4 ; --------------------------------------------------------------------------------------
01c4 ; Debug3 Subtable 0x1
01c4 ; --------------------------------------------------------------------------------------
01c4 0009 0000 | | .DBG3TAB 0x0009,0x0000
01c6 000e ffff | | .CONST 0x000e,0xffff
01c8 000e fffe | | .CONST 0x000e,0xfffe
01ca 001c fffd | | .CONST 0x001c,0xfffd
01cc 001e fffc | | .CONST 0x001e,0xfffc
01ce 0026 fffb | & | .CONST 0x0026,0xfffb
01d0 0028 fffa | ( | .CONST 0x0028,0xfffa
01d2 002a fff9 | * | .CONST 0x002a,0xfff9
01d4 002c fff8 | , | .CONST 0x002c,0xfff8
01d6 002e fff7 | . | .CONST 0x002e,0xfff7
01d8 ; --------------------------------------------------------------------------------------
01d8 ; Debug3 Subtable 0x2
01d8 ; --------------------------------------------------------------------------------------
01d8 0002 0007 | | .DBG3TAB 0x0002,0x0007
01da 003b ffff | ; | .CONST 0x003b,0xffff
01dc 0040 fffe | @ | .CONST 0x0040,0xfffe
01de 0047 0001 | G | .CONST 0x0047,0x0001
01e0 0049 0002 | I | .CONST 0x0049,0x0002
01e2 004e 0003 | N | .CONST 0x004e,0x0003
01e4 0053 0004 | S | .CONST 0x0053,0x0004
01e6 0059 0005 | Y | .CONST 0x0059,0x0005
01e8 0063 0006 | c | .CONST 0x0063,0x0006
01ea 006a 0007 | j | .CONST 0x006a,0x0007
01ec ; --------------------------------------------------------------------------------------
01ec ; Debug3 Subtable 0x3
01ec ; --------------------------------------------------------------------------------------
01ec 0000 0000 | | .DBG3TAB 0x0000,0x0000
01ee ; --------------------------------------------------------------------------------------
01ee ; Debug3 Subtable 0x4
01ee ; --------------------------------------------------------------------------------------
01ee 0003 0008 | | .DBG3TAB 0x0003,0x0008
01f0 00a3 ffff | | .CONST 0x00a3,0xffff
01f2 00a4 fffe | | .CONST 0x00a4,0xfffe
01f4 00a9 fffd | | .CONST 0x00a9,0xfffd
01f6 00ae 0001 | | .CONST 0x00ae,0x0001
01f8 00b7 0008 | | .CONST 0x00b7,0x0008
01fa 00b8 0002 | | .CONST 0x00b8,0x0002
01fc 00c0 0003 | | .CONST 0x00c0,0x0003
01fe 00c7 0004 | | .CONST 0x00c7,0x0004
0200 00cd 0007 | | .CONST 0x00cd,0x0007
0202 00d4 0005 | | .CONST 0x00d4,0x0005
0204 00d8 0006 | | .CONST 0x00d8,0x0006
0206 ; --------------------------------------------------------------------------------------
0206 ; Debug3 Subtable 0x5
0206 ; --------------------------------------------------------------------------------------
0206 0000 0001 | | .DBG3TAB 0x0000,0x0001
0208 00e3 0001 | | .CONST 0x00e3,0x0001
020a ; --------------------------------------------------------------------------------------
020a ; Debug3 Subtable 0x6
020a ; --------------------------------------------------------------------------------------
020a 0000 0001 | | .DBG3TAB 0x0000,0x0001
020c 00eb 0001 | | .CONST 0x00eb,0x0001
020e ; --------------------------------------------------------------------------------------
020e ; Debug3 Subtable 0x7
020e ; --------------------------------------------------------------------------------------
020e 0001 000f | | .DBG3TAB 0x0001,0x000f
0210 00f3 ffff | | .CONST 0x00f3,0xffff
0212 00f6 0001 | | .CONST 0x00f6,0x0001
0214 00fa 0002 | | .CONST 0x00fa,0x0002
0216 00fd 0003 | | .CONST 0x00fd,0x0003
0218 0100 0004 | | .CONST 0x0100,0x0004
021a 0103 0005 | | .CONST 0x0103,0x0005
021c 0106 0006 | | .CONST 0x0106,0x0006
021e 010b 0007 | | .CONST 0x010b,0x0007
0220 0111 0008 | | .CONST 0x0111,0x0008
0222 0114 0009 | | .CONST 0x0114,0x0009
0224 011d 000a | | .CONST 0x011d,0x000a
0226 012b 000b | + | .CONST 0x012b,0x000b
0228 0133 000c | 3 | .CONST 0x0133,0x000c
022a 014d 000d | M | .CONST 0x014d,0x000d
022c 0151 000e | Q | .CONST 0x0151,0x000e
022e 015c 000f | \ | .CONST 0x015c,0x000f
0230 0000 0000 | | .BLANK 0000[0x1d0]