|
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 - metrics - download
Length: 3072 (0xc00)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_6a18da
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─⟦cfc2e13cd⟧ »Space Info Vol 2«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0498 | | .CONST 0x0498 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 010e | | .CONST 0x010e ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0045 | E | .CONST 0x0045 ; Number of locals
000b INIT_0008:
000b 03a9 | | Declare_Type Heap_Access,Incomplete,Visible
000c 03a9 | | Declare_Type Heap_Access,Incomplete,Visible
000d 029a 0113 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0110
000f 029a 0123 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0120
0011 029a 0153 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0150
0013 029a 0163 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0160
0015 029a 0173 | s| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0170
0017 029a 018b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0188
0019 00e4 | | Load_Encached Positive_Cache
001a 0266 | f | Execute Discrete,Bounds
001b e20e | | Load 0x1,0xe
001c 02a0 | | Declare_Subprogram Null_Subprogram
001d 4801 |H | Short_Literal 0x1
001e 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
001f 03a9 | | Declare_Type Heap_Access,Incomplete,Visible
0020 029a 01a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01a0
0022 029a 01ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01a8
0024 029a 01fb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_01f8
0026 029a 020b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0208
0028 029a 021b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0218
002a 029a 022b | +| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0228
002c 029a 023b | ;| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0238
002e 029a 024b | K| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0248
0030 029a 025b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0258
0032 029a 026b | k| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0268
0034 029a 027b | {| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0278
0036 029a 028b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0288
0038 029a 029b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0298
003a 029a 02ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02a8
003c 00e4 | | Load_Encached Positive_Cache
003d 0266 | f | Execute Discrete,Bounds
003e e216 | | Load 0x1,0x16
003f 02a0 | | Declare_Subprogram Null_Subprogram
0040 4801 |H | Short_Literal 0x1
0041 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0042 03a9 | | Declare_Type Heap_Access,Incomplete,Visible
0043 029a 02bb | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02b8
0045 029a 02c3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_02c0
0047 029a 0303 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0300
0049 029a 0313 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0310
004b 029a 0323 | #| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0320
004d 029a 0333 | 3| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0330
004f 029a 0343 | C| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0340
0051 00e4 | | Load_Encached Positive_Cache
0052 0266 | f | Execute Discrete,Bounds
0053 e226 | & | Load 0x1,0x26
0054 02a0 | | Declare_Subprogram Null_Subprogram
0055 4801 |H | Short_Literal 0x1
0056 0351 | Q | Declare_Type Array,Defined,Visible,Bounds_With_Object
0057 4fff |O | Short_Literal 0x7ff
0058 60bf |` | Indirect_Literal Discrete,0x118,{0x00000000, 0x7fffffff}
0059 00e2 | | Load_Encached Integer_Cache
005a 03f9 | | Declare_Type Discrete,Constrained,Visible
005b 4800 |H | Short_Literal 0x0
005c 4900 |I | Short_Literal 0x100
005d 00da | | Load_Top At_Offset_2
005e 03f9 | | Declare_Type Discrete,Constrained,Visible
005f 03a9 | | Declare_Type Heap_Access,Incomplete,Visible
0060 029a 0353 | S| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0350
0062 029a 035b | [| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0358
0064 029a 0363 | c| Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0360
0066 e001 | | Load 0x0,0x1
0067 0129 | ) | Execute Any,Make_Visible
0068 029a 03a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03a0
006a 029a 03ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03a8
006c 029a 03d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03d0
006e 029a 03e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03e0
0070 029a 03f3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_03f0
0072 029a 0403 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0400
0074 e002 | | Load 0x0,0x2
0075 1b3f | ? | Execute Package,Field_Read,Field_Number 0x3f
0076 00d8 | | Load_Top At_Offset_0
0077 02a0 | | Declare_Subprogram Null_Subprogram
0078 e20d | | Load 0x1,0xd
0079 03a3 | | Complete_Type Heap_Access,By_Defining
007a e003 | | Load 0x0,0x3
007b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
007c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
007d 00e3 | | Load_Encached Natural_Cache
007e e004 | | Load 0x0,0x4
007f 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0080 e004 | | Load 0x0,0x4
0081 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0082 029f 0443 | C| Declare_Subprogram For_Call,INIT_0440
0084 4804 |H | Short_Literal 0x4
0085 032d | - | Declare_Type Record,Defined
0086 00d8 | | Load_Top At_Offset_0
0087 02a0 | | Declare_Subprogram Null_Subprogram
0088 e20e | | Load 0x1,0xe
0089 03a3 | | Complete_Type Heap_Access,By_Defining
008a e003 | | Load 0x0,0x3
008b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
008c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
008d 00e4 | | Load_Encached Positive_Cache
008e 00e4 | | Load_Encached Positive_Cache
008f e20d | | Load 0x1,0xd
0090 00d8 | | Load_Top At_Offset_0
0091 00e2 | | Load_Encached Integer_Cache
0092 00e2 | | Load_Encached Integer_Cache
0093 00e2 | | Load_Encached Integer_Cache
0094 00e4 | | Load_Encached Positive_Cache
0095 00e4 | | Load_Encached Positive_Cache
0096 00e1 | | Load_Encached Boolean_Cache
0097 00e1 | | Load_Encached Boolean_Cache
0098 02a0 | | Declare_Subprogram Null_Subprogram
0099 480c |H | Short_Literal 0xc
009a 032d | - | Declare_Type Record,Defined
009b 00d8 | | Load_Top At_Offset_0
009c 02a0 | | Declare_Subprogram Null_Subprogram
009d e216 | | Load 0x1,0x16
009e 03a3 | | Complete_Type Heap_Access,By_Defining
009f e003 | | Load 0x0,0x3
00a0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
00a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a2 00e4 | | Load_Encached Positive_Cache
00a3 00e2 | | Load_Encached Integer_Cache
00a4 e20d | | Load 0x1,0xd
00a5 00d8 | | Load_Top At_Offset_0
00a6 02a0 | | Declare_Subprogram Null_Subprogram
00a7 4805 |H | Short_Literal 0x5
00a8 032d | - | Declare_Type Record,Defined
00a9 00d8 | | Load_Top At_Offset_0
00aa 02a0 | | Declare_Subprogram Null_Subprogram
00ab e226 | & | Load 0x1,0x26
00ac 03a3 | | Complete_Type Heap_Access,By_Defining
00ad e215 | | Load 0x1,0x15
00ae 02a0 | | Declare_Subprogram Null_Subprogram
00af 03ad | | Declare_Type Heap_Access,Defined
00b0 e225 | % | Load 0x1,0x25
00b1 02a0 | | Declare_Subprogram Null_Subprogram
00b2 03ad | | Declare_Type Heap_Access,Defined
00b3 e22e | . | Load 0x1,0x2e
00b4 02a0 | | Declare_Subprogram Null_Subprogram
00b5 03ad | | Declare_Type Heap_Access,Defined
00b6 00e2 | | Load_Encached Integer_Cache
00b7 00db | | Load_Top At_Offset_3
00b8 00db | | Load_Top At_Offset_3
00b9 e226 | & | Load 0x1,0x26
00ba 02a0 | | Declare_Subprogram Null_Subprogram
00bb 4804 |H | Short_Literal 0x4
00bc 032d | - | Declare_Type Record,Defined
00bd 00d8 | | Load_Top At_Offset_0
00be 02a0 | | Declare_Subprogram Null_Subprogram
00bf e231 | 1 | Load 0x1,0x31
00c0 03a3 | | Complete_Type Heap_Access,By_Defining
00c1 00bf | | Action Accept_Activation
00c2 029d 0413 | | Declare_Subprogram For_Outer_Call,INIT_0410
00c4 029d 042b | +| Declare_Subprogram For_Outer_Call,INIT_0428
00c6 1d0f | | Execute_Immediate Reference_Lex_1,0xf
00c7 00c7 | | Action Elaborate_Subprogram
00c8 1d10 | | Execute_Immediate Reference_Lex_1,0x10
00c9 00c7 | | Action Elaborate_Subprogram
00ca 1d11 | | Execute_Immediate Reference_Lex_1,0x11
00cb 00c7 | | Action Elaborate_Subprogram
00cc 1d12 | | Execute_Immediate Reference_Lex_1,0x12
00cd 00c7 | | Action Elaborate_Subprogram
00ce 1d13 | | Execute_Immediate Reference_Lex_1,0x13
00cf 00c7 | | Action Elaborate_Subprogram
00d0 1d14 | | Execute_Immediate Reference_Lex_1,0x14
00d1 00c7 | | Action Elaborate_Subprogram
00d2 1d17 | | Execute_Immediate Reference_Lex_1,0x17
00d3 00c7 | | Action Elaborate_Subprogram
00d4 1d18 | | Execute_Immediate Reference_Lex_1,0x18
00d5 00c7 | | Action Elaborate_Subprogram
00d6 1d19 | | Execute_Immediate Reference_Lex_1,0x19
00d7 00c7 | | Action Elaborate_Subprogram
00d8 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
00d9 00c7 | | Action Elaborate_Subprogram
00da 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00db 00c7 | | Action Elaborate_Subprogram
00dc 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00dd 00c7 | | Action Elaborate_Subprogram
00de 1d1d | | Execute_Immediate Reference_Lex_1,0x1d
00df 00c7 | | Action Elaborate_Subprogram
00e0 1d1e | | Execute_Immediate Reference_Lex_1,0x1e
00e1 00c7 | | Action Elaborate_Subprogram
00e2 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
00e3 00c7 | | Action Elaborate_Subprogram
00e4 1d20 | | Execute_Immediate Reference_Lex_1,0x20
00e5 00c7 | | Action Elaborate_Subprogram
00e6 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21
00e7 00c7 | | Action Elaborate_Subprogram
00e8 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
00e9 00c7 | | Action Elaborate_Subprogram
00ea 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
00eb 00c7 | | Action Elaborate_Subprogram
00ec 1d24 | $ | Execute_Immediate Reference_Lex_1,0x24
00ed 00c7 | | Action Elaborate_Subprogram
00ee 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
00ef 00c7 | | Action Elaborate_Subprogram
00f0 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
00f1 00c7 | | Action Elaborate_Subprogram
00f2 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
00f3 00c7 | | Action Elaborate_Subprogram
00f4 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
00f5 00c7 | | Action Elaborate_Subprogram
00f6 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
00f7 00c7 | | Action Elaborate_Subprogram
00f8 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
00f9 00c7 | | Action Elaborate_Subprogram
00fa 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
00fb 00c7 | | Action Elaborate_Subprogram
00fc 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
00fd 00c7 | | Action Elaborate_Subprogram
00fe 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
00ff 00c7 | | Action Elaborate_Subprogram
0100 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
0101 00c7 | | Action Elaborate_Subprogram
0102 1d36 | 6 | Execute_Immediate Reference_Lex_1,0x36
0103 00c7 | | Action Elaborate_Subprogram
0104 1d37 | 7 | Execute_Immediate Reference_Lex_1,0x37
0105 00c7 | | Action Elaborate_Subprogram
0106 1d38 | 8 | Execute_Immediate Reference_Lex_1,0x38
0107 00c7 | | Action Elaborate_Subprogram
0108 1d39 | 9 | Execute_Immediate Reference_Lex_1,0x39
0109 00c7 | | Action Elaborate_Subprogram
010a 1d3a | : | Execute_Immediate Reference_Lex_1,0x3a
010b 00c7 | | Action Elaborate_Subprogram
010c 1d3b | ; | Execute_Immediate Reference_Lex_1,0x3b
010d 00c7 | | Action Elaborate_Subprogram
010e BODY_0008:
010e 00bc | | Action Signal_Activated
010f 00bb | | Action Signal_Completion
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 0113 | | .CONST 0x0113 ; Address of begin
0111 0004 | | .CONST 0x0004 ; Address of exception handler
0112 0001 | | .CONST 0x0001 ; Number of locals
0113 BODY_0110:
0113 INIT_0110:
0113 00da | | Load_Top At_Offset_2
0114 021d | | Execute Heap_Access,Is_Null
0115 4401 |D | Exit_Subprogram With_Result,0x1
0116 0000 0000 | | .XXX[0x2]
0118 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
011c 0000 0000 | | .BLANK 0000[0x4]
0120 ; --------------------------------------------------------------------------------------
0120 ; SUBPROGRAM
0120 ; --------------------------------------------------------------------------------------
0120 0123 | # | .CONST 0x0123 ; Address of begin
0121 0141 | A | .CONST 0x0141 ; Address of exception handler
0122 0001 | | .CONST 0x0001 ; Number of locals
0123 BODY_0120:
0123 INIT_0120:
0123 e23d | = | Load 0x1,0x3d
0124 0322 | " | Declare_Variable Record
0125 e5fb | | Load 0x2,-0x5
0126 e5ff | | Load 0x2,-0x1
0127 e003 | | Load 0x0,0x3
0128 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0129 180e | | Execute Package,Field_Execute,Field_Number 0xe
012a 00d9 | | Load_Top At_Offset_1
012b 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
012c e5fe | | Load 0x2,-0x2
012d 00d9 | | Load_Top At_Offset_1
012e 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
012f e5fd | | Load 0x2,-0x3
0130 e23d | = | Load 0x1,0x3d
0131 3002 |0 | Execute Record,Field_Type,Field_Number 0x2
0132 0119 | | Execute Any,Check_In_Formal_Type
0133 00d9 | | Load_Top At_Offset_1
0134 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0135 e5fc | | Load 0x2,-0x4
0136 e23d | = | Load 0x1,0x3d
0137 3003 |0 | Execute Record,Field_Type,Field_Number 0x3
0138 0119 | | Execute Any,Check_In_Formal_Type
0139 00d9 | | Load_Top At_Offset_1
013a 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
013b e20e | | Load 0x1,0xe
013c e5fb | | Load 0x2,-0x5
013d e005 | | Load 0x0,0x5
013e 180f | | Execute Package,Field_Execute,Field_Number 0xf
013f 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0140 4405 |D | Exit_Subprogram With_Result,0x5
0141 TRAP_0120:
0141 e005 | | Load 0x0,0x5
0142 1b12 | | Execute Package,Field_Read,Field_Number 0x12
0143 010f | | Execute Exception,Equal
0144 6803 |h | Jump_Zero 0x148
0145 e003 | | Load 0x0,0x3
0146 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0147 0257 | W | Execute Discrete,Raise
0148 e005 | | Load 0x0,0x5
0149 1b11 | | Execute Package,Field_Read,Field_Number 0x11
014a 010f | | Execute Exception,Equal
014b 6803 |h | Jump_Zero 0x14f
014c e003 | | Load 0x0,0x3
014d 1b0f | | Execute Package,Field_Read,Field_Number 0xf
014e 0257 | W | Execute Discrete,Raise
014f 0100 | | Execute Exception,Raise
0150 ; --------------------------------------------------------------------------------------
0150 ; SUBPROGRAM
0150 ; --------------------------------------------------------------------------------------
0150 0153 | S | .CONST 0x0153 ; Address of begin
0151 0004 | | .CONST 0x0004 ; Address of exception handler
0152 0001 | | .CONST 0x0001 ; Number of locals
0153 BODY_0150:
0153 INIT_0150:
0153 00da | | Load_Top At_Offset_2
0154 7003 |p | Jump_Nonzero 0x158
0155 e003 | | Load 0x0,0x3
0156 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0157 0257 | W | Execute Discrete,Raise
0158 00da | | Load_Top At_Offset_2
0159 0217 | | Execute Heap_Access,All_Reference
015a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
015b e003 | | Load 0x0,0x3
015c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
015d 180f | | Execute Package,Field_Execute,Field_Number 0xf
015e 4401 |D | Exit_Subprogram With_Result,0x1
015f 0000 | | .XXX[0x1]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163 | c | .CONST 0x0163 ; Address of begin
0161 0004 | | .CONST 0x0004 ; Address of exception handler
0162 0001 | | .CONST 0x0001 ; Number of locals
0163 BODY_0160:
0163 INIT_0160:
0163 00da | | Load_Top At_Offset_2
0164 7003 |p | Jump_Nonzero 0x168
0165 e003 | | Load 0x0,0x3
0166 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0167 0257 | W | Execute Discrete,Raise
0168 00da | | Load_Top At_Offset_2
0169 0217 | | Execute Heap_Access,All_Reference
016a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
016b 4401 |D | Exit_Subprogram With_Result,0x1
016c 0000 0000 | | .BLANK 0000[0x4]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173 | s | .CONST 0x0173 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 0001 | | .CONST 0x0001 ; Number of locals
0173 BODY_0170:
0173 INIT_0170:
0173 00da | | Load_Top At_Offset_2
0174 7003 |p | Jump_Nonzero 0x178
0175 e003 | | Load 0x0,0x3
0176 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0177 0257 | W | Execute Discrete,Raise
0178 00da | | Load_Top At_Offset_2
0179 0217 | | Execute Heap_Access,All_Reference
017a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
017b 00d8 | | Load_Top At_Offset_0
017c 0120 | | Execute Any,Is_Value
017d 7002 |p | Jump_Nonzero 0x180
017e 00d8 | | Load_Top At_Offset_0
017f 011e | | Execute Any,Convert
0180 4401 |D | Exit_Subprogram With_Result,0x1
0181 0000 0000 | | .BLANK 0000[0x7]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018b | | .CONST 0x018b ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0001 | | .CONST 0x0001 ; Number of locals
018b BODY_0188:
018b INIT_0188:
018b 00da | | Load_Top At_Offset_2
018c 7003 |p | Jump_Nonzero 0x190
018d e003 | | Load 0x0,0x3
018e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
018f 0257 | W | Execute Discrete,Raise
0190 00da | | Load_Top At_Offset_2
0191 0217 | | Execute Heap_Access,All_Reference
0192 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0193 00d8 | | Load_Top At_Offset_0
0194 0120 | | Execute Any,Is_Value
0195 7002 |p | Jump_Nonzero 0x198
0196 00d8 | | Load_Top At_Offset_0
0197 011e | | Execute Any,Convert
0198 4401 |D | Exit_Subprogram With_Result,0x1
0199 0000 0000 | | .BLANK 0000[0x7]
01a0 ; --------------------------------------------------------------------------------------
01a0 ; SUBPROGRAM
01a0 ; --------------------------------------------------------------------------------------
01a0 01a3 | | .CONST 0x01a3 ; Address of begin
01a1 0004 | | .CONST 0x0004 ; Address of exception handler
01a2 0001 | | .CONST 0x0001 ; Number of locals
01a3 BODY_01a0:
01a3 INIT_01a0:
01a3 00da | | Load_Top At_Offset_2
01a4 021d | | Execute Heap_Access,Is_Null
01a5 4401 |D | Exit_Subprogram With_Result,0x1
01a6 0000 0000 | | .XXX[0x2]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 01e7 | | .CONST 0x01e7 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab e23e | > | Load 0x1,0x3e
01ac 0322 | " | Declare_Variable Record
01ad e5f3 | | Load 0x2,-0xd
01ae e5ff | | Load 0x2,-0x1
01af e003 | | Load 0x0,0x3
01b0 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01b1 180e | | Execute Package,Field_Execute,Field_Number 0xe
01b2 00d9 | | Load_Top At_Offset_1
01b3 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
01b4 e5fe | | Load 0x2,-0x2
01b5 00d9 | | Load_Top At_Offset_1
01b6 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
01b7 e5fd | | Load 0x2,-0x3
01b8 00d9 | | Load_Top At_Offset_1
01b9 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
01ba e5fc | | Load 0x2,-0x4
01bb 8244 | D | Call 0x1,0x44
01bc e20d | | Load 0x1,0xd
01bd e5f3 | | Load 0x2,-0xd
01be e005 | | Load 0x0,0x5
01bf 180f | | Execute Package,Field_Execute,Field_Number 0xf
01c0 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
01c1 00d9 | | Load_Top At_Offset_1
01c2 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
01c3 e5fb | | Load 0x2,-0x5
01c4 8244 | D | Call 0x1,0x44
01c5 e20d | | Load 0x1,0xd
01c6 e5f3 | | Load 0x2,-0xd
01c7 e005 | | Load 0x0,0x5
01c8 180f | | Execute Package,Field_Execute,Field_Number 0xf
01c9 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
01ca 00d9 | | Load_Top At_Offset_1
01cb 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
01cc e5fa | | Load 0x2,-0x6
01cd 00d9 | | Load_Top At_Offset_1
01ce 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
01cf e5f9 | | Load 0x2,-0x7
01d0 00d9 | | Load_Top At_Offset_1
01d1 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
01d2 e5f8 | | Load 0x2,-0x8
01d3 00d9 | | Load_Top At_Offset_1
01d4 3807 |8 | Execute Record,Field_Write,Field_Number 0x7
01d5 e5f7 | | Load 0x2,-0x9
01d6 00d9 | | Load_Top At_Offset_1
01d7 3808 |8 | Execute Record,Field_Write,Field_Number 0x8
01d8 e5f6 | | Load 0x2,-0xa
01d9 00d9 | | Load_Top At_Offset_1
01da 3809 |8 | Execute Record,Field_Write,Field_Number 0x9
01db e5f5 | | Load 0x2,-0xb
01dc 00d9 | | Load_Top At_Offset_1
01dd 380a |8 | Execute Record,Field_Write,Field_Number 0xa
01de e5f4 | | Load 0x2,-0xc
01df 00d9 | | Load_Top At_Offset_1
01e0 380b |8 | Execute Record,Field_Write,Field_Number 0xb
01e1 e216 | | Load 0x1,0x16
01e2 e5f3 | | Load 0x2,-0xd
01e3 e005 | | Load 0x0,0x5
01e4 180f | | Execute Package,Field_Execute,Field_Number 0xf
01e5 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
01e6 440d |D | Exit_Subprogram With_Result,0xd
01e7 TRAP_01a8:
01e7 e005 | | Load 0x0,0x5
01e8 1b12 | | Execute Package,Field_Read,Field_Number 0x12
01e9 010f | | Execute Exception,Equal
01ea 6803 |h | Jump_Zero 0x1ee
01eb e003 | | Load 0x0,0x3
01ec 1b10 | | Execute Package,Field_Read,Field_Number 0x10
01ed 0257 | W | Execute Discrete,Raise
01ee e005 | | Load 0x0,0x5
01ef 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01f0 010f | | Execute Exception,Equal
01f1 6803 |h | Jump_Zero 0x1f5
01f2 e003 | | Load 0x0,0x3
01f3 1b0f | | Execute Package,Field_Read,Field_Number 0xf
01f4 0257 | W | Execute Discrete,Raise
01f5 0100 | | Execute Exception,Raise
01f6 0000 0000 | | .XXX[0x2]
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 00da | | Load_Top At_Offset_2
01fc 7003 |p | Jump_Nonzero 0x200
01fd e003 | | Load 0x0,0x3
01fe 1b0e | | Execute Package,Field_Read,Field_Number 0xe
01ff 0257 | W | Execute Discrete,Raise
0200 00da | | Load_Top At_Offset_2
0201 0217 | | Execute Heap_Access,All_Reference
0202 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0203 e003 | | Load 0x0,0x3
0204 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0205 180f | | Execute Package,Field_Execute,Field_Number 0xf
0206 4401 |D | Exit_Subprogram With_Result,0x1
0207 0000 | | .XXX[0x1]
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 020b | | .CONST 0x020b ; Address of begin
0209 0004 | | .CONST 0x0004 ; Address of exception handler
020a 0001 | | .CONST 0x0001 ; Number of locals
020b BODY_0208:
020b INIT_0208:
020b 00da | | Load_Top At_Offset_2
020c 7003 |p | Jump_Nonzero 0x210
020d e003 | | Load 0x0,0x3
020e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
020f 0257 | W | Execute Discrete,Raise
0210 00da | | Load_Top At_Offset_2
0211 0217 | | Execute Heap_Access,All_Reference
0212 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
0213 4401 |D | Exit_Subprogram With_Result,0x1
0214 0000 0000 | | .BLANK 0000[0x4]
0218 ; --------------------------------------------------------------------------------------
0218 ; SUBPROGRAM
0218 ; --------------------------------------------------------------------------------------
0218 021b | | .CONST 0x021b ; Address of begin
0219 0004 | | .CONST 0x0004 ; Address of exception handler
021a 0001 | | .CONST 0x0001 ; Number of locals
021b BODY_0218:
021b INIT_0218:
021b 00da | | Load_Top At_Offset_2
021c 7003 |p | Jump_Nonzero 0x220
021d e003 | | Load 0x0,0x3
021e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
021f 0257 | W | Execute Discrete,Raise
0220 00da | | Load_Top At_Offset_2
0221 0217 | | Execute Heap_Access,All_Reference
0222 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
0223 4401 |D | Exit_Subprogram With_Result,0x1
0224 0000 0000 | | .BLANK 0000[0x4]
0228 ; --------------------------------------------------------------------------------------
0228 ; SUBPROGRAM
0228 ; --------------------------------------------------------------------------------------
0228 022b | + | .CONST 0x022b ; Address of begin
0229 0004 | | .CONST 0x0004 ; Address of exception handler
022a 0001 | | .CONST 0x0001 ; Number of locals
022b BODY_0228:
022b INIT_0228:
022b 00da | | Load_Top At_Offset_2
022c 7003 |p | Jump_Nonzero 0x230
022d e003 | | Load 0x0,0x3
022e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
022f 0257 | W | Execute Discrete,Raise
0230 00da | | Load_Top At_Offset_2
0231 0217 | | Execute Heap_Access,All_Reference
0232 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
0233 8245 | E | Call 0x1,0x45
0234 4401 |D | Exit_Subprogram With_Result,0x1
0235 0000 0000 | | .XXX[0x3]
0237 0000 | |
0238 ; --------------------------------------------------------------------------------------
0238 ; SUBPROGRAM
0238 ; --------------------------------------------------------------------------------------
0238 023b | ; | .CONST 0x023b ; Address of begin
0239 0004 | | .CONST 0x0004 ; Address of exception handler
023a 0001 | | .CONST 0x0001 ; Number of locals
023b BODY_0238:
023b INIT_0238:
023b 00da | | Load_Top At_Offset_2
023c 7003 |p | Jump_Nonzero 0x240
023d e003 | | Load 0x0,0x3
023e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
023f 0257 | W | Execute Discrete,Raise
0240 00da | | Load_Top At_Offset_2
0241 0217 | | Execute Heap_Access,All_Reference
0242 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
0243 8245 | E | Call 0x1,0x45
0244 4401 |D | Exit_Subprogram With_Result,0x1
0245 0000 0000 | | .XXX[0x3]
0247 0000 | |
0248 ; --------------------------------------------------------------------------------------
0248 ; SUBPROGRAM
0248 ; --------------------------------------------------------------------------------------
0248 024b | K | .CONST 0x024b ; Address of begin
0249 0004 | | .CONST 0x0004 ; Address of exception handler
024a 0001 | | .CONST 0x0001 ; Number of locals
024b BODY_0248:
024b INIT_0248:
024b 00da | | Load_Top At_Offset_2
024c 7003 |p | Jump_Nonzero 0x250
024d e003 | | Load 0x0,0x3
024e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
024f 0257 | W | Execute Discrete,Raise
0250 00da | | Load_Top At_Offset_2
0251 0217 | | Execute Heap_Access,All_Reference
0252 3c05 |< | Execute Record,Field_Read,Field_Number 0x5
0253 4401 |D | Exit_Subprogram With_Result,0x1
0254 0000 0000 | | .BLANK 0000[0x4]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 025b | [ | .CONST 0x025b ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0001 | | .CONST 0x0001 ; Number of locals
025b BODY_0258:
025b INIT_0258:
025b 00da | | Load_Top At_Offset_2
025c 7003 |p | Jump_Nonzero 0x260
025d e003 | | Load 0x0,0x3
025e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
025f 0257 | W | Execute Discrete,Raise
0260 00da | | Load_Top At_Offset_2
0261 0217 | | Execute Heap_Access,All_Reference
0262 3c06 |< | Execute Record,Field_Read,Field_Number 0x6
0263 4401 |D | Exit_Subprogram With_Result,0x1
0264 0000 0000 | | .BLANK 0000[0x4]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b 00da | | Load_Top At_Offset_2
026c 7003 |p | Jump_Nonzero 0x270
026d e003 | | Load 0x0,0x3
026e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
026f 0257 | W | Execute Discrete,Raise
0270 00da | | Load_Top At_Offset_2
0271 0217 | | Execute Heap_Access,All_Reference
0272 3c07 |< | Execute Record,Field_Read,Field_Number 0x7
0273 4401 |D | Exit_Subprogram With_Result,0x1
0274 0000 0000 | | .BLANK 0000[0x4]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 027b | { | .CONST 0x027b ; Address of begin
0279 0004 | | .CONST 0x0004 ; Address of exception handler
027a 0001 | | .CONST 0x0001 ; Number of locals
027b BODY_0278:
027b INIT_0278:
027b 00da | | Load_Top At_Offset_2
027c 7003 |p | Jump_Nonzero 0x280
027d e003 | | Load 0x0,0x3
027e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
027f 0257 | W | Execute Discrete,Raise
0280 00da | | Load_Top At_Offset_2
0281 0217 | | Execute Heap_Access,All_Reference
0282 3c08 |< | Execute Record,Field_Read,Field_Number 0x8
0283 4401 |D | Exit_Subprogram With_Result,0x1
0284 0000 0000 | | .BLANK 0000[0x4]
0288 ; --------------------------------------------------------------------------------------
0288 ; SUBPROGRAM
0288 ; --------------------------------------------------------------------------------------
0288 028b | | .CONST 0x028b ; Address of begin
0289 0004 | | .CONST 0x0004 ; Address of exception handler
028a 0001 | | .CONST 0x0001 ; Number of locals
028b BODY_0288:
028b INIT_0288:
028b 00da | | Load_Top At_Offset_2
028c 7003 |p | Jump_Nonzero 0x290
028d e003 | | Load 0x0,0x3
028e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
028f 0257 | W | Execute Discrete,Raise
0290 00da | | Load_Top At_Offset_2
0291 0217 | | Execute Heap_Access,All_Reference
0292 3c09 |< | Execute Record,Field_Read,Field_Number 0x9
0293 4401 |D | Exit_Subprogram With_Result,0x1
0294 0000 0000 | | .BLANK 0000[0x4]
0298 ; --------------------------------------------------------------------------------------
0298 ; SUBPROGRAM
0298 ; --------------------------------------------------------------------------------------
0298 029b | | .CONST 0x029b ; Address of begin
0299 0004 | | .CONST 0x0004 ; Address of exception handler
029a 0001 | | .CONST 0x0001 ; Number of locals
029b BODY_0298:
029b INIT_0298:
029b 00da | | Load_Top At_Offset_2
029c 7003 |p | Jump_Nonzero 0x2a0
029d e003 | | Load 0x0,0x3
029e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
029f 0257 | W | Execute Discrete,Raise
02a0 00da | | Load_Top At_Offset_2
02a1 0217 | | Execute Heap_Access,All_Reference
02a2 3c0a |< | Execute Record,Field_Read,Field_Number 0xa
02a3 4401 |D | Exit_Subprogram With_Result,0x1
02a4 0000 0000 | | .BLANK 0000[0x4]
02a8 ; --------------------------------------------------------------------------------------
02a8 ; SUBPROGRAM
02a8 ; --------------------------------------------------------------------------------------
02a8 02ab | | .CONST 0x02ab ; Address of begin
02a9 0004 | | .CONST 0x0004 ; Address of exception handler
02aa 0001 | | .CONST 0x0001 ; Number of locals
02ab BODY_02a8:
02ab INIT_02a8:
02ab 00da | | Load_Top At_Offset_2
02ac 7003 |p | Jump_Nonzero 0x2b0
02ad e003 | | Load 0x0,0x3
02ae 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02af 0257 | W | Execute Discrete,Raise
02b0 00da | | Load_Top At_Offset_2
02b1 0217 | | Execute Heap_Access,All_Reference
02b2 3c0b |< | Execute Record,Field_Read,Field_Number 0xb
02b3 4401 |D | Exit_Subprogram With_Result,0x1
02b4 0000 0000 | | .BLANK 0000[0x4]
02b8 ; --------------------------------------------------------------------------------------
02b8 ; SUBPROGRAM
02b8 ; --------------------------------------------------------------------------------------
02b8 02bb | | .CONST 0x02bb ; Address of begin
02b9 0004 | | .CONST 0x0004 ; Address of exception handler
02ba 0001 | | .CONST 0x0001 ; Number of locals
02bb BODY_02b8:
02bb INIT_02b8:
02bb 00da | | Load_Top At_Offset_2
02bc 021d | | Execute Heap_Access,Is_Null
02bd 4401 |D | Exit_Subprogram With_Result,0x1
02be 0000 0000 | | .XXX[0x2]
02c0 ; --------------------------------------------------------------------------------------
02c0 ; SUBPROGRAM
02c0 ; --------------------------------------------------------------------------------------
02c0 02c3 | | .CONST 0x02c3 ; Address of begin
02c1 02ea | | .CONST 0x02ea ; Address of exception handler
02c2 0001 | | .CONST 0x0001 ; Number of locals
02c3 BODY_02c0:
02c3 INIT_02c0:
02c3 e23f | ? | Load 0x1,0x3f
02c4 0322 | " | Declare_Variable Record
02c5 e5fa | | Load 0x2,-0x6
02c6 e5ff | | Load 0x2,-0x1
02c7 e003 | | Load 0x0,0x3
02c8 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02c9 180e | | Execute Package,Field_Execute,Field_Number 0xe
02ca 00d9 | | Load_Top At_Offset_1
02cb 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
02cc e5fe | | Load 0x2,-0x2
02cd 00d9 | | Load_Top At_Offset_1
02ce 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
02cf e5fd | | Load 0x2,-0x3
02d0 00d9 | | Load_Top At_Offset_1
02d1 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
02d2 e5fc | | Load 0x2,-0x4
02d3 8244 | D | Call 0x1,0x44
02d4 e20d | | Load 0x1,0xd
02d5 e5fa | | Load 0x2,-0x6
02d6 e005 | | Load 0x0,0x5
02d7 180f | | Execute Package,Field_Execute,Field_Number 0xf
02d8 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
02d9 00d9 | | Load_Top At_Offset_1
02da 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
02db e5fb | | Load 0x2,-0x5
02dc 8244 | D | Call 0x1,0x44
02dd e20d | | Load 0x1,0xd
02de e5fa | | Load 0x2,-0x6
02df e005 | | Load 0x0,0x5
02e0 180f | | Execute Package,Field_Execute,Field_Number 0xf
02e1 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
02e2 00d9 | | Load_Top At_Offset_1
02e3 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
02e4 e226 | & | Load 0x1,0x26
02e5 e5fa | | Load 0x2,-0x6
02e6 e005 | | Load 0x0,0x5
02e7 180f | | Execute Package,Field_Execute,Field_Number 0xf
02e8 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
02e9 4406 |D | Exit_Subprogram With_Result,0x6
02ea TRAP_02c0:
02ea e005 | | Load 0x0,0x5
02eb 1b12 | | Execute Package,Field_Read,Field_Number 0x12
02ec 010f | | Execute Exception,Equal
02ed 6803 |h | Jump_Zero 0x2f1
02ee e003 | | Load 0x0,0x3
02ef 1b10 | | Execute Package,Field_Read,Field_Number 0x10
02f0 0257 | W | Execute Discrete,Raise
02f1 e005 | | Load 0x0,0x5
02f2 1b11 | | Execute Package,Field_Read,Field_Number 0x11
02f3 010f | | Execute Exception,Equal
02f4 6803 |h | Jump_Zero 0x2f8
02f5 e003 | | Load 0x0,0x3
02f6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
02f7 0257 | W | Execute Discrete,Raise
02f8 0100 | | Execute Exception,Raise
02f9 0000 0000 | | .BLANK 0000[0x7]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303 | | .CONST 0x0303 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0001 | | .CONST 0x0001 ; Number of locals
0303 BODY_0300:
0303 INIT_0300:
0303 00da | | Load_Top At_Offset_2
0304 7003 |p | Jump_Nonzero 0x308
0305 e003 | | Load 0x0,0x3
0306 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0307 0257 | W | Execute Discrete,Raise
0308 00da | | Load_Top At_Offset_2
0309 0217 | | Execute Heap_Access,All_Reference
030a 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
030b e003 | | Load 0x0,0x3
030c 1b11 | | Execute Package,Field_Read,Field_Number 0x11
030d 180f | | Execute Package,Field_Execute,Field_Number 0xf
030e 4401 |D | Exit_Subprogram With_Result,0x1
030f 0000 | | .XXX[0x1]
0310 ; --------------------------------------------------------------------------------------
0310 ; SUBPROGRAM
0310 ; --------------------------------------------------------------------------------------
0310 0313 | | .CONST 0x0313 ; Address of begin
0311 0004 | | .CONST 0x0004 ; Address of exception handler
0312 0001 | | .CONST 0x0001 ; Number of locals
0313 BODY_0310:
0313 INIT_0310:
0313 00da | | Load_Top At_Offset_2
0314 7003 |p | Jump_Nonzero 0x318
0315 e003 | | Load 0x0,0x3
0316 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0317 0257 | W | Execute Discrete,Raise
0318 00da | | Load_Top At_Offset_2
0319 0217 | | Execute Heap_Access,All_Reference
031a 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
031b 4401 |D | Exit_Subprogram With_Result,0x1
031c 0000 0000 | | .BLANK 0000[0x4]
0320 ; --------------------------------------------------------------------------------------
0320 ; SUBPROGRAM
0320 ; --------------------------------------------------------------------------------------
0320 0323 | # | .CONST 0x0323 ; Address of begin
0321 0004 | | .CONST 0x0004 ; Address of exception handler
0322 0001 | | .CONST 0x0001 ; Number of locals
0323 BODY_0320:
0323 INIT_0320:
0323 00da | | Load_Top At_Offset_2
0324 7003 |p | Jump_Nonzero 0x328
0325 e003 | | Load 0x0,0x3
0326 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0327 0257 | W | Execute Discrete,Raise
0328 00da | | Load_Top At_Offset_2
0329 0217 | | Execute Heap_Access,All_Reference
032a 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
032b 4401 |D | Exit_Subprogram With_Result,0x1
032c 0000 0000 | | .BLANK 0000[0x4]
0330 ; --------------------------------------------------------------------------------------
0330 ; SUBPROGRAM
0330 ; --------------------------------------------------------------------------------------
0330 0333 | 3 | .CONST 0x0333 ; Address of begin
0331 0004 | | .CONST 0x0004 ; Address of exception handler
0332 0001 | | .CONST 0x0001 ; Number of locals
0333 BODY_0330:
0333 INIT_0330:
0333 00da | | Load_Top At_Offset_2
0334 7003 |p | Jump_Nonzero 0x338
0335 e003 | | Load 0x0,0x3
0336 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0337 0257 | W | Execute Discrete,Raise
0338 00da | | Load_Top At_Offset_2
0339 0217 | | Execute Heap_Access,All_Reference
033a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
033b 8245 | E | Call 0x1,0x45
033c 4401 |D | Exit_Subprogram With_Result,0x1
033d 0000 0000 | | .XXX[0x3]
033f 0000 | |
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0343 | C | .CONST 0x0343 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0001 | | .CONST 0x0001 ; Number of locals
0343 BODY_0340:
0343 INIT_0340:
0343 00da | | Load_Top At_Offset_2
0344 7003 |p | Jump_Nonzero 0x348
0345 e003 | | Load 0x0,0x3
0346 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0347 0257 | W | Execute Discrete,Raise
0348 00da | | Load_Top At_Offset_2
0349 0217 | | Execute Heap_Access,All_Reference
034a 3c04 |< | Execute Record,Field_Read,Field_Number 0x4
034b 8245 | E | Call 0x1,0x45
034c 4401 |D | Exit_Subprogram With_Result,0x1
034d 0000 0000 | | .XXX[0x3]
034f 0000 | |
0350 ; --------------------------------------------------------------------------------------
0350 ; SUBPROGRAM
0350 ; --------------------------------------------------------------------------------------
0350 0353 | S | .CONST 0x0353 ; Address of begin
0351 0004 | | .CONST 0x0004 ; Address of exception handler
0352 0001 | | .CONST 0x0001 ; Number of locals
0353 BODY_0350:
0353 INIT_0350:
0353 e231 | 1 | Load 0x1,0x31
0354 00ca | | Action Exit_Nullary_Function
0355 0000 0000 | | .XXX[0x3]
0357 0000 | |
0358 ; --------------------------------------------------------------------------------------
0358 ; SUBPROGRAM
0358 ; --------------------------------------------------------------------------------------
0358 035b | [ | .CONST 0x035b ; Address of begin
0359 0004 | | .CONST 0x0004 ; Address of exception handler
035a 0001 | | .CONST 0x0001 ; Number of locals
035b BODY_0358:
035b INIT_0358:
035b 00da | | Load_Top At_Offset_2
035c 021d | | Execute Heap_Access,Is_Null
035d 4401 |D | Exit_Subprogram With_Result,0x1
035e 0000 0000 | | .XXX[0x2]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 036b | k | .CONST 0x036b ; Address of begin
0361 038d | | .CONST 0x038d ; Address of exception handler
0362 0005 | | .CONST 0x0005 ; Number of locals
0363 INIT_0360:
0363 e006 | | Load 0x0,0x6
0364 1b23 | # | Execute Package,Field_Read,Field_Number 0x23
0365 e240 | @ | Load 0x1,0x40
0366 0007 | | Action Break_Optional
0367 e241 | A | Load 0x1,0x41
0368 0007 | | Action Break_Optional
0369 e226 | & | Load 0x1,0x26
036a 0007 | | Action Break_Optional
036b BODY_0360:
036b e5fb | | Load 0x2,-0x5
036c e005 | | Load 0x0,0x5
036d 180f | | Execute Package,Field_Execute,Field_Number 0xf
036e a402 | | Store_Unchecked 0x2,0x2
036f e5fe | | Load 0x2,-0x2
0370 e240 | @ | Load 0x1,0x40
0371 e402 | | Load 0x2,0x2
0372 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0373 0033 | 3 | Store_Top Heap_Access,At_Offset_3
0374 e5fd | | Load 0x2,-0x3
0375 e241 | A | Load 0x1,0x41
0376 e402 | | Load 0x2,0x2
0377 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
0378 0032 | 2 | Store_Top Heap_Access,At_Offset_2
0379 e5fc | | Load 0x2,-0x4
037a 0031 | 1 | Store_Top Heap_Access,At_Offset_1
037b e243 | C | Load 0x1,0x43
037c 0322 | " | Declare_Variable Record
037d e5ff | | Load 0x2,-0x1
037e 00d9 | | Load_Top At_Offset_1
037f 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0380 00db | | Load_Top At_Offset_3
0381 00d9 | | Load_Top At_Offset_1
0382 3801 |8 | Execute Record,Field_Write,Field_Number 0x1
0383 00da | | Load_Top At_Offset_2
0384 00d9 | | Load_Top At_Offset_1
0385 3802 |8 | Execute Record,Field_Write,Field_Number 0x2
0386 00d9 | | Load_Top At_Offset_1
0387 00d9 | | Load_Top At_Offset_1
0388 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0389 e231 | 1 | Load 0x1,0x31
038a e402 | | Load 0x2,0x2
038b 0396 | | Declare_Variable Heap_Access,By_Allocation,With_Value
038c 4405 |D | Exit_Subprogram With_Result,0x5
038d TRAP_0360:
038d e005 | | Load 0x0,0x5
038e 1b12 | | Execute Package,Field_Read,Field_Number 0x12
038f 010f | | Execute Exception,Equal
0390 6803 |h | Jump_Zero 0x394
0391 e003 | | Load 0x0,0x3
0392 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0393 0257 | W | Execute Discrete,Raise
0394 e005 | | Load 0x0,0x5
0395 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0396 010f | | Execute Exception,Equal
0397 6803 |h | Jump_Zero 0x39b
0398 e003 | | Load 0x0,0x3
0399 1b0f | | Execute Package,Field_Read,Field_Number 0xf
039a 0257 | W | Execute Discrete,Raise
039b 0100 | | Execute Exception,Raise
039c 0000 0000 | | .BLANK 0000[0x4]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03a3 | | .CONST 0x03a3 ; Address of begin
03a1 0004 | | .CONST 0x0004 ; Address of exception handler
03a2 0001 | | .CONST 0x0001 ; Number of locals
03a3 BODY_03a0:
03a3 INIT_03a0:
03a3 e5fb | | Load 0x2,-0x5
03a4 e007 | | Load 0x0,0x7
03a5 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03a6 c5fb | | Store 0x2,-0x5
03a7 4505 |E | Exit_Subprogram 0x5
03a8 ; --------------------------------------------------------------------------------------
03a8 ; SUBPROGRAM
03a8 ; --------------------------------------------------------------------------------------
03a8 03ab | | .CONST 0x03ab ; Address of begin
03a9 0004 | | .CONST 0x0004 ; Address of exception handler
03aa 0001 | | .CONST 0x0001 ; Number of locals
03ab BODY_03a8:
03ab INIT_03a8:
03ab 00da | | Load_Top At_Offset_2
03ac 8233 | 3 | Call 0x1,0x33
03ad 6801 |h | Jump_Zero 0x3af
03ae 4502 |E | Exit_Subprogram 0x2
03af 0092 045b | [| Action Push_String_Extended,0x45b ; "Predefined Environment Characteristics Customizations"
03b1 4800 |H | Short_Literal 0x0
03b2 8008 | | Call 0x0,0x8
03b3 00da | | Load_Top At_Offset_2
03b4 8238 | 8 | Call 0x1,0x38
03b5 0092 045c | \| Action Push_String_Extended,0x45c ; "Standard Version"
03b7 4801 |H | Short_Literal 0x1
03b8 8009 | | Call 0x0,0x9
03b9 4801 |H | Short_Literal 0x1
03ba 00db | | Load_Top At_Offset_3
03bb 8239 | 9 | Call 0x1,0x39
03bc 0092 045d | ]| Action Push_String_Extended,0x45d ; "Integer Types"
03be 800a | | Call 0x0,0xa
03bf 4801 |H | Short_Literal 0x1
03c0 00db | | Load_Top At_Offset_3
03c1 823a | : | Call 0x1,0x3a
03c2 0092 045e | ^| Action Push_String_Extended,0x45e ; "Float Types"
03c4 800b | | Call 0x0,0xb
03c5 4801 |H | Short_Literal 0x1
03c6 00db | | Load_Top At_Offset_3
03c7 823b | ; | Call 0x1,0x3b
03c8 0092 045f | _| Action Push_String_Extended,0x45f ; "Duration"
03ca 800c | | Call 0x0,0xc
03cb 4502 |E | Exit_Subprogram 0x2
03cc 0000 0000 | | .BLANK 0000[0x4]
03d0 ; --------------------------------------------------------------------------------------
03d0 ; SUBPROGRAM
03d0 ; --------------------------------------------------------------------------------------
03d0 03d3 | | .CONST 0x03d3 ; Address of begin
03d1 0004 | | .CONST 0x0004 ; Address of exception handler
03d2 0001 | | .CONST 0x0001 ; Number of locals
03d3 BODY_03d0:
03d3 INIT_03d0:
03d3 00da | | Load_Top At_Offset_2
03d4 7003 |p | Jump_Nonzero 0x3d8
03d5 e003 | | Load 0x0,0x3
03d6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03d7 0257 | W | Execute Discrete,Raise
03d8 00da | | Load_Top At_Offset_2
03d9 0217 | | Execute Heap_Access,All_Reference
03da 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
03db 4401 |D | Exit_Subprogram With_Result,0x1
03dc 0000 0000 | | .BLANK 0000[0x4]
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 00da | | Load_Top At_Offset_2
03e4 7003 |p | Jump_Nonzero 0x3e8
03e5 e003 | | Load 0x0,0x3
03e6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03e7 0257 | W | Execute Discrete,Raise
03e8 00da | | Load_Top At_Offset_2
03e9 0217 | | Execute Heap_Access,All_Reference
03ea 3c01 |< | Execute Record,Field_Read,Field_Number 0x1
03eb 0217 | | Execute Heap_Access,All_Reference
03ec 0335 | 5 | Declare_Variable Array,Duplicate
03ed 00cd | | Action Spare6_Action
03ee 4401 |D | Exit_Subprogram With_Result,0x1
03ef 0000 | | .XXX[0x1]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 00da | | Load_Top At_Offset_2
03f4 7003 |p | Jump_Nonzero 0x3f8
03f5 e003 | | Load 0x0,0x3
03f6 1b0e | | Execute Package,Field_Read,Field_Number 0xe
03f7 0257 | W | Execute Discrete,Raise
03f8 00da | | Load_Top At_Offset_2
03f9 0217 | | Execute Heap_Access,All_Reference
03fa 3c02 |< | Execute Record,Field_Read,Field_Number 0x2
03fb 0217 | | Execute Heap_Access,All_Reference
03fc 0335 | 5 | Declare_Variable Array,Duplicate
03fd 00cd | | Action Spare6_Action
03fe 4401 |D | Exit_Subprogram With_Result,0x1
03ff 0000 | | .XXX[0x1]
0400 ; --------------------------------------------------------------------------------------
0400 ; SUBPROGRAM
0400 ; --------------------------------------------------------------------------------------
0400 0403 | | .CONST 0x0403 ; Address of begin
0401 0004 | | .CONST 0x0004 ; Address of exception handler
0402 0001 | | .CONST 0x0001 ; Number of locals
0403 BODY_0400:
0403 INIT_0400:
0403 00da | | Load_Top At_Offset_2
0404 7003 |p | Jump_Nonzero 0x408
0405 e003 | | Load 0x0,0x3
0406 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0407 0257 | W | Execute Discrete,Raise
0408 00da | | Load_Top At_Offset_2
0409 0217 | | Execute Heap_Access,All_Reference
040a 3c03 |< | Execute Record,Field_Read,Field_Number 0x3
040b 4401 |D | Exit_Subprogram With_Result,0x1
040c 0000 0000 | | .BLANK 0000[0x4]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413 | | .CONST 0x0413 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0001 | | .CONST 0x0001 ; Number of locals
0413 BODY_0410:
0413 INIT_0410:
0413 4820 |H | Short_Literal 0x20
0414 00db | | Load_Top At_Offset_3
0415 e004 | | Load 0x0,0x4
0416 186a | j | Execute Package,Field_Execute,Field_Number 0x6a
0417 e00d | | Load 0x0,0xd
0418 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0419 4820 |H | Short_Literal 0x20
041a e5ff | | Load 0x2,-0x1
041b e004 | | Load 0x0,0x4
041c 1869 | i | Execute Package,Field_Execute,Field_Number 0x69
041d e00d | | Load 0x0,0xd
041e 181c | | Execute Package,Field_Execute,Field_Number 0x1c
041f e002 | | Load 0x0,0x2
0420 1b67 | g | Execute Package,Field_Read,Field_Number 0x67
0421 1831 | 1 | Execute Package,Field_Execute,Field_Number 0x31
0422 4401 |D | Exit_Subprogram With_Result,0x1
0423 0000 0000 | | .BLANK 0000[0x5]
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042b | + | .CONST 0x042b ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0001 | | .CONST 0x0001 ; Number of locals
042b BODY_0428:
042b INIT_0428:
042b 4820 |H | Short_Literal 0x20
042c 00db | | Load_Top At_Offset_3
042d 0217 | | Execute Heap_Access,All_Reference
042e e002 | | Load 0x0,0x2
042f 1858 | X | Execute Package,Field_Execute,Field_Number 0x58
0430 e00d | | Load 0x0,0xd
0431 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0432 4820 |H | Short_Literal 0x20
0433 e5ff | | Load 0x2,-0x1
0434 0217 | | Execute Heap_Access,All_Reference
0435 e002 | | Load 0x0,0x2
0436 1856 | V | Execute Package,Field_Execute,Field_Number 0x56
0437 e00d | | Load 0x0,0xd
0438 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0439 e004 | | Load 0x0,0x4
043a 1861 | a | Execute Package,Field_Execute,Field_Number 0x61
043b 4401 |D | Exit_Subprogram With_Result,0x1
043c 0000 0000 | | .BLANK 0000[0x4]
0440 ; --------------------------------------------------------------------------------------
0440 ; SUBPROGRAM
0440 ; --------------------------------------------------------------------------------------
0440 0443 | C | .CONST 0x0443 ; Address of begin
0441 0004 | | .CONST 0x0004 ; Address of exception handler
0442 0001 | | .CONST 0x0001 ; Number of locals
0443 BODY_0440:
0443 INIT_0440:
0443 4608 |F | Jump_Case 0x8
0444 7808 |x | Jump 0x44d ; case 0x0
0445 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
0446 7813 |x | Jump 0x45a ; case 0x2
0447 7812 |x | Jump 0x45a ; case 0x3
0448 7811 |x | Jump 0x45a ; case 0x4
0449 7810 |x | Jump 0x45a ; case 0x5
044a 780f |x | Jump 0x45a ; case 0x6
044b 780e |x | Jump 0x45a ; case 0x7
044c 780d |x | Jump 0x45a ; case 0x8
044d 00da | | Load_Top At_Offset_2
044e 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
044f 0125 | % | Execute Any,Set_Constraint
0450 00da | | Load_Top At_Offset_2
0451 3402 |4 | Execute Record,Field_Reference,Field_Number 0x2
0452 1c00 | | Execute_Immediate Run_Utility,0x0
0453 00da | | Load_Top At_Offset_2
0454 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0455 0125 | % | Execute Any,Set_Constraint
0456 00da | | Load_Top At_Offset_2
0457 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3
0458 1c00 | | Execute_Immediate Run_Utility,0x0
0459 4302 |C | Exit_Subprogram From_Utility,0x2
045a 0869 | i | Execute_Immediate Raise,0x69
045b ; --------------------------------------------------------------------------------------
045b ; STRING TABLE
045b ; --------------------------------------------------------------------------------------
045b 000c | | .STRTAB 0x000c->0x0461 ; "Predefined Environment Characteristics Customizations"
045c 003f | ? | .STRTAB 0x003f->0x047b ; "Standard Version"
045d 004d | M | .STRTAB 0x004d->0x0483 ; "Integer Types"
045e 0058 | X | .STRTAB 0x0058->0x048a ; "Float Types"
045f 0061 | a | .STRTAB 0x0061->0x048f ; "Duration"
0460 0067 | g | .STREND 0x0067->0x0493
0461 5072 6564 |Pred| .STRTAB_STRINGS
0494 0000 0000 | | .BLANK 0000[0x4]
0498 ; --------------------------------------------------------------------------------------
0498 ; Debug Table
0498 ; --------------------------------------------------------------------------------------
0498 0004 000c | | .DEBUG4 0x0004,0x000c,0x2e70,0x0000,0x0001,0x0000
049e 0000 0000 | | .BLANK 0000[0x162]