|
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_1060f5
└─⟦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 0000 0000 | | .XXX[0x8]
0298 4000 0002 |@ |
029a 9000 0081 | |
029c 4899 c000 |H |
029e 0000 0000 | | .BLANK 0000[0x1b]
02b9 0140 3800 | @8 | .XXX[0x1e]
02bb e001 3cb0 | < |
02bd 0006 bfd6 | |
02bf 8750 1000 | P |
02c1 8000 ad00 | |
02c3 0000 0c4e | N|
02c5 8000 0200 | |
02c7 0000 0300 | |
02c9 2800 0000 |( |
02cb 0800 0002 | |
02cd 0000 0011 | |
02cf 0000 0000 | |
02d1 0800 0000 | |
02d3 5200 0010 |R |
02d5 2918 0800 |) |
02d7 0000 0000 | | .BLANK 0000[0x1b]
02f2 0028 0700 | ( | .XXX[0x2]
02f4 0000 0000 | | .BLANK 0000[0xd]
0301 0020 0500 | | .XXX[0xc]
0303 0000 0000 | |
0305 0000 4000 | @ |
0307 0002 2000 | |
0309 0000 0100 | |
030b 0000 0a00 | |
030d 0000 0000 | | .BLANK 0000[0x2d]
033a 0004 00a0 | | .XXX[0xc]
033c 0000 0000 | |
033e 0000 0800 | |
0340 0000 4400 | D |
0342 0000 0020 | |
0344 0000 0140 | @|
0346 0000 0000 | | .BLANK 0000[0x2e]
0374 8014 0000 | | .XXX[0xb]
0376 0000 0000 | |
0378 0100 0000 | |
037a 0880 0000 | |
037c 0004 0000 | |
037e 0028 | ( |
037f 0000 0000 | | .BLANK 0000[0x2e]
03ad 1002 8000 | | .XXX[0xb]
03af 0000 0000 | |
03b1 0020 0000 | |
03b3 0110 0000 | |
03b5 0000 8000 | |
03b7 0005 | |
03b8 0000 0000 | | .BLANK 0000[0x48]