|
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_0694fc
└─⟦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 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0290 | | .CONST 0x0290 ; 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 0043 | C | .CONST 0x0043 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 001e | | .CONST 0x001e ; Number of locals
000b INIT_0008:
000b 00c4 | | Action Make_Default
000c 00c4 | | Action Make_Default
000d 00c4 | | Action Make_Default
000e 00c4 | | Action Make_Default
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 00c4 | | Action Make_Default
0015 00c4 | | Action Make_Default
0016 00c4 | | Action Make_Default
0017 00c4 | | Action Make_Default
0018 00c4 | | Action Make_Default
0019 00c4 | | Action Make_Default
001a 00c4 | | Action Make_Default
001b e001 | | Load 0x0,0x1
001c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
001e 0129 | ) | Execute Any,Make_Visible
001f c212 | | Store 0x1,0x12
0020 e001 | | Load 0x0,0x1
0021 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0022 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0023 0129 | ) | Execute Any,Make_Visible
0024 c213 | | Store 0x1,0x13
0025 029a 004b | K| Declare_Subprogram INIT_0048,For_Outer_Call,Visible,Unelaborated
0027 c217 | | Store 0x1,0x17
0028 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated
002a c215 | | Store 0x1,0x15
002b 029a 008b | | Declare_Subprogram INIT_0088,For_Outer_Call,Visible,Unelaborated
002d c21c | | Store 0x1,0x1c
002e 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated
0030 c21a | | Store 0x1,0x1a
0031 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated
0033 c21b | | Store 0x1,0x1b
0034 00bf | | Action Accept_Activation
0035 029d 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call
0037 029d 00f3 | | Declare_Subprogram INIT_00f0,For_Outer_Call
0039 1d15 | | Execute_Immediate Reference_Lex_1,0x15
003a 00c7 | | Action Elaborate_Subprogram
003b 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
003c 00c7 | | Action Elaborate_Subprogram
003d 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
003e 00c7 | | Action Elaborate_Subprogram
003f 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0040 00c7 | | Action Elaborate_Subprogram
0041 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
0042 00c7 | | Action Elaborate_Subprogram
0043 BODY_0008:
0043 00bc | | Action Signal_Activated
0044 00bb | | Action Signal_Completion
0045 0000 0000 | | .XXX[0x3]
0047 0000 | |
0048 ; --------------------------------------------------------------------------------------
0048 ; SUBPROGRAM
0048 ; --------------------------------------------------------------------------------------
0048 0050 | P | .CONST 0x0050 ; Address of begin
0049 0004 | | .CONST 0x0004 ; Address of exception handler
004a 0002 | | .CONST 0x0002 ; Number of locals
004b INIT_0048:
004b 00da | | Load_Top At_Offset_2
004c e001 | | Load 0x0,0x1
004d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
004e 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
004f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0050 BODY_0048:
0050 00d8 | | Load_Top At_Offset_0
0051 e002 | | Load 0x0,0x2
0052 180f | | Execute Package,Field_Execute,Field_Number 0xf
0053 027f | | Execute Discrete,Equal
0054 00d9 | | Load_Top At_Offset_1
0055 e002 | | Load 0x0,0x2
0056 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0057 027f | | Execute Discrete,Equal
0058 0278 | x | Execute Discrete,Or
0059 00d9 | | Load_Top At_Offset_1
005a e002 | | Load 0x0,0x2
005b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
005c 027f | | Execute Discrete,Equal
005d 0278 | x | Execute Discrete,Or
005e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
005f 0000 | | .XXX[0x1]
0060 ; --------------------------------------------------------------------------------------
0060 ; SUBPROGRAM
0060 ; --------------------------------------------------------------------------------------
0060 0074 | t | .CONST 0x0074 ; Address of begin
0061 0004 | | .CONST 0x0004 ; Address of exception handler
0062 0005 | | .CONST 0x0005 ; Number of locals
0063 INIT_0060:
0063 e213 | | Load 0x1,0x13
0064 02c7 | | Declare_Variable Any
0065 0092 0240 | @| Action Push_String_Extended,0x240 ; "<ACTIVITY>"
0067 4800 |H | Short_Literal 0x0
0068 e5ff | | Load 0x2,-0x1
0069 821e | | Call 0x1,0x1e
006a a402 | | Store_Unchecked 0x2,0x2
006b e213 | | Load 0x1,0x13
006c 02c7 | | Declare_Variable Any
006d e001 | | Load 0x0,0x1
006e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
006f 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
0070 a403 | | Store_Unchecked 0x2,0x3
0071 00e1 | | Load_Encached Boolean_Cache
0072 029f 010b | | Declare_Subprogram INIT_0108,For_Call
0074 BODY_0060:
0074 00cf | | Action Mark_Auxiliary
0075 7807 |x | Jump 0x7d
0076 8405 | | Call 0x2,0x5
0077 e402 | | Load 0x2,0x2
0078 e001 | | Load 0x0,0x1
0079 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007a 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
007b c402 | | Store 0x2,0x2
007c 00c9 | | Action Pop_Auxiliary_Loop
007d e402 | | Load 0x2,0x2
007e e001 | | Load 0x0,0x1
007f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0080 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
0081 6ff4 |o | Jump_Zero 0x76
0082 00ce | | Action Pop_Auxiliary
0083 00da | | Load_Top At_Offset_2
0084 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0085 0000 0000 | | .XXX[0x3]
0087 0000 | |
0088 ; --------------------------------------------------------------------------------------
0088 ; SUBPROGRAM
0088 ; --------------------------------------------------------------------------------------
0088 008b | | .CONST 0x008b ; Address of begin
0089 0004 | | .CONST 0x0004 ; Address of exception handler
008a 0001 | | .CONST 0x0001 ; Number of locals
008b BODY_0088:
008b INIT_0088:
008b 00db | | Load_Top At_Offset_3
008c 4801 |H | Short_Literal 0x1
008d e5ff | | Load 0x2,-0x1
008e 821a | | Call 0x1,0x1a
008f e003 | | Load 0x0,0x3
0090 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0091 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0092 0000 0000 | | .BLANK 0000[0x6]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a7 | | .CONST 0x00a7 ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0005 | | .CONST 0x0005 ; Number of locals
009b INIT_0098:
009b e004 | | Load 0x0,0x4
009c 1816 | | Execute Package,Field_Execute,Field_Number 0x16
009d e001 | | Load 0x0,0x1
009e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
009f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a0 02c7 | | Declare_Variable Any
00a1 00d8 | | Load_Top At_Offset_0
00a2 1c00 | | Execute_Immediate Run_Utility,0x0
00a3 029f 0123 | #| Declare_Subprogram INIT_0120,For_Call
00a5 029f 013b | ;| Declare_Subprogram INIT_0138,For_Call
00a7 BODY_0098:
00a7 e5ff | | Load 0x2,-0x1
00a8 8217 | | Call 0x1,0x17
00a9 6802 |h | Jump_Zero 0xac
00aa 8405 | | Call 0x2,0x5
00ab 781a |x | Jump 0xc6
00ac e5ff | | Load 0x2,-0x1
00ad 8404 | | Call 0x2,0x4
00ae 6810 |h | Jump_Zero 0xbf
00af 4801 |H | Short_Literal 0x1
00b0 e001 | | Load 0x0,0x1
00b1 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00b2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00b3 e5ff | | Load 0x2,-0x1
00b4 e001 | | Load 0x0,0x1
00b5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00b6 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00b7 0092 0241 | A| Action Push_String_Extended,0x241 ; ".UNITS"
00b9 01cc | | Execute Vector,Catenate
00ba e001 | | Load 0x0,0x1
00bb 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00bc 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
00bd c403 | | Store 0x2,0x3
00be 7807 |x | Jump 0xc6
00bf e5ff | | Load 0x2,-0x1
00c0 00d8 | | Load_Top At_Offset_0
00c1 0120 | | Execute Any,Is_Value
00c2 7002 |p | Jump_Nonzero 0xc5
00c3 00d8 | | Load_Top At_Offset_0
00c4 011e | | Execute Any,Convert
00c5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c6 00da | | Load_Top At_Offset_2
00c7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00c8 ; --------------------------------------------------------------------------------------
00c8 ; SUBPROGRAM
00c8 ; --------------------------------------------------------------------------------------
00c8 00cb | | .CONST 0x00cb ; Address of begin
00c9 0004 | | .CONST 0x0004 ; Address of exception handler
00ca 0001 | | .CONST 0x0001 ; Number of locals
00cb BODY_00c8:
00cb INIT_00c8:
00cb 00da | | Load_Top At_Offset_2
00cc e001 | | Load 0x0,0x1
00cd 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00ce 1812 | | Execute Package,Field_Execute,Field_Number 0x12
00cf 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d5 | | .CONST 0x00d5 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0002 | | .CONST 0x0002 ; Number of locals
00d3 INIT_00d0:
00d3 029f 01cb | | Declare_Subprogram INIT_01c8,For_Call
00d5 BODY_00d0:
00d5 00db | | Load_Top At_Offset_3
00d6 8402 | | Call 0x2,0x2
00d7 680a |h | Jump_Zero 0xe2
00d8 0092 0242 | B| Action Push_String_Extended,0x242 ; "Could not find combined view for "
00da e5ff | | Load 0x2,-0x1
00db e001 | | Load 0x0,0x1
00dc 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00dd 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00de 01cc | | Execute Vector,Catenate
00df e005 | | Load 0x0,0x5
00e0 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00e1 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00e2 0092 0243 | C| Action Push_String_Extended,0x243 ; "Could not find load view for "
00e4 e5ff | | Load 0x2,-0x1
00e5 e001 | | Load 0x0,0x1
00e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00e7 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00e8 01cc | | Execute Vector,Catenate
00e9 e005 | | Load 0x0,0x5
00ea 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00eb 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00ec 0000 0000 | | .BLANK 0000[0x4]
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f9 | | .CONST 0x00f9 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0004 | | .CONST 0x0004 ; Number of locals
00f3 INIT_00f0:
00f3 029f 01db | | Declare_Subprogram INIT_01d8,For_Call
00f5 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call
00f7 029f 021b | | Declare_Subprogram INIT_0218,For_Call
00f9 BODY_00f0:
00f9 e5fe | | Load 0x2,-0x2
00fa 6809 |h | Jump_Zero 0x104
00fb e5ff | | Load 0x2,-0x1
00fc e001 | | Load 0x0,0x1
00fd 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00fe 1820 | | Execute Package,Field_Execute,Field_Number 0x20
00ff 0092 0244 | D| Action Push_String_Extended,0x244 ; "'spec_view & Activity_Image (Activity_name)"
0101 01cc | | Execute Vector,Catenate
0102 8402 | | Call 0x2,0x2
0103 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0104 8404 | | Call 0x2,0x4
0105 0831 | 1 | Execute_Immediate Raise,0x31
0106 0000 0000 | | .XXX[0x2]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 011c | | .CONST 0x011c ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b 00e1 | | Load_Encached Boolean_Cache
010c e001 | | Load 0x0,0x1
010d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
010e 180e | | Execute Package,Field_Execute,Field_Number 0xe
010f e402 | | Load 0x2,0x2
0110 e001 | | Load 0x0,0x1
0111 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0112 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0113 e001 | | Load 0x0,0x1
0114 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0115 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0116 e403 | | Load 0x2,0x3
0117 e001 | | Load 0x0,0x1
0118 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0119 182d | - | Execute Package,Field_Execute,Field_Number 0x2d
011a c404 | | Store 0x2,0x4
011b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
011c TRAP_0108:
011c 010e | | Execute Exception,Is_Constraint_Error
011d 6801 |h | Jump_Zero 0x11f
011e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
011f 0100 | | Execute Exception,Raise
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0128 | ( | .CONST 0x0128 ; Address of begin
0121 0004 | | .CONST 0x0004 ; Address of exception handler
0122 0002 | | .CONST 0x0002 ; Number of locals
0123 INIT_0120:
0123 00da | | Load_Top At_Offset_2
0124 e001 | | Load 0x0,0x1
0125 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0126 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
0127 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0128 BODY_0120:
0128 00d8 | | Load_Top At_Offset_0
0129 e002 | | Load 0x0,0x2
012a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
012b 027f | | Execute Discrete,Equal
012c 00d9 | | Load_Top At_Offset_1
012d e002 | | Load 0x0,0x2
012e 1812 | | Execute Package,Field_Execute,Field_Number 0x12
012f 027f | | Execute Discrete,Equal
0130 0278 | x | Execute Discrete,Or
0131 00d9 | | Load_Top At_Offset_1
0132 e002 | | Load 0x0,0x2
0133 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0134 027f | | Execute Discrete,Equal
0135 0278 | x | Execute Discrete,Or
0136 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0137 0000 | | .XXX[0x1]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 0154 | T | .CONST 0x0154 ; Address of begin
0139 01b0 | | .CONST 0x01b0 ; Address of exception handler
013a 0007 | | .CONST 0x0007 ; Number of locals
013b INIT_0138:
013b e006 | | Load 0x0,0x6
013c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
013d 02c7 | | Declare_Variable Any
013e 00d8 | | Load_Top At_Offset_0
013f 1c00 | | Execute_Immediate Run_Utility,0x0
0140 e006 | | Load 0x0,0x6
0141 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0142 02c7 | | Declare_Variable Any
0143 00d8 | | Load_Top At_Offset_0
0144 1c00 | | Execute_Immediate Run_Utility,0x0
0145 e006 | | Load 0x0,0x6
0146 1b15 | | Execute Package,Field_Read,Field_Number 0x15
0147 02c7 | | Declare_Variable Any
0148 00d8 | | Load_Top At_Offset_0
0149 1c00 | | Execute_Immediate Run_Utility,0x0
014a e007 | | Load 0x0,0x7
014b 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
014c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014d e007 | | Load 0x0,0x7
014e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
014f e006 | | Load 0x0,0x6
0150 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0151 02c7 | | Declare_Variable Any
0152 00d8 | | Load_Top At_Offset_0
0153 1c00 | | Execute_Immediate Run_Utility,0x0
0154 BODY_0138:
0154 00be | | Action Activate_Tasks
0155 e007 | | Load 0x0,0x7
0156 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0157 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0158 e602 | | Load 0x3,0x2
0159 0120 | | Execute Any,Is_Value
015a 6803 |h | Jump_Zero 0x15e
015b e007 | | Load 0x0,0x7
015c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
015d 7801 |x | Jump 0x15f
015e e602 | | Load 0x3,0x2
015f 6064 |`d | Indirect_Literal Discrete,0x1c4,{0x00000000, 0x00004000}
0160 e008 | | Load 0x0,0x8
0161 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0162 e009 | | Load 0x0,0x9
0163 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0164 e007 | | Load 0x0,0x7
0165 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0166 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0167 e5ff | | Load 0x2,-0x1
0168 e001 | | Load 0x0,0x1
0169 1b0e | | Execute Package,Field_Read,Field_Number 0xe
016a 1820 | | Execute Package,Field_Execute,Field_Number 0x20
016b e007 | | Load 0x0,0x7
016c 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
016d 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
016e c602 | | Store 0x3,0x2
016f 005b | [ | Store_Top Discrete,At_Offset_3
0170 e007 | | Load 0x0,0x7
0171 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0172 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0173 e603 | | Load 0x3,0x3
0174 0120 | | Execute Any,Is_Value
0175 6803 |h | Jump_Zero 0x179
0176 e007 | | Load 0x0,0x7
0177 1b0f | | Execute Package,Field_Read,Field_Number 0xf
0178 7801 |x | Jump 0x17a
0179 e603 | | Load 0x3,0x3
017a 6049 |`I | Indirect_Literal Discrete,0x1c4,{0x00000000, 0x00004000}
017b e008 | | Load 0x0,0x8
017c 1b0e | | Execute Package,Field_Read,Field_Number 0xe
017d e009 | | Load 0x0,0x9
017e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
017f e007 | | Load 0x0,0x7
0180 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0181 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0182 e402 | | Load 0x2,0x2
0183 e007 | | Load 0x0,0x7
0184 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
0185 182c | , | Execute Package,Field_Execute,Field_Number 0x2c
0186 c603 | | Store 0x3,0x3
0187 005b | [ | Store_Top Discrete,At_Offset_3
0188 e007 | | Load 0x0,0x7
0189 1b0d | | Execute Package,Field_Read,Field_Number 0xd
018a e604 | | Load 0x3,0x4
018b 4800 |H | Short_Literal 0x0
018c 4800 |H | Short_Literal 0x0
018d e008 | | Load 0x0,0x8
018e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
018f e603 | | Load 0x3,0x3
0190 e006 | | Load 0x0,0x6
0191 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0192 c604 | | Store 0x3,0x4
0193 005a | Z | Store_Top Discrete,At_Offset_2
0194 00db | | Load_Top At_Offset_3
0195 e602 | | Load 0x3,0x2
0196 e006 | | Load 0x0,0x6
0197 1827 | ' | Execute Package,Field_Execute,Field_Number 0x27
0198 c607 | | Store 0x3,0x7
0199 e007 | | Load 0x0,0x7
019a 1b0d | | Execute Package,Field_Read,Field_Number 0xd
019b e604 | | Load 0x3,0x4
019c e006 | | Load 0x0,0x6
019d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
019e c604 | | Store 0x3,0x4
019f 005a | Z | Store_Top Discrete,At_Offset_2
01a0 4801 |H | Short_Literal 0x1
01a1 e001 | | Load 0x0,0x1
01a2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01a3 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a4 00da | | Load_Top At_Offset_2
01a5 e007 | | Load 0x0,0x7
01a6 1b35 | 5 | Execute Package,Field_Read,Field_Number 0x35
01a7 1838 | 8 | Execute Package,Field_Execute,Field_Number 0x38
01a8 0092 0241 | A| Action Push_String_Extended,0x241 ; ".UNITS"
01aa 01cc | | Execute Vector,Catenate
01ab e001 | | Load 0x0,0x1
01ac 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ad 1829 | ) | Execute Package,Field_Execute,Field_Number 0x29
01ae c403 | | Store 0x2,0x3
01af 4501 |E | Exit_Suprogram New_Top_Offset 0x1
01b0 TRAP_0138:
01b0 0007 | | Action Break_Optional
01b1 e007 | | Load 0x0,0x7
01b2 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01b3 e604 | | Load 0x3,0x4
01b4 e006 | | Load 0x0,0x6
01b5 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01b6 c604 | | Store 0x3,0x4
01b7 005b | [ | Store_Top Discrete,At_Offset_3
01b8 e5fe | | Load 0x2,-0x2
01b9 6802 |h | Jump_Zero 0x1bc
01ba e5ff | | Load 0x2,-0x1
01bb 821d | | Call 0x1,0x1d
01bc e001 | | Load 0x0,0x1
01bd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01be 180e | | Execute Package,Field_Execute,Field_Number 0xe
01bf 00cb | | Action Pop_Block_With_Result
01c0 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
01c1 0000 0000 | | .XXX[0x3]
01c3 0000 | |
01c4 0000 0000 | | .LITERAL {0x00000000, 0x00004000}
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01d0 | | .CONST 0x01d0 ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0002 | | .CONST 0x0002 ; Number of locals
01cb INIT_01c8:
01cb 00da | | Load_Top At_Offset_2
01cc e001 | | Load 0x0,0x1
01cd 1b0d | | Execute Package,Field_Read,Field_Number 0xd
01ce 1b56 | V | Execute Package,Field_Read,Field_Number 0x56
01cf 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01d0 BODY_01c8:
01d0 00d8 | | Load_Top At_Offset_0
01d1 e002 | | Load 0x0,0x2
01d2 180f | | Execute Package,Field_Execute,Field_Number 0xf
01d3 027f | | Execute Discrete,Equal
01d4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01d5 0000 0000 | | .XXX[0x3]
01d7 0000 | |
01d8 ; --------------------------------------------------------------------------------------
01d8 ; SUBPROGRAM
01d8 ; --------------------------------------------------------------------------------------
01d8 01df | | .CONST 0x01df ; Address of begin
01d9 01f3 | | .CONST 0x01f3 ; Address of exception handler
01da 0002 | | .CONST 0x0002 ; Number of locals
01db INIT_01d8:
01db e213 | | Load 0x1,0x13
01dc 02c7 | | Declare_Variable Any
01dd 00d8 | | Load_Top At_Offset_0
01de 1c00 | | Execute_Immediate Run_Utility,0x0
01df BODY_01d8:
01df e005 | | Load 0x0,0x5
01e0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01e1 4801 |H | Short_Literal 0x1
01e2 e001 | | Load 0x0,0x1
01e3 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01e4 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e5 0092 0245 | E| Action Push_String_Extended,0x245 ; "<PROFILE>"
01e7 4800 |H | Short_Literal 0x0
01e8 4800 |H | Short_Literal 0x0
01e9 e7ff | | Load 0x3,-0x1
01ea e00a | | Load 0x0,0xa
01eb 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ec e00b | | Load 0x0,0xb
01ed 1817 | | Execute Package,Field_Execute,Field_Number 0x17
01ee c602 | | Store 0x3,0x2
01ef e005 | | Load 0x0,0x5
01f0 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f1 00d8 | | Load_Top At_Offset_0
01f2 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01f3 TRAP_01d8:
01f3 0007 | | Action Break_Optional
01f4 e005 | | Load 0x0,0x5
01f5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f6 00d8 | | Load_Top At_Offset_0
01f7 0101 | | Execute Exception,Reraise
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 4801 |H | Short_Literal 0x1
01fc 0092 0240 | @| Action Push_String_Extended,0x240 ; "<ACTIVITY>"
01fe e7ff | | Load 0x3,-0x1
01ff e00c | | Load 0x0,0xc
0200 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0201 6809 |h | Jump_Zero 0x20b
0202 0092 0246 | F| Action Push_String_Extended,0x246 ; "("
0204 e004 | | Load 0x0,0x4
0205 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0206 01cc | | Execute Vector,Catenate
0207 0092 0247 | G| Action Push_String_Extended,0x247 ; ")"
0209 01cc | | Execute Vector,Catenate
020a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
020b 0092 0246 | F| Action Push_String_Extended,0x246 ; "("
020d 00db | | Load_Top At_Offset_3
020e 01cc | | Execute Vector,Catenate
020f 0092 0247 | G| Action Push_String_Extended,0x247 ; ")"
0211 01cc | | Execute Vector,Catenate
0212 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0213 0000 0000 | | .BLANK 0000[0x5]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 0230 | 0 | .CONST 0x0230 ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0003 | | .CONST 0x0003 ; Number of locals
021b INIT_0218:
021b e5ff | | Load 0x2,-0x1
021c e001 | | Load 0x0,0x1
021d 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021e 1820 | | Execute Package,Field_Execute,Field_Number 0x20
021f 0092 0248 | H| Action Push_String_Extended,0x248 ; "'view"
0221 01cc | | Execute Vector,Catenate
0222 e5fd | | Load 0x2,-0x3
0223 8403 | | Call 0x2,0x3
0224 01cc | | Execute Vector,Catenate
0225 0007 | | Action Break_Optional
0226 e212 | | Load 0x1,0x12
0227 02c7 | | Declare_Variable Any
0228 4801 |H | Short_Literal 0x1
0229 e001 | | Load 0x0,0x1
022a 1b0e | | Execute Package,Field_Read,Field_Number 0xe
022b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
022c 00db | | Load_Top At_Offset_3
022d e00b | | Load 0x0,0xb
022e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
022f a603 | | Store_Unchecked 0x3,0x3
0230 BODY_0218:
0230 00d8 | | Load_Top At_Offset_0
0231 e001 | | Load 0x0,0x1
0232 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0233 1834 | 4 | Execute Package,Field_Execute,Field_Number 0x34
0234 6807 |h | Jump_Zero 0x23c
0235 e5ff | | Load 0x2,-0x1
0236 821d | | Call 0x1,0x1d
0237 e001 | | Load 0x0,0x1
0238 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0239 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
023a 00cb | | Action Pop_Block_With_Result
023b 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
023c 00d9 | | Load_Top At_Offset_1
023d 8402 | | Call 0x2,0x2
023e 00cb | | Action Pop_Block_With_Result
023f 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3
0240 ; --------------------------------------------------------------------------------------
0240 ; STRING TABLE
0240 ; --------------------------------------------------------------------------------------
0240 0014 | | .STRTAB 0x0014->0x024a ; "<ACTIVITY>"
0241 001c | | .STRTAB 0x001c->0x024f ; ".UNITS"
0242 0020 | | .STRTAB 0x0020->0x0252 ; "Could not find combined view for "
0243 003f | ? | .STRTAB 0x003f->0x0262 ; "Could not find load view for "
0244 005a | Z | .STRTAB 0x005a->0x0271 ; "'spec_view & Activity_Image (Activity_name)"
0245 0083 | | .STRTAB 0x0083->0x0286 ; "<PROFILE>"
0246 008a | | .STRTAB 0x008a->0x028b ; "("
0247 0089 | | .STRTAB 0x0089->0x028b ; ")"
0248 0088 | | .STRTAB 0x0088->0x028c ; "'view"
0249 008b | | .STREND 0x008b->0x028e
024a 3c41 4354 |<ACT| .STRTAB_STRINGS
028f 0000 | | .XXX[0x1]
0290 ; --------------------------------------------------------------------------------------
0290 ; Debug Table
0290 ; --------------------------------------------------------------------------------------
0290 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0ed0,0x0000,0x0001,0x0000
0296 6d39 d5fb |m9 | .XXX[0x16a]
0298 787e 861b |x~ |
029a 1147 55e6 | GU |
029c 6dbd 7867 |m xg|
029e 99b9 ea1e | |
02a0 9e0b 4199 | A |
02a2 0458 2c5d | X,]|
02a4 3138 ec00 |18 |
02a6 ae1b 2833 | (3|
02a8 ae00 ae27 | '|
02aa e837 19ff | 7 |
02ac ba00 6807 | h |
02ae 3e0b d615 |> |
02b0 0a0e 3a1c | : |
02b2 e56f ea1a | o |
02b4 e58a 1914 | |
02b6 b403 9444 | D|
02b8 3207 b935 |2 5|
02ba f617 cddf | |
02bc a867 b064 | g d|
02be 10f6 7de5 | } |
02c0 81b6 a8dd | |
02c2 c972 cc96 | r |
02c4 b61a e527 | '|
02c6 1d23 f92f | # /|
02c8 756c 6605 |ulf |
02ca 1449 d93c | I <|
02cc e936 95e5 | 6 |
02ce cc94 4605 | F |
02d0 35db 39d7 |5 9 |
02d2 4d8c 3c02 |M < |
02d4 9065 e20e | e |
02d6 000d ea0f | |
02d8 3cb4 11d1 |< |
02da f60d c969 | i|
02dc fe0d 8828 | (|
02de 4c0a 9807 |L |
02e0 5451 2802 |TQ( |
02e2 a489 aa04 | |
02e4 412f fa01 |A/ |
02e6 084f 4a18 | OJ |
02e8 b43e 415b | >A[|
02ea 645e 71e7 |d^q |
02ec 88ee 79e5 | y |
02ee 4dc6 49c8 |M I |
02f0 f001 3495 | 4 |
02f2 0a1e 560f | V |
02f4 d802 e947 | G|
02f6 7a13 5ddc |z ] |
02f8 0811 2402 | $ |
02fa 6892 4603 |h F |
02fc 9d76 1c2b | v +|
02fe b603 7dde | } |
0300 9027 9e14 | ' |
0302 de2e 6e00 | .n |
0304 fc16 4e17 | N |
0306 fa07 fa00 | |
0308 41e0 9de2 |A |
030a e835 5a0e | 5Z |
030c c88c 1a07 | |
030e fa03 b1db | |
0310 4617 0866 |F f|
0312 15cc 10f4 | |
0314 2549 b8dc |%I |
0316 8d3b 0e19 | ; |
0318 51d8 d1e4 |Q |
031a d004 d9e5 | |
031c d00c 8e2b | +|
031e 5800 6e06 |X n |
0320 2a04 7a04 |* z |
0322 4607 3439 |F 49|
0324 aca8 8e04 | |
0326 9607 39d6 | 9 |
0328 153c f91d | < |
032a 7828 ae06 |x( |
032c 61e7 cc5e |a ^|
032e 2a15 5a18 |* Z |
0330 fa0b 2e15 | . |
0332 6619 0a2e |f .|
0334 420c 0400 |B |
0336 ec03 d19b | |
0338 7619 821b |v |
033a d803 1919 | |
033c fa2c 79e0 | ,y |
033e 0001 2402 | $ |
0340 ac74 b515 | t |
0342 753b 38ba |u;8 |
0344 80e9 ac0c | |
0346 2e1c 0cee |. |
0348 41b0 b9c7 |A |
034a 2c60 7de4 |,`} |
034c 880c 1e07 | |
034e 7618 c5e0 |v |
0350 521f ba16 |R |
0352 90d7 c217 | |
0354 a618 69b4 | i |
0356 e1e1 e0d0 | |
0358 e9e3 346c | 4l|
035a 180c b618 | |
035c 0811 c001 | |
035e 4606 e217 |F |
0360 1875 ca06 | u |
0362 05b9 60e8 | ` |
0364 a4c1 406c | @l|
0366 ea18 2001 | |
0368 bc01 31e0 | 1 |
036a 0618 69b5 | i |
036c 3de0 b61c |= |
036e c9c8 dd3b | ;|
0370 91fc 8029 | )|
0372 1915 0423 | #|
0374 2e16 e087 |. |
0376 3616 e22d |6 -|
0378 621a 360f |b 6 |
037a 6d47 661a |mGf |
037c 49c8 ec00 |I |
037e 14d5 4619 | F |
0380 91e2 8c73 | s|
0382 6802 2214 |h " |
0384 c4a3 0000 | |
0386 8229 d480 | ) |
0388 4604 4cf7 |F L |
038a b472 1146 | r F|
038c 0526 7207 | &r |
038e e177 9d76 | w v|
0390 040a 0c09 | |
0392 be21 d96c | ! l|
0394 fc05 20e7 | |
0396 9d77 c818 | w |
0398 4802 e9f0 |H |
039a a81c 4606 | F |
039c 6e18 4619 |n F |
039e 043d be21 | = !|
03a0 8d9c 3e2b | >+|
03a2 6834 4d27 |h4M'|
03a4 c054 3434 | T44|
03a6 fc05 c803 | |
03a8 31eb 5c34 |1 \4|
03aa 3c01 1e24 |< $|
03ac 5228 4228 |R(B(|
03ae e4cb 0000 | |
03b0 c05b 00f9 | [ |
03b2 1939 5844 | 9XD|
03b4 9800 2884 | ( |
03b6 022f 1168 | / h|
03b8 e943 1d68 | C h|
03ba 7c42 156a ||B j|
03bc 5205 e463 |R c|
03be 9d77 0104 | w |
03c0 6c69 2448 |li$H|
03c2 b5c3 58f7 | X |
03c4 7c3c 6e11 ||<n |
03c6 5e2e ee0c |^. |
03c8 ba32 71db | 2q |
03ca 5df3 a207 |] |
03cc 5a07 593c |Z Y<|
03ce 7803 e429 |x )|
03d0 1938 b418 | 8 |
03d2 1828 093a | ( :|
03d4 e064 d004 | d |
03d6 7c14 7607 || v |
03d8 9d75 7410 | ut |
03da ea26 2d9e | &- |
03dc 500e f022 |P "|
03de 900f 8dea | |
03e0 8401 994b | K|
03e2 8da2 080a | |
03e4 e02f 2d71 | /-q|
03e6 b801 7dd4 | } |
03e8 91d7 c912 | |
03ea a8c1 bc48 | H|
03ec 9a29 b086 | ) |
03ee d51e 4154 | AT|
03f0 6a02 88f7 |j |
03f2 31e0 5401 |1 T |
03f4 c424 5c01 | $\ |
03f6 8e00 6a00 | j |
03f8 7203 7831 |r x1|
03fa 2cd2 dcb5 |, |
03fc 144b 2de1 | K- |
03fe 9420 8e25 | %|