|
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, 5812_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_07b4f8
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5812 |X | .CONST 0x5812 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 01c8 | | .CONST 0x01c8 ; 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 ; SUBPROGRAM
0008 ; See instruction 0x02cf at 0x8c, index=0x0
0008 ; --------------------------------------------------------------------------------------
0008 0022 | " | .CONST 0x0022 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 000f | | .CONST 0x000f ; Number of locals
000b INIT_0008:
000b INIT_0008:
000b 029a 002b | +| Declare_Subprogram INIT_0028,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0222,0x0000,0x0000,0x004c,0x35c6,0x0000,0x01ed
; Debug Table 0x0.0x0 = 0xb,0xffff
000d 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0.0x1 = 0xd,0xfffe
000f 00bf | | Action Accept_Activation
0010 4800 |H | Short_Literal 0x0 ; Debug Table 0x1 = .DEBUG 0x0010,0x0228,0x0000,0x0000,0x004c,0x3666,0x0000,0x000c
; Debug Table 0x1.0x0 = 0x10,0xffff
0011 6042 |`B | Indirect_Literal Discrete,0x54,{0x0084300d, 0x000005b0}
0012 02a0 | | Declare_Subprogram Null_Subprogram
0013 037d | } | Declare_Type Task,Defined
0014 036f | o | Declare_Variable Task
0015 1d0d | | Execute_Immediate Reference_Lex_1,0xd ; Debug Table 0x1.0x1 = 0x15,0xfffe
0016 00c7 | | Action Elaborate_Subprogram
0017 1d0e | | Execute_Immediate Reference_Lex_1,0xe ; Debug Table 0x1.0x2 = 0x17,0xfffd
0018 00c7 | | Action Elaborate_Subprogram
0019 e001 | | Load 0x0,0x1 ; Debug Table 0x1.0x3 = 0x19,0xfffc
001a e002 | | Load 0x0,0x2
001b e003 | | Load 0x0,0x3
001c e004 | | Load 0x0,0x4
001d a005 | | Store_Unchecked 0x0,0x5
001e e006 | | Load 0x0,0x6
001f 4806 |H | Short_Literal 0x6
0020 e20f | | Load 0x1,0xf
0021 020e | | Execute Module,Augment_Imports
0022 BODY_0008:
0022 BODY_0008:
0022 00be | | Action Activate_Tasks
0023 00bc | | Action Signal_Activated
0024 00bb | | Action Signal_Completion
0025 0000 0000 | | .XXX[0x3]
0027 0000 | |
0028 ; --------------------------------------------------------------------------------------
0028 ; SUBPROGRAM
0028 ; --------------------------------------------------------------------------------------
0028 0030 | 0 | .CONST 0x0030 ; Address of begin
0029 0004 | | .CONST 0x0004 ; Address of exception handler
002a 0002 | | .CONST 0x0002 ; Number of locals
002b INIT_0028:
002b e001 | | Load 0x0,0x1 ; Debug Table 0x2 = .DEBUG 0x002b,0x0232,0x0001,0x0000,0x004c,0x35c6,0x0000,0x01ee
; Debug Table 0x2.0x0 = 0x2b,0xffff
002c 180e | | Execute Package,Field_Execute,Field_Number 0xe
002d e001 | | Load 0x0,0x1
002e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002f 03f1 | | Declare_Variable Discrete,With_Value
0030 BODY_0028:
0030 e006 | | Load 0x0,0x6 ; Debug Table 0x2.0x1 = 0x30,0x1
0031 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0032 e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x2 = 0x32,0x2
0033 e5fe | | Load 0x2,-0x2
0034 00da | | Load_Top At_Offset_2
0035 4803 |H | Short_Literal 0x3
0036 e20f | | Load 0x1,0xf
0037 170d | | Execute Task,Entry_Call,Field_Number 0xd
0038 00db | | Load_Top At_Offset_3 ; Debug Table 0x2.0x3 = 0x38,0x3
0039 4826 |H& | Short_Literal 0x26
003a e006 | | Load 0x0,0x6
003b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
003c e5fd | | Load 0x2,-0x3 ; Debug Table 0x2.0x4 = 0x3c,0x4
003d e5fe | | Load 0x2,-0x2
003e 00da | | Load_Top At_Offset_2
003f 4803 |H | Short_Literal 0x3
0040 e20f | | Load 0x1,0xf
0041 170e | | Execute Task,Entry_Call,Field_Number 0xe
0042 e006 | | Load 0x0,0x6 ; Debug Table 0x2.0x5 = 0x42,0x5
0043 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0044 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0045 0000 0000 | | .XXX[0x3]
0047 0000 | |
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 004b | K | .CONST 0x004b ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0001 | | .CONST 0x0001 ; Number of locals
004b BODY_0048:
004b INIT_0048:
004b 00db | | Load_Top At_Offset_3 ; Debug Table 0x3 = .DEBUG 0x004b,0x0240,0x0001,0x0000,0x004c,0x35c6,0x0000,0x0200
; Debug Table 0x3.0x0 = 0x4b,0x1
004c 00db | | Load_Top At_Offset_3
004d 4802 |H | Short_Literal 0x2
004e e20f | | Load 0x1,0xf
004f 170f | | Execute Task,Entry_Call,Field_Number 0xf
0050 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0051 0000 0000 | | .XXX[0x3]
0053 0000 | |
0054 0084 300d | 0 | .LITERAL {0x0084300d, 0x000005b0}
0058 0098 00a5 | | .XXX[0x3]
005a 0017 | |
005b 4803 |H | Short_Literal 0x3 ; Debug Table 0x4 = .DEBUG 0x005b,0x0244,0x0000,0x0000,0x004c,0x3666,0x0000,0x000d
005c 02cb | | Declare_Variable Entry
005d 4803 |H | Short_Literal 0x3
005e 02cb | | Declare_Variable Entry
005f 4802 |H | Short_Literal 0x2
0060 02cb | | Declare_Variable Entry
0061 00bf | | Action Accept_Activation
0062 0007 | | Action Break_Optional ; Debug Table 0x5 = .DEBUG 0x0062,0x0246,0x0000,0x0000,0x004c,0x3666,0x0000,0x00a7
; Debug Table 0x5.0x0 = 0x62,0xffff
0063 4802 |H | Short_Literal 0x2 ; Debug Table 0x5.0x1 = 0x63,0xfffe
0064 032a | * | Declare_Type Record,Incomplete
0065 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x2 = 0x65,0xfffd
0066 02a0 | | Declare_Subprogram Null_Subprogram
0067 4818 |H | Short_Literal 0x18
0068 03d5 | | Declare_Type Access,Defined
0069 e001 | | Load 0x0,0x1 ; Debug Table 0x5.0x3 = 0x69,0xfffc
006a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006b 00d9 | | Load_Top At_Offset_1
006c 02a0 | | Declare_Subprogram Null_Subprogram
006d e210 | | Load 0x1,0x10
006e 0326 | & | Complete_Type Record,By_Defining
006f 00d8 | | Load_Top At_Offset_0
0070 03c4 | | Complete_Type Access,By_Component_Completion
0071 0007 | | Action Break_Optional ; Debug Table 0x5.0x4 = 0x71,0xfffb
0072 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x5 = 0x72,0xfffa
0073 0007 | | Action Break_Optional
0074 e002 | | Load 0x0,0x2 ; Debug Table 0x5.0x6 = 0x74,0xfff9
0075 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0076 e003 | | Load 0x0,0x3
0077 1b21 | ! | Execute Package,Field_Read,Field_Number 0x21
0078 029f 00b3 | | Declare_Subprogram INIT_00b0,For_Call
007a 4802 |H | Short_Literal 0x2
007b 032d | - | Declare_Type Record,Defined
007c 029b 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Unelaborated ; Debug Table 0x5.0x7 = 0x7c,0xfff8
007e 6135 |a5 | Indirect_Literal Discrete,0x1b4,{0x00000000, 0x004c3666} ; Debug Table 0x5.0x8 = 0x7e,0xfff7
007f 48fa |H | Short_Literal 0xfa
0080 487b |H{ | Short_Literal 0x7b
0081 e213 | | Load 0x1,0x13
0082 e211 | | Load 0x1,0x11
0083 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0084 e004 | | Load 0x0,0x4
0085 0387 | | Declare_Variable Package
0086 00d8 | | Load_Top At_Offset_0
0087 020f | | Execute Module,Activate
0088 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x5.0x9 = 0x88,0xfff6
0089 1b13 | | Execute Package,Field_Read,Field_Number 0x13
008a 1d14 | | Execute_Immediate Reference_Lex_1,0x14 ; Debug Table 0x5.0xa = 0x8a,0xfff5
008b 00c7 | | Action Elaborate_Subprogram
008c 480f 481a |H H | Declare_Variable Select 0x000, 0x003,
008e 480e 4824 |H H$| [0x000]: 0x001 = 0x0008,
0090 480d 482b |H H+| [0x00d]: 0x02b = 0x0158,
0092 4800 4801 |H H | [0x00e]: 0x024 = 0x0120,
0094 4800 4803 |H H | [0x00f]: 0x01a = 0x00d0
0096 02cf | |
0097 00bc | | Action Signal_Activated
0098 00da | | Load_Top At_Offset_2 ; Debug Table 0x5.0xb = 0x98,0x1
0099 1b13 | | Execute Package,Field_Read,Field_Number 0x13
009a 487b |H{ | Short_Literal 0x7b
009b e215 | | Load 0x1,0x15
009c 181a | | Execute Package,Field_Execute,Field_Number 0x1a
009d 003a | : | Store_Top Access,At_Offset_2
009e 00cf | | Action Mark_Auxiliary
009f 0007 | | Action Break_Optional ; Debug Table 0x5.0xc = 0x9f,0x2
00a0 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x5.0xd = 0xa0,0x3
00a1 013f | ? | Execute Select,Rendezvous
00a2 00d1 | | Pop_Control Pop_Count_1
00a3 00c9 | | Action Pop_Auxiliary_Loop
00a4 7ffb | | Jump 0xa0
00a5 0007 | | .XXX[0x1]
00a6 0092 01b8 | | Action Push_String_Extended,0x1b8 ; "Queue_Task Terminating"
; Debug Table 0x5.0xe = 0xa6,0x7
00a8 8005 | | Call 0x0,0x5
00a9 e003 | | Load 0x0,0x3 ; Debug Table 0x5.0xf = 0xa9,0x8
00aa 1b1d | | Execute Package,Field_Read,Field_Number 0x1d
00ab 0257 | W | Execute Discrete,Raise
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 0x6 = .DEBUG 0x00b3,0x0268,0x0005,0x0000,0x004c,0x3666,0x0000,0x00e1
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 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x7
00bc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x8
00bd 00da | | Load_Top At_Offset_2
00be 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00bf 0125 | % | Execute Any,Set_Constraint
00c0 00da | | Load_Top At_Offset_2
00c1 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0
00c2 1c00 | | Execute_Immediate Run_Utility,0x0
00c3 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
00c4 0000 0000 | | .BLANK 0000[0x4]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x00cb,0x026a,0x0002,0x0000,0x004c,0x3666,0x0000,0x00f1
; Debug Table 0x7.0x0 = 0xcb,0x1
00cc 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00cd e002 | | Load 0x0,0x2
00ce 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; See instruction 0x02cf at 0x8c, index=0xf
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 00cf | | Action Mark_Auxiliary ; Debug Table 0x8 = .DEBUG 0x00d3,0x026e,0x0003,0x0000,0x004c,0x3666,0x0000,0x029c
; Debug Table 0x8.0x0 = 0xd3,0x1
00d4 e211 | | Load 0x1,0x11 ; Debug Table 0x8.0x1 = 0xd4,0xfbff
00d5 0007 | | Action Break_Optional
00d6 e211 | | Load 0x1,0x11 ; Debug Table 0x8.0x2 = 0xd6,0xfbfe
00d7 0007 | | Action Break_Optional
00d8 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x3 = 0xd8,0xfbfd
00d9 e213 | | Load 0x1,0x13 ; Debug Table 0x8.0x4 = 0xd9,0xfbfc
00da 0322 | " | Declare_Variable Record
00db e5fe | | Load 0x2,-0x2
00dc e002 | | Load 0x0,0x2
00dd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00de 0119 | | Execute Any,Check_In_Formal_Type
00df 00d9 | | Load_Top At_Offset_1
00e0 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
00e1 e5fd | | Load 0x2,-0x3
00e2 00d9 | | Load_Top At_Offset_1
00e3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
00e4 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x8.0x5 = 0xe4,0x401
00e5 e403 | | Load 0x2,0x3
00e6 00da | | Load_Top At_Offset_2
00e7 e216 | | Load 0x1,0x16
00e8 e215 | | Load 0x1,0x15
00e9 1816 | | Execute Package,Field_Execute,Field_Number 0x16
00ea c403 | | Store 0x2,0x3
00eb 005a | Z | Store_Top Discrete,At_Offset_2
00ec 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x6 = 0xec,0x402
00ed 682d |h- | Jump_Zero 0x11b
00ee 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x7 = 0xee,0x403
00ef 003b | ; | Store_Top Access,At_Offset_3
00f0 00cf | | Action Mark_Auxiliary
00f1 0007 | | Action Break_Optional ; Debug Table 0x8.0x8 = 0xf1,0x404
00f2 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x9 = 0xf2,0x405
00f3 0227 | ' | Execute Access,All_Reference
00f4 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00f5 680a |h | Jump_Zero 0x100
00f6 4826 |H& | Short_Literal 0x26 ; Debug Table 0x8.0xa = 0xf6,0x406
00f7 e404 | | Load 0x2,0x4
00f8 0227 | ' | Execute Access,All_Reference
00f9 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
00fa e006 | | Load 0x0,0x6
00fb 180f | | Execute Package,Field_Execute,Field_Number 0xf
00fc 4800 |H | Short_Literal 0x0 ; Debug Table 0x8.0xb = 0xfc,0x407
00fd e404 | | Load 0x2,0x4
00fe 0227 | ' | Execute Access,All_Reference
00ff 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0100 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xc = 0x100,0x408
0101 0227 | ' | Execute Access,All_Reference
0102 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0103 6806 |h | Jump_Zero 0x10a
0104 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xd = 0x104,0x409
0105 0227 | ' | Execute Access,All_Reference
0106 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0107 a404 | | Store_Unchecked 0x2,0x4
0108 00c9 | | Action Pop_Auxiliary_Loop
0109 7fe8 | | Jump 0xf2
010a 00ce | | Action Pop_Auxiliary
010b 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0xe = 0x10b,0x40a
010c 0227 | ' | Execute Access,All_Reference
010d 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
010e 680c |h | Jump_Zero 0x11b
010f e212 | | Load 0x1,0x12 ; Debug Table 0x8.0xf = 0x10f,0x40b
0110 00db | | Load_Top At_Offset_3
0111 0227 | ' | Execute Access,All_Reference
0112 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0113 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x10 = 0x113,0x40c
0114 0227 | ' | Execute Access,All_Reference
0115 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0116 a212 | | Store_Unchecked 0x1,0x12
0117 e211 | | Load 0x1,0x11 ; Debug Table 0x8.0x11 = 0x117,0x40d
0118 e403 | | Load 0x2,0x3
0119 0227 | ' | Execute Access,All_Reference
011a 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
011b 4100 |A | End_Rendezvous 0x0
011c 0000 0000 | | .BLANK 0000[0x4]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; See instruction 0x02cf at 0x8c, index=0xe
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 00cf | | Action Mark_Auxiliary ; Debug Table 0x9 = .DEBUG 0x0123,0x0294,0x0003,0x0000,0x004c,0x3666,0x0000,0x021b
; Debug Table 0x9.0x0 = 0x123,0x1
0124 e213 | | Load 0x1,0x13 ; Debug Table 0x9.0x1 = 0x124,0xfbff
0125 0322 | " | Declare_Variable Record
0126 e5fd | | Load 0x2,-0x3
0127 e002 | | Load 0x0,0x2
0128 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0129 0119 | | Execute Any,Check_In_Formal_Type
012a 00d9 | | Load_Top At_Offset_1
012b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
012c e5fc | | Load 0x2,-0x4
012d 00d9 | | Load_Top At_Offset_1
012e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
012f e211 | | Load 0x1,0x11 ; Debug Table 0x9.0x2 = 0x12f,0xfbfe
0130 0007 | | Action Break_Optional
0131 e211 | | Load 0x1,0x11 ; Debug Table 0x9.0x3 = 0x131,0xfbfd
0132 0007 | | Action Break_Optional
0133 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9.0x4 = 0x133,0xfbfc
0134 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0x9.0x5 = 0x134,0x401
0135 00db | | Load_Top At_Offset_3
0136 e403 | | Load 0x2,0x3
0137 e216 | | Load 0x1,0x16
0138 e215 | | Load 0x1,0x15
0139 1816 | | Execute Package,Field_Execute,Field_Number 0x16
013a c404 | | Store 0x2,0x4
013b 0059 | Y | Store_Top Discrete,At_Offset_1
013c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x9.0x6 = 0x13c,0x402
013d 6816 |h | Jump_Zero 0x154
013e 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x7 = 0x13e,0x403
013f 003a | : | Store_Top Access,At_Offset_2
0140 00cf | | Action Mark_Auxiliary
0141 780f |x | Jump 0x151
0142 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x8 = 0x142,0x405
0143 0227 | ' | Execute Access,All_Reference
0144 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0145 e5fe | | Load 0x2,-0x2
0146 027f | | Execute Discrete,Equal
0147 6804 |h | Jump_Zero 0x14c
0148 4800 |H | Short_Literal 0x0 ; Debug Table 0x9.0x9 = 0x148,0x406
0149 00db | | Load_Top At_Offset_3
014a 0227 | ' | Execute Access,All_Reference
014b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
014c 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xa = 0x14c,0x407
014d 0227 | ' | Execute Access,All_Reference
014e 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
014f 003b | ; | Store_Top Access,At_Offset_3
0150 00c9 | | Action Pop_Auxiliary_Loop
0151 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0xb = 0x151,0x404
0152 77ef |w | Jump_Nonzero 0x142
0153 00ce | | Action Pop_Auxiliary
0154 4100 |A | End_Rendezvous 0x0
0155 0000 0000 | | .XXX[0x3]
0157 0000 | |
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; See instruction 0x02cf at 0x8c, index=0xd
0158 ; --------------------------------------------------------------------------------------
0158 015b | [ | .CONST 0x015b ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0001 | | .CONST 0x0001 ; Number of locals
015b BODY_0158:
015b INIT_0158:
015b 00cf | | Action Mark_Auxiliary ; Debug Table 0xa = .DEBUG 0x015b,0x02ae,0x0003,0x0000,0x004c,0x3666,0x0000,0x01be
; Debug Table 0xa.0x0 = 0x15b,0x1
015c e213 | | Load 0x1,0x13 ; Debug Table 0xa.0x1 = 0x15c,0xfbff
015d 0322 | " | Declare_Variable Record
015e e5fd | | Load 0x2,-0x3
015f e002 | | Load 0x0,0x2
0160 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0161 0119 | | Execute Any,Check_In_Formal_Type
0162 00d9 | | Load_Top At_Offset_1
0163 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0164 e5fc | | Load 0x2,-0x4
0165 00d9 | | Load_Top At_Offset_1
0166 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0167 e211 | | Load 0x1,0x11 ; Debug Table 0xa.0x2 = 0x167,0xfbfe
0168 0007 | | Action Break_Optional
0169 e211 | | Load 0x1,0x11 ; Debug Table 0xa.0x3 = 0x169,0xfbfd
016a 0007 | | Action Break_Optional
016b e211 | | Load 0x1,0x11 ; Debug Table 0xa.0x4 = 0x16b,0xfbfc
016c 0007 | | Action Break_Optional
016d 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xa.0x5 = 0x16d,0xfbfb
016e 00e1 | | Load_Encached Boolean_Cache ; Debug Table 0xa.0x6 = 0x16e,0x401
016f e404 | | Load 0x2,0x4
0170 e403 | | Load 0x2,0x3
0171 e216 | | Load 0x1,0x16
0172 e215 | | Load 0x1,0x15
0173 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0174 c404 | | Store 0x2,0x4
0175 0059 | Y | Store_Top Discrete,At_Offset_1
0176 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x7 = 0x176,0x402
0177 6818 |h | Jump_Zero 0x190
0178 00db | | Load_Top At_Offset_3 ; Debug Table 0xa.0x8 = 0x178,0x403
0179 003a | : | Store_Top Access,At_Offset_2
017a 00cf | | Action Mark_Auxiliary
017b 0007 | | Action Break_Optional ; Debug Table 0xa.0x9 = 0x17b,0x404
017c 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0xa = 0x17c,0x405
017d 0227 | ' | Execute Access,All_Reference
017e 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
017f 7005 |p | Jump_Nonzero 0x185
0180 e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0xb = 0x180,0x406
0181 00db | | Load_Top At_Offset_3
0182 0227 | ' | Execute Access,All_Reference
0183 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0184 4100 |A | End_Rendezvous 0x0 ; Debug Table 0xa.0xc = 0x184,0x407
0185 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0xd = 0x185,0x408
0186 0227 | ' | Execute Access,All_Reference
0187 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0188 6806 |h | Jump_Zero 0x18f
0189 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0xe = 0x189,0x409
018a 0227 | ' | Execute Access,All_Reference
018b 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
018c 003b | ; | Store_Top Access,At_Offset_3
018d 00c9 | | Action Pop_Auxiliary_Loop
018e 7fed | | Jump 0x17c
018f 00ce | | Action Pop_Auxiliary
0190 e212 | | Load 0x1,0x12 ; Debug Table 0xa.0xf = 0x190,0x40a
0191 7004 |p | Jump_Nonzero 0x196
0192 e211 | | Load 0x1,0x11 ; Debug Table 0xa.0x10 = 0x192,0x40b
0193 03bc | | Declare_Variable Access,By_Allocation
0194 003b | ; | Store_Top Access,At_Offset_3
0195 7806 |x | Jump 0x19c
0196 e212 | | Load 0x1,0x12 ; Debug Table 0xa.0x11 = 0x196,0x40c
0197 003b | ; | Store_Top Access,At_Offset_3
0198 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x12 = 0x198,0x40d
0199 0227 | ' | Execute Access,All_Reference
019a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
019b a212 | | Store_Unchecked 0x1,0x12
019c e5fe | | Load 0x2,-0x2 ; Debug Table 0xa.0x13 = 0x19c,0x40e
019d 00db | | Load_Top At_Offset_3
019e 0227 | ' | Execute Access,All_Reference
019f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01a0 e211 | | Load 0x1,0x11 ; Debug Table 0xa.0x14 = 0x1a0,0x40f
01a1 00db | | Load_Top At_Offset_3
01a2 0227 | ' | Execute Access,All_Reference
01a3 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01a4 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x15 = 0x1a4,0x410
01a5 6805 |h | Jump_Zero 0x1ab
01a6 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x16 = 0x1a6,0x411
01a7 00da | | Load_Top At_Offset_2
01a8 0227 | ' | Execute Access,All_Reference
01a9 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01aa 4100 |A | End_Rendezvous 0x0
01ab e216 | | Load 0x1,0x16 ; Debug Table 0xa.0x17 = 0x1ab,0x412
01ac 4801 |H | Short_Literal 0x1
01ad e405 | | Load 0x2,0x5
01ae e403 | | Load 0x2,0x3
01af e215 | | Load 0x1,0x15
01b0 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01b1 c216 | | Store 0x1,0x16
01b2 4100 |A | End_Rendezvous 0x0
01b3 0000 | | .XXX[0x1]
01b4 0000 0000 | | .LITERAL {0x00000000, 0x004c3666}
01b8 ; --------------------------------------------------------------------------------------
01b8 ; STRING TABLE
01b8 ; --------------------------------------------------------------------------------------
01b8 0004 | | .STRTAB 0x0004->0x01ba ; "Queue_Task Terminating"
01b9 0018 | | .STREND 0x0018->0x01c5
01ba 5175 6575 |Queu| .STRTAB_STRINGS
01c5 0000 0000 | | .XXX[0x3]
01c7 0000 | |
01c8 ; --------------------------------------------------------------------------------------
01c8 ; Debug Table
01c8 ; --------------------------------------------------------------------------------------
01c8 0003 000b | | .CONST 0x0003,0x000b
01ca 000b 0222 | "| .DEBUG 0x000b,0x0222,0x0000,0x0000,0x004c,0x35c6,0x0000,0x01ed
01d2 0010 0228 | (| .DEBUG 0x0010,0x0228,0x0000,0x0000,0x004c,0x3666,0x0000,0x000c
01da 002b 0232 | + 2| .DEBUG 0x002b,0x0232,0x0001,0x0000,0x004c,0x35c6,0x0000,0x01ee
01e2 004b 0240 | K @| .DEBUG 0x004b,0x0240,0x0001,0x0000,0x004c,0x35c6,0x0000,0x0200
01ea 005b 0244 | [ D| .DEBUG 0x005b,0x0244,0x0000,0x0000,0x004c,0x3666,0x0000,0x000d
01f2 0062 0246 | b F| .DEBUG 0x0062,0x0246,0x0000,0x0000,0x004c,0x3666,0x0000,0x00a7
01fa 00b3 0268 | h| .DEBUG 0x00b3,0x0268,0x0005,0x0000,0x004c,0x3666,0x0000,0x00e1
0202 00cb 026a | j| .DEBUG 0x00cb,0x026a,0x0002,0x0000,0x004c,0x3666,0x0000,0x00f1
020a 00d3 026e | n| .DEBUG 0x00d3,0x026e,0x0003,0x0000,0x004c,0x3666,0x0000,0x029c
0212 0123 0294 | # | .DEBUG 0x0123,0x0294,0x0003,0x0000,0x004c,0x3666,0x0000,0x021b
021a 015b 02ae | [ | .DEBUG 0x015b,0x02ae,0x0003,0x0000,0x004c,0x3666,0x0000,0x01be
0222 ; --------------------------------------------------------------------------------------
0222 ; Debug3 Subtable 0x0
0222 ; --------------------------------------------------------------------------------------
0222 0002 0000 | | .DBG3TAB 0x0002,0x0000
0224 000b ffff | | .CONST 0x000b,0xffff
0226 000d fffe | | .CONST 0x000d,0xfffe
0228 ; --------------------------------------------------------------------------------------
0228 ; Debug3 Subtable 0x1
0228 ; --------------------------------------------------------------------------------------
0228 0004 0000 | | .DBG3TAB 0x0004,0x0000
022a 0010 ffff | | .CONST 0x0010,0xffff
022c 0015 fffe | | .CONST 0x0015,0xfffe
022e 0017 fffd | | .CONST 0x0017,0xfffd
0230 0019 fffc | | .CONST 0x0019,0xfffc
0232 ; --------------------------------------------------------------------------------------
0232 ; Debug3 Subtable 0x2
0232 ; --------------------------------------------------------------------------------------
0232 0001 0005 | | .DBG3TAB 0x0001,0x0005
0234 002b ffff | + | .CONST 0x002b,0xffff
0236 0030 0001 | 0 | .CONST 0x0030,0x0001
0238 0032 0002 | 2 | .CONST 0x0032,0x0002
023a 0038 0003 | 8 | .CONST 0x0038,0x0003
023c 003c 0004 | < | .CONST 0x003c,0x0004
023e 0042 0005 | B | .CONST 0x0042,0x0005
0240 ; --------------------------------------------------------------------------------------
0240 ; Debug3 Subtable 0x3
0240 ; --------------------------------------------------------------------------------------
0240 0000 0001 | | .DBG3TAB 0x0000,0x0001
0242 004b 0001 | K | .CONST 0x004b,0x0001
0244 ; --------------------------------------------------------------------------------------
0244 ; Debug3 Subtable 0x4
0244 ; --------------------------------------------------------------------------------------
0244 0000 0000 | | .DBG3TAB 0x0000,0x0000
0246 ; --------------------------------------------------------------------------------------
0246 ; Debug3 Subtable 0x5
0246 ; --------------------------------------------------------------------------------------
0246 000b 0005 | | .DBG3TAB 0x000b,0x0005
0248 0062 ffff | b | .CONST 0x0062,0xffff
024a 0063 fffe | c | .CONST 0x0063,0xfffe
024c 0065 fffd | e | .CONST 0x0065,0xfffd
024e 0069 fffc | i | .CONST 0x0069,0xfffc
0250 0071 fffb | q | .CONST 0x0071,0xfffb
0252 0072 fffa | r | .CONST 0x0072,0xfffa
0254 0074 fff9 | t | .CONST 0x0074,0xfff9
0256 007c fff8 | | | .CONST 0x007c,0xfff8
0258 007e fff7 | ~ | .CONST 0x007e,0xfff7
025a 0088 fff6 | | .CONST 0x0088,0xfff6
025c 008a fff5 | | .CONST 0x008a,0xfff5
025e 0098 0001 | | .CONST 0x0098,0x0001
0260 009f 0002 | | .CONST 0x009f,0x0002
0262 00a0 0003 | | .CONST 0x00a0,0x0003
0264 00a6 0007 | | .CONST 0x00a6,0x0007
0266 00a9 0008 | | .CONST 0x00a9,0x0008
0268 ; --------------------------------------------------------------------------------------
0268 ; Debug3 Subtable 0x6
0268 ; --------------------------------------------------------------------------------------
0268 0000 0000 | | .DBG3TAB 0x0000,0x0000
026a ; --------------------------------------------------------------------------------------
026a ; Debug3 Subtable 0x7
026a ; --------------------------------------------------------------------------------------
026a 0000 0001 | | .DBG3TAB 0x0000,0x0001
026c 00cb 0001 | | .CONST 0x00cb,0x0001
026e ; --------------------------------------------------------------------------------------
026e ; Debug3 Subtable 0x8
026e ; --------------------------------------------------------------------------------------
026e 0004 000e | | .DBG3TAB 0x0004,0x000e
0270 00d3 0001 | | .CONST 0x00d3,0x0001
0272 00d4 fbff | | .CONST 0x00d4,0xfbff
0274 00d6 fbfe | | .CONST 0x00d6,0xfbfe
0276 00d8 fbfd | | .CONST 0x00d8,0xfbfd
0278 00d9 fbfc | | .CONST 0x00d9,0xfbfc
027a 00e4 0401 | | .CONST 0x00e4,0x0401
027c 00ec 0402 | | .CONST 0x00ec,0x0402
027e 00ee 0403 | | .CONST 0x00ee,0x0403
0280 00f1 0404 | | .CONST 0x00f1,0x0404
0282 00f2 0405 | | .CONST 0x00f2,0x0405
0284 00f6 0406 | | .CONST 0x00f6,0x0406
0286 00fc 0407 | | .CONST 0x00fc,0x0407
0288 0100 0408 | | .CONST 0x0100,0x0408
028a 0104 0409 | | .CONST 0x0104,0x0409
028c 010b 040a | | .CONST 0x010b,0x040a
028e 010f 040b | | .CONST 0x010f,0x040b
0290 0113 040c | | .CONST 0x0113,0x040c
0292 0117 040d | | .CONST 0x0117,0x040d
0294 ; --------------------------------------------------------------------------------------
0294 ; Debug3 Subtable 0x9
0294 ; --------------------------------------------------------------------------------------
0294 0004 0008 | | .DBG3TAB 0x0004,0x0008
0296 0123 0001 | # | .CONST 0x0123,0x0001
0298 0124 fbff | $ | .CONST 0x0124,0xfbff
029a 012f fbfe | / | .CONST 0x012f,0xfbfe
029c 0131 fbfd | 1 | .CONST 0x0131,0xfbfd
029e 0133 fbfc | 3 | .CONST 0x0133,0xfbfc
02a0 0134 0401 | 4 | .CONST 0x0134,0x0401
02a2 013c 0402 | < | .CONST 0x013c,0x0402
02a4 013e 0403 | > | .CONST 0x013e,0x0403
02a6 0142 0405 | B | .CONST 0x0142,0x0405
02a8 0148 0406 | H | .CONST 0x0148,0x0406
02aa 014c 0407 | L | .CONST 0x014c,0x0407
02ac 0151 0404 | Q | .CONST 0x0151,0x0404
02ae ; --------------------------------------------------------------------------------------
02ae ; Debug3 Subtable 0xa
02ae ; --------------------------------------------------------------------------------------
02ae 0005 0013 | | .DBG3TAB 0x0005,0x0013
02b0 015b 0001 | [ | .CONST 0x015b,0x0001
02b2 015c fbff | \ | .CONST 0x015c,0xfbff
02b4 0167 fbfe | g | .CONST 0x0167,0xfbfe
02b6 0169 fbfd | i | .CONST 0x0169,0xfbfd
02b8 016b fbfc | k | .CONST 0x016b,0xfbfc
02ba 016d fbfb | m | .CONST 0x016d,0xfbfb
02bc 016e 0401 | n | .CONST 0x016e,0x0401
02be 0176 0402 | v | .CONST 0x0176,0x0402
02c0 0178 0403 | x | .CONST 0x0178,0x0403
02c2 017b 0404 | { | .CONST 0x017b,0x0404
02c4 017c 0405 | | | .CONST 0x017c,0x0405
02c6 0180 0406 | | .CONST 0x0180,0x0406
02c8 0184 0407 | | .CONST 0x0184,0x0407
02ca 0185 0408 | | .CONST 0x0185,0x0408
02cc 0189 0409 | | .CONST 0x0189,0x0409
02ce 0190 040a | | .CONST 0x0190,0x040a
02d0 0192 040b | | .CONST 0x0192,0x040b
02d2 0196 040c | | .CONST 0x0196,0x040c
02d4 0198 040d | | .CONST 0x0198,0x040d
02d6 019c 040e | | .CONST 0x019c,0x040e
02d8 01a0 040f | | .CONST 0x01a0,0x040f
02da 01a4 0410 | | .CONST 0x01a4,0x0410
02dc 01a6 0411 | | .CONST 0x01a6,0x0411
02de 01ab 0412 | | .CONST 0x01ab,0x0412
02e0 0000 0000 | | .BLANK 0000[0x120]