|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 3072 (0xc00) Notes: 00_class, 5811_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0ea8df
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦5a81ac88f⟧ »Space Info Vol 1« └─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code 0001 5811 |X | .CONST 0x5811 ; Diana Version, RCG Major Version, RCG minor version 0002 0000 | | .CONST 0x0000 ; Zero 0003 03c0 | | .CONST 0x03c0 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated ; Debug Table 0x0 = .DEBUG 0x000b,0x0472,0x8000,0x0000,0x002c,0xac44,0x0000,0x0003 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 00d9 | | .CONST 0x00d9 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 004a | J | .CONST 0x004a ; Number of locals 001b INIT_0018: 001b 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x001b,0x0474,0xa801,0x0002,0x002c,0xac44,0x0000,0x0003 ; Debug Table 0x1.0x0 = 0x1b,0xffff 001c 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x1c,0xfffe 001d e5fc | | Load 0x2,-0x4 ; Debug Table 0x1.0x2 = 0x1d,0xfffd 001e 00e3 | | Load_Encached Natural_Cache 001f 03f1 | | Declare_Variable Discrete,With_Value 0020 0007 | | Action Break_Optional ; Debug Table 0x1.0x3 = 0x20,0xfffc 0021 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call ; Debug Table 0x1.0x4 = 0x21,0xfffb 0023 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call ; Debug Table 0x1.0x5 = 0x23,0xfffa 0025 029f 00fb | | Declare_Subprogram INIT_00f8,For_Call ; Debug Table 0x1.0x6 = 0x25,0xfff9 0027 029f 0103 | | Declare_Subprogram INIT_0100,For_Call ; Debug Table 0x1.0x7 = 0x27,0xfff8 0029 029f 0113 | | Declare_Subprogram INIT_0110,For_Call ; Debug Table 0x1.0x8 = 0x29,0xfff7 002b 029f 0133 | 3| Declare_Subprogram INIT_0130,For_Call ; Debug Table 0x1.0x9 = 0x2b,0xfff6 002d 029f 013b | ;| Declare_Subprogram INIT_0138,For_Call ; Debug Table 0x1.0xa = 0x2d,0xfff5 002f 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call ; Debug Table 0x1.0xb = 0x2f,0xfff4 0031 029f 014b | K| Declare_Subprogram INIT_0148,For_Call ; Debug Table 0x1.0xc = 0x31,0xfff3 0033 029f 015b | [| Declare_Subprogram INIT_0158,For_Call ; Debug Table 0x1.0xd = 0x33,0xfff2 0035 029f 016b | k| Declare_Subprogram INIT_0168,For_Call ; Debug Table 0x1.0xe = 0x35,0xfff1 0037 029f 017b | {| Declare_Subprogram INIT_0178,For_Call ; Debug Table 0x1.0xf = 0x37,0xfff0 0039 029f 0183 | | Declare_Subprogram INIT_0180,For_Call ; Debug Table 0x1.0x10 = 0x39,0xffef 003b 029f 0193 | | Declare_Subprogram INIT_0190,For_Call ; Debug Table 0x1.0x11 = 0x3b,0xffee 003d 029f 019b | | Declare_Subprogram INIT_0198,For_Call ; Debug Table 0x1.0x12 = 0x3d,0xffed 003f 029f 01b3 | | Declare_Subprogram INIT_01b0,For_Call ; Debug Table 0x1.0x13 = 0x3f,0xffec 0041 a001 | | Store_Unchecked 0x0,0x1 ; Debug Table 0x1.0x14 = 0x41,0xffeb 0042 00c6 | | Action Check_Subprogram_Elaborated 0043 e002 | | Load 0x0,0x2 0044 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0045 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0046 4808 |H | Short_Literal 0x8 0047 4802 |H | Short_Literal 0x2 0048 0099 | | Action Reference_Dynamic 0049 4811 |H | Short_Literal 0x11 004a 4802 |H | Short_Literal 0x2 004b 0099 | | Action Reference_Dynamic 004c 4807 |H | Short_Literal 0x7 004d 4802 |H | Short_Literal 0x2 004e 0099 | | Action Reference_Dynamic 004f 4ffd |O | Short_Literal -0x3 0050 4802 |H | Short_Literal 0x2 0051 0099 | | Action Reference_Dynamic 0052 4806 |H | Short_Literal 0x6 0053 4802 |H | Short_Literal 0x2 0054 0099 | | Action Reference_Dynamic 0055 4ffe |O | Short_Literal -0x2 0056 4802 |H | Short_Literal 0x2 0057 0099 | | Action Reference_Dynamic 0058 4804 |H | Short_Literal 0x4 0059 4802 |H | Short_Literal 0x2 005a 0099 | | Action Reference_Dynamic 005b 4805 |H | Short_Literal 0x5 005c 4802 |H | Short_Literal 0x2 005d 0099 | | Action Reference_Dynamic 005e 4803 |H | Short_Literal 0x3 005f 4802 |H | Short_Literal 0x2 0060 0099 | | Action Reference_Dynamic 0061 62d6 |b | Indirect_Literal Discrete,0x338,{0x00000000, 0x002cb624} 0062 49e4 |I | Short_Literal 0x1e4 0063 481f |H | Short_Literal 0x1f 0064 0007 | | Action Break_Optional 0065 a001 | | Store_Unchecked 0x0,0x1 ; Debug Table 0x1.0x15 = 0x65,0xffea 0066 00c6 | | Action Check_Subprogram_Elaborated 0067 e002 | | Load 0x0,0x2 0068 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0069 1b0d | | Execute Package,Field_Read,Field_Number 0xd 006a 4808 |H | Short_Literal 0x8 006b 4802 |H | Short_Literal 0x2 006c 0099 | | Action Reference_Dynamic 006d 4810 |H | Short_Literal 0x10 006e 4802 |H | Short_Literal 0x2 006f 0099 | | Action Reference_Dynamic 0070 4807 |H | Short_Literal 0x7 0071 4802 |H | Short_Literal 0x2 0072 0099 | | Action Reference_Dynamic 0073 4ffd |O | Short_Literal -0x3 0074 4802 |H | Short_Literal 0x2 0075 0099 | | Action Reference_Dynamic 0076 4806 |H | Short_Literal 0x6 0077 4802 |H | Short_Literal 0x2 0078 0099 | | Action Reference_Dynamic 0079 4ffe |O | Short_Literal -0x2 007a 4802 |H | Short_Literal 0x2 007b 0099 | | Action Reference_Dynamic 007c 4804 |H | Short_Literal 0x4 007d 4802 |H | Short_Literal 0x2 007e 0099 | | Action Reference_Dynamic 007f 4805 |H | Short_Literal 0x5 0080 4802 |H | Short_Literal 0x2 0081 0099 | | Action Reference_Dynamic 0082 4803 |H | Short_Literal 0x3 0083 4802 |H | Short_Literal 0x2 0084 0099 | | Action Reference_Dynamic 0085 62b2 |b | Indirect_Literal Discrete,0x338,{0x00000000, 0x002cb624} 0086 49f3 |I | Short_Literal 0x1f3 0087 482c |H, | Short_Literal 0x2c 0088 0007 | | Action Break_Optional 0089 a001 | | Store_Unchecked 0x0,0x1 ; Debug Table 0x1.0x16 = 0x89,0xffe9 008a 00c6 | | Action Check_Subprogram_Elaborated 008b e002 | | Load 0x0,0x2 008c 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 008d 1b10 | | Execute Package,Field_Read,Field_Number 0x10 008e 4809 |H | Short_Literal 0x9 008f 4802 |H | Short_Literal 0x2 0090 0099 | | Action Reference_Dynamic 0091 4812 |H | Short_Literal 0x12 0092 4802 |H | Short_Literal 0x2 0093 0099 | | Action Reference_Dynamic 0094 4807 |H | Short_Literal 0x7 0095 4802 |H | Short_Literal 0x2 0096 0099 | | Action Reference_Dynamic 0097 4ffd |O | Short_Literal -0x3 0098 4802 |H | Short_Literal 0x2 0099 0099 | | Action Reference_Dynamic 009a 4806 |H | Short_Literal 0x6 009b 4802 |H | Short_Literal 0x2 009c 0099 | | Action Reference_Dynamic 009d 4ffe |O | Short_Literal -0x2 009e 4802 |H | Short_Literal 0x2 009f 0099 | | Action Reference_Dynamic 00a0 4804 |H | Short_Literal 0x4 00a1 4802 |H | Short_Literal 0x2 00a2 0099 | | Action Reference_Dynamic 00a3 4805 |H | Short_Literal 0x5 00a4 4802 |H | Short_Literal 0x2 00a5 0099 | | Action Reference_Dynamic 00a6 4803 |H | Short_Literal 0x3 00a7 4802 |H | Short_Literal 0x2 00a8 0099 | | Action Reference_Dynamic 00a9 628e |b | Indirect_Literal Discrete,0x338,{0x00000000, 0x002cb624} 00aa 4a02 |J | Short_Literal 0x202 00ab 4839 |H9 | Short_Literal 0x39 00ac 0007 | | Action Break_Optional 00ad 029f 01cb | | Declare_Subprogram INIT_01c8,For_Call ; Debug Table 0x1.0x17 = 0xad,0xffe8 00af 029f 026b | k| Declare_Subprogram INIT_0268,For_Call ; Debug Table 0x1.0x18 = 0xaf,0xffe7 00b1 a001 | | Store_Unchecked 0x0,0x1 ; Debug Table 0x1.0x19 = 0xb1,0xffe6 00b2 00c6 | | Action Check_Subprogram_Elaborated 00b3 e002 | | Load 0x0,0x2 00b4 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 00b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00b6 480a |H | Short_Literal 0xa 00b7 4802 |H | Short_Literal 0x2 00b8 0099 | | Action Reference_Dynamic 00b9 483b |H; | Short_Literal 0x3b 00ba 4802 |H | Short_Literal 0x2 00bb 0099 | | Action Reference_Dynamic 00bc 4807 |H | Short_Literal 0x7 00bd 4802 |H | Short_Literal 0x2 00be 0099 | | Action Reference_Dynamic 00bf 4ffd |O | Short_Literal -0x3 00c0 4802 |H | Short_Literal 0x2 00c1 0099 | | Action Reference_Dynamic 00c2 4806 |H | Short_Literal 0x6 00c3 4802 |H | Short_Literal 0x2 00c4 0099 | | Action Reference_Dynamic 00c5 4ffe |O | Short_Literal -0x2 00c6 4802 |H | Short_Literal 0x2 00c7 0099 | | Action Reference_Dynamic 00c8 4804 |H | Short_Literal 0x4 00c9 4802 |H | Short_Literal 0x2 00ca 0099 | | Action Reference_Dynamic 00cb 4805 |H | Short_Literal 0x5 00cc 4802 |H | Short_Literal 0x2 00cd 0099 | | Action Reference_Dynamic 00ce 4803 |H | Short_Literal 0x3 00cf 4802 |H | Short_Literal 0x2 00d0 0099 | | Action Reference_Dynamic 00d1 6266 |bf | Indirect_Literal Discrete,0x338,{0x00000000, 0x002cb624} 00d2 4aa3 |J | Short_Literal 0x2a3 00d3 4848 |HH | Short_Literal 0x48 00d4 0007 | | Action Break_Optional 00d5 029f 0293 | | Declare_Subprogram INIT_0290,For_Call ; Debug Table 0x1.0x1a = 0xd5,0xffe5 00d7 029f 02db | | Declare_Subprogram INIT_02d8,For_Call ; Debug Table 0x1.0x1b = 0xd7,0xffe4 00d9 BODY_0018: 00d9 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x1c = 0xd9,0x1 00da 4800 |H | Short_Literal 0x0 00db 00ea | | Load_Encached Null_String_Cache 00dc 8407 | | Call 0x2,0x7 00dd 4801 |H | Short_Literal 0x1 ; Debug Table 0x1.0x1d = 0xdd,0x2 00de 4801 |H | Short_Literal 0x1 00df 0092 033c | <| Action Push_String_Extended,0x33c ; "State of Action Manager" 00e1 8407 | | Call 0x2,0x7 00e2 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x1e = 0xe2,0x3 00e3 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 00e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00e5 844a | J | Call 0x2,0x4a 00e6 4505 |E | Exit_Suprogram New_Top_Offset 0x5 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 e402 | | Load 0x2,0x2 ; Debug Table 0x2 = .DEBUG 0x00eb,0x04b4,0x0802,0x0002,0x002c,0xb624,0x0000,0x002b ; Debug Table 0x2.0x0 = 0xeb,0x1 00ec 00ca | | Action Exit_Nullary_Function 00ed 0000 0000 | | .XXX[0x3] 00ef 0000 | | 00f0 ; -------------------------------------------------------------------------------------- 00f0 ; SUBPROGRAM 00f0 ; -------------------------------------------------------------------------------------- 00f0 00f3 | | .CONST 0x00f3 ; Address of begin 00f1 0004 | | .CONST 0x0004 ; Address of exception handler 00f2 0001 | | .CONST 0x0001 ; Number of locals 00f3 BODY_00f0: 00f3 INIT_00f0: 00f3 e402 | | Load 0x2,0x2 ; Debug Table 0x3 = .DEBUG 0x00f3,0x04b8,0x0801,0x0002,0x002c,0xb624,0x0000,0x0036 ; Debug Table 0x3.0x0 = 0xf3,0x1 00f4 0a03 | | Execute_Immediate Plus,0x3 00f5 c402 | | Store 0x2,0x2 00f6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00f7 0000 | | .XXX[0x1] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 00fb | | .CONST 0x00fb ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0001 | | .CONST 0x0001 ; Number of locals 00fb BODY_00f8: 00fb INIT_00f8: 00fb e402 | | Load 0x2,0x2 ; Debug Table 0x4 = .DEBUG 0x00fb,0x04bc,0x0801,0x0002,0x002c,0xb624,0x0000,0x0045 ; Debug Table 0x4.0x0 = 0xfb,0x1 00fc 0afd | | Execute_Immediate Plus,-0x3 00fd c402 | | Store 0x2,0x2 00fe 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00ff 0000 | | .XXX[0x1] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0103 | | .CONST 0x0103 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0001 | | .CONST 0x0001 ; Number of locals 0103 BODY_0100: 0103 INIT_0100: 0103 00db | | Load_Top At_Offset_3 ; Debug Table 0x5 = .DEBUG 0x0103,0x04c0,0x0801,0x0002,0x002c,0xb624,0x0000,0x0054 ; Debug Table 0x5.0x0 = 0x103,0x1 0104 4801 |H | Short_Literal 0x1 0105 0263 | c | Execute Discrete,Above_Bound 0106 7003 |p | Jump_Nonzero 0x10a 0107 e7ff | | Load 0x3,-0x1 ; Debug Table 0x5.0x1 = 0x107,0x2 0108 85fd | | Call 0x2,-0x3 0109 3ffd |? | Loop_Increasing 0x107 010a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 010b 0000 0000 | | .BLANK 0000[0x5] 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 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x0113,0x04c6,0x0801,0x0002,0x002c,0xb624,0x0000,0x006f ; Debug Table 0x6.0x0 = 0x113,0x1 0114 01db | | Execute Vector,Length 0115 6806 |h | Jump_Zero 0x11c 0116 e402 | | Load 0x2,0x2 ; Debug Table 0x6.0x1 = 0x116,0x2 0117 0092 033d | =| Action Push_String_Extended,0x33d ; " " 0119 8406 | | Call 0x2,0x6 011a 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x2 = 0x11a,0x3 011b 85fd | | Call 0x2,-0x3 011c e7fd | | Load 0x3,-0x3 ; Debug Table 0x6.0x3 = 0x11c,0x4 011d 7002 |p | Jump_Nonzero 0x120 011e 00db | | Load_Top At_Offset_3 011f 6801 |h | Jump_Zero 0x121 0120 85fe | | Call 0x2,-0x2 ; Debug Table 0x6.0x4 = 0x120,0x5 0121 00db | | Load_Top At_Offset_3 ; Debug Table 0x6.0x5 = 0x121,0x6 0122 680c |h | Jump_Zero 0x12f 0123 e402 | | Load 0x2,0x2 ; Debug Table 0x6.0x6 = 0x123,0x7 0124 0092 033d | =| Action Push_String_Extended,0x33d ; " " 0126 8406 | | Call 0x2,0x6 0127 00da | | Load_Top At_Offset_2 ; Debug Table 0x6.0x7 = 0x127,0x8 0128 01db | | Execute Vector,Length 0129 00e3 | | Load_Encached Natural_Cache 012a 025b | [ | Execute Discrete,Check_In_Type 012b 0092 033e | >| Action Push_String_Extended,0x33e ; "-" 012d 8406 | | Call 0x2,0x6 012e 85fe | | Call 0x2,-0x2 ; Debug Table 0x6.0x8 = 0x12e,0x9 012f 4504 |E | Exit_Suprogram New_Top_Offset 0x4 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 00da | | Load_Top At_Offset_2 ; Debug Table 0x7 = .DEBUG 0x0133,0x04da,0x0802,0x0002,0x002c,0xb624,0x0000,0x00b4 ; Debug Table 0x7.0x0 = 0x133,0x1 0134 01db | | Execute Vector,Length 0135 00e3 | | Load_Encached Natural_Cache 0136 025b | [ | Execute Discrete,Check_In_Type 0137 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 013b | ; | .CONST 0x013b ; Address of begin 0139 0004 | | .CONST 0x0004 ; Address of exception handler 013a 0001 | | .CONST 0x0001 ; Number of locals 013b BODY_0138: 013b INIT_0138: 013b 00da | | Load_Top At_Offset_2 ; Debug Table 0x8 = .DEBUG 0x013b,0x04de,0x0802,0x0002,0x002c,0xb624,0x0000,0x00c7 ; Debug Table 0x8.0x0 = 0x13b,0x1 013c 01db | | Execute Vector,Length 013d 00e3 | | Load_Encached Natural_Cache 013e 025b | [ | Execute Discrete,Check_In_Type 013f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 00da | | Load_Top At_Offset_2 ; Debug Table 0x9 = .DEBUG 0x0143,0x04e2,0x0802,0x0002,0x002c,0xb624,0x0000,0x00da ; Debug Table 0x9.0x0 = 0x143,0x1 0144 01db | | Execute Vector,Length 0145 00e3 | | Load_Encached Natural_Cache 0146 025b | [ | Execute Discrete,Check_In_Type 0147 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0148 ; -------------------------------------------------------------------------------------- 0148 ; SUBPROGRAM 0148 ; -------------------------------------------------------------------------------------- 0148 014b | K | .CONST 0x014b ; Address of begin 0149 0004 | | .CONST 0x0004 ; Address of exception handler 014a 0001 | | .CONST 0x0001 ; Number of locals 014b BODY_0148: 014b INIT_0148: 014b 0092 033f | ?| Action Push_String_Extended,0x33f ; "task = " ; Debug Table 0xa = .DEBUG 0x014b,0x04e6,0x0801,0x0002,0x002c,0xb624,0x0000,0x00ed ; Debug Table 0xa.0x0 = 0x14b,0x1 014d 85fd | | Call 0x2,-0x3 014e 00da | | Load_Top At_Offset_2 ; Debug Table 0xa.0x1 = 0x14e,0x2 014f 00e0 | | Load_Encached Standard_Cache 0150 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0151 85fd | | Call 0x2,-0x3 0152 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0153 0000 0000 | | .BLANK 0000[0x5] 0158 ; -------------------------------------------------------------------------------------- 0158 ; SUBPROGRAM 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 0092 0340 | @| Action Push_String_Extended,0x340 ; "mode = " ; Debug Table 0xb = .DEBUG 0x015b,0x04ec,0x0801,0x0002,0x002c,0xb624,0x0000,0x0109 ; Debug Table 0xb.0x0 = 0x15b,0x1 015d 85fd | | Call 0x2,-0x3 015e 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1 = 0x15e,0x2 015f e002 | | Load 0x0,0x2 0160 1b13 | | Execute Package,Field_Read,Field_Number 0x13 0161 025e | ^ | Execute Discrete,Convert 0162 1c01 | | Execute_Immediate Run_Utility,0x1 0163 85fd | | Call 0x2,-0x3 0164 4502 |E | Exit_Suprogram New_Top_Offset 0x2 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 0xc = .DEBUG 0x016b,0x04f2,0x0802,0x0002,0x002c,0xb624,0x0000,0x0125 ; Debug Table 0xc.0x0 = 0x16b,0x1 016c e002 | | Load 0x0,0x2 016d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 016e 00e0 | | Load_Encached Standard_Cache 016f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0170 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 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 0xd = .DEBUG 0x017b,0x04f6,0x0801,0x0002,0x002c,0xb624,0x0000,0x013f ; Debug Table 0xd.0x0 = 0x17b,0x1 017c 840d | | Call 0x2,0xd 017d 85fd | | Call 0x2,-0x3 017e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 017f 0000 | | .XXX[0x1] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0183 | | .CONST 0x0183 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0001 | | .CONST 0x0001 ; Number of locals 0183 BODY_0180: 0183 INIT_0180: 0183 0092 0341 | A| Action Push_String_Extended,0x341 ; "action = " ; Debug Table 0xe = .DEBUG 0x0183,0x04fa,0x0801,0x0002,0x002c,0xb624,0x0000,0x0154 ; Debug Table 0xe.0x0 = 0x183,0x1 0185 85fd | | Call 0x2,-0x3 0186 00da | | Load_Top At_Offset_2 ; Debug Table 0xe.0x1 = 0x186,0x2 0187 840e | | Call 0x2,0xe 0188 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0189 0000 0000 | | .BLANK 0000[0x7] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 00db | | Load_Top At_Offset_3 ; Debug Table 0xf = .DEBUG 0x0193,0x0500,0x0801,0x0002,0x002c,0xb624,0x0000,0x016a ; Debug Table 0xf.0x0 = 0x193,0x1 0194 00db | | Load_Top At_Offset_3 0195 01d7 | | Execute Vector,Field_Read 0196 840e | | Call 0x2,0xe 0197 4503 |E | Exit_Suprogram New_Top_Offset 0x3 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 00db | | Load_Top At_Offset_3 ; Debug Table 0x10 = .DEBUG 0x019b,0x0504,0x0801,0x0002,0x002c,0xb624,0x0000,0x0183 ; Debug Table 0x10.0x0 = 0x19b,0x1 019c 00db | | Load_Top At_Offset_3 019d 01d7 | | Execute Vector,Field_Read 019e 840f | | Call 0x2,0xf 019f 0092 0342 | B| Action Push_String_Extended,0x342 ; "; " ; Debug Table 0x10.0x1 = 0x19f,0x2 01a1 85fd | | Call 0x2,-0x3 01a2 00db | | Load_Top At_Offset_3 ; Debug Table 0x10.0x2 = 0x1a2,0x3 01a3 00db | | Load_Top At_Offset_3 01a4 01d7 | | Execute Vector,Field_Read 01a5 e002 | | Load 0x0,0x2 01a6 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 01a7 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01a8 840b | | Call 0x2,0xb 01a9 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01aa 0000 0000 | | .BLANK 0000[0x6] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b7 | | .CONST 0x01b7 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0002 | | .CONST 0x0002 ; Number of locals 01b3 INIT_01b0: 01b3 00db | | Load_Top At_Offset_3 ; Debug Table 0x11 = .DEBUG 0x01b3,0x050c,0x0801,0x0002,0x002c,0xb624,0x0000,0x01ac ; Debug Table 0x11.0x0 = 0x1b3,0xffff 01b4 00db | | Load_Top At_Offset_3 01b5 01d5 | | Execute Vector,Field_Reference 01b6 0007 | | Action Break_Optional 01b7 BODY_01b0: 01b7 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x1 = 0x1b7,0x1 01b8 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 01b9 840b | | Call 0x2,0xb 01ba 0092 0342 | B| Action Push_String_Extended,0x342 ; "; " ; Debug Table 0x11.0x2 = 0x1ba,0x2 01bc 85fd | | Call 0x2,-0x3 01bd 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x3 = 0x1bd,0x3 01be 3c01 |< | Execute Record,Field_Read,Field_Number 0x1 01bf 840f | | Call 0x2,0xf 01c0 0092 0342 | B| Action Push_String_Extended,0x342 ; "; " ; Debug Table 0x11.0x4 = 0x1c0,0x4 01c2 85fd | | Call 0x2,-0x3 01c3 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x11.0x5 = 0x1c3,0x5 01c4 3c02 |< | Execute Record,Field_Read,Field_Number 0x2 01c5 840c | | Call 0x2,0xc 01c6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01c7 0000 | | .XXX[0x1] 01c8 ; -------------------------------------------------------------------------------------- 01c8 ; SUBPROGRAM 01c8 ; -------------------------------------------------------------------------------------- 01c8 01cb | | .CONST 0x01cb ; Address of begin 01c9 0004 | | .CONST 0x0004 ; Address of exception handler 01ca 0001 | | .CONST 0x0001 ; Number of locals 01cb BODY_01c8: 01cb INIT_01c8: 01cb 4801 |H | Short_Literal 0x1 ; Debug Table 0x12 = .DEBUG 0x01cb,0x051a,0x0801,0x0002,0x002c,0xb624,0x0000,0x0211 ; Debug Table 0x12.0x0 = 0x1cb,0x1 01cc 4800 |H | Short_Literal 0x0 01cd 0092 0343 | C| Action Push_String_Extended,0x343 ; "readers " 01cf e7ff | | Load 0x3,-0x1 01d0 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 01d1 e420 | | Load 0x2,0x20 01d2 4821 |H! | Short_Literal 0x21 01d3 4802 |H | Short_Literal 0x2 01d4 0099 | | Action Reference_Dynamic 01d5 4822 |H" | Short_Literal 0x22 01d6 4802 |H | Short_Literal 0x2 01d7 0099 | | Action Reference_Dynamic 01d8 4823 |H# | Short_Literal 0x23 01d9 4802 |H | Short_Literal 0x2 01da 0099 | | Action Reference_Dynamic 01db 4824 |H$ | Short_Literal 0x24 01dc 4802 |H | Short_Literal 0x2 01dd 0099 | | Action Reference_Dynamic 01de 4825 |H% | Short_Literal 0x25 01df 4802 |H | Short_Literal 0x2 01e0 0099 | | Action Reference_Dynamic 01e1 4826 |H& | Short_Literal 0x26 01e2 4802 |H | Short_Literal 0x2 01e3 0099 | | Action Reference_Dynamic 01e4 4827 |H' | Short_Literal 0x27 01e5 4802 |H | Short_Literal 0x2 01e6 0099 | | Action Reference_Dynamic 01e7 4828 |H( | Short_Literal 0x28 01e8 4802 |H | Short_Literal 0x2 01e9 0099 | | Action Reference_Dynamic 01ea 4829 |H) | Short_Literal 0x29 01eb 4802 |H | Short_Literal 0x2 01ec 0099 | | Action Reference_Dynamic 01ed 482a |H* | Short_Literal 0x2a 01ee 4802 |H | Short_Literal 0x2 01ef 0099 | | Action Reference_Dynamic 01f0 8001 | | Call 0x0,0x1 01f1 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x1 = 0x1f1,0x2 01f2 4800 |H | Short_Literal 0x0 01f3 0092 0344 | D| Action Push_String_Extended,0x344 ; "updaters " 01f5 e7ff | | Load 0x3,-0x1 01f6 2506 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x6 01f7 e420 | | Load 0x2,0x20 01f8 4821 |H! | Short_Literal 0x21 01f9 4802 |H | Short_Literal 0x2 01fa 0099 | | Action Reference_Dynamic 01fb 4822 |H" | Short_Literal 0x22 01fc 4802 |H | Short_Literal 0x2 01fd 0099 | | Action Reference_Dynamic 01fe 4823 |H# | Short_Literal 0x23 01ff 4802 |H | Short_Literal 0x2 0200 0099 | | Action Reference_Dynamic 0201 4824 |H$ | Short_Literal 0x24 0202 4802 |H | Short_Literal 0x2 0203 0099 | | Action Reference_Dynamic 0204 4825 |H% | Short_Literal 0x25 0205 4802 |H | Short_Literal 0x2 0206 0099 | | Action Reference_Dynamic 0207 4826 |H& | Short_Literal 0x26 0208 4802 |H | Short_Literal 0x2 0209 0099 | | Action Reference_Dynamic 020a 4827 |H' | Short_Literal 0x27 020b 4802 |H | Short_Literal 0x2 020c 0099 | | Action Reference_Dynamic 020d 4828 |H( | Short_Literal 0x28 020e 4802 |H | Short_Literal 0x2 020f 0099 | | Action Reference_Dynamic 0210 4829 |H) | Short_Literal 0x29 0211 4802 |H | Short_Literal 0x2 0212 0099 | | Action Reference_Dynamic 0213 482a |H* | Short_Literal 0x2a 0214 4802 |H | Short_Literal 0x2 0215 0099 | | Action Reference_Dynamic 0216 8001 | | Call 0x0,0x1 0217 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x2 = 0x217,0x3 0218 4800 |H | Short_Literal 0x0 0219 0092 0345 | E| Action Push_String_Extended,0x345 ; "overwriters " 021b e7ff | | Load 0x3,-0x1 021c 2507 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x7 021d e420 | | Load 0x2,0x20 021e 4821 |H! | Short_Literal 0x21 021f 4802 |H | Short_Literal 0x2 0220 0099 | | Action Reference_Dynamic 0221 4822 |H" | Short_Literal 0x22 0222 4802 |H | Short_Literal 0x2 0223 0099 | | Action Reference_Dynamic 0224 4823 |H# | Short_Literal 0x23 0225 4802 |H | Short_Literal 0x2 0226 0099 | | Action Reference_Dynamic 0227 4824 |H$ | Short_Literal 0x24 0228 4802 |H | Short_Literal 0x2 0229 0099 | | Action Reference_Dynamic 022a 4825 |H% | Short_Literal 0x25 022b 4802 |H | Short_Literal 0x2 022c 0099 | | Action Reference_Dynamic 022d 4826 |H& | Short_Literal 0x26 022e 4802 |H | Short_Literal 0x2 022f 0099 | | Action Reference_Dynamic 0230 4827 |H' | Short_Literal 0x27 0231 4802 |H | Short_Literal 0x2 0232 0099 | | Action Reference_Dynamic 0233 4828 |H( | Short_Literal 0x28 0234 4802 |H | Short_Literal 0x2 0235 0099 | | Action Reference_Dynamic 0236 4829 |H) | Short_Literal 0x29 0237 4802 |H | Short_Literal 0x2 0238 0099 | | Action Reference_Dynamic 0239 482a |H* | Short_Literal 0x2a 023a 4802 |H | Short_Literal 0x2 023b 0099 | | Action Reference_Dynamic 023c 8001 | | Call 0x0,0x1 023d 4801 |H | Short_Literal 0x1 ; Debug Table 0x12.0x3 = 0x23d,0x4 023e 4801 |H | Short_Literal 0x1 023f 0092 0346 | F| Action Push_String_Extended,0x346 ; "request queue" 0241 e7ff | | Load 0x3,-0x1 0242 2508 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x8 0243 e42d | - | Load 0x2,0x2d 0244 482e |H. | Short_Literal 0x2e 0245 4802 |H | Short_Literal 0x2 0246 0099 | | Action Reference_Dynamic 0247 482f |H/ | Short_Literal 0x2f 0248 4802 |H | Short_Literal 0x2 0249 0099 | | Action Reference_Dynamic 024a 4830 |H0 | Short_Literal 0x30 024b 4802 |H | Short_Literal 0x2 024c 0099 | | Action Reference_Dynamic 024d 4831 |H1 | Short_Literal 0x31 024e 4802 |H | Short_Literal 0x2 024f 0099 | | Action Reference_Dynamic 0250 4832 |H2 | Short_Literal 0x32 0251 4802 |H | Short_Literal 0x2 0252 0099 | | Action Reference_Dynamic 0253 4833 |H3 | Short_Literal 0x33 0254 4802 |H | Short_Literal 0x2 0255 0099 | | Action Reference_Dynamic 0256 4834 |H4 | Short_Literal 0x34 0257 4802 |H | Short_Literal 0x2 0258 0099 | | Action Reference_Dynamic 0259 4835 |H5 | Short_Literal 0x35 025a 4802 |H | Short_Literal 0x2 025b 0099 | | Action Reference_Dynamic 025c 4836 |H6 | Short_Literal 0x36 025d 4802 |H | Short_Literal 0x2 025e 0099 | | Action Reference_Dynamic 025f 4837 |H7 | Short_Literal 0x37 0260 4802 |H | Short_Literal 0x2 0261 0099 | | Action Reference_Dynamic 0262 8001 | | Call 0x0,0x1 0263 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0264 0000 0000 | | .BLANK 0000[0x4] 0268 ; -------------------------------------------------------------------------------------- 0268 ; SUBPROGRAM 0268 ; -------------------------------------------------------------------------------------- 0268 026f | o | .CONST 0x026f ; Address of begin 0269 0004 | | .CONST 0x0004 ; Address of exception handler 026a 0002 | | .CONST 0x0002 ; Number of locals 026b INIT_0268: 026b 00db | | Load_Top At_Offset_3 ; Debug Table 0x13 = .DEBUG 0x026b,0x0524,0x0801,0x0002,0x002c,0xb624,0x0000,0x024c ; Debug Table 0x13.0x0 = 0x26b,0xffff 026c 00db | | Load_Top At_Offset_3 026d 01d5 | | Execute Vector,Field_Reference 026e 0007 | | Action Break_Optional 026f BODY_0268: 026f 0092 0347 | G| Action Push_String_Extended,0x347 ; "manager = " ; Debug Table 0x13.0x1 = 0x26f,0x1 0271 85fd | | Call 0x2,-0x3 0272 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x2 = 0x272,0x2 0273 e003 | | Load 0x0,0x3 0274 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0275 e004 | | Load 0x0,0x4 0276 1b27 | ' | Execute Package,Field_Read,Field_Number 0x27 0277 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0278 85fd | | Call 0x2,-0x3 0279 0092 0348 | H| Action Push_String_Extended,0x348 ; "; instance = " ; Debug Table 0x13.0x3 = 0x279,0x3 027b 85fd | | Call 0x2,-0x3 027c 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x4 = 0x27c,0x4 027d e003 | | Load 0x0,0x3 027e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 027f 00e0 | | Load_Encached Standard_Cache 0280 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0281 85fd | | Call 0x2,-0x3 0282 85fe | | Call 0x2,-0x2 ; Debug Table 0x13.0x5 = 0x282,0x5 0283 8404 | | Call 0x2,0x4 ; Debug Table 0x13.0x6 = 0x283,0x6 0284 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x13.0x7 = 0x284,0x7 0285 e002 | | Load 0x0,0x2 0286 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 0287 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0288 843a | : | Call 0x2,0x3a 0289 8405 | | Call 0x2,0x5 ; Debug Table 0x13.0x8 = 0x289,0x8 028a 4503 |E | Exit_Suprogram New_Top_Offset 0x3 028b 0000 0000 | | .BLANK 0000[0x5] 0290 ; -------------------------------------------------------------------------------------- 0290 ; SUBPROGRAM 0290 ; -------------------------------------------------------------------------------------- 0290 0293 | | .CONST 0x0293 ; Address of begin 0291 0004 | | .CONST 0x0004 ; Address of exception handler 0292 0001 | | .CONST 0x0001 ; Number of locals 0293 BODY_0290: 0293 INIT_0290: 0293 00da | | Load_Top At_Offset_2 ; Debug Table 0x14 = .DEBUG 0x0293,0x0538,0x0801,0x0002,0x002c,0xb624,0x0000,0x02b2 ; Debug Table 0x14.0x0 = 0x293,0x1 0294 01db | | Execute Vector,Length 0295 0c01 | | Execute_Immediate Greater_Equal,0x1 0296 683a |h: | Jump_Zero 0x2d1 0297 4801 |H | Short_Literal 0x1 ; Debug Table 0x14.0x1 = 0x297,0x2 0298 4800 |H | Short_Literal 0x0 0299 e7fe | | Load 0x3,-0x2 029a 8407 | | Call 0x2,0x7 029b 8404 | | Call 0x2,0x4 ; Debug Table 0x14.0x2 = 0x29b,0x3 029c 00da | | Load_Top At_Offset_2 ; Debug Table 0x14.0x3 = 0x29c,0x4 029d 01d9 | | Execute Vector,Reverse_Bounds 029e 0263 | c | Execute Discrete,Above_Bound 029f 7030 |p0 | Jump_Nonzero 0x2d0 02a0 4800 |H | Short_Literal 0x0 ; Debug Table 0x14.0x4 = 0x2a0,0x5 02a1 4801 |H | Short_Literal 0x1 02a2 0092 0349 | I| Action Push_String_Extended,0x349 ; "Objects Held By Action" 02a4 00db | | Load_Top At_Offset_3 02a5 e7ff | | Load 0x3,-0x1 02a6 01d7 | | Execute Vector,Field_Read 02a7 840d | | Call 0x2,0xd 02a8 01cc | | Execute Vector,Catenate 02a9 00db | | Load_Top At_Offset_3 02aa e7ff | | Load 0x3,-0x1 02ab 01d7 | | Execute Vector,Field_Read 02ac e002 | | Load 0x0,0x2 02ad 1b1f | | Execute Package,Field_Read,Field_Number 0x1f 02ae 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02af e43c | < | Load 0x2,0x3c 02b0 483d |H= | Short_Literal 0x3d 02b1 4802 |H | Short_Literal 0x2 02b2 0099 | | Action Reference_Dynamic 02b3 483e |H> | Short_Literal 0x3e 02b4 4802 |H | Short_Literal 0x2 02b5 0099 | | Action Reference_Dynamic 02b6 483f |H? | Short_Literal 0x3f 02b7 4802 |H | Short_Literal 0x2 02b8 0099 | | Action Reference_Dynamic 02b9 4840 |H@ | Short_Literal 0x40 02ba 4802 |H | Short_Literal 0x2 02bb 0099 | | Action Reference_Dynamic 02bc 4841 |HA | Short_Literal 0x41 02bd 4802 |H | Short_Literal 0x2 02be 0099 | | Action Reference_Dynamic 02bf 4842 |HB | Short_Literal 0x42 02c0 4802 |H | Short_Literal 0x2 02c1 0099 | | Action Reference_Dynamic 02c2 4843 |HC | Short_Literal 0x43 02c3 4802 |H | Short_Literal 0x2 02c4 0099 | | Action Reference_Dynamic 02c5 4844 |HD | Short_Literal 0x44 02c6 4802 |H | Short_Literal 0x2 02c7 0099 | | Action Reference_Dynamic 02c8 4845 |HE | Short_Literal 0x45 02c9 4802 |H | Short_Literal 0x2 02ca 0099 | | Action Reference_Dynamic 02cb 4846 |HF | Short_Literal 0x46 02cc 4802 |H | Short_Literal 0x2 02cd 0099 | | Action Reference_Dynamic 02ce 8001 | | Call 0x0,0x1 02cf 3fd0 |? | Loop_Increasing 0x2a0 02d0 8405 | | Call 0x2,0x5 ; Debug Table 0x14.0x5 = 0x2d0,0x6 02d1 4503 |E | Exit_Suprogram New_Top_Offset 0x3 02d2 0000 0000 | | .BLANK 0000[0x6] 02d8 ; -------------------------------------------------------------------------------------- 02d8 ; SUBPROGRAM 02d8 ; -------------------------------------------------------------------------------------- 02d8 02db | | .CONST 0x02db ; Address of begin 02d9 0004 | | .CONST 0x0004 ; Address of exception handler 02da 0001 | | .CONST 0x0001 ; Number of locals 02db BODY_02d8: 02db INIT_02d8: 02db 8404 | | Call 0x2,0x4 ; Debug Table 0x15 = .DEBUG 0x02db,0x0546,0x0801,0x0002,0x002c,0xb624,0x0000,0x02f9 ; Debug Table 0x15.0x0 = 0x2db,0x1 02dc 4801 |H | Short_Literal 0x1 ; Debug Table 0x15.0x1 = 0x2dc,0x2 02dd 4800 |H | Short_Literal 0x0 02de 0092 034a | J| Action Push_String_Extended,0x34a ; "Next Available Action = " 02e0 e7ff | | Load 0x3,-0x1 02e1 2c03 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x3 02e2 840d | | Call 0x2,0xd 02e3 01cc | | Execute Vector,Catenate 02e4 8407 | | Call 0x2,0x7 02e5 4801 |H | Short_Literal 0x1 ; Debug Table 0x15.0x2 = 0x2e5,0x3 02e6 4801 |H | Short_Literal 0x1 02e7 0092 034b | K| Action Push_String_Extended,0x34b ; "Abandoned Actions" 02e9 e7ff | | Load 0x3,-0x1 02ea 2505 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x5 02eb e413 | | Load 0x2,0x13 02ec 4814 |H | Short_Literal 0x14 02ed 4802 |H | Short_Literal 0x2 02ee 0099 | | Action Reference_Dynamic 02ef 4815 |H | Short_Literal 0x15 02f0 4802 |H | Short_Literal 0x2 02f1 0099 | | Action Reference_Dynamic 02f2 4816 |H | Short_Literal 0x16 02f3 4802 |H | Short_Literal 0x2 02f4 0099 | | Action Reference_Dynamic 02f5 4817 |H | Short_Literal 0x17 02f6 4802 |H | Short_Literal 0x2 02f7 0099 | | Action Reference_Dynamic 02f8 4818 |H | Short_Literal 0x18 02f9 4802 |H | Short_Literal 0x2 02fa 0099 | | Action Reference_Dynamic 02fb 4819 |H | Short_Literal 0x19 02fc 4802 |H | Short_Literal 0x2 02fd 0099 | | Action Reference_Dynamic 02fe 481a |H | Short_Literal 0x1a 02ff 4802 |H | Short_Literal 0x2 0300 0099 | | Action Reference_Dynamic 0301 481b |H | Short_Literal 0x1b 0302 4802 |H | Short_Literal 0x2 0303 0099 | | Action Reference_Dynamic 0304 481c |H | Short_Literal 0x1c 0305 4802 |H | Short_Literal 0x2 0306 0099 | | Action Reference_Dynamic 0307 481d |H | Short_Literal 0x1d 0308 4802 |H | Short_Literal 0x2 0309 0099 | | Action Reference_Dynamic 030a 8001 | | Call 0x0,0x1 030b 4801 |H | Short_Literal 0x1 ; Debug Table 0x15.0x3 = 0x30b,0x4 030c 4801 |H | Short_Literal 0x1 030d 0092 034c | L| Action Push_String_Extended,0x34c ; "Active Actions" 030f e7ff | | Load 0x3,-0x1 0310 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0311 e413 | | Load 0x2,0x13 0312 4814 |H | Short_Literal 0x14 0313 4802 |H | Short_Literal 0x2 0314 0099 | | Action Reference_Dynamic 0315 4815 |H | Short_Literal 0x15 0316 4802 |H | Short_Literal 0x2 0317 0099 | | Action Reference_Dynamic 0318 4816 |H | Short_Literal 0x16 0319 4802 |H | Short_Literal 0x2 031a 0099 | | Action Reference_Dynamic 031b 4817 |H | Short_Literal 0x17 031c 4802 |H | Short_Literal 0x2 031d 0099 | | Action Reference_Dynamic 031e 4818 |H | Short_Literal 0x18 031f 4802 |H | Short_Literal 0x2 0320 0099 | | Action Reference_Dynamic 0321 4819 |H | Short_Literal 0x19 0322 4802 |H | Short_Literal 0x2 0323 0099 | | Action Reference_Dynamic 0324 481a |H | Short_Literal 0x1a 0325 4802 |H | Short_Literal 0x2 0326 0099 | | Action Reference_Dynamic 0327 481b |H | Short_Literal 0x1b 0328 4802 |H | Short_Literal 0x2 0329 0099 | | Action Reference_Dynamic 032a 481c |H | Short_Literal 0x1c 032b 4802 |H | Short_Literal 0x2 032c 0099 | | Action Reference_Dynamic 032d 481d |H | Short_Literal 0x1d 032e 4802 |H | Short_Literal 0x2 032f 0099 | | Action Reference_Dynamic 0330 8001 | | Call 0x0,0x1 0331 0092 034d | M| Action Push_String_Extended,0x34d ; "Active Action Information" ; Debug Table 0x15.0x4 = 0x331,0x5 0333 00db | | Load_Top At_Offset_3 0334 2504 |% | Execute Variant_Record,Field_Reference,Indirect,Field_Number 0x4 0335 8449 | I | Call 0x2,0x49 0336 8405 | | Call 0x2,0x5 ; Debug Table 0x15.0x5 = 0x336,0x6 0337 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0338 0000 0000 | | .LITERAL {0x00000000, 0x002cb624} 033c ; -------------------------------------------------------------------------------------- 033c ; STRING TABLE 033c ; -------------------------------------------------------------------------------------- 033c 0026 | & | .STRTAB 0x0026->0x034f ; "State of Action Manager" 033d 003b | ; | .STRTAB 0x003b->0x035a ; " " 033e 003a | : | .STRTAB 0x003a->0x035b ; "-" 033f 0039 | 9 | .STRTAB 0x0039->0x035b ; "task = " 0340 003e | > | .STRTAB 0x003e->0x035f ; "mode = " 0341 0043 | C | .STRTAB 0x0043->0x0362 ; "action = " 0342 004a | J | .STRTAB 0x004a->0x0367 ; "; " 0343 004a | J | .STRTAB 0x004a->0x0368 ; "readers " 0344 0054 | T | .STRTAB 0x0054->0x036e ; "updaters " 0345 005e | ^ | .STRTAB 0x005e->0x0374 ; "overwriters " 0346 0068 | h | .STRTAB 0x0068->0x037a ; "request queue" 0347 0073 | s | .STRTAB 0x0073->0x0380 ; "manager = " 0348 007b | { | .STRTAB 0x007b->0x0385 ; "; instance = " 0349 0086 | | .STRTAB 0x0086->0x038c ; "Objects Held By Action" 034a 009a | | .STRTAB 0x009a->0x0397 ; "Next Available Action = " 034b 00b0 | | .STRTAB 0x00b0->0x03a3 ; "Abandoned Actions" 034c 00bf | | .STRTAB 0x00bf->0x03ab ; "Active Actions" 034d 00cb | | .STRTAB 0x00cb->0x03b2 ; "Active Action Information" 034e 00e2 | | .STREND 0x00e2->0x03bf 034f 5374 6174 |Stat| .STRTAB_STRINGS 03bf 0000 | | .XXX[0x1] 03c0 ; -------------------------------------------------------------------------------------- 03c0 ; Debug Table 03c0 ; -------------------------------------------------------------------------------------- 03c0 0003 0016 | | .CONST 0x0003,0x0016 03c2 000b 0472 | r| .DEBUG 0x000b,0x0472,0x8000,0x0000,0x002c,0xac44,0x0000,0x0003 03ca 001b 0474 | t| .DEBUG 0x001b,0x0474,0xa801,0x0002,0x002c,0xac44,0x0000,0x0003 03d2 00eb 04b4 | | .DEBUG 0x00eb,0x04b4,0x0802,0x0002,0x002c,0xb624,0x0000,0x002b 03da 00f3 04b8 | | .DEBUG 0x00f3,0x04b8,0x0801,0x0002,0x002c,0xb624,0x0000,0x0036 03e2 00fb 04bc | | .DEBUG 0x00fb,0x04bc,0x0801,0x0002,0x002c,0xb624,0x0000,0x0045 03ea 0103 04c0 | | .DEBUG 0x0103,0x04c0,0x0801,0x0002,0x002c,0xb624,0x0000,0x0054 03f2 0113 04c6 | | .DEBUG 0x0113,0x04c6,0x0801,0x0002,0x002c,0xb624,0x0000,0x006f 03fa 0133 04da | 3 | .DEBUG 0x0133,0x04da,0x0802,0x0002,0x002c,0xb624,0x0000,0x00b4 0402 013b 04de | ; | .DEBUG 0x013b,0x04de,0x0802,0x0002,0x002c,0xb624,0x0000,0x00c7 040a 0143 04e2 | C | .DEBUG 0x0143,0x04e2,0x0802,0x0002,0x002c,0xb624,0x0000,0x00da 0412 014b 04e6 | K | .DEBUG 0x014b,0x04e6,0x0801,0x0002,0x002c,0xb624,0x0000,0x00ed 041a 015b 04ec | [ | .DEBUG 0x015b,0x04ec,0x0801,0x0002,0x002c,0xb624,0x0000,0x0109 0422 016b 04f2 | k | .DEBUG 0x016b,0x04f2,0x0802,0x0002,0x002c,0xb624,0x0000,0x0125 042a 017b 04f6 | { | .DEBUG 0x017b,0x04f6,0x0801,0x0002,0x002c,0xb624,0x0000,0x013f 0432 0183 04fa | | .DEBUG 0x0183,0x04fa,0x0801,0x0002,0x002c,0xb624,0x0000,0x0154 043a 0193 0500 | | .DEBUG 0x0193,0x0500,0x0801,0x0002,0x002c,0xb624,0x0000,0x016a 0442 019b 0504 | | .DEBUG 0x019b,0x0504,0x0801,0x0002,0x002c,0xb624,0x0000,0x0183 044a 01b3 050c | | .DEBUG 0x01b3,0x050c,0x0801,0x0002,0x002c,0xb624,0x0000,0x01ac 0452 01cb 051a | | .DEBUG 0x01cb,0x051a,0x0801,0x0002,0x002c,0xb624,0x0000,0x0211 045a 026b 0524 | k $| .DEBUG 0x026b,0x0524,0x0801,0x0002,0x002c,0xb624,0x0000,0x024c 0462 0293 0538 | 8| .DEBUG 0x0293,0x0538,0x0801,0x0002,0x002c,0xb624,0x0000,0x02b2 046a 02db 0546 | F| .DEBUG 0x02db,0x0546,0x0801,0x0002,0x002c,0xb624,0x0000,0x02f9 0472 ; -------------------------------------------------------------------------------------- 0472 ; Debug3 Subtable 0x0 0472 ; -------------------------------------------------------------------------------------- 0472 0000 0000 | | .DBG3TAB 0x0000,0x0000 0474 ; -------------------------------------------------------------------------------------- 0474 ; Debug3 Subtable 0x1 0474 ; -------------------------------------------------------------------------------------- 0474 001c 0003 | | .DBG3TAB 0x001c,0x0003 0476 001b ffff | | .CONST 0x001b,0xffff 0478 001c fffe | | .CONST 0x001c,0xfffe 047a 001d fffd | | .CONST 0x001d,0xfffd 047c 0020 fffc | | .CONST 0x0020,0xfffc 047e 0021 fffb | ! | .CONST 0x0021,0xfffb 0480 0023 fffa | # | .CONST 0x0023,0xfffa 0482 0025 fff9 | % | .CONST 0x0025,0xfff9 0484 0027 fff8 | ' | .CONST 0x0027,0xfff8 0486 0029 fff7 | ) | .CONST 0x0029,0xfff7 0488 002b fff6 | + | .CONST 0x002b,0xfff6 048a 002d fff5 | - | .CONST 0x002d,0xfff5 048c 002f fff4 | / | .CONST 0x002f,0xfff4 048e 0031 fff3 | 1 | .CONST 0x0031,0xfff3 0490 0033 fff2 | 3 | .CONST 0x0033,0xfff2 0492 0035 fff1 | 5 | .CONST 0x0035,0xfff1 0494 0037 fff0 | 7 | .CONST 0x0037,0xfff0 0496 0039 ffef | 9 | .CONST 0x0039,0xffef 0498 003b ffee | ; | .CONST 0x003b,0xffee 049a 003d ffed | = | .CONST 0x003d,0xffed 049c 003f ffec | ? | .CONST 0x003f,0xffec 049e 0041 ffeb | A | .CONST 0x0041,0xffeb 04a0 0065 ffea | e | .CONST 0x0065,0xffea 04a2 0089 ffe9 | | .CONST 0x0089,0xffe9 04a4 00ad ffe8 | | .CONST 0x00ad,0xffe8 04a6 00af ffe7 | | .CONST 0x00af,0xffe7 04a8 00b1 ffe6 | | .CONST 0x00b1,0xffe6 04aa 00d5 ffe5 | | .CONST 0x00d5,0xffe5 04ac 00d7 ffe4 | | .CONST 0x00d7,0xffe4 04ae 00d9 0001 | | .CONST 0x00d9,0x0001 04b0 00dd 0002 | | .CONST 0x00dd,0x0002 04b2 00e2 0003 | | .CONST 0x00e2,0x0003 04b4 ; -------------------------------------------------------------------------------------- 04b4 ; Debug3 Subtable 0x2 04b4 ; -------------------------------------------------------------------------------------- 04b4 0000 0001 | | .DBG3TAB 0x0000,0x0001 04b6 00eb 0001 | | .CONST 0x00eb,0x0001 04b8 ; -------------------------------------------------------------------------------------- 04b8 ; Debug3 Subtable 0x3 04b8 ; -------------------------------------------------------------------------------------- 04b8 0000 0001 | | .DBG3TAB 0x0000,0x0001 04ba 00f3 0001 | | .CONST 0x00f3,0x0001 04bc ; -------------------------------------------------------------------------------------- 04bc ; Debug3 Subtable 0x4 04bc ; -------------------------------------------------------------------------------------- 04bc 0000 0001 | | .DBG3TAB 0x0000,0x0001 04be 00fb 0001 | | .CONST 0x00fb,0x0001 04c0 ; -------------------------------------------------------------------------------------- 04c0 ; Debug3 Subtable 0x5 04c0 ; -------------------------------------------------------------------------------------- 04c0 0000 0002 | | .DBG3TAB 0x0000,0x0002 04c2 0103 0001 | | .CONST 0x0103,0x0001 04c4 0107 0002 | | .CONST 0x0107,0x0002 04c6 ; -------------------------------------------------------------------------------------- 04c6 ; Debug3 Subtable 0x6 04c6 ; -------------------------------------------------------------------------------------- 04c6 0000 0009 | | .DBG3TAB 0x0000,0x0009 04c8 0113 0001 | | .CONST 0x0113,0x0001 04ca 0116 0002 | | .CONST 0x0116,0x0002 04cc 011a 0003 | | .CONST 0x011a,0x0003 04ce 011c 0004 | | .CONST 0x011c,0x0004 04d0 0120 0005 | | .CONST 0x0120,0x0005 04d2 0121 0006 | ! | .CONST 0x0121,0x0006 04d4 0123 0007 | # | .CONST 0x0123,0x0007 04d6 0127 0008 | ' | .CONST 0x0127,0x0008 04d8 012e 0009 | . | .CONST 0x012e,0x0009 04da ; -------------------------------------------------------------------------------------- 04da ; Debug3 Subtable 0x7 04da ; -------------------------------------------------------------------------------------- 04da 0000 0001 | | .DBG3TAB 0x0000,0x0001 04dc 0133 0001 | 3 | .CONST 0x0133,0x0001 04de ; -------------------------------------------------------------------------------------- 04de ; Debug3 Subtable 0x8 04de ; -------------------------------------------------------------------------------------- 04de 0000 0001 | | .DBG3TAB 0x0000,0x0001 04e0 013b 0001 | ; | .CONST 0x013b,0x0001 04e2 ; -------------------------------------------------------------------------------------- 04e2 ; Debug3 Subtable 0x9 04e2 ; -------------------------------------------------------------------------------------- 04e2 0000 0001 | | .DBG3TAB 0x0000,0x0001 04e4 0143 0001 | C | .CONST 0x0143,0x0001 04e6 ; -------------------------------------------------------------------------------------- 04e6 ; Debug3 Subtable 0xa 04e6 ; -------------------------------------------------------------------------------------- 04e6 0000 0002 | | .DBG3TAB 0x0000,0x0002 04e8 014b 0001 | K | .CONST 0x014b,0x0001 04ea 014e 0002 | N | .CONST 0x014e,0x0002 04ec ; -------------------------------------------------------------------------------------- 04ec ; Debug3 Subtable 0xb 04ec ; -------------------------------------------------------------------------------------- 04ec 0000 0002 | | .DBG3TAB 0x0000,0x0002 04ee 015b 0001 | [ | .CONST 0x015b,0x0001 04f0 015e 0002 | ^ | .CONST 0x015e,0x0002 04f2 ; -------------------------------------------------------------------------------------- 04f2 ; Debug3 Subtable 0xc 04f2 ; -------------------------------------------------------------------------------------- 04f2 0000 0001 | | .DBG3TAB 0x0000,0x0001 04f4 016b 0001 | k | .CONST 0x016b,0x0001 04f6 ; -------------------------------------------------------------------------------------- 04f6 ; Debug3 Subtable 0xd 04f6 ; -------------------------------------------------------------------------------------- 04f6 0000 0001 | | .DBG3TAB 0x0000,0x0001 04f8 017b 0001 | { | .CONST 0x017b,0x0001 04fa ; -------------------------------------------------------------------------------------- 04fa ; Debug3 Subtable 0xe 04fa ; -------------------------------------------------------------------------------------- 04fa 0000 0002 | | .DBG3TAB 0x0000,0x0002 04fc 0183 0001 | | .CONST 0x0183,0x0001 04fe 0186 0002 | | .CONST 0x0186,0x0002 0500 ; -------------------------------------------------------------------------------------- 0500 ; Debug3 Subtable 0xf 0500 ; -------------------------------------------------------------------------------------- 0500 0000 0001 | | .DBG3TAB 0x0000,0x0001 0502 0193 0001 | | .CONST 0x0193,0x0001 0504 ; -------------------------------------------------------------------------------------- 0504 ; Debug3 Subtable 0x10 0504 ; -------------------------------------------------------------------------------------- 0504 0000 0003 | | .DBG3TAB 0x0000,0x0003 0506 019b 0001 | | .CONST 0x019b,0x0001 0508 019f 0002 | | .CONST 0x019f,0x0002 050a 01a2 0003 | | .CONST 0x01a2,0x0003 050c ; -------------------------------------------------------------------------------------- 050c ; Debug3 Subtable 0x11 050c ; -------------------------------------------------------------------------------------- 050c 0001 0005 | | .DBG3TAB 0x0001,0x0005 050e 01b3 ffff | | .CONST 0x01b3,0xffff 0510 01b7 0001 | | .CONST 0x01b7,0x0001 0512 01ba 0002 | | .CONST 0x01ba,0x0002 0514 01bd 0003 | | .CONST 0x01bd,0x0003 0516 01c0 0004 | | .CONST 0x01c0,0x0004 0518 01c3 0005 | | .CONST 0x01c3,0x0005 051a ; -------------------------------------------------------------------------------------- 051a ; Debug3 Subtable 0x12 051a ; -------------------------------------------------------------------------------------- 051a 0000 0004 | | .DBG3TAB 0x0000,0x0004 051c 01cb 0001 | | .CONST 0x01cb,0x0001 051e 01f1 0002 | | .CONST 0x01f1,0x0002 0520 0217 0003 | | .CONST 0x0217,0x0003 0522 023d 0004 | = | .CONST 0x023d,0x0004 0524 ; -------------------------------------------------------------------------------------- 0524 ; Debug3 Subtable 0x13 0524 ; -------------------------------------------------------------------------------------- 0524 0001 0008 | | .DBG3TAB 0x0001,0x0008 0526 026b ffff | k | .CONST 0x026b,0xffff 0528 026f 0001 | o | .CONST 0x026f,0x0001 052a 0272 0002 | r | .CONST 0x0272,0x0002 052c 0279 0003 | y | .CONST 0x0279,0x0003 052e 027c 0004 | | | .CONST 0x027c,0x0004 0530 0282 0005 | | .CONST 0x0282,0x0005 0532 0283 0006 | | .CONST 0x0283,0x0006 0534 0284 0007 | | .CONST 0x0284,0x0007 0536 0289 0008 | | .CONST 0x0289,0x0008 0538 ; -------------------------------------------------------------------------------------- 0538 ; Debug3 Subtable 0x14 0538 ; -------------------------------------------------------------------------------------- 0538 0000 0006 | | .DBG3TAB 0x0000,0x0006 053a 0293 0001 | | .CONST 0x0293,0x0001 053c 0297 0002 | | .CONST 0x0297,0x0002 053e 029b 0003 | | .CONST 0x029b,0x0003 0540 029c 0004 | | .CONST 0x029c,0x0004 0542 02a0 0005 | | .CONST 0x02a0,0x0005 0544 02d0 0006 | | .CONST 0x02d0,0x0006 0546 ; -------------------------------------------------------------------------------------- 0546 ; Debug3 Subtable 0x15 0546 ; -------------------------------------------------------------------------------------- 0546 0000 0006 | | .DBG3TAB 0x0000,0x0006 0548 02db 0001 | | .CONST 0x02db,0x0001 054a 02dc 0002 | | .CONST 0x02dc,0x0002 054c 02e5 0003 | | .CONST 0x02e5,0x0003 054e 030b 0004 | | .CONST 0x030b,0x0004 0550 0331 0005 | 1 | .CONST 0x0331,0x0005 0552 0336 0006 | 6 | .CONST 0x0336,0x0006 0554 0000 0000 | | .BLANK 0000[0xac]