|
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 0190 | | .CONST 0x0190 ; 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 0033 | 3 | .CONST 0x0033 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0012 | | .CONST 0x0012 ; Number of locals
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x01ca,0x8000,0x0000,0x0056,0xdde5,0x0000,0x0007
; 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 029a 003b | ;| Declare_Subprogram INIT_0038,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x3 = 0xe,0xfffc
0010 029a 0093 | | Declare_Subprogram INIT_0090,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x4 = 0x10,0xfffb
0012 00bf | | Action Accept_Activation
0013 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0013,0x01d6,0x8000,0x0000,0x0056,0xddf5,0x0000,0x0013
; Debug Table 0x1.0x0 = 0x13,0xffff
0014 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x1 = 0x14,0xfffe
0015 00e3 | | Load_Encached Natural_Cache
0016 00e1 | | Load_Encached Boolean_Cache
0017 00e9 | | Load_Encached String_Cache
0018 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call
001a 4800 |H | Short_Literal 0x0
001b 4801 |H | Short_Literal 0x1
001c 4802 |H | Short_Literal 0x2
001d 4800 |H | Short_Literal 0x0
001e 4801 |H | Short_Literal 0x1
001f 4801 |H | Short_Literal 0x1
0020 031d | | Declare_Type Variant_Record,Defined
0021 029b 00db | | Declare_Subprogram INIT_00d8,For_Outer_Call,Unelaborated ; Debug Table 0x1.0x2 = 0x21,0xfffd
0023 6158 |aX | Indirect_Literal Discrete,0x17c,{0x00000000, 0x0056ddf5} ; Debug Table 0x1.0x3 = 0x23,0xfffc
0024 4842 |HB | Short_Literal 0x42
0025 00db | | Load_Top At_Offset_3
0026 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0027 e001 | | Load 0x0,0x1
0028 0387 | | Declare_Variable Package
0029 00d8 | | Load_Top At_Offset_0
002a 020f | | Execute Module,Activate
002b 029d 012b | +| Declare_Subprogram INIT_0128,For_Outer_Call ; Debug Table 0x1.0x4 = 0x2b,0xfffb
002d 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x5 = 0x2d,0xfffa
002e 00c7 | | Action Elaborate_Subprogram
002f 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x6 = 0x2f,0xfff9
0030 00c7 | | Action Elaborate_Subprogram
0031 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x7 = 0x31,0xfff8
0032 00c7 | | Action Elaborate_Subprogram
0033 BODY_0008:
0033 00bc | | Action Signal_Activated
0034 00bb | | Action Signal_Completion
0035 0000 0000 | | .XXX[0x3]
0037 0000 | |
0038 ; --------------------------------------------------------------------------------------
0038 ; SUBPROGRAM
0038 ; --------------------------------------------------------------------------------------
0038 0046 | F | .CONST 0x0046 ; Address of begin
0039 007e | ~ | .CONST 0x007e ; 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,0x01e8,0x0002,0x0000,0x0056,0xdde5,0x0000,0x0019
; Debug Table 0x2.0x0 = 0x3b,0xffff
003c e20f | | Load 0x1,0xf
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 02c7 | | Declare_Variable Any
0043 e002 | | Load 0x0,0x2
0044 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0045 c403 | | Store 0x2,0x3
0046 BODY_0038:
0046 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x2 = 0x46,0x1
0047 6805 |h | Jump_Zero 0x4d
0048 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x3 = 0x48,0x2
0049 4801 |H | Short_Literal 0x1
004a e002 | | Load 0x0,0x2
004b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
004c c403 | | Store 0x2,0x3
004d 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x2.0x4 = 0x4d,0x3
004e 4801 |H | Short_Literal 0x1
004f e002 | | Load 0x0,0x2
0050 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0051 c403 | | Store 0x2,0x3
0052 e5ff | | Load 0x2,-0x1 ; Debug Table 0x2.0x5 = 0x52,0x4
0053 e003 | | Load 0x0,0x3
0054 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0055 680b |h | Jump_Zero 0x61
0056 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x6 = 0x56,0x5
0057 00d9 | | Load_Top At_Offset_1
0058 e5ff | | Load 0x2,-0x1
0059 4976 |Iv | Short_Literal 0x176
005a 00eb | | Load_Encached Diana_Cache
005b 0098 | | Execute Package,Field_Read_Dynamic
005c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
005d e211 | | Load 0x1,0x11
005e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
005f 00d1 | | Pop_Control Pop_Count_1
0060 7806 |x | Jump 0x67
0061 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x7 = 0x61,0x6
0062 00d9 | | Load_Top At_Offset_1
0063 e5ff | | Load 0x2,-0x1
0064 e211 | | Load 0x1,0x11
0065 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0066 00d1 | | Pop_Control Pop_Count_1
0067 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x2.0x8 = 0x67,0x7
0068 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
0069 680d |h | Jump_Zero 0x77
006a 00d9 | | Load_Top At_Offset_1
006b 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
006c 0c01 | | Execute_Immediate Greater_Equal,0x1
006d 6809 |h | Jump_Zero 0x77
006e 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0x9 = 0x6e,0x8
006f 00da | | Load_Top At_Offset_2
0070 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0071 0aff | | Execute_Immediate Plus,-0x1
0072 0248 | H | Execute Discrete,Check_In_Integer
0073 00db | | Load_Top At_Offset_3
0074 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0075 01cf | | Execute Vector,Slice_Read
0076 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0077 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0xa = 0x77,0x9
0078 00da | | Load_Top At_Offset_2
0079 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
007a 00db | | Load_Top At_Offset_3
007b 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
007c 01cf | | Execute Vector,Slice_Read
007d 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
007e TRAP_0038:
007e 60f9 |` | Indirect_Literal Discrete,0x178,{0x00000000, 0x56ddf501}
007f 010f | | Execute Exception,Equal
0080 6807 |h | Jump_Zero 0x88
0081 4801 |H | Short_Literal 0x1 ; Debug Table 0x2.0xb = 0x81,0xa
0082 00db | | Load_Top At_Offset_3
0083 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0084 e402 | | Load 0x2,0x2
0085 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0086 01cf | | Execute Vector,Slice_Read
0087 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0088 0092 0180 | | Action Push_String_Extended,0x180 ; "Internal PP Error"
; Debug Table 0x2.0xc = 0x88,0xb
008a 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
008b 0000 0000 | | .BLANK 0000[0x5]
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x0093,0x0204,0x0002,0x0000,0x0056,0xdde5,0x0000,0x002e
; Debug Table 0x3.0x0 = 0x93,0x1
0094 e003 | | Load 0x0,0x3
0095 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0096 6806 |h | Jump_Zero 0x9d
0097 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x1 = 0x97,0x2
0098 e5fe | | Load 0x2,-0x2
0099 e5ff | | Load 0x2,-0x1
009a e004 | | Load 0x0,0x4
009b 180d | | Execute Package,Field_Execute,Field_Number 0xd
009c 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
009d 00da | | Load_Top At_Offset_2 ; Debug Table 0x3.0x2 = 0x9d,0x3
009e e005 | | Load 0x0,0x5
009f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00a0 6805 |h | Jump_Zero 0xa6
00a1 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x3 = 0xa1,0x4
00a2 e5fe | | Load 0x2,-0x2
00a3 e5ff | | Load 0x2,-0x1
00a4 820d | | Call 0x1,0xd
00a5 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00a6 e5fd | | Load 0x2,-0x3 ; Debug Table 0x3.0x4 = 0xa6,0x5
00a7 e5fe | | Load 0x2,-0x2
00a8 e5ff | | Load 0x2,-0x1
00a9 e004 | | Load 0x0,0x4
00aa 180d | | Execute Package,Field_Execute,Field_Number 0xd
00ab 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
00ac 0000 0000 | | .BLANK 0000[0x4]
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 4608 |F | Jump_Case 0x9 ; Debug Table 0x4 = .DEBUG 0x00b3,0x0210,0x0005,0x0000,0x0056,0xddf5,0x0000,0x0017
00b4 7808 |x | Jump 0xbd ; case 0x0
00b5 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x1
00b6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
00b7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
00b8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
00b9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x5
00ba 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x6
00bb 7808 |x | Jump 0xc4 ; case 0x7
00bc 7810 |x | Jump 0xcd ; case 0x8
00bd 4800 |H | Short_Literal 0x0
00be 00db | | Load_Top At_Offset_3
00bf 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
00c0 4801 |H | Short_Literal 0x1
00c1 00db | | Load_Top At_Offset_3
00c2 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
00c3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
00c4 00db | | Load_Top At_Offset_3
00c5 4801 |H | Short_Literal 0x1
00c6 e5fe | | Load 0x2,-0x2
00c7 00e9 | | Load_Encached String_Cache
00c8 035b | [ | Declare_Type Array,Constrained
00c9 4801 |H | Short_Literal 0x1
00ca e5ff | | Load 0x2,-0x1
00cb 031b | | Declare_Type Variant_Record,Constrained
00cc 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00cd 00db | | Load_Top At_Offset_3
00ce 00db | | Load_Top At_Offset_3
00cf 02fc | | Declare_Variable Variant_Record,With_Constraint
00d0 4801 |H | Short_Literal 0x1
00d1 e5fe | | Load 0x2,-0x2
00d2 00e9 | | Load_Encached String_Cache
00d3 0334 | 4 | Declare_Variable Array,With_Constraint
00d4 2d04 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x4
00d5 016a | j | QQ_execute Variant_Record,XXX
00d6 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00d7 0000 | | .XXX[0x1]
00d8 ; --------------------------------------------------------------------------------------
00d8 ; SUBPROGRAM
00d8 ; --------------------------------------------------------------------------------------
00d8 00e6 | | .CONST 0x00e6 ; Address of begin
00d9 0004 | | .CONST 0x0004 ; Address of exception handler
00da 0004 | | .CONST 0x0004 ; Number of locals
00db INIT_00d8:
00db 00ec | | Load_Encached Diana_Tree_Cache ; Debug Table 0x5 = .DEBUG 0x00db,0x0212,0x0001,0x0000,0x0056,0xddf5,0x0000,0x0034
; Debug Table 0x5.0x0 = 0xdb,0xffff
00dc e006 | | Load 0x0,0x6 ; Debug Table 0x5.0x1 = 0xdc,0xfffe
00dd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00de 02ff | | Declare_Variable Variant_Record
00df 00d8 | | Load_Top At_Offset_0
00e0 1c00 | | Execute_Immediate Run_Utility,0x0
00e1 e002 | | Load 0x0,0x2 ; Debug Table 0x5.0x2 = 0xe1,0xfffd
00e2 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00e3 02c7 | | Declare_Variable Any
00e4 00d8 | | Load_Top At_Offset_0
00e5 1c00 | | Execute_Immediate Run_Utility,0x0
00e6 BODY_00d8:
00e6 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x3 = 0xe6,0x1
00e7 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
00e8 0b07 | | Execute_Immediate Case_Compare,0x7
00e9 7006 |p | Jump_Nonzero 0xf0
00ea 00d8 | | Load_Top At_Offset_0
00eb 4800 |H | Short_Literal 0x0
00ec 4806 |H | Short_Literal 0x6
00ed 0262 | b | Execute Discrete,In_Range
00ee 7017 |p | Jump_Nonzero 0x106
00ef 4502 |E | Exit_Suprogram New_Top_Offset 0x2 ; Debug Table 0x5.0x4 = 0xef,0xa
00f0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0x5 = 0xf0,0x2
00f1 0120 | | Execute Any,Is_Value
00f2 6803 |h | Jump_Zero 0xf6
00f3 e002 | | Load 0x0,0x2
00f4 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00f5 7801 |x | Jump 0xf7
00f6 00d9 | | Load_Top At_Offset_1
00f7 00db | | Load_Top At_Offset_3
00f8 00ec | | Load_Encached Diana_Tree_Cache
00f9 e5ff | | Load 0x2,-0x1
00fa e007 | | Load 0x0,0x7
00fb 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00fc c402 | | Store 0x2,0x2
00fd 00d1 | | Pop_Control Pop_Count_1
00fe c404 | | Store 0x2,0x4
00ff e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0x6 = 0xff,0x3
0100 00da | | Load_Top At_Offset_2
0101 e402 | | Load 0x2,0x2
0102 e211 | | Load 0x1,0x11
0103 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0104 00d1 | | Pop_Control Pop_Count_1
0105 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0106 e5ff | | Load 0x2,-0x1 ; Debug Table 0x5.0x7 = 0x106,0x4
0107 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0108 0b05 | | Execute_Immediate Case_Compare,0x5
0109 700e |p | Jump_Nonzero 0x118
010a 0b06 | | Execute_Immediate Case_Compare,0x6
010b 700c |p | Jump_Nonzero 0x118
010c e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0x8 = 0x10c,0x8
010d e5ff | | Load 0x2,-0x1
010e e007 | | Load 0x0,0x7
010f 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0110 e008 | | Load 0x0,0x8
0111 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0112 8212 | | Call 0x1,0x12
0113 00d1 | | Pop_Control Pop_Count_1
0114 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x9 = 0x114,0x9
0115 e5fe | | Load 0x2,-0x2
0116 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0117 780b |x | Jump 0x123
0118 e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0xa = 0x118,0x5
0119 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3
011a 7008 |p | Jump_Nonzero 0x123
011b e5fe | | Load 0x2,-0x2 ; Debug Table 0x5.0xb = 0x11b,0x6
011c 0092 0181 | | Action Push_String_Extended,0x181 ; " "
011e 8212 | | Call 0x1,0x12
011f 00d1 | | Pop_Control Pop_Count_1
0120 4801 |H | Short_Literal 0x1 ; Debug Table 0x5.0xc = 0x120,0x7
0121 e5fe | | Load 0x2,-0x2
0122 2803 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x3
0123 00d1 | | Pop_Control Pop_Count_1
0124 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0125 0000 0000 | | .XXX[0x3]
0127 0000 | |
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b | + | .CONST 0x012b ; Address of begin
0129 0004 | | .CONST 0x0004 ; Address of exception handler
012a 0001 | | .CONST 0x0001 ; Number of locals
012b BODY_0128:
012b INIT_0128:
012b 00db | | Load_Top At_Offset_3 ; Debug Table 0x6 = .DEBUG 0x012b,0x022e,0x0001,0x0000,0x0056,0xddf5,0x0000,0x0049
; Debug Table 0x6.0x0 = 0x12b,0x1
012c 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
012d e5fe | | Load 0x2,-0x2
012e 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
012f 0272 | r | Execute Discrete,Minus
0130 00db | | Load_Top At_Offset_3
0131 01db | | Execute Vector,Length
0132 027d | } | Execute Discrete,Greater
0133 6816 |h | Jump_Zero 0x14a
0134 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x1 = 0x134,0x2
0135 e5fe | | Load 0x2,-0x2
0136 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0137 0a01 | | Execute_Immediate Plus,0x1
0138 0248 | H | Execute Discrete,Check_In_Integer
0139 e5fe | | Load 0x2,-0x2
013a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
013b e5ff | | Load 0x2,-0x1
013c 01db | | Execute Vector,Length
013d 0273 | s | Execute Discrete,Plus
013e 0248 | H | Execute Discrete,Check_In_Integer
013f e5fe | | Load 0x2,-0x2
0140 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0141 01ce | | Execute Vector,Slice_Write
0142 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x2 = 0x142,0x3
0143 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0144 00db | | Load_Top At_Offset_3
0145 01db | | Execute Vector,Length
0146 0273 | s | Execute Discrete,Plus
0147 e5fe | | Load 0x2,-0x2
0148 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0149 4502 |E | Exit_Suprogram New_Top_Offset 0x2
014a 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x3 = 0x14a,0x4
014b 01dd | | Execute Vector,First
014c 00db | | Load_Top At_Offset_3
014d 01dd | | Execute Vector,First
014e e5fe | | Load 0x2,-0x2
014f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0150 0273 | s | Execute Discrete,Plus
0151 0248 | H | Execute Discrete,Check_In_Integer
0152 e5fe | | Load 0x2,-0x2
0153 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
0154 0272 | r | Execute Discrete,Minus
0155 0afb | | Execute_Immediate Plus,-0x5
0156 0248 | H | Execute Discrete,Check_In_Integer
0157 e5ff | | Load 0x2,-0x1
0158 01cf | | Execute Vector,Slice_Read
0159 e5fe | | Load 0x2,-0x2
015a 2c02 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x2
015b 0a01 | | Execute_Immediate Plus,0x1
015c 0248 | H | Execute Discrete,Check_In_Integer
015d e5fe | | Load 0x2,-0x2
015e 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
015f 0afc | | Execute_Immediate Plus,-0x4
0160 0248 | H | Execute Discrete,Check_In_Integer
0161 e5fe | | Load 0x2,-0x2
0162 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0163 01ce | | Execute Vector,Slice_Write
0164 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x4 = 0x164,0x5
0165 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0166 e5fe | | Load 0x2,-0x2
0167 2802 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x2
0168 0092 0182 | | Action Push_String_Extended,0x182 ; " ..."
; Debug Table 0x6.0x5 = 0x168,0x6
016a e5fe | | Load 0x2,-0x2
016b 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
016c 0afd | | Execute_Immediate Plus,-0x3
016d 0248 | H | Execute Discrete,Check_In_Integer
016e e5fe | | Load 0x2,-0x2
016f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0170 e5fe | | Load 0x2,-0x2
0171 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4
0172 01ce | | Execute Vector,Slice_Write
0173 6004 |` | Indirect_Literal Discrete,0x178,{0x00000000, 0x56ddf501} ; Debug Table 0x6.0x6 = 0x173,0x7
0174 0257 | W | Execute Discrete,Raise
0175 0000 0000 | | .XXX[0x3]
0177 0000 | |
0178 0000 0000 | | .LITERAL {0x00000000, 0x56ddf501}
017c 0000 0000 | | .LITERAL {0x00000000, 0x0056ddf5}
0180 ; --------------------------------------------------------------------------------------
0180 ; STRING TABLE
0180 ; --------------------------------------------------------------------------------------
0180 0008 | | .STRTAB 0x0008->0x0184 ; "Internal PP Error"
0181 0017 | | .STRTAB 0x0017->0x018c ; " "
0182 0016 | | .STRTAB 0x0016->0x018d ; " ..."
0183 0018 | | .STREND 0x0018->0x018f
0184 496e 7465 |Inte| .STRTAB_STRINGS
018f 0000 | | .XXX[0x1]
0190 ; --------------------------------------------------------------------------------------
0190 ; Debug Table
0190 ; --------------------------------------------------------------------------------------
0190 0003 0007 | | .CONST 0x0003,0x0007
0192 000b 01ca | | .DEBUG 0x000b,0x01ca,0x8000,0x0000,0x0056,0xdde5,0x0000,0x0007
019a 0013 01d6 | | .DEBUG 0x0013,0x01d6,0x8000,0x0000,0x0056,0xddf5,0x0000,0x0013
01a2 003b 01e8 | ; | .DEBUG 0x003b,0x01e8,0x0002,0x0000,0x0056,0xdde5,0x0000,0x0019
01aa 0093 0204 | | .DEBUG 0x0093,0x0204,0x0002,0x0000,0x0056,0xdde5,0x0000,0x002e
01b2 00b3 0210 | | .DEBUG 0x00b3,0x0210,0x0005,0x0000,0x0056,0xddf5,0x0000,0x0017
01ba 00db 0212 | | .DEBUG 0x00db,0x0212,0x0001,0x0000,0x0056,0xddf5,0x0000,0x0034
01c2 012b 022e | + .| .DEBUG 0x012b,0x022e,0x0001,0x0000,0x0056,0xddf5,0x0000,0x0049
01ca ; --------------------------------------------------------------------------------------
01ca ; Debug3 Subtable 0x0
01ca ; --------------------------------------------------------------------------------------
01ca 0005 0000 | | .DBG3TAB 0x0005,0x0000
01cc 000b ffff | | .CONST 0x000b,0xffff
01ce 000c fffe | | .CONST 0x000c,0xfffe
01d0 000d fffd | | .CONST 0x000d,0xfffd
01d2 000e fffc | | .CONST 0x000e,0xfffc
01d4 0010 fffb | | .CONST 0x0010,0xfffb
01d6 ; --------------------------------------------------------------------------------------
01d6 ; Debug3 Subtable 0x1
01d6 ; --------------------------------------------------------------------------------------
01d6 0008 0000 | | .DBG3TAB 0x0008,0x0000
01d8 0013 ffff | | .CONST 0x0013,0xffff
01da 0014 fffe | | .CONST 0x0014,0xfffe
01dc 0021 fffd | ! | .CONST 0x0021,0xfffd
01de 0023 fffc | # | .CONST 0x0023,0xfffc
01e0 002b fffb | + | .CONST 0x002b,0xfffb
01e2 002d fffa | - | .CONST 0x002d,0xfffa
01e4 002f fff9 | / | .CONST 0x002f,0xfff9
01e6 0031 fff8 | 1 | .CONST 0x0031,0xfff8
01e8 ; --------------------------------------------------------------------------------------
01e8 ; Debug3 Subtable 0x2
01e8 ; --------------------------------------------------------------------------------------
01e8 0002 000b | | .DBG3TAB 0x0002,0x000b
01ea 003b ffff | ; | .CONST 0x003b,0xffff
01ec 0040 fffe | @ | .CONST 0x0040,0xfffe
01ee 0046 0001 | F | .CONST 0x0046,0x0001
01f0 0048 0002 | H | .CONST 0x0048,0x0002
01f2 004d 0003 | M | .CONST 0x004d,0x0003
01f4 0052 0004 | R | .CONST 0x0052,0x0004
01f6 0056 0005 | V | .CONST 0x0056,0x0005
01f8 0061 0006 | a | .CONST 0x0061,0x0006
01fa 0067 0007 | g | .CONST 0x0067,0x0007
01fc 006e 0008 | n | .CONST 0x006e,0x0008
01fe 0077 0009 | w | .CONST 0x0077,0x0009
0200 0081 000a | | .CONST 0x0081,0x000a
0202 0088 000b | | .CONST 0x0088,0x000b
0204 ; --------------------------------------------------------------------------------------
0204 ; Debug3 Subtable 0x3
0204 ; --------------------------------------------------------------------------------------
0204 0000 0005 | | .DBG3TAB 0x0000,0x0005
0206 0093 0001 | | .CONST 0x0093,0x0001
0208 0097 0002 | | .CONST 0x0097,0x0002
020a 009d 0003 | | .CONST 0x009d,0x0003
020c 00a1 0004 | | .CONST 0x00a1,0x0004
020e 00a6 0005 | | .CONST 0x00a6,0x0005
0210 ; --------------------------------------------------------------------------------------
0210 ; Debug3 Subtable 0x4
0210 ; --------------------------------------------------------------------------------------
0210 0000 0000 | | .DBG3TAB 0x0000,0x0000
0212 ; --------------------------------------------------------------------------------------
0212 ; Debug3 Subtable 0x5
0212 ; --------------------------------------------------------------------------------------
0212 0003 000a | | .DBG3TAB 0x0003,0x000a
0214 00db ffff | | .CONST 0x00db,0xffff
0216 00dc fffe | | .CONST 0x00dc,0xfffe
0218 00e1 fffd | | .CONST 0x00e1,0xfffd
021a 00e6 0001 | | .CONST 0x00e6,0x0001
021c 00ef 000a | | .CONST 0x00ef,0x000a
021e 00f0 0002 | | .CONST 0x00f0,0x0002
0220 00ff 0003 | | .CONST 0x00ff,0x0003
0222 0106 0004 | | .CONST 0x0106,0x0004
0224 010c 0008 | | .CONST 0x010c,0x0008
0226 0114 0009 | | .CONST 0x0114,0x0009
0228 0118 0005 | | .CONST 0x0118,0x0005
022a 011b 0006 | | .CONST 0x011b,0x0006
022c 0120 0007 | | .CONST 0x0120,0x0007
022e ; --------------------------------------------------------------------------------------
022e ; Debug3 Subtable 0x6
022e ; --------------------------------------------------------------------------------------
022e 0000 0007 | | .DBG3TAB 0x0000,0x0007
0230 012b 0001 | + | .CONST 0x012b,0x0001
0232 0134 0002 | 4 | .CONST 0x0134,0x0002
0234 0142 0003 | B | .CONST 0x0142,0x0003
0236 014a 0004 | J | .CONST 0x014a,0x0004
0238 0164 0005 | d | .CONST 0x0164,0x0005
023a 0168 0006 | h | .CONST 0x0168,0x0006
023c 0173 0007 | s | .CONST 0x0173,0x0007
023e 0000 0000 | | .BLANK 0000[0x1c2]