|
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 - metrics - 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 01b8 | | .CONST 0x01b8 ; 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 005f | _ | .CONST 0x005f ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0020 | | .CONST 0x0020 ; Number of locals
000b INIT_0008:
000b e001 | | Load 0x0,0x1 ; Debug Table 0x0 = .DEBUG 0x000b,0x0222,0x8000,0x0000,0x0058,0x6b55,0x0000,0x000c
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
000d 0129 | ) | Execute Any,Make_Visible
000e 4804 |H | Short_Literal 0x4 ; Debug Table 0x0.0x1 = 0xe,0xfffe
000f 032b | + | Declare_Type Record,Incomplete,Visible
0010 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0x2 = 0x10,0xfffd
0011 02a0 | | Declare_Subprogram Null_Subprogram
0012 03ae | | Declare_Type Heap_Access,Defined,Visible
0013 0007 | | Action Break_Optional ; Debug Table 0x0.0x3 = 0x13,0xfffc
0014 029a 006b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0068 ; Debug Table 0x0.0x4 = 0x14,0xfffb
0016 029a 0083 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0080 ; Debug Table 0x0.0x5 = 0x16,0xfffa
0018 029a 00c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00c0 ; Debug Table 0x0.0x6 = 0x18,0xfff9
001a 029a 00eb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e8 ; Debug Table 0x0.0x7 = 0x1a,0xfff8
001c 029a 0113 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0110 ; Debug Table 0x0.0x8 = 0x1c,0xfff7
001e 029a 0123 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0120 ; Debug Table 0x0.0x9 = 0x1e,0xfff6
0020 4800 |H | Short_Literal 0x0 ; Debug Table 0x0.0xa = 0x20,0xfff5
0021 4800 |H | Short_Literal 0x0
0022 029f 0153 | S| Declare_Subprogram For_Call,INIT_0150
0024 03fd | | Declare_Type Discrete,Defined
0025 0007 | | Action Break_Optional ; Debug Table 0x0.0xb = 0x25,0xfff4
0026 029b 016b | k| Declare_Subprogram For_Outer_Call,Unelaborated,INIT_0168 ; Debug Table 0x0.0xc = 0x26,0xfff3
0028 617f |a | Indirect_Literal Discrete,0x1a8,{0x00000000, 0x00586b55} ; Debug Table 0x0.0xd = 0x28,0xfff2
0029 48a4 |H | Short_Literal 0xa4
002a 00e5 | | Load_Encached Long_Integer_Cache
002b e216 | | Load 0x1,0x16
002c 1d17 | | Execute_Immediate Reference_Lex_1,0x17
002d 4837 |H7 | Short_Literal 0x37
002e 4806 |H | Short_Literal 0x6
002f 4871 |Hq | Short_Literal 0x71
0030 e002 | | Load 0x0,0x2
0031 0387 | | Declare_Variable Package
0032 00d8 | | Load_Top At_Offset_0
0033 020f | | Execute Module,Activate
0034 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x0.0xe = 0x34,0xfff1
0035 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0036 e20e | | Load 0x1,0xe
0037 0325 | % | Complete_Type Record,By_Renaming
0038 00bf | | Action Accept_Activation
0039 029d 017b | {| Declare_Subprogram For_Outer_Call,INIT_0178 ; Debug Table 0x1 = .DEBUG 0x0039,0x0242,0x8000,0x0000,0x0058,0x7065,0x0000,0x000d
; Debug Table 0x1.0x0 = 0x39,0xffff
003b 029d 018b | | Declare_Subprogram For_Outer_Call,INIT_0188 ; Debug Table 0x1.0x1 = 0x3b,0xfffe
003d 1d17 | | Execute_Immediate Reference_Lex_1,0x17 ; Debug Table 0x1.0x2 = 0x3d,0xfffd
003e 00c7 | | Action Elaborate_Subprogram
003f 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x3 = 0x3f,0xfffc
0040 00c7 | | Action Elaborate_Subprogram
0041 6162 |ab | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x00587065} ; Debug Table 0x1.0x4 = 0x41,0xfffb
0042 4891 |H | Short_Literal 0x91
0043 e20e | | Load 0x1,0xe
0044 e20f | | Load 0x1,0xf
0045 e003 | | Load 0x0,0x3
0046 1b18 | | Execute Package,Field_Read,Field_Number 0x18
0047 0387 | | Declare_Variable Package
0048 00d8 | | Load_Top At_Offset_0
0049 020f | | Execute Module,Activate
004a e003 | | Load 0x0,0x3 ; Debug Table 0x1.0x5 = 0x4a,0xfffa
004b 1919 | | Execute Package,Field_Reference,Field_Number 0x19
004c 00c6 | | Action Check_Subprogram_Elaborated
004d 00db | | Load_Top At_Offset_3
004e 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
004f e218 | | Load 0x1,0x18
0050 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
0051 6152 |aR | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x00587065}
0052 489a |H | Short_Literal 0x9a
0053 4800 |H | Short_Literal 0x0
0054 0007 | | Action Break_Optional
0055 1d11 | | Execute_Immediate Reference_Lex_1,0x11 ; Debug Table 0x1.0x6 = 0x55,0xfff9
0056 00c7 | | Action Elaborate_Subprogram
0057 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x7 = 0x57,0xfff8
0058 00c7 | | Action Elaborate_Subprogram
0059 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x8 = 0x59,0xfff7
005a 00c7 | | Action Elaborate_Subprogram
005b 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x1.0x9 = 0x5b,0xfff6
005c 00c7 | | Action Elaborate_Subprogram
005d 1d15 | | Execute_Immediate Reference_Lex_1,0x15 ; Debug Table 0x1.0xa = 0x5d,0xfff5
005e 00c7 | | Action Elaborate_Subprogram
005f BODY_0008:
005f 00bc | | Action Signal_Activated
0060 00bb | | Action Signal_Completion
0061 0000 0000 | | .BLANK 0000[0x7]
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0074 | t | .CONST 0x0074 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 487e |H~ | Short_Literal 0x7e ; Debug Table 0x2 = .DEBUG 0x006b,0x025a,0x0001,0x0000,0x0058,0x6b55,0x0000,0x0021
; Debug Table 0x2.0x0 = 0x6b,0x1
006c a5fe | | Store_Unchecked 0x2,-0x2
006d 00da | | Load_Top At_Offset_2 ; Debug Table 0x2.0x1 = 0x6d,0x2
006e e218 | | Load 0x1,0x18
006f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0070 00d1 | | Pop_Control Pop_Count_1
0071 4800 |H | Short_Literal 0x0 ; Debug Table 0x2.0x2 = 0x71,0x3
0072 a5fe | | Store_Unchecked 0x2,-0x2
0073 4501 |E | Exit_Subprogram 0x1
0074 TRAP_0068:
0074 4885 |H | Short_Literal 0x85
0075 010f | | Execute Exception,Equal
0076 6803 |h | Jump_Zero 0x7a
0077 4833 |H3 | Short_Literal 0x33 ; Debug Table 0x2.0x3 = 0x77,0x4
0078 a5fe | | Store_Unchecked 0x2,-0x2
0079 4501 |E | Exit_Subprogram 0x1
007a 0100 | | Execute Exception,Raise
007b 0000 0000 | | .BLANK 0000[0x5]
0080 ; --------------------------------------------------------------------------------------
0080 ; SUBPROGRAM
0080 ; --------------------------------------------------------------------------------------
0080 0087 | | .CONST 0x0087 ; Address of begin
0081 00b1 | | .CONST 0x00b1 ; Address of exception handler
0082 0004 | | .CONST 0x0004 ; Number of locals
0083 INIT_0080:
0083 e218 | | Load 0x1,0x18 ; Debug Table 0x3 = .DEBUG 0x0083,0x0264,0x0001,0x0000,0x0058,0x6b55,0x0000,0x002d
; Debug Table 0x3.0x0 = 0x83,0xffff
0084 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0085 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x1 = 0x85,0xfffe
0086 00e5 | | Load_Encached Long_Integer_Cache ; Debug Table 0x3.0x2 = 0x86,0xfffd
0087 BODY_0080:
0087 487e |H~ | Short_Literal 0x7e ; Debug Table 0x3.0x3 = 0x87,0x1
0088 a5fd | | Store_Unchecked 0x2,-0x3
0089 e5ff | | Load 0x2,-0x1 ; Debug Table 0x3.0x4 = 0x89,0x2
008a 821a | | Call 0x1,0x1a
008b 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
008c 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x3.0x5 = 0x8c,0x3
008d e218 | | Load 0x1,0x18
008e 1b16 | | Execute Package,Field_Read,Field_Number 0x16
008f 00da | | Load_Top At_Offset_2
0090 e5fe | | Load 0x2,-0x2
0091 e21b | | Load 0x1,0x1b
0092 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0093 e5fe | | Load 0x2,-0x2
0094 e21b | | Load 0x1,0x1b
0095 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0096 e21c | | Load 0x1,0x1c
0097 e21d | | Load 0x1,0x1d
0098 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0099 e003 | | Load 0x0,0x3
009a 1819 | | Execute Package,Field_Execute,Field_Number 0x19
009b e218 | | Load 0x1,0x18
009c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
009d c402 | | Store 0x2,0x2
009e 005a | Z | Store_Top Discrete,At_Offset_2
009f 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x3.0x6 = 0x9f,0x4
00a0 7005 |p | Jump_Nonzero 0xa6
00a1 4834 |H4 | Short_Literal 0x34 ; Debug Table 0x3.0x7 = 0xa1,0x5
00a2 a5fd | | Store_Unchecked 0x2,-0x3
00a3 e001 | | Load 0x0,0x1 ; Debug Table 0x3.0x8 = 0xa3,0x6
00a4 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00a5 0257 | W | Execute Discrete,Raise
00a6 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x3.0x9 = 0xa6,0x7
00a7 00db | | Load_Top At_Offset_3
00a8 0217 | | Execute Heap_Access,All_Reference
00a9 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00aa 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xa = 0xaa,0x8
00ab 00db | | Load_Top At_Offset_3
00ac 0217 | | Execute Heap_Access,All_Reference
00ad 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00ae 4800 |H | Short_Literal 0x0 ; Debug Table 0x3.0xb = 0xae,0x9
00af a5fd | | Store_Unchecked 0x2,-0x3
00b0 4503 |E | Exit_Subprogram 0x3
00b1 TRAP_0080:
00b1 e001 | | Load 0x0,0x1
00b2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00b3 010f | | Execute Exception,Equal
00b4 6801 |h | Jump_Zero 0xb6
00b5 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0x3.0xc = 0xb5,0xa
00b6 4885 |H | Short_Literal 0x85
00b7 010f | | Execute Exception,Equal
00b8 6803 |h | Jump_Zero 0xbc
00b9 4832 |H2 | Short_Literal 0x32 ; Debug Table 0x3.0xd = 0xb9,0xb
00ba a5fd | | Store_Unchecked 0x2,-0x3
00bb 4503 |E | Exit_Subprogram 0x3
00bc 0100 | | Execute Exception,Raise
00bd 0000 0000 | | .XXX[0x3]
00bf 0000 | |
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c4 | | .CONST 0x00c4 ; Address of begin
00c1 00d8 | | .CONST 0x00d8 ; Address of exception handler
00c2 0002 | | .CONST 0x0002 ; Number of locals
00c3 INIT_00c0:
00c3 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4 = .DEBUG 0x00c3,0x0282,0x0001,0x0000,0x0058,0x6b55,0x0000,0x003f
; Debug Table 0x4.0x0 = 0xc3,0xffff
00c4 BODY_00c0:
00c4 487e |H~ | Short_Literal 0x7e ; Debug Table 0x4.0x1 = 0xc4,0x1
00c5 a5fd | | Store_Unchecked 0x2,-0x3
00c6 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x4.0x2 = 0xc6,0x2
00c7 e5fe | | Load 0x2,-0x2
00c8 e5ff | | Load 0x2,-0x1
00c9 821a | | Call 0x1,0x1a
00ca e218 | | Load 0x1,0x18
00cb 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00cc 00d1 | | Pop_Control Pop_Count_1
00cd 0059 | Y | Store_Top Discrete,At_Offset_1
00ce 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x3 = 0xce,0x3
00cf 7005 |p | Jump_Nonzero 0xd5
00d0 4835 |H5 | Short_Literal 0x35 ; Debug Table 0x4.0x4 = 0xd0,0x4
00d1 a5fd | | Store_Unchecked 0x2,-0x3
00d2 e001 | | Load 0x0,0x1 ; Debug Table 0x4.0x5 = 0xd2,0x5
00d3 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00d4 0257 | W | Execute Discrete,Raise
00d5 4800 |H | Short_Literal 0x0 ; Debug Table 0x4.0x6 = 0xd5,0x6
00d6 a5fd | | Store_Unchecked 0x2,-0x3
00d7 4502 |E | Exit_Subprogram 0x2
00d8 TRAP_00c0:
00d8 e001 | | Load 0x0,0x1
00d9 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00da 010f | | Execute Exception,Equal
00db 6801 |h | Jump_Zero 0xdd
00dc 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x4.0x7 = 0xdc,0x7
00dd 4885 |H | Short_Literal 0x85
00de 010f | | Execute Exception,Equal
00df 6803 |h | Jump_Zero 0xe3
00e0 4832 |H2 | Short_Literal 0x32 ; Debug Table 0x4.0x8 = 0xe0,0x8
00e1 a5fd | | Store_Unchecked 0x2,-0x3
00e2 4502 |E | Exit_Subprogram 0x2
00e3 0100 | | Execute Exception,Raise
00e4 0000 0000 | | .BLANK 0000[0x4]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00ed | | .CONST 0x00ed ; Address of begin
00e9 0100 | | .CONST 0x0100 ; Address of exception handler
00ea 0002 | | .CONST 0x0002 ; Number of locals
00eb INIT_00e8:
00eb e218 | | Load 0x1,0x18 ; Debug Table 0x5 = .DEBUG 0x00eb,0x0296,0x0001,0x0000,0x0058,0x6b55,0x0000,0x0051
; Debug Table 0x5.0x0 = 0xeb,0xffff
00ec 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00ed BODY_00e8:
00ed 487e |H~ | Short_Literal 0x7e ; Debug Table 0x5.0x1 = 0xed,0x1
00ee a5fc | | Store_Unchecked 0x2,-0x4
00ef 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x2 = 0xef,0x2
00f0 a5fd | | Store_Unchecked 0x2,-0x3
00f1 e218 | | Load 0x1,0x18 ; Debug Table 0x5.0x3 = 0xf1,0x3
00f2 1b16 | | Execute Package,Field_Read,Field_Number 0x16
00f3 e5fe | | Load 0x2,-0x2
00f4 e5ff | | Load 0x2,-0x1
00f5 821a | | Call 0x1,0x1a
00f6 e218 | | Load 0x1,0x18
00f7 181e | | Execute Package,Field_Execute,Field_Number 0x1e
00f8 00d1 | | Pop_Control Pop_Count_1
00f9 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00fa 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x4 = 0xfa,0x4
00fb 021c | | Execute Heap_Access,Not_Null
00fc a5fd | | Store_Unchecked 0x2,-0x3
00fd 4800 |H | Short_Literal 0x0 ; Debug Table 0x5.0x5 = 0xfd,0x5
00fe a5fc | | Store_Unchecked 0x2,-0x4
00ff 4502 |E | Exit_Subprogram 0x2
0100 TRAP_00e8:
0100 e001 | | Load 0x0,0x1
0101 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0102 010f | | Execute Exception,Equal
0103 6801 |h | Jump_Zero 0x105
0104 4502 |E | Exit_Subprogram 0x2 ; Debug Table 0x5.0x6 = 0x104,0x6
0105 4885 |H | Short_Literal 0x85
0106 010f | | Execute Exception,Equal
0107 6803 |h | Jump_Zero 0x10b
0108 4833 |H3 | Short_Literal 0x33 ; Debug Table 0x5.0x7 = 0x108,0x7
0109 a5fc | | Store_Unchecked 0x2,-0x4
010a 4502 |E | Exit_Subprogram 0x2
010b 0100 | | Execute Exception,Raise
010c 0000 0000 | | .BLANK 0000[0x4]
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 487e |H~ | Short_Literal 0x7e ; Debug Table 0x6 = .DEBUG 0x0113,0x02a8,0x0001,0x0000,0x0058,0x6b55,0x0000,0x0067
; Debug Table 0x6.0x0 = 0x113,0x1
0114 a5fd | | Store_Unchecked 0x2,-0x3
0115 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x1 = 0x115,0x2
0116 a5fe | | Store_Unchecked 0x2,-0x2
0117 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x2 = 0x117,0x3
0118 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0119 a5fe | | Store_Unchecked 0x2,-0x2
011a 4800 |H | Short_Literal 0x0 ; Debug Table 0x6.0x3 = 0x11a,0x4
011b a5fd | | Store_Unchecked 0x2,-0x3
011c 4502 |E | Exit_Subprogram 0x2
011d 0000 0000 | | .XXX[0x3]
011f 0000 | |
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 012f | / | .CONST 0x012f ; Address of begin
0121 013e | > | .CONST 0x013e ; Address of exception handler
0122 0006 | | .CONST 0x0006 ; Number of locals
0123 INIT_0120:
0123 029f 019b | | Declare_Subprogram For_Call,INIT_0198 ; Debug Table 0x7 = .DEBUG 0x0123,0x02b2,0x2801,0x0002,0x0058,0x6b55,0x0000,0x0077
; Debug Table 0x7.0x0 = 0x123,0xffff
0125 e218 | | Load 0x1,0x18 ; Debug Table 0x7.0x1 = 0x125,0xfffe
0126 1923 | # | Execute Package,Field_Reference,Field_Number 0x23
0127 00c6 | | Action Check_Subprogram_Elaborated
0128 4802 |H | Short_Literal 0x2
0129 4802 |H | Short_Literal 0x2
012a 0099 | | Action Reference_Dynamic
012b 6078 |`x | Indirect_Literal Discrete,0x1a4,{0x00000000, 0x00587065}
012c 4a1d |J | Short_Literal 0x21d
012d 4806 |H | Short_Literal 0x6
012e 0007 | | Action Break_Optional
012f BODY_0120:
012f 487e |H~ | Short_Literal 0x7e ; Debug Table 0x7.0x2 = 0x12f,0x1
0130 a5fc | | Store_Unchecked 0x2,-0x4
0131 e5fd | | Load 0x2,-0x3 ; Debug Table 0x7.0x3 = 0x131,0x2
0132 4803 |H | Short_Literal 0x3
0133 4802 |H | Short_Literal 0x2
0134 0099 | | Action Reference_Dynamic
0135 4804 |H | Short_Literal 0x4
0136 4802 |H | Short_Literal 0x2
0137 0099 | | Action Reference_Dynamic
0138 e218 | | Load 0x1,0x18
0139 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
013a 00d1 | | Pop_Control Pop_Count_1
013b 4800 |H | Short_Literal 0x0 ; Debug Table 0x7.0x4 = 0x13b,0x3
013c a5fc | | Store_Unchecked 0x2,-0x4
013d 4503 |E | Exit_Subprogram 0x3
013e TRAP_0120:
013e e001 | | Load 0x0,0x1
013f 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0140 010f | | Execute Exception,Equal
0141 6801 |h | Jump_Zero 0x143
0142 4503 |E | Exit_Subprogram 0x3 ; Debug Table 0x7.0x5 = 0x142,0x4
0143 4885 |H | Short_Literal 0x85
0144 010f | | Execute Exception,Equal
0145 6803 |h | Jump_Zero 0x149
0146 4833 |H3 | Short_Literal 0x33 ; Debug Table 0x7.0x6 = 0x146,0x5
0147 a5fc | | Store_Unchecked 0x2,-0x4
0148 4503 |E | Exit_Subprogram 0x3
0149 0100 | | Execute Exception,Raise
014a 0000 0000 | | .BLANK 0000[0x6]
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 4603 |F | Jump_Case 0x3 ; Debug Table 0x8 = .DEBUG 0x0153,0x02c2,0x0005,0x0000,0x0058,0x6b55,0x0000,0x0090
0154 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x0
0155 7802 |x | Jump 0x158 ; case 0x1
0156 7805 |x | Jump 0x15c ; case 0x2
0157 7809 |x | Jump 0x161 ; case 0x3
0158 00da | | Load_Top At_Offset_2
0159 0091 01ac | | Action Push_String_Extended_Indexed,0x1ac ; "BORING"
015b 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
015c 00db | | Load_Top At_Offset_3
015d 00db | | Load_Top At_Offset_3
015e 00e0 | | Load_Encached Standard_Cache
015f 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0160 4202 |B | Exit_Subprogram From_Utility,With_Result,0x2
0161 00da | | Load_Top At_Offset_2
0162 00e0 | | Load_Encached Standard_Cache
0163 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0164 4201 |B | Exit_Subprogram From_Utility,With_Result,0x1
0165 0000 0000 | | .XXX[0x3]
0167 0000 | |
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b | k | .CONST 0x016b ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0001 | | .CONST 0x0001 ; Number of locals
016b BODY_0168:
016b INIT_0168:
016b 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x016b,0x02c4,0x0002,0x0000,0x0058,0x6b55,0x0000,0x009b
; Debug Table 0x9.0x0 = 0x16b,0x1
016c 4871 |Hq | Short_Literal 0x71
016d 026e | n | Execute Discrete,Modulo
016e 00e3 | | Load_Encached Natural_Cache
016f 025b | [ | Execute Discrete,Check_In_Type
0170 4401 |D | Exit_Subprogram With_Result,0x1
0171 0000 0000 | | .BLANK 0000[0x7]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017b | { | .CONST 0x017b ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0001 | | .CONST 0x0001 ; Number of locals
017b BODY_0178:
017b INIT_0178:
017b 00da | | Load_Top At_Offset_2 ; Debug Table 0xa = .DEBUG 0x017b,0x02c8,0x0002,0x0000,0x0058,0x7065,0x0000,0x000e
; Debug Table 0xa.0x0 = 0x17b,0x1
017c e004 | | Load 0x0,0x4
017d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
017e e005 | | Load 0x0,0x5
017f 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
0180 180e | | Execute Package,Field_Execute,Field_Number 0xe
0181 4401 |D | Exit_Subprogram With_Result,0x1
0182 0000 0000 | | .BLANK 0000[0x6]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x018b,0x02cc,0x0002,0x0000,0x0058,0x7065,0x0000,0x002b
; Debug Table 0xb.0x0 = 0x18b,0x1
018c e005 | | Load 0x0,0x5
018d 1b40 | @ | Execute Package,Field_Read,Field_Number 0x40
018e 180d | | Execute Package,Field_Execute,Field_Number 0xd
018f e004 | | Load 0x0,0x4
0190 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0191 4401 |D | Exit_Subprogram With_Result,0x1
0192 0000 0000 | | .BLANK 0000[0x6]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x019b,0x02d0,0x0801,0x0002,0x0058,0x7065,0x0000,0x0206
; Debug Table 0xc.0x0 = 0x19b,0x1
019c 0217 | | Execute Heap_Access,All_Reference
019d 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
019e 8219 | | Call 0x1,0x19
019f 85fe | | Call 0x2,-0x2
01a0 4502 |E | Exit_Subprogram 0x2
01a1 0000 0000 | | .XXX[0x3]
01a3 0000 | |
01a4 0000 0000 | | .LITERAL {0x00000000, 0x00587065}
01a8 0000 0000 | | .LITERAL {0x00000000, 0x00586b55}
01ac ; --------------------------------------------------------------------------------------
01ac ; STRING TABLE
01ac ; --------------------------------------------------------------------------------------
01ac 0004 | | .STRTAB 0x0004->0x01ae ; "BORING"
01ad 0008 | | .STREND 0x0008->0x01b1
01ae 424f 5249 |BORI| .STRTAB_STRINGS
01b1 0000 0000 | | .BLANK 0000[0x7]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; Debug Table
01b8 ; --------------------------------------------------------------------------------------
01b8 0003 000d | | .CONST 0x0003,0x000d
01ba 000b 0222 | "| .DEBUG 0x000b,0x0222,0x8000,0x0000,0x0058,0x6b55,0x0000,0x000c
01c2 0039 0242 | 9 B| .DEBUG 0x0039,0x0242,0x8000,0x0000,0x0058,0x7065,0x0000,0x000d
01ca 006b 025a | k Z| .DEBUG 0x006b,0x025a,0x0001,0x0000,0x0058,0x6b55,0x0000,0x0021
01d2 0083 0264 | d| .DEBUG 0x0083,0x0264,0x0001,0x0000,0x0058,0x6b55,0x0000,0x002d
01da 00c3 0282 | | .DEBUG 0x00c3,0x0282,0x0001,0x0000,0x0058,0x6b55,0x0000,0x003f
01e2 00eb 0296 | | .DEBUG 0x00eb,0x0296,0x0001,0x0000,0x0058,0x6b55,0x0000,0x0051
01ea 0113 02a8 | | .DEBUG 0x0113,0x02a8,0x0001,0x0000,0x0058,0x6b55,0x0000,0x0067
01f2 0123 02b2 | # | .DEBUG 0x0123,0x02b2,0x2801,0x0002,0x0058,0x6b55,0x0000,0x0077
01fa 0153 02c2 | S | .DEBUG 0x0153,0x02c2,0x0005,0x0000,0x0058,0x6b55,0x0000,0x0090
0202 016b 02c4 | k | .DEBUG 0x016b,0x02c4,0x0002,0x0000,0x0058,0x6b55,0x0000,0x009b
020a 017b 02c8 | { | .DEBUG 0x017b,0x02c8,0x0002,0x0000,0x0058,0x7065,0x0000,0x000e
0212 018b 02cc | | .DEBUG 0x018b,0x02cc,0x0002,0x0000,0x0058,0x7065,0x0000,0x002b
021a 019b 02d0 | | .DEBUG 0x019b,0x02d0,0x0801,0x0002,0x0058,0x7065,0x0000,0x0206
0222 ; --------------------------------------------------------------------------------------
0222 ; Debug3 Subtable 0x0
0222 ; --------------------------------------------------------------------------------------
0222 000f 0000 | | .DBG3TAB 0x000f,0x0000
0224 000b ffff | | .CONST 0x000b,0xffff
0226 000e fffe | | .CONST 0x000e,0xfffe
0228 0010 fffd | | .CONST 0x0010,0xfffd
022a 0013 fffc | | .CONST 0x0013,0xfffc
022c 0014 fffb | | .CONST 0x0014,0xfffb
022e 0016 fffa | | .CONST 0x0016,0xfffa
0230 0018 fff9 | | .CONST 0x0018,0xfff9
0232 001a fff8 | | .CONST 0x001a,0xfff8
0234 001c fff7 | | .CONST 0x001c,0xfff7
0236 001e fff6 | | .CONST 0x001e,0xfff6
0238 0020 fff5 | | .CONST 0x0020,0xfff5
023a 0025 fff4 | % | .CONST 0x0025,0xfff4
023c 0026 fff3 | & | .CONST 0x0026,0xfff3
023e 0028 fff2 | ( | .CONST 0x0028,0xfff2
0240 0034 fff1 | 4 | .CONST 0x0034,0xfff1
0242 ; --------------------------------------------------------------------------------------
0242 ; Debug3 Subtable 0x1
0242 ; --------------------------------------------------------------------------------------
0242 000b 0000 | | .DBG3TAB 0x000b,0x0000
0244 0039 ffff | 9 | .CONST 0x0039,0xffff
0246 003b fffe | ; | .CONST 0x003b,0xfffe
0248 003d fffd | = | .CONST 0x003d,0xfffd
024a 003f fffc | ? | .CONST 0x003f,0xfffc
024c 0041 fffb | A | .CONST 0x0041,0xfffb
024e 004a fffa | J | .CONST 0x004a,0xfffa
0250 0055 fff9 | U | .CONST 0x0055,0xfff9
0252 0057 fff8 | W | .CONST 0x0057,0xfff8
0254 0059 fff7 | Y | .CONST 0x0059,0xfff7
0256 005b fff6 | [ | .CONST 0x005b,0xfff6
0258 005d fff5 | ] | .CONST 0x005d,0xfff5
025a ; --------------------------------------------------------------------------------------
025a ; Debug3 Subtable 0x2
025a ; --------------------------------------------------------------------------------------
025a 0000 0004 | | .DBG3TAB 0x0000,0x0004
025c 006b 0001 | k | .CONST 0x006b,0x0001
025e 006d 0002 | m | .CONST 0x006d,0x0002
0260 0071 0003 | q | .CONST 0x0071,0x0003
0262 0077 0004 | w | .CONST 0x0077,0x0004
0264 ; --------------------------------------------------------------------------------------
0264 ; Debug3 Subtable 0x3
0264 ; --------------------------------------------------------------------------------------
0264 0003 000b | | .DBG3TAB 0x0003,0x000b
0266 0083 ffff | | .CONST 0x0083,0xffff
0268 0085 fffe | | .CONST 0x0085,0xfffe
026a 0086 fffd | | .CONST 0x0086,0xfffd
026c 0087 0001 | | .CONST 0x0087,0x0001
026e 0089 0002 | | .CONST 0x0089,0x0002
0270 008c 0003 | | .CONST 0x008c,0x0003
0272 009f 0004 | | .CONST 0x009f,0x0004
0274 00a1 0005 | | .CONST 0x00a1,0x0005
0276 00a3 0006 | | .CONST 0x00a3,0x0006
0278 00a6 0007 | | .CONST 0x00a6,0x0007
027a 00aa 0008 | | .CONST 0x00aa,0x0008
027c 00ae 0009 | | .CONST 0x00ae,0x0009
027e 00b5 000a | | .CONST 0x00b5,0x000a
0280 00b9 000b | | .CONST 0x00b9,0x000b
0282 ; --------------------------------------------------------------------------------------
0282 ; Debug3 Subtable 0x4
0282 ; --------------------------------------------------------------------------------------
0282 0001 0008 | | .DBG3TAB 0x0001,0x0008
0284 00c3 ffff | | .CONST 0x00c3,0xffff
0286 00c4 0001 | | .CONST 0x00c4,0x0001
0288 00c6 0002 | | .CONST 0x00c6,0x0002
028a 00ce 0003 | | .CONST 0x00ce,0x0003
028c 00d0 0004 | | .CONST 0x00d0,0x0004
028e 00d2 0005 | | .CONST 0x00d2,0x0005
0290 00d5 0006 | | .CONST 0x00d5,0x0006
0292 00dc 0007 | | .CONST 0x00dc,0x0007
0294 00e0 0008 | | .CONST 0x00e0,0x0008
0296 ; --------------------------------------------------------------------------------------
0296 ; Debug3 Subtable 0x5
0296 ; --------------------------------------------------------------------------------------
0296 0001 0007 | | .DBG3TAB 0x0001,0x0007
0298 00eb ffff | | .CONST 0x00eb,0xffff
029a 00ed 0001 | | .CONST 0x00ed,0x0001
029c 00ef 0002 | | .CONST 0x00ef,0x0002
029e 00f1 0003 | | .CONST 0x00f1,0x0003
02a0 00fa 0004 | | .CONST 0x00fa,0x0004
02a2 00fd 0005 | | .CONST 0x00fd,0x0005
02a4 0104 0006 | | .CONST 0x0104,0x0006
02a6 0108 0007 | | .CONST 0x0108,0x0007
02a8 ; --------------------------------------------------------------------------------------
02a8 ; Debug3 Subtable 0x6
02a8 ; --------------------------------------------------------------------------------------
02a8 0000 0004 | | .DBG3TAB 0x0000,0x0004
02aa 0113 0001 | | .CONST 0x0113,0x0001
02ac 0115 0002 | | .CONST 0x0115,0x0002
02ae 0117 0003 | | .CONST 0x0117,0x0003
02b0 011a 0004 | | .CONST 0x011a,0x0004
02b2 ; --------------------------------------------------------------------------------------
02b2 ; Debug3 Subtable 0x7
02b2 ; --------------------------------------------------------------------------------------
02b2 0002 0005 | | .DBG3TAB 0x0002,0x0005
02b4 0123 ffff | # | .CONST 0x0123,0xffff
02b6 0125 fffe | % | .CONST 0x0125,0xfffe
02b8 012f 0001 | / | .CONST 0x012f,0x0001
02ba 0131 0002 | 1 | .CONST 0x0131,0x0002
02bc 013b 0003 | ; | .CONST 0x013b,0x0003
02be 0142 0004 | B | .CONST 0x0142,0x0004
02c0 0146 0005 | F | .CONST 0x0146,0x0005
02c2 ; --------------------------------------------------------------------------------------
02c2 ; Debug3 Subtable 0x8
02c2 ; --------------------------------------------------------------------------------------
02c2 0000 0000 | | .DBG3TAB 0x0000,0x0000
02c4 ; --------------------------------------------------------------------------------------
02c4 ; Debug3 Subtable 0x9
02c4 ; --------------------------------------------------------------------------------------
02c4 0000 0001 | | .DBG3TAB 0x0000,0x0001
02c6 016b 0001 | k | .CONST 0x016b,0x0001
02c8 ; --------------------------------------------------------------------------------------
02c8 ; Debug3 Subtable 0xa
02c8 ; --------------------------------------------------------------------------------------
02c8 0000 0001 | | .DBG3TAB 0x0000,0x0001
02ca 017b 0001 | { | .CONST 0x017b,0x0001
02cc ; --------------------------------------------------------------------------------------
02cc ; Debug3 Subtable 0xb
02cc ; --------------------------------------------------------------------------------------
02cc 0000 0001 | | .DBG3TAB 0x0000,0x0001
02ce 018b 0001 | | .CONST 0x018b,0x0001
02d0 ; --------------------------------------------------------------------------------------
02d0 ; Debug3 Subtable 0xc
02d0 ; --------------------------------------------------------------------------------------
02d0 0000 0001 | | .DBG3TAB 0x0000,0x0001
02d2 019b 0001 | | .CONST 0x019b,0x0001
02d4 0000 0000 | | .BLANK 0000[0x12c]