|
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_0a7cf5
└─⟦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 dc54 5401 | TT | .XXX[0x16a]
0298 7e01 4a21 |~ J!|
029a b634 9e05 | 4 |
029c b235 a096 | 5 |
029e d1fd 4623 | F#|
02a0 7230 5803 |r0X |
02a2 6dfa 6621 |m f!|
02a4 de37 ea09 | 7 |
02a6 ce34 5803 | 4X |
02a8 f609 c234 | 4|
02aa 0400 5803 | X |
02ac ee21 f634 | ! 4|
02ae c205 da37 | 7|
02b0 a630 5c01 | 0\ |
02b2 4222 6a23 |B"j#|
02b4 dc54 5c01 | T\ |
02b6 ac09 8e26 | &|
02b8 0803 0630 | 0|
02ba 5c02 3a11 |\ : |
02bc e220 0400 | |
02be 5c03 29fc |\ ) |
02c0 1402 be0a | |
02c2 5237 4e02 |R7N |
02c4 b230 6001 | 0` |
02c6 0237 a630 | 7 0|
02c8 6003 0dfb |` |
02ca 1604 0400 | |
02cc 6003 99f7 |` |
02ce be2e 8a37 | . 7|
02d0 c9f9 6236 | b6|
02d2 8a37 2df0 | 7- |
02d4 2802 a234 |( 4|
02d6 6002 ee0a |` |
02d8 b237 e5f5 | 7 |
02da 1e34 6000 | 4` |
02dc 9e0b d9fa | |
02de 8a36 e600 | 6 |
02e0 7607 7230 |v r0|
02e2 6402 3a05 |d : |
02e4 1234 6401 | 4d |
02e6 a202 ee35 | 5|
02e8 1a17 d200 | |
02ea 0400 6403 | d |
02ec a612 ee37 | 7|
02ee a226 ee35 | & 5|
02f0 8a0a ee36 | 6|
02f2 d9f6 de37 | 7|
02f4 a630 6802 | 0h |
02f6 c5ee 3a37 | :7|
02f8 0630 6802 | 0h |
02fa ee0b e630 | 0|
02fc 6802 b60a |h |
02fe a234 6800 | 4h |
0300 6203 5a30 |b Z0|
0302 6802 cdf9 |h |
0304 e1f7 7230 | r0|
0306 6800 9e05 |h |
0308 b21f dc54 | T|
030a 6802 d9f7 |h |
030c 0234 6c01 | 4l |
030e 2e09 220c |. " |
0310 0400 6c03 | l |
0312 6a02 5e37 |j ^7|
0314 7230 6c01 |r0l |
0316 ca37 ae35 | 7 5|
0318 d636 0234 | 6 4|
031a 7000 aa09 |p |
031c 3403 7230 |4 r0|
031e 7002 6a2f |p j/|
0320 2e0c 0400 |. |
0322 7001 862a |p *|
0324 f230 7001 | 0p |
0326 5a02 c230 |Z 0|
0328 7000 4e29 |p N)|
032a 3613 dc54 |6 T|
032c 7401 3220 |t 2 |
032e 4803 7230 |H r0|
0330 7403 b9f0 |t |
0332 2003 7e34 | ~4|
0334 0400 7403 | t |
0336 1214 ce00 | |
0338 2e3a f607 |.: |
033a 9a34 7402 | 4t |
033c c236 b230 | 6 0|
033e 7400 1a06 |t |
0340 f230 7622 | 0v"|
0342 7203 7230 |r r0|
0344 7802 d62c |x ,|
0346 6a3a 0a04 |j: |
0348 8e10 0400 | |
034a 7802 4222 |x B"|
034c c230 7c00 | 0| |
034e 160d fa14 | |
0350 0400 7c03 | | |
0352 29f8 1401 |) |
0354 a634 7c03 | 4| |
0356 a9f4 1402 | |
0358 7dfb dc54 |} T|
035a 7c00 7e1b || ~ |
035c 3e04 9e38 |> 8|
035e c600 aa3b | ;|
0360 7230 7c00 |r0| |
0362 9e08 1402 | |
0364 b1f7 a630 | 0|
0366 7c02 d9f4 || |
0368 1401 2217 | " |
036a dc54 8001 | T |
036c aa08 1403 | |
036e 01f1 063a | :|
0370 2624 be38 |&$ 8|
0372 0400 8003 | |
0374 2a04 7e38 |* ~8|
0376 8001 d633 | 3|
0378 5a30 8403 |Z0 |
037a 91f8 3a17 | : |
037c a630 8401 | 0 |
037e 95f0 da39 | 9|
0380 4e38 cdfb |N8 |
0382 3a36 e230 |:6 0|
0384 8802 3ded | = |
0386 663b dc56 |f; V|
0388 882b 11ee | + |
038a 3633 a630 |63 0|
038c 8c03 4df6 | M |
038e 8df1 7003 | p |
0390 0630 8c01 | 0 |
0392 0a30 2003 | 0 |
0394 6e13 dc54 |n T|
0396 8c03 9230 | 0|
0398 2003 2003 | |
039a 0630 9002 | 0 |
039c d630 2402 | 0$ |
039e ba1a e230 | 0|
03a0 9001 ca0d | |
03a2 2003 9801 | |
03a4 c639 6238 | 9b8|
03a6 2800 b801 |( |
03a8 c63b e1ee | ; |
03aa 11f1 ea3a | :|
03ac e230 9401 | 0 |
03ae 7238 1c03 |r8 |
03b0 5403 0630 |T 0|
03b2 9400 f40a | |
03b4 8df2 222a | "*|
03b6 0e3a 95ee | : |
03b8 8df1 6a12 | j |
03ba 0e3a e9ee | : |
03bc 61ee 0624 |a $|
03be 0400 9401 | |
03c0 c5ee 11f1 | |
03c2 79fe 5638 |y V8|
03c4 ba16 61ef | a |
03c6 aa16 5638 | V8|
03c8 ee34 2000 | 4 |
03ca 5003 0630 |P 0|
03cc 9802 6e12 | n |
03ce 11f3 2c02 | , |
03d0 8a3a 3634 | :64|
03d2 2002 ea20 | |
03d4 0400 9801 | |
03d6 e60a 11f0 | |
03d8 4002 8a3a |@ :|
03da d9ee 11f1 | |
03dc 6dfa e232 |m 2|
03de 4dfb 11ef |M |
03e0 1213 dc54 | T|
03e2 9803 f9fe | |
03e4 11f0 8802 | |
03e6 8a39 51fe | 9Q |
03e8 61ec 7003 |a p |
03ea 0630 9c01 | 0 |
03ec a1ee 61ed | a |
03ee 0003 0638 | 8|
03f0 6a30 71f3 |j0q |
03f2 063b 5607 | ;V |
03f4 e630 9c00 | 0 |
03f6 fe33 7230 | 3r0|
03f8 a002 b63b | ;|
03fa 223a e230 |": 0|
03fc a000 b639 | 9|
03fe ee2f dc54 | / T|