|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_779ce4
└─⟦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 0288 | | .CONST 0x0288 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 008b | | .CONST 0x008b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0022 | " | .CONST 0x0022 ; Number of locals
000b INIT_0008:
000b 4800 |H | Short_Literal 0x0
000c 4804 |H | Short_Literal 0x4
000d 029f 0093 | | Declare_Subprogram INIT_0090,For_Call
000f 03fe | | Declare_Type Discrete,Defined,Visible
0010 e002 | | Load 0x0,0x2
0011 0129 | ) | Execute Any,Make_Visible
0012 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated
0014 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated
0016 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
0018 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
001a 029a 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
001c 029a 011b | | Declare_Subprogram INIT_0118,For_Outer_Call,Visible,Unelaborated
001e 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated
0020 029a 014b | K| Declare_Subprogram INIT_0148,For_Outer_Call,Visible,Unelaborated
0022 029a 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call,Visible,Unelaborated
0024 029a 016b | k| Declare_Subprogram INIT_0168,For_Outer_Call,Visible,Unelaborated
0026 e003 | | Load 0x0,0x3
0027 0129 | ) | Execute Any,Make_Visible
0028 029a 017b | {| Declare_Subprogram INIT_0178,For_Outer_Call,Visible,Unelaborated
002a 029a 018b | | Declare_Subprogram INIT_0188,For_Outer_Call,Visible,Unelaborated
002c 029a 0193 | | Declare_Subprogram INIT_0190,For_Outer_Call,Visible,Unelaborated
002e 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
0030 029a 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call,Visible,Unelaborated
0032 029a 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call,Visible,Unelaborated
0034 4800 |H | Short_Literal 0x0
0035 0093 01b3 | | push_full_address INIT_01b0
0037 02a0 | | Declare_Subprogram Null_Subprogram
0038 038f | | Declare_Type Package,Defined,Visible
0039 0386 | | Declare_Variable Package,Visible
003a 00bf | | Action Accept_Activation
003b e20d | | Load 0x1,0xd
003c 0266 | f | Execute Discrete,Bounds
003d e004 | | Load 0x0,0x4
003e 02a0 | | Declare_Subprogram Null_Subprogram
003f 4801 |H | Short_Literal 0x1
0040 035d | ] | Declare_Type Array,Defined
0041 00d8 | | Load_Top At_Offset_0
0042 0337 | 7 | Declare_Variable Array
0043 00d8 | | Load_Top At_Offset_0
0044 0335 | 5 | Declare_Variable Array,Duplicate
0045 00cd | | Action Spare6_Action
0046 4800 |H | Short_Literal 0x0
0047 4800 |H | Short_Literal 0x0
0048 00da | | Load_Top At_Offset_2
0049 01d6 | | Execute Vector,Field_Write
004a 4801 |H | Short_Literal 0x1
004b 4801 |H | Short_Literal 0x1
004c 00da | | Load_Top At_Offset_2
004d 01d6 | | Execute Vector,Field_Write
004e 4802 |H | Short_Literal 0x2
004f 4802 |H | Short_Literal 0x2
0050 00da | | Load_Top At_Offset_2
0051 01d6 | | Execute Vector,Field_Write
0052 4803 |H | Short_Literal 0x3
0053 4803 |H | Short_Literal 0x3
0054 00da | | Load_Top At_Offset_2
0055 01d6 | | Execute Vector,Field_Write
0056 4804 |H | Short_Literal 0x4
0057 4804 |H | Short_Literal 0x4
0058 00da | | Load_Top At_Offset_2
0059 01d6 | | Execute Vector,Field_Write
005a 00d9 | | Load_Top At_Offset_1
005b 01d4 | | Execute Vector,Structure_Write
005c 1d0f | | Execute_Immediate Reference_Lex_1,0xf
005d 00c7 | | Action Elaborate_Subprogram
005e 1d10 | | Execute_Immediate Reference_Lex_1,0x10
005f 00c7 | | Action Elaborate_Subprogram
0060 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0061 00c7 | | Action Elaborate_Subprogram
0062 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0063 00c7 | | Action Elaborate_Subprogram
0064 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0065 00c7 | | Action Elaborate_Subprogram
0066 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0067 00c7 | | Action Elaborate_Subprogram
0068 1d15 | | Execute_Immediate Reference_Lex_1,0x15
0069 00c7 | | Action Elaborate_Subprogram
006a 1d16 | | Execute_Immediate Reference_Lex_1,0x16
006b 00c7 | | Action Elaborate_Subprogram
006c 1d17 | | Execute_Immediate Reference_Lex_1,0x17
006d 00c7 | | Action Elaborate_Subprogram
006e 1d18 | | Execute_Immediate Reference_Lex_1,0x18
006f 00c7 | | Action Elaborate_Subprogram
0070 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0071 00c7 | | Action Elaborate_Subprogram
0072 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0073 00c7 | | Action Elaborate_Subprogram
0074 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
0075 00c7 | | Action Elaborate_Subprogram
0076 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
0077 00c7 | | Action Elaborate_Subprogram
0078 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
0079 00c7 | | Action Elaborate_Subprogram
007a 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
007b 00c7 | | Action Elaborate_Subprogram
007c a005 | | Store_Unchecked 0x0,0x5
007d e006 | | Load 0x0,0x6
007e a007 | | Store_Unchecked 0x0,0x7
007f a008 | | Store_Unchecked 0x0,0x8
0080 a009 | | Store_Unchecked 0x0,0x9
0081 a00a | | Store_Unchecked 0x0,0xa
0082 a00b | | Store_Unchecked 0x0,0xb
0083 a00c | | Store_Unchecked 0x0,0xc
0084 a00d | | Store_Unchecked 0x0,0xd
0085 a00e | | Store_Unchecked 0x0,0xe
0086 480a |H | Short_Literal 0xa
0087 e220 | | Load 0x1,0x20
0088 020e | | Execute Module,Augment_Imports
0089 00da | | Load_Top At_Offset_2
008a 020f | | Execute Module,Activate
008b BODY_0008:
008b 00bc | | Action Signal_Activated
008c 00bb | | Action Signal_Completion
008d 0000 0000 | | .XXX[0x3]
008f 0000 | |
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 0093 | | .CONST 0x0093 ; Address of begin
0091 0004 | | .CONST 0x0004 ; Address of exception handler
0092 0001 | | .CONST 0x0001 ; Number of locals
0093 BODY_0090:
0093 INIT_0090:
0093 4607 |F | Jump_Case 0x8
0094 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
0095 7807 |x | Jump 0x9d ; case 0x1
0096 780a |x | Jump 0xa1 ; case 0x2
0097 780e |x | Jump 0xa6 ; case 0x3
0098 7811 |x | Jump 0xaa ; case 0x4
0099 7812 |x | Jump 0xac ; case 0x5
009a 7813 |x | Jump 0xae ; case 0x6
009b 7816 |x | Jump 0xb2 ; case 0x7
009c 4302 |C | .XXX[0x1]
009d 00da | | Load_Top At_Offset_2
009e 0091 0252 | R| Action Push_String_Extended_Indexed,0x252 ; "CMVC_FROZEN_UNITS"
00a0 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00a1 00db | | Load_Top At_Offset_3
00a2 00db | | Load_Top At_Offset_3
00a3 00e0 | | Load_Encached Standard_Cache
00a4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00a5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00a6 00da | | Load_Top At_Offset_2
00a7 00e0 | | Load_Encached Standard_Cache
00a8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
00a9 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
00aa 00db | | Load_Top At_Offset_3
00ab 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00ac 00db | | Load_Top At_Offset_3
00ad 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00ae e20d | | Load 0x1,0xd
00af 00dc | | Load_Top At_Offset_4
00b0 0267 | g | Execute Discrete,Predecessor
00b1 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00b2 e20d | | Load 0x1,0xd
00b3 00dc | | Load_Top At_Offset_4
00b4 0268 | h | Execute Discrete,Successor
00b5 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
00b6 0000 0000 | | .XXX[0x2]
00b8 ; --------------------------------------------------------------------------------------
00b8 ; SUBPROGRAM
00b8 ; --------------------------------------------------------------------------------------
00b8 00bd | | .CONST 0x00bd ; Address of begin
00b9 0004 | | .CONST 0x0004 ; Address of exception handler
00ba 0002 | | .CONST 0x0002 ; Number of locals
00bb INIT_00b8:
00bb e20e | | Load 0x1,0xe
00bc 0007 | | Action Break_Optional
00bd BODY_00b8:
00bd 00db | | Load_Top At_Offset_3
00be 800f | | Call 0x0,0xf
00bf 0031 | 1 | Store_Top Heap_Access,At_Offset_1
00c0 00d8 | | Load_Top At_Offset_0
00c1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00c2 0000 0000 | | .BLANK 0000[0x6]
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00cc 0000 0000 | | .BLANK 0000[0x4]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d9 | | .CONST 0x00d9 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0002 | | .CONST 0x0002 ; Number of locals
00d3 INIT_00d0:
00d3 e010 | | Load 0x0,0x10
00d4 0322 | " | Declare_Variable Record
00d5 e5fc | | Load 0x2,-0x4
00d6 8011 | | Call 0x0,0x11
00d7 00d9 | | Load_Top At_Offset_1
00d8 017d | } | Execute Record,Structure_Write
00d9 BODY_00d0:
00d9 00e1 | | Load_Encached Boolean_Cache
00da 00d9 | | Load_Top At_Offset_1
00db e5fd | | Load 0x2,-0x3
00dc e5fe | | Load 0x2,-0x2
00dd e5ff | | Load 0x2,-0x1
00de e222 | " | Load 0x1,0x22
00df 01d7 | | Execute Vector,Field_Read
00e0 8012 | | Call 0x0,0x12
00e1 00d1 | | Pop_Control Pop_Count_1
00e2 c5fb | | Store 0x2,-0x5
00e3 00d8 | | Load_Top At_Offset_0
00e4 8013 | | Call 0x0,0x13
00e5 e5fc | | Load 0x2,-0x4
00e6 017d | } | Execute Record,Structure_Write
00e7 4504 |E | Exit_Suprogram New_Top_Offset 0x4
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00f1 | | .CONST 0x00f1 ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0002 | | .CONST 0x0002 ; Number of locals
00eb INIT_00e8:
00eb e014 | | Load 0x0,0x14
00ec 0322 | " | Declare_Variable Record
00ed e5fc | | Load 0x2,-0x4
00ee 8015 | | Call 0x0,0x15
00ef 00d9 | | Load_Top At_Offset_1
00f0 017d | } | Execute Record,Structure_Write
00f1 BODY_00e8:
00f1 00e1 | | Load_Encached Boolean_Cache
00f2 00d9 | | Load_Top At_Offset_1
00f3 e5fd | | Load 0x2,-0x3
00f4 e5fe | | Load 0x2,-0x2
00f5 e5ff | | Load 0x2,-0x1
00f6 e222 | " | Load 0x1,0x22
00f7 01d7 | | Execute Vector,Field_Read
00f8 8016 | | Call 0x0,0x16
00f9 00d1 | | Pop_Control Pop_Count_1
00fa c5fb | | Store 0x2,-0x5
00fb 00d8 | | Load_Top At_Offset_0
00fc 8017 | | Call 0x0,0x17
00fd e5fc | | Load 0x2,-0x4
00fe 017d | } | Execute Record,Structure_Write
00ff 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0109 | | .CONST 0x0109 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0002 | | .CONST 0x0002 ; Number of locals
0103 INIT_0100:
0103 e010 | | Load 0x0,0x10
0104 0322 | " | Declare_Variable Record
0105 e5fd | | Load 0x2,-0x3
0106 8011 | | Call 0x0,0x11
0107 00d9 | | Load_Top At_Offset_1
0108 017d | } | Execute Record,Structure_Write
0109 BODY_0100:
0109 e5fc | | Load 0x2,-0x4
010a e006 | | Load 0x0,0x6
010b 0216 | | Execute Heap_Access,Convert
010c 00d9 | | Load_Top At_Offset_1
010d e5fe | | Load 0x2,-0x2
010e e5ff | | Load 0x2,-0x1
010f e222 | " | Load 0x1,0x22
0110 01d7 | | Execute Vector,Field_Read
0111 8018 | | Call 0x0,0x18
0112 c5fc | | Store 0x2,-0x4
0113 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0114 0000 0000 | | .BLANK 0000[0x4]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0121 | ! | .CONST 0x0121 ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0002 | | .CONST 0x0002 ; Number of locals
011b INIT_0118:
011b e014 | | Load 0x0,0x14
011c 0322 | " | Declare_Variable Record
011d e5fd | | Load 0x2,-0x3
011e 8015 | | Call 0x0,0x15
011f 00d9 | | Load_Top At_Offset_1
0120 017d | } | Execute Record,Structure_Write
0121 BODY_0118:
0121 e5fc | | Load 0x2,-0x4
0122 e006 | | Load 0x0,0x6
0123 0216 | | Execute Heap_Access,Convert
0124 00d9 | | Load_Top At_Offset_1
0125 e5fe | | Load 0x2,-0x2
0126 e5ff | | Load 0x2,-0x1
0127 e222 | " | Load 0x1,0x22
0128 01d7 | | Execute Vector,Field_Read
0129 8019 | | Call 0x0,0x19
012a c5fc | | Store 0x2,-0x4
012b 4504 |E | Exit_Suprogram New_Top_Offset 0x4
012c 0000 0000 | | .BLANK 0000[0x4]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0139 | 9 | .CONST 0x0139 ; Address of begin
0131 0004 | | .CONST 0x0004 ; Address of exception handler
0132 0002 | | .CONST 0x0002 ; Number of locals
0133 INIT_0130:
0133 e014 | | Load 0x0,0x14
0134 0322 | " | Declare_Variable Record
0135 e5fd | | Load 0x2,-0x3
0136 8015 | | Call 0x0,0x15
0137 00d9 | | Load_Top At_Offset_1
0138 017d | } | Execute Record,Structure_Write
0139 BODY_0130:
0139 e5fc | | Load 0x2,-0x4
013a e006 | | Load 0x0,0x6
013b 0216 | | Execute Heap_Access,Convert
013c 00d9 | | Load_Top At_Offset_1
013d e5fe | | Load 0x2,-0x2
013e e5ff | | Load 0x2,-0x1
013f e222 | " | Load 0x1,0x22
0140 01d7 | | Execute Vector,Field_Read
0141 801a | | Call 0x0,0x1a
0142 c5fc | | Store 0x2,-0x4
0143 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0144 0000 0000 | | .BLANK 0000[0x4]
0148 ; --------------------------------------------------------------------------------------
0148 ; SUBPROGRAM
0148 ; --------------------------------------------------------------------------------------
0148 014d | M | .CONST 0x014d ; Address of begin
0149 0004 | | .CONST 0x0004 ; Address of exception handler
014a 0002 | | .CONST 0x0002 ; Number of locals
014b INIT_0148:
014b e010 | | Load 0x0,0x10
014c 0322 | " | Declare_Variable Record
014d BODY_0148:
014d e5fd | | Load 0x2,-0x3
014e e5fe | | Load 0x2,-0x2
014f e5ff | | Load 0x2,-0x1
0150 e222 | " | Load 0x1,0x22
0151 01d7 | | Execute Vector,Field_Read
0152 801b | | Call 0x0,0x1b
0153 00d9 | | Load_Top At_Offset_1
0154 017d | } | Execute Record,Structure_Write
0155 00d8 | | Load_Top At_Offset_0
0156 8013 | | Call 0x0,0x13
0157 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015d | ] | .CONST 0x015d ; Address of begin
0159 0004 | | .CONST 0x0004 ; Address of exception handler
015a 0002 | | .CONST 0x0002 ; Number of locals
015b INIT_0158:
015b e014 | | Load 0x0,0x14
015c 0322 | " | Declare_Variable Record
015d BODY_0158:
015d e5fd | | Load 0x2,-0x3
015e e5fe | | Load 0x2,-0x2
015f e5ff | | Load 0x2,-0x1
0160 e222 | " | Load 0x1,0x22
0161 01d7 | | Execute Vector,Field_Read
0162 801c | | Call 0x0,0x1c
0163 00d9 | | Load_Top At_Offset_1
0164 017d | } | Execute Record,Structure_Write
0165 00d8 | | Load_Top At_Offset_0
0166 8017 | | Call 0x0,0x17
0167 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016d | m | .CONST 0x016d ; Address of begin
0169 0004 | | .CONST 0x0004 ; Address of exception handler
016a 0002 | | .CONST 0x0002 ; Number of locals
016b INIT_0168:
016b e014 | | Load 0x0,0x14
016c 0322 | " | Declare_Variable Record
016d BODY_0168:
016d e5fd | | Load 0x2,-0x3
016e e5fe | | Load 0x2,-0x2
016f e5ff | | Load 0x2,-0x1
0170 e222 | " | Load 0x1,0x22
0171 01d7 | | Execute Vector,Field_Read
0172 801d | | Call 0x0,0x1d
0173 00d9 | | Load_Top At_Offset_1
0174 017d | } | Execute Record,Structure_Write
0175 00d8 | | Load_Top At_Offset_0
0176 8017 | | Call 0x0,0x17
0177 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
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 00db | | Load_Top At_Offset_3
017c 00db | | Load_Top At_Offset_3
017d e222 | " | Load 0x1,0x22
017e 01d7 | | Execute Vector,Field_Read
017f 801e | | Call 0x0,0x1e
0180 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0181 0000 0000 | | .BLANK 0000[0x7]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b 00da | | Load_Top At_Offset_2
018c 801f | | Call 0x0,0x1f
018d 4501 |E | Exit_Suprogram New_Top_Offset 0x1
018e 0000 0000 | | .XXX[0x2]
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 00da | | Load_Top At_Offset_2
0194 8020 | | Call 0x0,0x20
0195 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0196 0000 0000 | | .XXX[0x2]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 019b | | .CONST 0x019b ; Address of begin
0199 0004 | | .CONST 0x0004 ; Address of exception handler
019a 0001 | | .CONST 0x0001 ; Number of locals
019b BODY_0198:
019b INIT_0198:
019b 00da | | Load_Top At_Offset_2
019c 8021 | ! | Call 0x0,0x21
019d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
019e 0000 0000 | | .XXX[0x2]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3 | | .CONST 0x01a3 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 0001 | | .CONST 0x0001 ; Number of locals
01a3 BODY_01a0:
01a3 INIT_01a0:
01a3 00da | | Load_Top At_Offset_2
01a4 8022 | " | Call 0x0,0x22
01a5 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01a6 0000 0000 | | .XXX[0x2]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab 00da | | Load_Top At_Offset_2
01ac 8023 | # | Call 0x0,0x23
01ad 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01ae 0000 0000 | | .XXX[0x2]
01b0 ; --------------------------------------------------------------------------------------
01b0 ; SUBPROGRAM
01b0 ; --------------------------------------------------------------------------------------
01b0 01d8 | | .CONST 0x01d8 ; Address of begin
01b1 0004 | | .CONST 0x0004 ; Address of exception handler
01b2 0015 | | .CONST 0x0015 ; Number of locals
01b3 INIT_01b0:
01b3 029a 01e3 | | Declare_Subprogram INIT_01e0,For_Outer_Call,Visible,Unelaborated
01b5 029a 01eb | | Declare_Subprogram INIT_01e8,For_Outer_Call,Visible,Unelaborated
01b7 029a 01fb | | Declare_Subprogram INIT_01f8,For_Outer_Call,Visible,Unelaborated
01b9 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
01bb 029a 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call,Visible,Unelaborated
01bd 029a 0223 | #| Declare_Subprogram INIT_0220,For_Outer_Call,Visible,Unelaborated
01bf 029a 0233 | 3| Declare_Subprogram INIT_0230,For_Outer_Call,Visible,Unelaborated
01c1 029a 0243 | C| Declare_Subprogram INIT_0240,For_Outer_Call,Visible,Unelaborated
01c3 029a 024b | K| Declare_Subprogram INIT_0248,For_Outer_Call,Visible,Unelaborated
01c5 00bf | | Action Accept_Activation
01c6 1d0d | | Execute_Immediate Reference_Lex_1,0xd
01c7 00c7 | | Action Elaborate_Subprogram
01c8 1d0e | | Execute_Immediate Reference_Lex_1,0xe
01c9 00c7 | | Action Elaborate_Subprogram
01ca 1d0f | | Execute_Immediate Reference_Lex_1,0xf
01cb 00c7 | | Action Elaborate_Subprogram
01cc 1d10 | | Execute_Immediate Reference_Lex_1,0x10
01cd 00c7 | | Action Elaborate_Subprogram
01ce 1d11 | | Execute_Immediate Reference_Lex_1,0x11
01cf 00c7 | | Action Elaborate_Subprogram
01d0 1d12 | | Execute_Immediate Reference_Lex_1,0x12
01d1 00c7 | | Action Elaborate_Subprogram
01d2 1d13 | | Execute_Immediate Reference_Lex_1,0x13
01d3 00c7 | | Action Elaborate_Subprogram
01d4 1d14 | | Execute_Immediate Reference_Lex_1,0x14
01d5 00c7 | | Action Elaborate_Subprogram
01d6 1d15 | | Execute_Immediate Reference_Lex_1,0x15
01d7 00c7 | | Action Elaborate_Subprogram
01d8 BODY_01b0:
01d8 00bc | | Action Signal_Activated
01d9 00bb | | Action Signal_Completion
01da 0000 0000 | | .BLANK 0000[0x6]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 00db | | Load_Top At_Offset_3
01e4 00db | | Load_Top At_Offset_3
01e5 8001 | | Call 0x0,0x1
01e6 c5fe | | Store 0x2,-0x2
01e7 4502 |E | Exit_Suprogram New_Top_Offset 0x2
01e8 ; --------------------------------------------------------------------------------------
01e8 ; SUBPROGRAM
01e8 ; --------------------------------------------------------------------------------------
01e8 01eb | | .CONST 0x01eb ; Address of begin
01e9 0004 | | .CONST 0x0004 ; Address of exception handler
01ea 0001 | | .CONST 0x0001 ; Number of locals
01eb BODY_01e8:
01eb INIT_01e8:
01eb e5fd | | Load 0x2,-0x3
01ec e002 | | Load 0x0,0x2
01ed 0216 | | Execute Heap_Access,Convert
01ee e5fe | | Load 0x2,-0x2
01ef e5ff | | Load 0x2,-0x1
01f0 8003 | | Call 0x0,0x3
01f1 c5fd | | Store 0x2,-0x3
01f2 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01f3 0000 0000 | | .BLANK 0000[0x5]
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb 00db | | Load_Top At_Offset_3
01fc e002 | | Load 0x0,0x2
01fd 0216 | | Execute Heap_Access,Convert
01fe 00db | | Load_Top At_Offset_3
01ff 8004 | | Call 0x0,0x4
0200 c5fe | | Store 0x2,-0x2
0201 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0202 0000 0000 | | .BLANK 0000[0x6]
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 8005 | | Call 0x0,0x5
020d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
020e 0000 0000 | | .XXX[0x2]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213 | | .CONST 0x0213 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0001 | | .CONST 0x0001 ; Number of locals
0213 BODY_0210:
0213 INIT_0210:
0213 00da | | Load_Top At_Offset_2
0214 e002 | | Load 0x0,0x2
0215 0216 | | Execute Heap_Access,Convert
0216 8006 | | Call 0x0,0x6
0217 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0218 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0219 0000 0000 | | .BLANK 0000[0x7]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 0223 | # | .CONST 0x0223 ; Address of begin
0221 0004 | | .CONST 0x0004 ; Address of exception handler
0222 0001 | | .CONST 0x0001 ; Number of locals
0223 BODY_0220:
0223 INIT_0220:
0223 00db | | Load_Top At_Offset_3
0224 e002 | | Load 0x0,0x2
0225 0216 | | Execute Heap_Access,Convert
0226 00db | | Load_Top At_Offset_3
0227 8007 | | Call 0x0,0x7
0228 c5fe | | Store 0x2,-0x2
0229 4502 |E | Exit_Suprogram New_Top_Offset 0x2
022a 0000 0000 | | .BLANK 0000[0x6]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 0004 | | .CONST 0x0004 ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 00db | | Load_Top At_Offset_3
0234 e002 | | Load 0x0,0x2
0235 0216 | | Execute Heap_Access,Convert
0236 4800 |H | Short_Literal 0x0
0237 8008 | | Call 0x0,0x8
0238 c5fe | | Store 0x2,-0x2
0239 4502 |E | Exit_Suprogram New_Top_Offset 0x2
023a 0000 0000 | | .BLANK 0000[0x6]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 00da | | Load_Top At_Offset_2
0244 8009 | | Call 0x0,0x9
0245 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0246 0000 0000 | | .XXX[0x2]
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b 00db | | Load_Top At_Offset_3
024c e002 | | Load 0x0,0x2
024d 0216 | | Execute Heap_Access,Convert
024e 00db | | Load_Top At_Offset_3
024f 800a | | Call 0x0,0xa
0250 c5fe | | Store 0x2,-0x2
0251 4502 |E | Exit_Suprogram New_Top_Offset 0x2
0252 ; --------------------------------------------------------------------------------------
0252 ; STRING TABLE
0252 ; --------------------------------------------------------------------------------------
0252 000c | | .STRTAB 0x000c->0x0258 ; "CMVC_FROZEN_UNITS"
0253 001b | | .STRTAB 0x001b->0x0260 ; "CMVC_UNITS"
0254 0023 | # | .STRTAB 0x0023->0x0265 ; "FREE_UNITS_IN_SUBSYSTEM"
0255 0038 | 8 | .STRTAB 0x0038->0x0271 ; "OTHER_FREE_UNITS"
0256 0046 | F | .STRTAB 0x0046->0x0279 ; "SUBJECT_PROGRAM_CLOSURE"
0257 005b | [ | .STREND 0x005b->0x0284
0258 434d 5643 |CMVC| .STRTAB_STRINGS
0285 0000 0000 | | .XXX[0x3]
0287 0000 | |
0288 ; --------------------------------------------------------------------------------------
0288 ; Debug Table
0288 ; --------------------------------------------------------------------------------------
0288 0004 000a | | .DEBUG4 0x0004,0x000a,0x6029,0x0000,0x0001,0x0000
028e 0000 0000 | | .BLANK 0000[0x172]