|
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: 4096 (0x1000)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6060f0
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0660 | ` | .CONST 0x0660 ; 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 8004 | | .CONST 0x8004 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0052 | R | .CONST 0x0052 ; Address of begin
0009 0058 | X | .CONST 0x0058 ; Address of exception handler
000a 002d | - | .CONST 0x002d ; Number of locals
000b INIT_0008:
000b 4802 |H | Short_Literal 0x2
000c 02cb | | Declare_Variable Entry
000d 4800 |H | Short_Literal 0x0
000e 02cb | | Declare_Variable Entry
000f 4805 |H | Short_Literal 0x5
0010 02cb | | Declare_Variable Entry
0011 4803 |H | Short_Literal 0x3
0012 02cb | | Declare_Variable Entry
0013 4803 |H | Short_Literal 0x3
0014 02cb | | Declare_Variable Entry
0015 4803 |H | Short_Literal 0x3
0016 02cb | | Declare_Variable Entry
0017 4802 |H | Short_Literal 0x2
0018 02cb | | Declare_Variable Entry
0019 4803 |H | Short_Literal 0x3
001a 02cb | | Declare_Variable Entry
001b 4802 |H | Short_Literal 0x2
001c 02cb | | Declare_Variable Entry
001d 4802 |H | Short_Literal 0x2
001e 02cb | | Declare_Variable Entry
001f 4801 |H | Short_Literal 0x1
0020 02cb | | Declare_Variable Entry
0021 4801 |H | Short_Literal 0x1
0022 02cb | | Declare_Variable Entry
0023 4801 |H | Short_Literal 0x1
0024 02cb | | Declare_Variable Entry
0025 00bf | | Action Accept_Activation
0026 e001 | | Load 0x0,0x1
0027 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0028 e002 | | Load 0x0,0x2
0029 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002a e003 | | Load 0x0,0x3
002b 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
002c e004 | | Load 0x0,0x4
002d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002e 02c7 | | Declare_Variable Any
002f 00d8 | | Load_Top At_Offset_0
0030 1c00 | | Execute_Immediate Run_Utility,0x0
0031 e005 | | Load 0x0,0x5
0032 0337 | 7 | Declare_Variable Array
0033 e006 | | Load 0x0,0x6
0034 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0035 e007 | | Load 0x0,0x7
0036 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0037 00e1 | | Load_Encached Boolean_Cache
0038 e008 | | Load 0x0,0x8
0039 0007 | | Action Break_Optional
003a 00e1 | | Load_Encached Boolean_Cache
003b 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
003c e007 | | Load 0x0,0x7
003d 1914 | | Execute Package,Field_Reference,Field_Number 0x14
003e 0007 | | Action Break_Optional
003f 029d 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call
0041 029d 008b | | Declare_Subprogram INIT_0088,For_Outer_Call
0043 029d 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call
0045 029d 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call
0047 029d 01c3 | | Declare_Subprogram INIT_01c0,For_Outer_Call
0049 029d 020b | | Declare_Subprogram INIT_0208,For_Outer_Call
004b 029d 021b | | Declare_Subprogram INIT_0218,For_Outer_Call
004d 029d 0253 | S| Declare_Subprogram INIT_0250,For_Outer_Call
004f 029f 02c3 | | Declare_Subprogram INIT_02c0,For_Call
0051 00bc | | Action Signal_Activated
0052 BODY_0008:
0052 00cf | | Action Mark_Auxiliary
0053 822d | - | Call 0x1,0x2d
0054 00c9 | | Action Pop_Auxiliary_Loop
0055 7ffd | | Jump 0x53
0056 00ce | | Action Pop_Auxiliary
0057 00bb | | Action Signal_Completion
0058 TRAP_0008:
0058 0007 | | Action Break_Optional
0059 4808 |H | Short_Literal 0x8
005a 0092 0531 | 1| Action Push_String_Extended,0x531 ; "Unexpected exception "
005c 8009 | | Call 0x0,0x9
005d 01cc | | Execute Vector,Catenate
005e 0092 0532 | 2| Action Push_String_Extended,0x532 ; " causing death of the Session_Worker for "
0060 01cc | | Execute Vector,Catenate
0061 e21a | | Load 0x1,0x1a
0062 800a | | Call 0x0,0xa
0063 01cc | | Execute Vector,Catenate
0064 4802 |H | Short_Literal 0x2
0065 e00b | | Load 0x0,0xb
0066 170d | | Execute Task,Entry_Call,Field_Number 0xd
0067 00bb | | Action Signal_Completion
0068 ; --------------------------------------------------------------------------------------
0068 ; SUBPROGRAM
0068 ; --------------------------------------------------------------------------------------
0068 006b | k | .CONST 0x006b ; Address of begin
0069 0004 | | .CONST 0x0004 ; Address of exception handler
006a 0001 | | .CONST 0x0001 ; Number of locals
006b BODY_0068:
006b INIT_0068:
006b 4807 |H | Short_Literal 0x7
006c 4820 |H | Short_Literal 0x20
006d 0092 0533 | 3| Action Push_String_Extended,0x533 ; "Session_Worker for "
006f e21a | | Load 0x1,0x1a
0070 800a | | Call 0x0,0xa
0071 01cc | | Execute Vector,Catenate
0072 0092 0534 | 4| Action Push_String_Extended,0x534 ; " got unexpected exception "
0074 01cc | | Execute Vector,Catenate
0075 8009 | | Call 0x0,0x9
0076 01cc | | Execute Vector,Catenate
0077 01cb | | Execute Vector,Append
0078 e5ff | | Load 0x2,-0x1
0079 01cc | | Execute Vector,Catenate
007a 0092 0535 | 5| Action Push_String_Extended,0x535 ; "; the Corrupt_State exception will be raised"
007c 01cc | | Execute Vector,Catenate
007d 4802 |H | Short_Literal 0x2
007e e00b | | Load 0x0,0xb
007f 170d | | Execute Task,Entry_Call,Field_Number 0xd
0080 e00c | | Load 0x0,0xc
0081 0257 | W | Execute Discrete,Raise
0082 0000 0000 | | .BLANK 0000[0x6]
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 0094 | | .CONST 0x0094 ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0006 | | .CONST 0x0006 ; Number of locals
008b INIT_0088:
008b e00d | | Load 0x0,0xd
008c 1b12 | | Execute Package,Field_Read,Field_Number 0x12
008d e00e | | Load 0x0,0xe
008e 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
008f e00e | | Load 0x0,0xe
0090 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0091 e00f | | Load 0x0,0xf
0092 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0093 00e1 | | Load_Encached Boolean_Cache
0094 BODY_0088:
0094 00e1 | | Load_Encached Boolean_Cache
0095 e21b | | Load 0x1,0x1b
0096 8010 | | Call 0x0,0x10
0097 0059 | Y | Store_Top Discrete,At_Offset_1
0098 00d8 | | Load_Top At_Offset_0
0099 6886 |h | Jump_Zero 0x120
009a 608d |` | Indirect_Literal Discrete,0x128,{0x7fffffff, 0xffffffff}
009b a220 | | Store_Unchecked 0x1,0x20
009c e402 | | Load 0x2,0x2
009d e21d | | Load 0x1,0x1d
009e e21b | | Load 0x1,0x1b
009f 0217 | | Execute Heap_Access,All_Reference
00a0 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
00a1 e00d | | Load 0x0,0xd
00a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00a3 c402 | | Store 0x2,0x2
00a4 00cf | | Action Mark_Auxiliary
00a5 786d |xm | Jump 0x113
00a6 e402 | | Load 0x2,0x2
00a7 e00d | | Load 0x0,0xd
00a8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
00a9 a404 | | Store_Unchecked 0x2,0x4
00aa e403 | | Load 0x2,0x3
00ab e21d | | Load 0x1,0x1d
00ac e404 | | Load 0x2,0x4
00ad e00e | | Load 0x0,0xe
00ae 181d | | Execute Package,Field_Execute,Field_Number 0x1d
00af c403 | | Store 0x2,0x3
00b0 00cf | | Action Mark_Auxiliary
00b1 784a |xJ | Jump 0xfc
00b2 e403 | | Load 0x2,0x3
00b3 e00e | | Load 0x0,0xe
00b4 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
00b5 4602 |F | Jump_Case 0x3
00b6 7827 |x' | Jump 0xde ; case 0x0
00b7 783f |x? | Jump 0xf7 ; case 0x1
00b8 7800 |x | Jump 0xb9 ; case 0x2
00b9 e403 | | Load 0x2,0x3
00ba e00e | | Load 0x0,0xe
00bb 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
00bc e007 | | Load 0x0,0x7
00bd 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00be 6810 |h | Jump_Zero 0xcf
00bf e403 | | Load 0x2,0x3
00c0 e00e | | Load 0x0,0xe
00c1 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00c2 a405 | | Store_Unchecked 0x2,0x5
00c3 e403 | | Load 0x2,0x3
00c4 e00e | | Load 0x0,0xe
00c5 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
00c6 c403 | | Store 0x2,0x3
00c7 e21e | | Load 0x1,0x1e
00c8 4802 |H | Short_Literal 0x2
00c9 8011 | | Call 0x0,0x11
00ca 00d1 | | Pop_Control Pop_Count_1
00cb 00db | | Load_Top At_Offset_3
00cc 8012 | | Call 0x0,0x12
00cd c405 | | Store 0x2,0x5
00ce 782c |x, | Jump 0xfb
00cf e220 | | Load 0x1,0x20
00d0 e403 | | Load 0x2,0x3
00d1 e00e | | Load 0x0,0xe
00d2 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
00d3 8224 | $ | Call 0x1,0x24
00d4 6804 |h | Jump_Zero 0xd9
00d5 e403 | | Load 0x2,0x3
00d6 e00e | | Load 0x0,0xe
00d7 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
00d8 a220 | | Store_Unchecked 0x1,0x20
00d9 e403 | | Load 0x2,0x3
00da e00e | | Load 0x0,0xe
00db 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00dc c403 | | Store 0x2,0x3
00dd 781d |x | Jump 0xfb
00de e403 | | Load 0x2,0x3
00df e00e | | Load 0x0,0xe
00e0 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
00e1 7010 |p | Jump_Nonzero 0xf2
00e2 e403 | | Load 0x2,0x3
00e3 e00e | | Load 0x0,0xe
00e4 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
00e5 a405 | | Store_Unchecked 0x2,0x5
00e6 e403 | | Load 0x2,0x3
00e7 e00e | | Load 0x0,0xe
00e8 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
00e9 c403 | | Store 0x2,0x3
00ea e21e | | Load 0x1,0x1e
00eb 4800 |H | Short_Literal 0x0
00ec 8011 | | Call 0x0,0x11
00ed 00d1 | | Pop_Control Pop_Count_1
00ee 00db | | Load_Top At_Offset_3
00ef 8012 | | Call 0x0,0x12
00f0 c405 | | Store 0x2,0x5
00f1 7809 |x | Jump 0xfb
00f2 e403 | | Load 0x2,0x3
00f3 e00e | | Load 0x0,0xe
00f4 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00f5 c403 | | Store 0x2,0x3
00f6 7804 |x | Jump 0xfb
00f7 e403 | | Load 0x2,0x3
00f8 e00e | | Load 0x0,0xe
00f9 181f | | Execute Package,Field_Execute,Field_Number 0x1f
00fa c403 | | Store 0x2,0x3
00fb 00c9 | | Action Pop_Auxiliary_Loop
00fc e403 | | Load 0x2,0x3
00fd e00e | | Load 0x0,0xe
00fe 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00ff 6fb2 |o | Jump_Zero 0xb2
0100 00ce | | Action Pop_Auxiliary
0101 e403 | | Load 0x2,0x3
0102 e00e | | Load 0x0,0xe
0103 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0104 c403 | | Store 0x2,0x3
0105 00db | | Load_Top At_Offset_3
0106 e00e | | Load 0x0,0xe
0107 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0108 6805 |h | Jump_Zero 0x10e
0109 e402 | | Load 0x2,0x2
010a e00d | | Load 0x0,0xd
010b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
010c c402 | | Store 0x2,0x2
010d 7804 |x | Jump 0x112
010e e402 | | Load 0x2,0x2
010f e00d | | Load 0x0,0xd
0110 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0111 c402 | | Store 0x2,0x2
0112 00c9 | | Action Pop_Auxiliary_Loop
0113 e402 | | Load 0x2,0x2
0114 e00d | | Load 0x0,0xd
0115 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0116 6f8f |o | Jump_Zero 0xa6
0117 00ce | | Action Pop_Auxiliary
0118 e402 | | Load 0x2,0x2
0119 e00d | | Load 0x0,0xd
011a 1814 | | Execute Package,Field_Execute,Field_Number 0x14
011b c402 | | Store 0x2,0x2
011c e21b | | Load 0x1,0x1b
011d e002 | | Load 0x0,0x2
011e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
011f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0120 e006 | | Load 0x0,0x6
0121 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0122 e007 | | Load 0x0,0x7
0123 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0124 a220 | | Store_Unchecked 0x1,0x20
0125 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0126 0000 0000 | | .XXX[0x2]
0128 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff}
012c 0000 0000 | | .BLANK 0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0141 | A | .CONST 0x0141 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0007 | | .CONST 0x0007 ; Number of locals
0133 INIT_0130:
0133 e00d | | Load 0x0,0xd
0134 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0135 e00e | | Load 0x0,0xe
0136 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0137 e00e | | Load 0x0,0xe
0138 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0139 e00f | | Load 0x0,0xf
013a 1b0f | | Execute Package,Field_Read,Field_Number 0xf
013b 67ec |g | Indirect_Literal Discrete,0x128,{0x7fffffff, 0xffffffff}
013c e007 | | Load 0x0,0x7
013d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
013e 03f1 | | Declare_Variable Discrete,With_Value
013f 00e1 | | Load_Encached Boolean_Cache
0140 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0141 BODY_0130:
0141 00cf | | Action Mark_Auxiliary
0142 00e1 | | Load_Encached Boolean_Cache
0143 0265 | e | Execute Discrete,Reverse_Bounds
0144 0007 | | Action Break_Optional
0145 e402 | | Load 0x2,0x2
0146 e21d | | Load 0x1,0x1d
0147 e21b | | Load 0x1,0x1b
0148 0217 | | Execute Heap_Access,All_Reference
0149 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
014a e00d | | Load 0x0,0xd
014b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
014c c402 | | Store 0x2,0x2
014d 00cf | | Action Mark_Auxiliary
014e 784d |xM | Jump 0x19c
014f e402 | | Load 0x2,0x2
0150 e00d | | Load 0x0,0xd
0151 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0152 a404 | | Store_Unchecked 0x2,0x4
0153 e403 | | Load 0x2,0x3
0154 e21d | | Load 0x1,0x1d
0155 e404 | | Load 0x2,0x4
0156 e00e | | Load 0x0,0xe
0157 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0158 c403 | | Store 0x2,0x3
0159 00cf | | Action Mark_Auxiliary
015a 7831 |x1 | Jump 0x18c
015b e403 | | Load 0x2,0x3
015c e00e | | Load 0x0,0xe
015d 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
015e 4800 |H | Short_Literal 0x0
015f 4801 |H | Short_Literal 0x1
0160 0262 | b | Execute Discrete,In_Range
0161 7025 |p% | Jump_Nonzero 0x187
0162 7800 |x | Jump 0x163
0163 00da | | Load_Top At_Offset_2
0164 6818 |h | Jump_Zero 0x17d
0165 e403 | | Load 0x2,0x3
0166 e00e | | Load 0x0,0xe
0167 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0168 e406 | | Load 0x2,0x6
0169 027f | | Execute Discrete,Equal
016a 681c |h | Jump_Zero 0x187
016b e403 | | Load 0x2,0x3
016c e00e | | Load 0x0,0xe
016d 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
016e a405 | | Store_Unchecked 0x2,0x5
016f e403 | | Load 0x2,0x3
0170 e00e | | Load 0x0,0xe
0171 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0172 c403 | | Store 0x2,0x3
0173 e21e | | Load 0x1,0x1e
0174 4802 |H | Short_Literal 0x2
0175 8011 | | Call 0x0,0x11
0176 00d1 | | Pop_Control Pop_Count_1
0177 e405 | | Load 0x2,0x5
0178 8012 | | Call 0x0,0x12
0179 c405 | | Store 0x2,0x5
017a 4801 |H | Short_Literal 0x1
017b a407 | | Store_Unchecked 0x2,0x7
017c 7813 |x | Jump 0x190
017d e406 | | Load 0x2,0x6
017e e403 | | Load 0x2,0x3
017f e00e | | Load 0x0,0xe
0180 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0181 8224 | $ | Call 0x1,0x24
0182 6804 |h | Jump_Zero 0x187
0183 e403 | | Load 0x2,0x3
0184 e00e | | Load 0x0,0xe
0185 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0186 a406 | | Store_Unchecked 0x2,0x6
0187 e403 | | Load 0x2,0x3
0188 e00e | | Load 0x0,0xe
0189 181f | | Execute Package,Field_Execute,Field_Number 0x1f
018a c403 | | Store 0x2,0x3
018b 00c9 | | Action Pop_Auxiliary_Loop
018c e403 | | Load 0x2,0x3
018d e00e | | Load 0x0,0xe
018e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
018f 6fcb |o | Jump_Zero 0x15b
0190 00ce | | Action Pop_Auxiliary
0191 e403 | | Load 0x2,0x3
0192 e00e | | Load 0x0,0xe
0193 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0194 c403 | | Store 0x2,0x3
0195 e407 | | Load 0x2,0x7
0196 7009 |p | Jump_Nonzero 0x1a0
0197 e402 | | Load 0x2,0x2
0198 e00d | | Load 0x0,0xd
0199 1815 | | Execute Package,Field_Execute,Field_Number 0x15
019a c402 | | Store 0x2,0x2
019b 00c9 | | Action Pop_Auxiliary_Loop
019c e402 | | Load 0x2,0x2
019d e00d | | Load 0x0,0xd
019e 1816 | | Execute Package,Field_Execute,Field_Number 0x16
019f 6faf |o | Jump_Zero 0x14f
01a0 00ce | | Action Pop_Auxiliary
01a1 e402 | | Load 0x2,0x2
01a2 e00d | | Load 0x0,0xd
01a3 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01a4 c402 | | Store 0x2,0x2
01a5 00c8 | | Action Pop_Auxiliary_Range
01a6 3f9e |? | Loop_Increasing 0x145
01a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01b0 | | .CONST 0x01b0 ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0002 | | .CONST 0x0002 ; Number of locals
01ab INIT_01a8:
01ab e013 | | Load 0x0,0x13
01ac 1b32 | 2 | Execute Package,Field_Read,Field_Number 0x32
01ad 02c7 | | Declare_Variable Any
01ae 00d8 | | Load_Top At_Offset_0
01af 1c00 | | Execute_Immediate Run_Utility,0x0
01b0 BODY_01a8:
01b0 00be | | Action Activate_Tasks
01b1 00d8 | | Load_Top At_Offset_0
01b2 e21a | | Load 0x1,0x1a
01b3 e013 | | Load 0x0,0x13
01b4 1833 | 3 | Execute Package,Field_Execute,Field_Number 0x33
01b5 c402 | | Store 0x2,0x2
01b6 00d8 | | Load_Top At_Offset_0
01b7 e013 | | Load 0x0,0x13
01b8 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
01b9 a223 | # | Store_Unchecked 0x1,0x23
01ba 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01bb 0000 0000 | | .BLANK 0000[0x5]
01c0 ; --------------------------------------------------------------------------------------
01c0 ; SUBPROGRAM
01c0 ; --------------------------------------------------------------------------------------
01c0 01cb | | .CONST 0x01cb ; Address of begin
01c1 0004 | | .CONST 0x0004 ; Address of exception handler
01c2 0005 | | .CONST 0x0005 ; Number of locals
01c3 INIT_01c0:
01c3 e00d | | Load 0x0,0xd
01c4 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01c5 e00e | | Load 0x0,0xe
01c6 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
01c7 e00e | | Load 0x0,0xe
01c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01c9 e00f | | Load 0x0,0xf
01ca 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01cb BODY_01c0:
01cb 00db | | Load_Top At_Offset_3
01cc e21d | | Load 0x1,0x1d
01cd e21b | | Load 0x1,0x1b
01ce 0217 | | Execute Heap_Access,All_Reference
01cf 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
01d0 e00d | | Load 0x0,0xd
01d1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01d2 c402 | | Store 0x2,0x2
01d3 00cf | | Action Mark_Auxiliary
01d4 7827 |x' | Jump 0x1fc
01d5 e402 | | Load 0x2,0x2
01d6 e00d | | Load 0x0,0xd
01d7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01d8 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01d9 00db | | Load_Top At_Offset_3
01da e21d | | Load 0x1,0x1d
01db e404 | | Load 0x2,0x4
01dc e00e | | Load 0x0,0xe
01dd 181d | | Execute Package,Field_Execute,Field_Number 0x1d
01de c403 | | Store 0x2,0x3
01df 00cf | | Action Mark_Auxiliary
01e0 7811 |x | Jump 0x1f2
01e1 e403 | | Load 0x2,0x3
01e2 e00e | | Load 0x0,0xe
01e3 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
01e4 6808 |h | Jump_Zero 0x1ed
01e5 7800 |x | Jump 0x1e6
01e6 e403 | | Load 0x2,0x3
01e7 e00e | | Load 0x0,0xe
01e8 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
01e9 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01ea 00da | | Load_Top At_Offset_2
01eb 8012 | | Call 0x0,0x12
01ec 0033 | 3 | Store_Top Heap_Access,At_Offset_3
01ed e403 | | Load 0x2,0x3
01ee e00e | | Load 0x0,0xe
01ef 181f | | Execute Package,Field_Execute,Field_Number 0x1f
01f0 c403 | | Store 0x2,0x3
01f1 00c9 | | Action Pop_Auxiliary_Loop
01f2 e403 | | Load 0x2,0x3
01f3 e00e | | Load 0x0,0xe
01f4 1820 | | Execute Package,Field_Execute,Field_Number 0x20
01f5 6feb |o | Jump_Zero 0x1e1
01f6 00ce | | Action Pop_Auxiliary
01f7 e402 | | Load 0x2,0x2
01f8 e00d | | Load 0x0,0xd
01f9 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01fa c402 | | Store 0x2,0x2
01fb 00c9 | | Action Pop_Auxiliary_Loop
01fc e402 | | Load 0x2,0x2
01fd e00d | | Load 0x0,0xd
01fe 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01ff 6fd5 |o | Jump_Zero 0x1d5
0200 00ce | | Action Pop_Auxiliary
0201 e21c | | Load 0x1,0x1c
0202 e014 | | Load 0x0,0x14
0203 180f | | Execute Package,Field_Execute,Field_Number 0xf
0204 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0205 0000 0000 | | .XXX[0x3]
0207 0000 | |
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b 00da | | Load_Top At_Offset_2
020c 6803 |h | Jump_Zero 0x210
020d 0092 0536 | 6| Action Push_String_Extended,0x536 ; "alive"
020f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0210 0092 0537 | 7| Action Push_String_Extended,0x537 ; "not alive"
0212 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0213 0000 0000 | | .BLANK 0000[0x5]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 00da | | Load_Top At_Offset_2
021c e00e | | Load 0x0,0xe
021d 1823 | # | Execute Package,Field_Execute,Field_Number 0x23
021e 4602 |F | Jump_Case 0x3
021f 7823 |x# | Jump 0x243 ; case 0x0
0220 7816 |x | Jump 0x237 ; case 0x1
0221 7800 |x | Jump 0x222 ; case 0x2
0222 0092 0538 | 8| Action Push_String_Extended,0x538 ; " An idle item expiring at "
0224 00db | | Load_Top At_Offset_3
0225 e00e | | Load 0x0,0xe
0226 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0227 e007 | | Load 0x0,0x7
0228 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0229 01cc | | Execute Vector,Catenate
022a 0092 0539 | 9| Action Push_String_Extended,0x539 ; " last used at "
022c 01cc | | Execute Vector,Catenate
022d 00db | | Load_Top At_Offset_3
022e e00e | | Load 0x0,0xe
022f 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0230 e007 | | Load 0x0,0x7
0231 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0232 01cc | | Execute Vector,Catenate
0233 e5fe | | Load 0x2,-0x2
0234 e015 | | Load 0x0,0x15
0235 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0236 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0237 0092 053a | :| Action Push_String_Extended,0x53a ; " An active item owned by "
0239 00db | | Load_Top At_Offset_3
023a e00e | | Load 0x0,0xe
023b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
023c 00e0 | | Load_Encached Standard_Cache
023d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
023e 01cc | | Execute Vector,Catenate
023f e5fe | | Load 0x2,-0x2
0240 e015 | | Load 0x0,0x15
0241 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0242 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0243 0092 053b | ;| Action Push_String_Extended,0x53b ; " A pending item whose creator is "
0245 00db | | Load_Top At_Offset_3
0246 e00e | | Load 0x0,0xe
0247 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0248 822a | * | Call 0x1,0x2a
0249 01cc | | Execute Vector,Catenate
024a e5fe | | Load 0x2,-0x2
024b e015 | | Load 0x0,0x15
024c 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
024d 4503 |E | Exit_Suprogram New_Top_Offset 0x3
024e 0000 0000 | | .XXX[0x2]
0250 ; --------------------------------------------------------------------------------------
0250 ; SUBPROGRAM
0250 ; --------------------------------------------------------------------------------------
0250 025b | [ | .CONST 0x025b ; Address of begin
0251 02b2 | | .CONST 0x02b2 ; Address of exception handler
0252 0005 | | .CONST 0x0005 ; Number of locals
0253 INIT_0250:
0253 e00d | | Load 0x0,0xd
0254 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0255 e00e | | Load 0x0,0xe
0256 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0257 e00e | | Load 0x0,0xe
0258 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0259 00e3 | | Load_Encached Natural_Cache
025a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
025b BODY_0250:
025b 0092 053c | <| Action Push_String_Extended,0x53c ; "The following items are cached for "
025d e21a | | Load 0x1,0x1a
025e 800a | | Call 0x0,0xa
025f 01cc | | Execute Vector,Catenate
0260 e5ff | | Load 0x2,-0x1
0261 e015 | | Load 0x0,0x15
0262 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0263 00db | | Load_Top At_Offset_3
0264 e21d | | Load 0x1,0x1d
0265 e21b | | Load 0x1,0x1b
0266 0217 | | Execute Heap_Access,All_Reference
0267 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0268 e00d | | Load 0x0,0xd
0269 1813 | | Execute Package,Field_Execute,Field_Number 0x13
026a c402 | | Store 0x2,0x2
026b 00cf | | Action Mark_Auxiliary
026c 7830 |x0 | Jump 0x29d
026d 483a |H: | Short_Literal 0x3a
026e 0092 053d | =| Action Push_String_Extended,0x53d ; " For "
0270 e402 | | Load 0x2,0x2
0271 e00d | | Load 0x0,0xd
0272 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0273 01cc | | Execute Vector,Catenate
0274 01cb | | Execute Vector,Append
0275 e5ff | | Load 0x2,-0x1
0276 e015 | | Load 0x0,0x15
0277 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0278 e402 | | Load 0x2,0x2
0279 e00d | | Load 0x0,0xd
027a 1818 | | Execute Package,Field_Execute,Field_Number 0x18
027b a403 | | Store_Unchecked 0x2,0x3
027c 00da | | Load_Top At_Offset_2
027d e21d | | Load 0x1,0x1d
027e e403 | | Load 0x2,0x3
027f e00e | | Load 0x0,0xe
0280 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0281 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0282 00cf | | Action Mark_Auxiliary
0283 780b |x | Jump 0x28f
0284 e5ff | | Load 0x2,-0x1
0285 e404 | | Load 0x2,0x4
0286 822b | + | Call 0x1,0x2b
0287 00da | | Load_Top At_Offset_2
0288 0a01 | | Execute_Immediate Plus,0x1
0289 005b | [ | Store_Top Discrete,At_Offset_3
028a 00db | | Load_Top At_Offset_3
028b e00e | | Load 0x0,0xe
028c 181f | | Execute Package,Field_Execute,Field_Number 0x1f
028d c404 | | Store 0x2,0x4
028e 00c9 | | Action Pop_Auxiliary_Loop
028f 00db | | Load_Top At_Offset_3
0290 e00e | | Load 0x0,0xe
0291 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0292 6ff1 |o | Jump_Zero 0x284
0293 00ce | | Action Pop_Auxiliary
0294 00da | | Load_Top At_Offset_2
0295 e00e | | Load 0x0,0xe
0296 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0297 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0298 e402 | | Load 0x2,0x2
0299 e00d | | Load 0x0,0xd
029a 1815 | | Execute Package,Field_Execute,Field_Number 0x15
029b c402 | | Store 0x2,0x2
029c 00c9 | | Action Pop_Auxiliary_Loop
029d e402 | | Load 0x2,0x2
029e e00d | | Load 0x0,0xd
029f 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02a0 6fcc |o | Jump_Zero 0x26d
02a1 00ce | | Action Pop_Auxiliary
02a2 00db | | Load_Top At_Offset_3
02a3 e00d | | Load 0x0,0xd
02a4 1814 | | Execute Package,Field_Execute,Field_Number 0x14
02a5 c402 | | Store 0x2,0x2
02a6 00d8 | | Load_Top At_Offset_0
02a7 7005 |p | Jump_Nonzero 0x2ad
02a8 0092 053e | >| Action Push_String_Extended,0x53e ; " NONE"
02aa e5ff | | Load 0x2,-0x1
02ab e015 | | Load 0x0,0x15
02ac 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
02ad 4801 |H | Short_Literal 0x1
02ae e5ff | | Load 0x2,-0x1
02af e015 | | Load 0x0,0x15
02b0 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
02b1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02b2 TRAP_0250:
02b2 0007 | | Action Break_Optional
02b3 0092 053f | ?| Action Push_String_Extended,0x53f ; "Got unexpected exception "
02b5 8009 | | Call 0x0,0x9
02b6 01cc | | Execute Vector,Catenate
02b7 e5ff | | Load 0x2,-0x1
02b8 e015 | | Load 0x0,0x15
02b9 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
02ba 4502 |E | Exit_Suprogram New_Top_Offset 0x2
02bb 0000 0000 | | .BLANK 0000[0x5]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02e3 | | .CONST 0x02e3 ; Address of begin
02c1 0363 | c | .CONST 0x0363 ; Address of exception handler
02c2 0003 | | .CONST 0x0003 ; Number of locals
02c3 INIT_02c0:
02c3 480d |H | Short_Literal 0xd
02c4 0299 0383 | | Declare_Subprogram INIT_0380,For_Accept
02c6 480e 4871 |H Hq| Declare_Variable Select 0x000, 0x00c,
02c8 4819 4872 |H Hr| [0x001]: 0x000 = 0x0000,
02ca 4818 4873 |H Hs| [0x00f]: 0x07c = 0x03e0,
02cc 4817 4874 |H Ht| [0x010]: 0x07b = 0x03d8,
02ce 4816 4875 |H Hu| [0x011]: 0x07a = 0x03d0,
02d0 4815 4876 |H Hv| [0x012]: 0x079 = 0x03c8,
02d2 4814 4877 |H Hw| [0x013]: 0x078 = 0x03c0,
02d4 4813 4878 |H Hx| [0x014]: 0x077 = 0x03b8,
02d6 4812 4879 |H Hy| [0x015]: 0x076 = 0x03b0,
02d8 4811 487a |H Hz| [0x016]: 0x075 = 0x03a8,
02da 4810 487b |H H{| [0x017]: 0x074 = 0x03a0,
02dc 480f 487c |H H|| [0x018]: 0x073 = 0x0398,
02de 4801 4800 |H H | [0x019]: 0x072 = 0x0390,
02e0 4800 480c |H H | [0x00e]: 0x071 = 0x0388
02e2 02cf | |
02e3 BODY_02c0:
02e3 4802 |H | Short_Literal 0x2
02e4 4802 |H | Short_Literal 0x2
02e5 0099 | | Action Reference_Dynamic
02e6 1d0d | | Execute_Immediate Reference_Lex_1,0xd
02e7 0137 | 7 | Execute Entry,Rendezvous
02e8 e005 | | Load 0x0,0x5
02e9 0337 | 7 | Declare_Variable Array
02ea 4802 |H | Short_Literal 0x2
02eb 4800 |H | Short_Literal 0x0
02ec 4800 |H | Short_Literal 0x0
02ed 00d9 | | Load_Top At_Offset_1
02ee e404 | | Load 0x2,0x4
02ef 01d6 | | Execute Vector,Field_Write
02f0 3ffb |? | Loop_Increasing 0x2ec
02f1 e005 | | Load 0x0,0x5
02f2 01c3 | | Execute Vector,Check_In_Type
02f3 e21e | | Load 0x1,0x1e
02f4 01d4 | | Execute Vector,Structure_Write
02f5 6082 |` | Indirect_Literal Discrete,0x378,{0x7fffffff, 0xffffffff}
02f6 a220 | | Store_Unchecked 0x1,0x20
02f7 00cf | | Action Mark_Auxiliary
02f8 00e1 | | Load_Encached Boolean_Cache
02f9 4800 |H | Short_Literal 0x0
02fa c405 | | Store 0x2,0x5
02fb 00e7 | | Load_Encached Duration_Cache
02fc 00e3 | | Load_Encached Natural_Cache
02fd 4802 |H | Short_Literal 0x2
02fe e21e | | Load 0x1,0x1e
02ff 01d7 | | Execute Vector,Field_Read
0300 0c01 | | Execute_Immediate Greater_Equal,0x1
0301 6812 |h | Jump_Zero 0x314
0302 e220 | | Load 0x1,0x20
0303 e007 | | Load 0x0,0x7
0304 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0305 00db | | Load_Top At_Offset_3
0306 7002 |p | Jump_Nonzero 0x309
0307 c406 | | Store 0x2,0x6
0308 7805 |x | Jump 0x30e
0309 00d8 | | Load_Top At_Offset_0
030a 00db | | Load_Top At_Offset_3
030b 027c | | | Execute Discrete,Less
030c 6806 |h | Jump_Zero 0x313
030d c406 | | Store 0x2,0x6
030e 4801 |H | Short_Literal 0x1
030f c405 | | Store 0x2,0x5
0310 480c |H | Short_Literal 0xc
0311 c407 | | Store 0x2,0x7
0312 7801 |x | Jump 0x314
0313 00d1 | | Pop_Control Pop_Count_1
0314 e006 | | Load 0x0,0x6
0315 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0316 00db | | Load_Top At_Offset_3
0317 7002 |p | Jump_Nonzero 0x31a
0318 c406 | | Store 0x2,0x6
0319 7805 |x | Jump 0x31f
031a 00d8 | | Load_Top At_Offset_0
031b 00db | | Load_Top At_Offset_3
031c 027c | | | Execute Discrete,Less
031d 6806 |h | Jump_Zero 0x324
031e c406 | | Store 0x2,0x6
031f 4801 |H | Short_Literal 0x1
0320 c405 | | Store 0x2,0x5
0321 480d |H | Short_Literal 0xd
0322 c407 | | Store 0x2,0x7
0323 7801 |x | Jump 0x325
0324 00d1 | | Pop_Control Pop_Count_1
0325 00da | | Load_Top At_Offset_2
0326 00d8 | | Load_Top At_Offset_0
0327 e403 | | Load 0x2,0x3
0328 013e | > | Execute Select,Timed_Guard_Write
0329 6804 |h | Jump_Zero 0x32e
032a 00d8 | | Load_Top At_Offset_0
032b 00da | | Load_Top At_Offset_2
032c e403 | | Load 0x2,0x3
032d 013d | = | Execute Select,Timed_Duration_Write
032e 00d3 | | Pop_Control Pop_Count_3
032f 00d9 | | Load_Top At_Offset_1
0330 013f | ? | Execute Select,Rendezvous
0331 460e |F | Jump_Case 0xf
0332 780d |x | Jump 0x340 ; case 0x0
0333 7826 |x& | Jump 0x35a ; case 0x1
0334 7825 |x% | Jump 0x35a ; case 0x2
0335 7824 |x$ | Jump 0x35a ; case 0x3
0336 7823 |x# | Jump 0x35a ; case 0x4
0337 7822 |x" | Jump 0x35a ; case 0x5
0338 7821 |x! | Jump 0x35a ; case 0x6
0339 7820 |x | Jump 0x35a ; case 0x7
033a 781f |x | Jump 0x35a ; case 0x8
033b 781e |x | Jump 0x35a ; case 0x9
033c 781d |x | Jump 0x35a ; case 0xa
033d 781c |x | Jump 0x35a ; case 0xb
033e 780c |x | Jump 0x34b ; case 0xc
033f 780d |x | Jump 0x34d ; case 0xd
0340 e008 | | Load 0x0,0x8 ; case 0xe
0341 00e1 | | Load_Encached Boolean_Cache
0342 e21a | | Load 0x1,0x1a
0343 4803 |H | Short_Literal 0x3
0344 e016 | | Load 0x0,0x16
0345 1711 | | Execute Task,Entry_Call,Field_Number 0x11
0346 c221 | ! | Store 0x1,0x21
0347 c222 | " | Store 0x1,0x22
0348 e221 | ! | Load 0x1,0x21
0349 7012 |p | Jump_Nonzero 0x35c
034a 780f |x | Jump 0x35a
034b 8226 | & | Call 0x1,0x26
034c 780d |x | Jump 0x35a
034d 8228 | ( | Call 0x1,0x28
034e e223 | # | Load 0x1,0x23
034f 680a |h | Jump_Zero 0x35a
0350 e008 | | Load 0x0,0x8
0351 00e1 | | Load_Encached Boolean_Cache
0352 e21a | | Load 0x1,0x1a
0353 4803 |H | Short_Literal 0x3
0354 e016 | | Load 0x0,0x16
0355 1711 | | Execute Task,Entry_Call,Field_Number 0x11
0356 c221 | ! | Store 0x1,0x21
0357 c222 | " | Store 0x1,0x22
0358 e221 | ! | Load 0x1,0x21
0359 7002 |p | Jump_Nonzero 0x35c
035a 00c9 | | Action Pop_Auxiliary_Loop
035b 7f9c | | Jump 0x2f8
035c 00ce | | Action Pop_Auxiliary
035d 8229 | ) | Call 0x1,0x29
035e e222 | " | Load 0x1,0x22
035f 4801 |H | Short_Literal 0x1
0360 e016 | | Load 0x0,0x16
0361 1712 | | Execute Task,Entry_Call,Field_Number 0x12
0362 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0363 TRAP_02c0:
0363 e00c | | Load 0x0,0xc
0364 010f | | Execute Exception,Equal
0365 6802 |h | Jump_Zero 0x368
0366 00cc | | Action Pop_Block
0367 7cee || | Jump 0x56
0368 4808 |H | Short_Literal 0x8
0369 0092 0531 | 1| Action Push_String_Extended,0x531 ; "Unexpected exception "
036b 8009 | | Call 0x0,0x9
036c 01cc | | Execute Vector,Catenate
036d 0092 0540 | @| Action Push_String_Extended,0x540 ; " in Session_Worker main loop for "
036f 01cc | | Execute Vector,Catenate
0370 e21a | | Load 0x1,0x1a
0371 800a | | Call 0x0,0xa
0372 01cc | | Execute Vector,Catenate
0373 4802 |H | Short_Literal 0x2
0374 e00b | | Load 0x0,0xb
0375 170d | | Execute Task,Entry_Call,Field_Number 0xd
0376 00cc | | Action Pop_Block
0377 7cde || | Jump 0x56
0378 7fff ffff | | .LITERAL {0x7fffffff, 0xffffffff}
037c 0000 0000 | | .BLANK 0000[0x4]
0380 ; --------------------------------------------------------------------------------------
0380 ; SUBPROGRAM
0380 ; --------------------------------------------------------------------------------------
0380 0383 | | .CONST 0x0383 ; Address of begin
0381 0004 | | .CONST 0x0004 ; Address of exception handler
0382 0001 | | .CONST 0x0001 ; Number of locals
0383 BODY_0380:
0383 INIT_0380:
0383 029f 03eb | | Declare_Subprogram INIT_03e8,For_Call
0385 8602 | | Call 0x3,0x2
0386 4101 |A | End_Rendezvous 0x1
0387 0000 | | .XXX[0x1]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; See instruction 0x02cf at 0x2c6, index=0xe
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b 4100 |A | End_Rendezvous 0x0
038c 0000 0000 | | .BLANK 0000[0x4]
0390 ; --------------------------------------------------------------------------------------
0390 ; SUBPROGRAM
0390 ; See instruction 0x02cf at 0x2c6, index=0x19
0390 ; --------------------------------------------------------------------------------------
0390 0393 | | .CONST 0x0393 ; Address of begin
0391 0004 | | .CONST 0x0004 ; Address of exception handler
0392 0001 | | .CONST 0x0001 ; Number of locals
0393 BODY_0390:
0393 INIT_0390:
0393 00db | | Load_Top At_Offset_3
0394 822c | , | Call 0x1,0x2c
0395 4100 |A | End_Rendezvous 0x0
0396 0000 0000 | | .XXX[0x2]
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; See instruction 0x02cf at 0x2c6, index=0x18
0398 ; --------------------------------------------------------------------------------------
0398 039b | | .CONST 0x039b ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0001 | | .CONST 0x0001 ; Number of locals
039b BODY_0398:
039b INIT_0398:
039b 029f 043b | ;| Declare_Subprogram INIT_0438,For_Call
039d 8602 | | Call 0x3,0x2
039e 4101 |A | End_Rendezvous 0x1
039f 0000 | | .XXX[0x1]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; See instruction 0x02cf at 0x2c6, index=0x17
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3 | | .CONST 0x03a3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0001 | | .CONST 0x0001 ; Number of locals
03a3 BODY_03a0:
03a3 INIT_03a0:
03a3 029f 044b | K| Declare_Subprogram INIT_0448,For_Call
03a5 8602 | | Call 0x3,0x2
03a6 4101 |A | End_Rendezvous 0x1
03a7 0000 | | .XXX[0x1]
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; See instruction 0x02cf at 0x2c6, index=0x16
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 029f 045b | [| Declare_Subprogram INIT_0458,For_Call
03ad 8602 | | Call 0x3,0x2
03ae 4101 |A | End_Rendezvous 0x1
03af 0000 | | .XXX[0x1]
03b0 ; --------------------------------------------------------------------------------------
03b0 ; SUBPROGRAM
03b0 ; See instruction 0x02cf at 0x2c6, index=0x15
03b0 ; --------------------------------------------------------------------------------------
03b0 03b3 | | .CONST 0x03b3 ; Address of begin
03b1 0004 | | .CONST 0x0004 ; Address of exception handler
03b2 0001 | | .CONST 0x0001 ; Number of locals
03b3 BODY_03b0:
03b3 INIT_03b0:
03b3 029f 046b | k| Declare_Subprogram INIT_0468,For_Call
03b5 8602 | | Call 0x3,0x2
03b6 4100 |A | End_Rendezvous 0x0
03b7 0000 | | .XXX[0x1]
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; See instruction 0x02cf at 0x2c6, index=0x14
03b8 ; --------------------------------------------------------------------------------------
03b8 03bb | | .CONST 0x03bb ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0001 | | .CONST 0x0001 ; Number of locals
03bb BODY_03b8:
03bb INIT_03b8:
03bb 029f 0483 | | Declare_Subprogram INIT_0480,For_Call
03bd 8602 | | Call 0x3,0x2
03be 4100 |A | End_Rendezvous 0x0
03bf 0000 | | .XXX[0x1]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; See instruction 0x02cf at 0x2c6, index=0x13
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 029f 04ab | | Declare_Subprogram INIT_04a8,For_Call
03c5 8602 | | Call 0x3,0x2
03c6 4100 |A | End_Rendezvous 0x0
03c7 0000 | | .XXX[0x1]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; See instruction 0x02cf at 0x2c6, index=0x12
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 029f 04c3 | | Declare_Subprogram INIT_04c0,For_Call
03cd 8602 | | Call 0x3,0x2
03ce 4101 |A | End_Rendezvous 0x1
03cf 0000 | | .XXX[0x1]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; See instruction 0x02cf at 0x2c6, index=0x11
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3 | | .CONST 0x03d3 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0001 | | .CONST 0x0001 ; Number of locals
03d3 BODY_03d0:
03d3 INIT_03d0:
03d3 029f 04db | | Declare_Subprogram INIT_04d8,For_Call
03d5 8602 | | Call 0x3,0x2
03d6 4101 |A | End_Rendezvous 0x1
03d7 0000 | | .XXX[0x1]
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; See instruction 0x02cf at 0x2c6, index=0x10
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db 029f 04f3 | | Declare_Subprogram INIT_04f0,For_Call
03dd 8602 | | Call 0x3,0x2
03de 4101 |A | End_Rendezvous 0x1
03df 0000 | | .XXX[0x1]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; See instruction 0x02cf at 0x2c6, index=0xf
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 029f 050b | | Declare_Subprogram INIT_0508,For_Call
03e5 8602 | | Call 0x3,0x2
03e6 4102 |A | End_Rendezvous 0x2
03e7 0000 | | .XXX[0x1]
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03f2 | | .CONST 0x03f2 ; Address of begin
03e9 042a | * | .CONST 0x042a ; Address of exception handler
03ea 0005 | | .CONST 0x0005 ; Number of locals
03eb INIT_03e8:
03eb e002 | | Load 0x0,0x2
03ec 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03ed e003 | | Load 0x0,0x3
03ee 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
03ef 00e5 | | Load_Encached Long_Integer_Cache
03f0 e003 | | Load 0x0,0x3
03f1 1b17 | | Execute Package,Field_Read,Field_Number 0x17
03f2 BODY_03e8:
03f2 e7fe | | Load 0x3,-0x2
03f3 a21a | | Store_Unchecked 0x1,0x1a
03f4 e003 | | Load 0x0,0x3
03f5 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
03f6 4864 |Hd | Short_Literal 0x64
03f7 e014 | | Load 0x0,0x14
03f8 180d | | Execute Package,Field_Execute,Field_Number 0xd
03f9 0033 | 3 | Store_Top Heap_Access,At_Offset_3
03fa e002 | | Load 0x0,0x2
03fb 1b0d | | Execute Package,Field_Read,Field_Number 0xd
03fc 00db | | Load_Top At_Offset_3
03fd 039c | | Declare_Variable Heap_Access,By_Allocation
03fe 00d8 | | Load_Top At_Offset_0
03ff 0217 | | Execute Heap_Access,All_Reference
0400 1c00 | | Execute_Immediate Run_Utility,0x0
0401 a802 | | Store_Unchecked 0x4,0x2
0402 4806 |H | Short_Literal 0x6
0403 e017 | | Load 0x0,0x17
0404 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0405 e802 | | Load 0x4,0x2
0406 0217 | | Execute Heap_Access,All_Reference
0407 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0408 6027 |`' | Indirect_Literal Discrete,0x430,{0x00000000, 0x00014000}
0409 6026 |`& | Indirect_Literal Discrete,0x430,{0x00000000, 0x00014000}
040a 4840 |H@ | Short_Literal 0x40
040b e803 | | Load 0x4,0x3
040c e004 | | Load 0x0,0x4
040d 180e | | Execute Package,Field_Execute,Field_Number 0xe
040e c21d | | Store 0x1,0x1d
040f e006 | | Load 0x0,0x6
0410 180e | | Execute Package,Field_Execute,Field_Number 0xe
0411 a21f | | Store_Unchecked 0x1,0x1f
0412 00db | | Load_Top At_Offset_3
0413 0219 | | Execute Heap_Access,All_Read
0414 00d8 | | Load_Top At_Offset_0
0415 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0416 e21f | | Load 0x1,0x1f
0417 e21d | | Load 0x1,0x1d
0418 e00d | | Load 0x0,0xd
0419 180f | | Execute Package,Field_Execute,Field_Number 0xf
041a 00d9 | | Load_Top At_Offset_1
041b 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
041c 00d1 | | Pop_Control Pop_Count_1
041d 00da | | Load_Top At_Offset_2
041e e018 | | Load 0x0,0x18
041f 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0420 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2
0421 00db | | Load_Top At_Offset_3
0422 e019 | | Load 0x0,0x19
0423 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0424 0051 | Q | Store_Top_Unchecked Discrete,At_Offset_1
0425 00db | | Load_Top At_Offset_3
0426 a21b | | Store_Unchecked 0x1,0x1b
0427 00db | | Load_Top At_Offset_3
0428 a7fd | | Store_Unchecked 0x3,-0x3
0429 4501 |E | Exit_Suprogram New_Top_Offset 0x1
042a TRAP_03e8:
042a 0007 | | Action Break_Optional
042b 0092 0541 | A| Action Push_String_Extended,0x541 ; "Activating"
042d 8225 | % | Call 0x1,0x25
042e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
042f 0000 | | .XXX[0x1]
0430 0000 0000 | | .LITERAL {0x00000000, 0x00014000}
0434 0000 0000 | | .BLANK 0000[0x4]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b | ; | .CONST 0x043b ; Address of begin
0439 0440 | @ | .CONST 0x0440 ; Address of exception handler
043a 0001 | | .CONST 0x0001 ; Number of locals
043b BODY_0438:
043b INIT_0438:
043b e7fe | | Load 0x3,-0x2
043c e00d | | Load 0x0,0xd
043d 1819 | | Execute Package,Field_Execute,Field_Number 0x19
043e c7fe | | Store 0x3,-0x2
043f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0440 TRAP_0438:
0440 0007 | | Action Break_Optional
0441 0092 0542 | B| Action Push_String_Extended,0x542 ; "Delete_Mapping"
0443 8225 | % | Call 0x1,0x25
0444 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0445 0000 0000 | | .XXX[0x3]
0447 0000 | |
0448 ; --------------------------------------------------------------------------------------
0448 ; SUBPROGRAM
0448 ; --------------------------------------------------------------------------------------
0448 044b | K | .CONST 0x044b ; Address of begin
0449 0450 | P | .CONST 0x0450 ; Address of exception handler
044a 0001 | | .CONST 0x0001 ; Number of locals
044b BODY_0448:
044b INIT_0448:
044b e7fe | | Load 0x3,-0x2
044c e00d | | Load 0x0,0xd
044d 1814 | | Execute Package,Field_Execute,Field_Number 0x14
044e c7fe | | Store 0x3,-0x2
044f 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0450 TRAP_0448:
0450 0007 | | Action Break_Optional
0451 0092 0543 | C| Action Push_String_Extended,0x543 ; "Reclaim"
0453 8225 | % | Call 0x1,0x25
0454 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0455 0000 0000 | | .XXX[0x3]
0457 0000 | |
0458 ; --------------------------------------------------------------------------------------
0458 ; SUBPROGRAM
0458 ; --------------------------------------------------------------------------------------
0458 045b | [ | .CONST 0x045b ; Address of begin
0459 0462 | b | .CONST 0x0462 ; Address of exception handler
045a 0001 | | .CONST 0x0001 ; Number of locals
045b BODY_0458:
045b INIT_0458:
045b e7fd | | Load 0x3,-0x3
045c e21d | | Load 0x1,0x1d
045d e7fe | | Load 0x3,-0x2
045e e00d | | Load 0x0,0xd
045f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0460 c7fd | | Store 0x3,-0x3
0461 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0462 TRAP_0458:
0462 0007 | | Action Break_Optional
0463 0092 0544 | D| Action Push_String_Extended,0x544 ; "Initialise string map iterator"
0465 8225 | % | Call 0x1,0x25
0466 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0467 0000 | | .XXX[0x1]
0468 ; --------------------------------------------------------------------------------------
0468 ; SUBPROGRAM
0468 ; --------------------------------------------------------------------------------------
0468 046d | m | .CONST 0x046d ; Address of begin
0469 0479 | y | .CONST 0x0479 ; Address of exception handler
046a 0002 | | .CONST 0x0002 ; Number of locals
046b INIT_0468:
046b e00e | | Load 0x0,0xe
046c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
046d BODY_0468:
046d 00d8 | | Load_Top At_Offset_0
046e e21d | | Load 0x1,0x1d
046f e00e | | Load 0x0,0xe
0470 180f | | Execute Package,Field_Execute,Field_Number 0xf
0471 0031 | 1 | Store_Top Heap_Access,At_Offset_1
0472 e21d | | Load 0x1,0x1d
0473 e7fd | | Load 0x3,-0x3
0474 00da | | Load_Top At_Offset_2
0475 e7fe | | Load 0x3,-0x2
0476 e00d | | Load 0x0,0xd
0477 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0478 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0479 TRAP_0468:
0479 0007 | | Action Break_Optional
047a 0092 0545 | E| Action Push_String_Extended,0x545 ; "Insert_Value"
047c 8225 | % | Call 0x1,0x25
047d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
047e 0000 0000 | | .XXX[0x2]
0480 ; --------------------------------------------------------------------------------------
0480 ; SUBPROGRAM
0480 ; --------------------------------------------------------------------------------------
0480 0485 | | .CONST 0x0485 ; Address of begin
0481 049c | | .CONST 0x049c ; Address of exception handler
0482 0002 | | .CONST 0x0002 ; Number of locals
0483 INIT_0480:
0483 e007 | | Load 0x0,0x7
0484 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0485 BODY_0480:
0485 e007 | | Load 0x0,0x7
0486 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0487 e7fc | | Load 0x3,-0x4
0488 e7fd | | Load 0x3,-0x3
0489 e7fe | | Load 0x3,-0x2
048a e00e | | Load 0x0,0xe
048b 181a | | Execute Package,Field_Execute,Field_Number 0x1a
048c 0059 | Y | Store_Top Discrete,At_Offset_1
048d e21e | | Load 0x1,0x1e
048e 4801 |H | Short_Literal 0x1
048f 8011 | | Call 0x0,0x11
0490 00d1 | | Pop_Control Pop_Count_1
0491 e21e | | Load 0x1,0x1e
0492 4802 |H | Short_Literal 0x2
0493 801a | | Call 0x0,0x1a
0494 00d1 | | Pop_Control Pop_Count_1
0495 e220 | | Load 0x1,0x20
0496 00d9 | | Load_Top At_Offset_1
0497 8224 | $ | Call 0x1,0x24
0498 6802 |h | Jump_Zero 0x49b
0499 00d8 | | Load_Top At_Offset_0
049a a220 | | Store_Unchecked 0x1,0x20
049b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
049c TRAP_0480:
049c 0007 | | Action Break_Optional
049d 0092 0546 | F| Action Push_String_Extended,0x546 ; "Release_Value"
049f 8225 | % | Call 0x1,0x25
04a0 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04a1 0000 0000 | | .BLANK 0000[0x7]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab | | .CONST 0x04ab ; Address of begin
04a9 04b7 | | .CONST 0x04b7 ; Address of exception handler
04aa 0001 | | .CONST 0x0001 ; Number of locals
04ab BODY_04a8:
04ab INIT_04a8:
04ab e7fd | | Load 0x3,-0x3
04ac e7fe | | Load 0x3,-0x2
04ad e00e | | Load 0x0,0xe
04ae 1818 | | Execute Package,Field_Execute,Field_Number 0x18
04af e21e | | Load 0x1,0x1e
04b0 4800 |H | Short_Literal 0x0
04b1 8011 | | Call 0x0,0x11
04b2 00d1 | | Pop_Control Pop_Count_1
04b3 e21e | | Load 0x1,0x1e
04b4 4801 |H | Short_Literal 0x1
04b5 801a | | Call 0x0,0x1a
04b6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04b7 TRAP_04a8:
04b7 0007 | | Action Break_Optional
04b8 0092 0547 | G| Action Push_String_Extended,0x547 ; "Make_Active"
04ba 8225 | % | Call 0x1,0x25
04bb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04bc 0000 0000 | | .BLANK 0000[0x4]
04c0 ; --------------------------------------------------------------------------------------
04c0 ; SUBPROGRAM
04c0 ; --------------------------------------------------------------------------------------
04c0 04c3 | | .CONST 0x04c3 ; Address of begin
04c1 04d2 | | .CONST 0x04d2 ; Address of exception handler
04c2 0001 | | .CONST 0x0001 ; Number of locals
04c3 BODY_04c0:
04c3 INIT_04c0:
04c3 e00f | | Load 0x0,0xf
04c4 1b0f | | Execute Package,Field_Read,Field_Number 0xf
04c5 e7fd | | Load 0x3,-0x3
04c6 e7fe | | Load 0x3,-0x2
04c7 e00e | | Load 0x0,0xe
04c8 1816 | | Execute Package,Field_Execute,Field_Number 0x16
04c9 c7fc | | Store 0x3,-0x4
04ca e21e | | Load 0x1,0x1e
04cb 4802 |H | Short_Literal 0x2
04cc 8011 | | Call 0x0,0x11
04cd 00d1 | | Pop_Control Pop_Count_1
04ce e21e | | Load 0x1,0x1e
04cf 4800 |H | Short_Literal 0x0
04d0 801a | | Call 0x0,0x1a
04d1 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04d2 TRAP_04c0:
04d2 0007 | | Action Break_Optional
04d3 0092 0548 | H| Action Push_String_Extended,0x548 ; "Reserve_Idle_Value"
04d5 8225 | % | Call 0x1,0x25
04d6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04d7 0000 | | .XXX[0x1]
04d8 ; --------------------------------------------------------------------------------------
04d8 ; SUBPROGRAM
04d8 ; --------------------------------------------------------------------------------------
04d8 04db | | .CONST 0x04db ; Address of begin
04d9 04e7 | | .CONST 0x04e7 ; Address of exception handler
04da 0001 | | .CONST 0x0001 ; Number of locals
04db BODY_04d8:
04db INIT_04d8:
04db e7fc | | Load 0x3,-0x4
04dc e00f | | Load 0x0,0xf
04dd 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
04de c7fc | | Store 0x3,-0x4
04df e7fd | | Load 0x3,-0x3
04e0 e7fe | | Load 0x3,-0x2
04e1 e00e | | Load 0x0,0xe
04e2 181b | | Execute Package,Field_Execute,Field_Number 0x1b
04e3 e21e | | Load 0x1,0x1e
04e4 4801 |H | Short_Literal 0x1
04e5 8011 | | Call 0x0,0x11
04e6 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04e7 TRAP_04d8:
04e7 0007 | | Action Break_Optional
04e8 0092 0549 | I| Action Push_String_Extended,0x549 ; "Destroy_Value"
04ea 8225 | % | Call 0x1,0x25
04eb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04ec 0000 0000 | | .BLANK 0000[0x4]
04f0 ; --------------------------------------------------------------------------------------
04f0 ; SUBPROGRAM
04f0 ; --------------------------------------------------------------------------------------
04f0 04f3 | | .CONST 0x04f3 ; Address of begin
04f1 04ff | | .CONST 0x04ff ; Address of exception handler
04f2 0001 | | .CONST 0x0001 ; Number of locals
04f3 BODY_04f0:
04f3 INIT_04f0:
04f3 e7fc | | Load 0x3,-0x4
04f4 e00f | | Load 0x0,0xf
04f5 1859 | Y | Execute Package,Field_Execute,Field_Number 0x59
04f6 c7fc | | Store 0x3,-0x4
04f7 e7fd | | Load 0x3,-0x3
04f8 e7fe | | Load 0x3,-0x2
04f9 e00e | | Load 0x0,0xe
04fa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
04fb e21e | | Load 0x1,0x1e
04fc 4800 |H | Short_Literal 0x0
04fd 8011 | | Call 0x0,0x11
04fe 4501 |E | Exit_Suprogram New_Top_Offset 0x1
04ff TRAP_04f0:
04ff 0007 | | Action Break_Optional
0500 0092 054a | J| Action Push_String_Extended,0x54a ; "Remove_Pending"
0502 8225 | % | Call 0x1,0x25
0503 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0504 0000 0000 | | .BLANK 0000[0x4]
0508 ; --------------------------------------------------------------------------------------
0508 ; SUBPROGRAM
0508 ; --------------------------------------------------------------------------------------
0508 050b | | .CONST 0x050b ; Address of begin
0509 052c | , | .CONST 0x052c ; Address of exception handler
050a 0001 | | .CONST 0x0001 ; Number of locals
050b BODY_0508:
050b INIT_0508:
050b e21e | | Load 0x1,0x1e
050c 801b | | Call 0x0,0x1b
050d e21f | | Load 0x1,0x1f
050e 027b | { | Execute Discrete,Greater_Equal
050f 6809 |h | Jump_Zero 0x519
0510 4802 |H | Short_Literal 0x2
0511 e21e | | Load 0x1,0x1e
0512 01d7 | | Execute Vector,Field_Read
0513 7004 |p | Jump_Nonzero 0x518
0514 4801 |H | Short_Literal 0x1
0515 a7fb | | Store_Unchecked 0x3,-0x5
0516 00cc | | Action Pop_Block
0517 4102 |A | End_Rendezvous 0x2
0518 8227 | ' | Call 0x1,0x27
0519 e7fa | | Load 0x3,-0x6
051a e21d | | Load 0x1,0x1d
051b e7fe | | Load 0x3,-0x2
051c e00f | | Load 0x0,0xf
051d 1869 | i | Execute Package,Field_Execute,Field_Number 0x69
051e c7fa | | Store 0x3,-0x6
051f e7fa | | Load 0x3,-0x6
0520 e21d | | Load 0x1,0x1d
0521 e7fc | | Load 0x3,-0x4
0522 e7fd | | Load 0x3,-0x3
0523 e00e | | Load 0x0,0xe
0524 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0525 e21e | | Load 0x1,0x1e
0526 4800 |H | Short_Literal 0x0
0527 801a | | Call 0x0,0x1a
0528 00d1 | | Pop_Control Pop_Count_1
0529 4800 |H | Short_Literal 0x0
052a a7fb | | Store_Unchecked 0x3,-0x5
052b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
052c TRAP_0508:
052c 0007 | | Action Break_Optional
052d 0092 054b | K| Action Push_String_Extended,0x54b ; "Create_Pending"
052f 8225 | % | Call 0x1,0x25
0530 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0531 ; --------------------------------------------------------------------------------------
0531 ; STRING TABLE
0531 ; --------------------------------------------------------------------------------------
0531 0038 | 8 | .STRTAB 0x0038->0x054d ; "Unexpected exception "
0532 004b | K | .STRTAB 0x004b->0x0557 ; " causing death of the Session_Worker for "
0533 0072 | r | .STRTAB 0x0072->0x056c ; "Session_Worker for "
0534 0083 | | .STRTAB 0x0083->0x0575 ; " got unexpected exception "
0535 009b | | .STRTAB 0x009b->0x0582 ; "; the Corrupt_State exception will be raised"
0536 00c5 | | .STRTAB 0x00c5->0x0598 ; "alive"
0537 00c8 | | .STRTAB 0x00c8->0x059b ; "not alive"
0538 00cf | | .STRTAB 0x00cf->0x059f ; " An idle item expiring at "
0539 00ea | | .STRTAB 0x00ea->0x05ae ; " last used at "
053a 00f6 | | .STRTAB 0x00f6->0x05b5 ; " An active item owned by "
053b 0110 | | .STRTAB 0x0110->0x05c3 ; " A pending item whose creator is "
053c 0132 | 2 | .STRTAB 0x0132->0x05d5 ; "The following items are cached for "
053d 0153 | S | .STRTAB 0x0153->0x05e6 ; " For "
053e 0157 | W | .STRTAB 0x0157->0x05e9 ; " NONE"
053f 015d | ] | .STRTAB 0x015d->0x05ed ; "Got unexpected exception "
0540 0174 | t | .STRTAB 0x0174->0x05fa ; " in Session_Worker main loop for "
0541 0193 | | .STRTAB 0x0193->0x060a ; "Activating"
0542 019b | | .STRTAB 0x019b->0x060f ; "Delete_Mapping"
0543 01a7 | | .STRTAB 0x01a7->0x0616 ; "Reclaim"
0544 01ac | | .STRTAB 0x01ac->0x061a ; "Initialise string map iterator"
0545 01c8 | | .STRTAB 0x01c8->0x0629 ; "Insert_Value"
0546 01d2 | | .STRTAB 0x01d2->0x062f ; "Release_Value"
0547 01dd | | .STRTAB 0x01dd->0x0635 ; "Make_Active"
0548 01e6 | | .STRTAB 0x01e6->0x063b ; "Reserve_Idle_Value"
0549 01f6 | | .STRTAB 0x01f6->0x0644 ; "Destroy_Value"
054a 0201 | | .STRTAB 0x0201->0x064a ; "Remove_Pending"
054b 020d | | .STRTAB 0x020d->0x0651 ; "Create_Pending"
054c 0219 | | .STREND 0x0219->0x0658
054d 556e 6578 |Unex| .STRTAB_STRINGS
0659 0000 0000 | | .BLANK 0000[0x7]
0660 ; --------------------------------------------------------------------------------------
0660 ; Debug Table
0660 ; --------------------------------------------------------------------------------------
0660 0004 000e | | .DEBUG4 0x0004,0x000e,0xf45f,0x0000,0x0001,0x0000
0666 d630 | 0 | .XXX[0x1]
0667 0000 0000 | | .BLANK 0000[0x1a]
0681 0205 801c | | .XXX[0x20]
0683 6b80 0000 |k |
0685 01b4 0080 | |
0687 8004 0001 | |
0689 c800 0000 | |
068b 2912 0000 |) |
068d 1000 0000 | |
068f 2801 4000 |( @ |
0691 0000 4000 | @ |
0693 0010 0000 | |
0695 0088 0000 | |
0697 0000 4000 | @ |
0699 0002 9000 | |
069b 0040 3ac6 | @: |
069d 5000 0040 |P @|
069f 3ac6 8000 |: |
06a1 0000 0000 | | .BLANK 0000[0x19]
06ba 0040 b003 | @ | .XXX[0x20]
06bc 8d80 0000 | |
06be 0036 8010 | 6 |
06c0 1000 8000 | |
06c2 3900 0000 |9 |
06c4 0522 8000 | " |
06c6 0200 0000 | |
06c8 0500 2800 | ( |
06ca 0000 0800 | |
06cc 0002 0000 | |
06ce 0011 0000 | |
06d0 0000 0800 | |
06d2 0000 5200 | R |
06d4 0008 0758 | X|
06d6 da00 0008 | |
06d8 0758 e000 | X |
06da 0000 0000 | | .BLANK 0000[0x19]
06f3 0008 | | .XXX[0x1]
06f4 0000 0000 | | .BLANK 0000[0xd]
0701 0020 0500 | | .XXX[0xc]
0703 0000 0000 | |
0705 0000 4000 | @ |
0707 0002 2000 | |
0709 0000 0100 | |
070b 0000 0a00 | |
070d 0000 0000 | | .BLANK 0000[0x2d]
073a 0004 00a0 | | .XXX[0xc]
073c 0000 0000 | |
073e 0000 0800 | |
0740 0000 4400 | D |
0742 0000 0020 | |
0744 0000 0140 | @|
0746 0000 0000 | | .BLANK 0000[0x2e]
0774 8014 0000 | | .XXX[0xb]
0776 0000 0000 | |
0778 0100 0000 | |
077a 0880 0000 | |
077c 0004 0000 | |
077e 0028 | ( |
077f 0000 0000 | | .BLANK 0000[0x2e]
07ad 1002 8000 | | .XXX[0xb]
07af 0000 0000 | |
07b1 0020 0000 | |
07b3 0110 0000 | |
07b5 0000 8000 | |
07b7 0005 | |
07b8 0000 0000 | | .BLANK 0000[0x48]