|
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, 5813_R1K_CODE, 75_tag, NULL, R1k_Segment, seg_0500e0
└─⟦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 5813 |X | .CONST 0x5813 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0320 | | .CONST 0x0320 ; 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 0002 | | .CONST 0x0002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; SUBPROGRAM
0008 ; See instruction 0x02cf at 0x2d5, index=0x0
0008 ; --------------------------------------------------------------------------------------
0008 0090 | | .CONST 0x0090 ; Address of begin
; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
; Address of exception handler
000a 0024 | $ | .CONST 0x0024 ; Number of locals
; Number of locals
000b INIT_0008:
000b INIT_0008:
000b 0007 | | Action Break_Optional ; Debug Table 0x0 = .DEBUG 0x000b,0x03ca,0x8000,0x0000,0x004c,0x32d6,0x0000,0x0009
; Debug Table 0x0.0x0 = 0xb,0xffff
000c 0007 | | Action Break_Optional ; Debug Table 0x0.0x1 = 0xc,0xfffe
000d 629e |b | Indirect_Literal Discrete,0x2ac,{0x00000000, 0x0e100000} ; Debug Table 0x0.0x2 = 0xd,0xfffd
000e 00e7 | | Load_Encached Duration_Cache
000f 03f0 | | Declare_Variable Discrete,Visible,With_Value
0010 5a97 |Z | Indirect_Literal Float,0x2a8,259200.0 ; Debug Table 0x0.0x3 = 0x10,0xfffc
0011 5a92 |Z | Indirect_Literal Float,0x2a4,3.0517578125e-05
0012 023a | : | Execute Float,Divide
0013 0236 | 6 | Execute Float,Truncate_To_Discrete
0014 00e7 | | Load_Encached Duration_Cache
0015 03f0 | | Declare_Variable Discrete,Visible,With_Value
0016 029a 009b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0098 ; Debug Table 0x0.0x4 = 0x16,0xfffb
0018 029a 00a3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a0 ; Debug Table 0x0.0x5 = 0x18,0xfffa
001a e001 | | Load 0x0,0x1 ; Debug Table 0x0.0x6 = 0x1a,0xfff9
001b 1916 | | Execute Package,Field_Reference,Field_Number 0x16
001c 0129 | ) | Execute Any,Make_Visible
001d 029a 00ab | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00a8 ; Debug Table 0x0.0x7 = 0x1d,0xfff8
001f 029a 00d3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00d0 ; Debug Table 0x0.0x8 = 0x1f,0xfff7
0021 0007 | | Action Break_Optional ; Debug Table 0x0.0x9 = 0x21,0xfff6
0022 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xa = 0x22,0xfff5
0023 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0024 0129 | ) | Execute Any,Make_Visible
0025 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xb = 0x25,0xfff4
0026 1912 | | Execute Package,Field_Reference,Field_Number 0x12
0027 0129 | ) | Execute Any,Make_Visible
0028 e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xc = 0x28,0xfff3
0029 1913 | | Execute Package,Field_Reference,Field_Number 0x13
002a 0129 | ) | Execute Any,Make_Visible
002b e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xd = 0x2b,0xfff2
002c 1914 | | Execute Package,Field_Reference,Field_Number 0x14
002d 0129 | ) | Execute Any,Make_Visible
002e e001 | | Load 0x0,0x1 ; Debug Table 0x0.0xe = 0x2e,0xfff1
002f 1915 | | Execute Package,Field_Reference,Field_Number 0x15
0030 0129 | ) | Execute Any,Make_Visible
0031 029a 00e3 | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_00e0 ; Debug Table 0x0.0xf = 0x31,0xfff0
0033 00bf | | Action Accept_Activation
0034 0007 | | Action Break_Optional ; Debug Table 0x1 = .DEBUG 0x0034,0x03ec,0x8000,0x0000,0x004c,0x3376,0x0000,0x000f
; Debug Table 0x1.0x0 = 0x34,0xffff
0035 0007 | | Action Break_Optional ; Debug Table 0x1.0x1 = 0x35,0xfffe
0036 4830 |H0 | Short_Literal 0x30 ; Debug Table 0x1.0x2 = 0x36,0xfffd
0037 4839 |H9 | Short_Literal 0x39
0038 00e8 | | Load_Encached Character_Cache
0039 03f8 | | Declare_Type Discrete,Constrained
003a 00e3 | | Load_Encached Natural_Cache ; Debug Table 0x1.0x3 = 0x3a,0xfffc
003b 00d8 | | Load_Top At_Offset_0
003c 00d8 | | Load_Top At_Offset_0
003d 4800 |H | Short_Literal 0x0
003e 4803 |H | Short_Literal 0x3
003f 4803 |H | Short_Literal 0x3
0040 4809 |H | Short_Literal 0x9
0041 0318 | | Declare_Type Variant_Record,Incomplete
0042 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x1.0x4 = 0x42,0xfffb
0043 02a0 | | Declare_Subprogram Null_Subprogram
0044 4818 |H | Short_Literal 0x18
0045 03d3 | | Declare_Type Access,Defined,Accesses_Protected
0046 e002 | | Load 0x0,0x2 ; Debug Table 0x1.0x5 = 0x46,0xfffa
0047 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0048 e002 | | Load 0x0,0x2
0049 1b16 | | Execute Package,Field_Read,Field_Number 0x16
004a 00da | | Load_Top At_Offset_2
004b 00e9 | | Load_Encached String_Cache
004c e003 | | Load 0x0,0x3
004d 1b0d | | Execute Package,Field_Read,Field_Number 0xd
004e 4801 |H | Short_Literal 0x1
004f 6250 |bP | Indirect_Literal Discrete,0x2a0,{0x00000000, 0x7fffffff}
0050 e003 | | Load 0x0,0x3
0051 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0052 034e | N | Declare_Type Array,Constrained,Bounds_With_Object
0053 029f 00eb | | Declare_Subprogram For_Call,INIT_00e8
0055 4800 |H | Short_Literal 0x0
0056 4803 |H | Short_Literal 0x3
0057 4803 |H | Short_Literal 0x3
0058 e21b | | Load 0x1,0x1b
0059 0307 | | Complete_Type Variant_Record,By_Defining
005a 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x6 = 0x5a,0xfff9
005b 6240 |b@ | Indirect_Literal Discrete,0x29c,{0x0045640e, 0x000000b0}
005c 02a0 | | Declare_Subprogram Null_Subprogram
005d 037d | } | Declare_Type Task,Defined
005e 036f | o | Declare_Variable Task
005f 0007 | | Action Break_Optional ; Debug Table 0x1.0x7 = 0x5f,0xfff8
0060 4800 |H | Short_Literal 0x0 ; Debug Table 0x1.0x8 = 0x60,0xfff7
0061 6236 |b6 | Indirect_Literal Discrete,0x298,{0x0045680e, 0x00002bb0}
0062 02a0 | | Declare_Subprogram Null_Subprogram
0063 037d | } | Declare_Type Task,Defined
0064 036f | o | Declare_Variable Task
0065 00da | | Load_Top At_Offset_2 ; Debug Table 0x1.0x9 = 0x65,0xfff6
0066 e002 | | Load 0x0,0x2
0067 e004 | | Load 0x0,0x4
0068 e001 | | Load 0x0,0x1
0069 00b6 | | Action Make_Scope
006a e005 | | Load 0x0,0x5
006b e006 | | Load 0x0,0x6
006c e21e | | Load 0x1,0x1e
006d e007 | | Load 0x0,0x7
006e 4809 |H | Short_Literal 0x9
006f e21d | | Load 0x1,0x1d
0070 020e | | Execute Module,Augment_Imports
0071 0007 | | Action Break_Optional
0072 029d 0133 | 3| Declare_Subprogram For_Outer_Call,INIT_0130 ; Debug Table 0x1.0xa = 0x72,0xfff5
0074 00db | | Load_Top At_Offset_3 ; Debug Table 0x1.0xb = 0x74,0xfff4
0075 e002 | | Load 0x0,0x2
0076 e21d | | Load 0x1,0x1d
0077 1d1f | | Execute_Immediate Reference_Lex_1,0x1f
0078 4804 |H | Short_Literal 0x4
0079 e21e | | Load 0x1,0x1e
007a 020e | | Execute Module,Augment_Imports
007b 0007 | | Action Break_Optional
007c 029d 017b | {| Declare_Subprogram For_Outer_Call,INIT_0178 ; Debug Table 0x1.0xc = 0x7c,0xfff3
007e 029d 0193 | | Declare_Subprogram For_Outer_Call,INIT_0190 ; Debug Table 0x1.0xd = 0x7e,0xfff2
0080 029d 01e3 | | Declare_Subprogram For_Outer_Call,INIT_01e0 ; Debug Table 0x1.0xe = 0x80,0xfff1
0082 029d 0203 | | Declare_Subprogram For_Outer_Call,INIT_0200 ; Debug Table 0x1.0xf = 0x82,0xfff0
0084 029d 025b | [| Declare_Subprogram For_Outer_Call,INIT_0258 ; Debug Table 0x1.0x10 = 0x84,0xffef
0086 1d0f | | Execute_Immediate Reference_Lex_1,0xf ; Debug Table 0x1.0x11 = 0x86,0xffee
0087 00c7 | | Action Elaborate_Subprogram
0088 1d10 | | Execute_Immediate Reference_Lex_1,0x10 ; Debug Table 0x1.0x12 = 0x88,0xffed
0089 00c7 | | Action Elaborate_Subprogram
008a 1d12 | | Execute_Immediate Reference_Lex_1,0x12 ; Debug Table 0x1.0x13 = 0x8a,0xffec
008b 00c7 | | Action Elaborate_Subprogram
008c 1d13 | | Execute_Immediate Reference_Lex_1,0x13 ; Debug Table 0x1.0x14 = 0x8c,0xffeb
008d 00c7 | | Action Elaborate_Subprogram
008e 1d19 | | Execute_Immediate Reference_Lex_1,0x19 ; Debug Table 0x1.0x15 = 0x8e,0xffea
008f 00c7 | | Action Elaborate_Subprogram
0090 BODY_0008:
0090 BODY_0008:
0090 00be | | Action Activate_Tasks
0091 00bc | | Action Signal_Activated
0092 00bb | | Action Signal_Completion
0093 0000 0000 | | .BLANK 0000[0x5]
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 009b | | .CONST 0x009b ; Address of begin
0099 0004 | | .CONST 0x0004 ; Address of exception handler
009a 0001 | | .CONST 0x0001 ; Number of locals
009b BODY_0098:
009b INIT_0098:
009b 00da | | Load_Top At_Offset_2 ; Debug Table 0x2 = .DEBUG 0x009b,0x041a,0x0002,0x0000,0x004c,0x32d6,0x0000,0x0032
; Debug Table 0x2.0x0 = 0x9b,0x1
009c 8224 | $ | Call 0x1,0x24
009d 2508 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x8
009e 4401 |D | Exit_Subprogram With_Result,0x1
009f 0000 | | .XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 00da | | Load_Top At_Offset_2 ; Debug Table 0x3 = .DEBUG 0x00a3,0x041e,0x0002,0x0000,0x004c,0x32d6,0x0000,0x003d
; Debug Table 0x3.0x0 = 0xa3,0x1
00a4 8224 | $ | Call 0x1,0x24
00a5 2509 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x9
00a6 4401 |D | Exit_Subprogram With_Result,0x1
00a7 0000 | | .XXX[0x1]
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 00b0 | | .CONST 0x00b0 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 00db | | Load_Top At_Offset_3 ; Debug Table 0x4 = .DEBUG 0x00ab,0x0422,0x0002,0x0000,0x004c,0x32d6,0x0000,0x0055
; Debug Table 0x4.0x0 = 0xab,0x1
00ac 00db | | Load_Top At_Offset_3
00ad e001 | | Load 0x0,0x1
00ae 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00af 4402 |D | Exit_Subprogram With_Result,0x2
00b0 TRAP_00a8:
00b0 e001 | | Load 0x0,0x1
00b1 1b10 | | Execute Package,Field_Read,Field_Number 0x10
00b2 010f | | Execute Exception,Equal
00b3 6817 |h | Jump_Zero 0xcb
00b4 00db | | Load_Top At_Offset_3 ; Debug Table 0x4.0x1 = 0xb4,0x2
00b5 e003 | | Load 0x0,0x3
00b6 180f | | Execute Package,Field_Execute,Field_Number 0xf
00b7 4801 |H | Short_Literal 0x1
00b8 4806 |H | Short_Literal 0x6
00b9 e003 | | Load 0x0,0x3
00ba 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00bb 0334 | 4 | Declare_Variable Array,With_Constraint
00bc 51f3 |Q | Indirect_Literal Any,0x2b0,{0x5443502f, 0x49502020}
00bd e003 | | Load 0x0,0x3
00be 180f | | Execute Package,Field_Execute,Field_Number 0xf
00bf 01df | | Execute Vector,Equal
00c0 6808 |h | Jump_Zero 0xc9
00c1 485d |H] | Short_Literal 0x5d ; Debug Table 0x4.0x2 = 0xc1,0x3
00c2 485b |H[ | Short_Literal 0x5b
00c3 e5fe | | Load 0x2,-0x2
00c4 e007 | | Load 0x0,0x7
00c5 180f | | Execute Package,Field_Execute,Field_Number 0xf
00c6 01ca | | Execute Vector,Prepend
00c7 01cb | | Execute Vector,Append
00c8 4402 |D | Exit_Subprogram With_Result,0x2
00c9 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x4.0x3 = 0xc9,0x4
00ca 0101 | | Execute Exception,Reraise
00cb 0100 | | Execute Exception,Raise
00cc 0000 0000 | | .BLANK 0000[0x4]
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00d3 | | .CONST 0x00d3 ; Address of begin
00d1 0004 | | .CONST 0x0004 ; Address of exception handler
00d2 0001 | | .CONST 0x0001 ; Number of locals
00d3 BODY_00d0:
00d3 INIT_00d0:
00d3 00da | | Load_Top At_Offset_2 ; Debug Table 0x5 = .DEBUG 0x00d3,0x042c,0x0002,0x0000,0x004c,0x32d6,0x0000,0x0066
; Debug Table 0x5.0x0 = 0xd3,0x1
00d4 e008 | | Load 0x0,0x8
00d5 180f | | Execute Package,Field_Execute,Field_Number 0xf
00d6 00db | | Load_Top At_Offset_3
00d7 8212 | | Call 0x1,0x12
00d8 4401 |D | Exit_Subprogram With_Result,0x1
00d9 0000 0000 | | .BLANK 0000[0x7]
00e0 ; --------------------------------------------------------------------------------------
00e0 ; SUBPROGRAM
00e0 ; --------------------------------------------------------------------------------------
00e0 00e3 | | .CONST 0x00e3 ; Address of begin
00e1 0004 | | .CONST 0x0004 ; Address of exception handler
00e2 0001 | | .CONST 0x0001 ; Number of locals
00e3 BODY_00e0:
00e3 INIT_00e0:
00e3 00da | | Load_Top At_Offset_2 ; Debug Table 0x6 = .DEBUG 0x00e3,0x0430,0x0001,0x0000,0x004c,0x32d6,0x0000,0x00b0
; Debug Table 0x6.0x0 = 0xe3,0x1
00e4 4801 |H | Short_Literal 0x1
00e5 e21d | | Load 0x1,0x1d
00e6 1710 | | Execute Task,Entry_Call,Field_Number 0x10
00e7 4502 |E | Exit_Subprogram 0x2
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00eb | | .CONST 0x00eb ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0001 | | .CONST 0x0001 ; Number of locals
00eb BODY_00e8:
00eb INIT_00e8:
00eb 4608 |F | Jump_Case 0x8 ; Debug Table 0x7 = .DEBUG 0x00eb,0x0434,0x0005,0x0000,0x004c,0x3376,0x0000,0x004a
00ec 7808 |x | Jump 0xf5 ; case 0x0
00ed 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x1
00ee 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x2
00ef 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x3
00f0 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x4
00f1 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x5
00f2 4302 |C | Exit_Subprogram From_Utility,0x2 ; case 0x6
00f3 7808 |x | Jump 0xfc ; case 0x7
00f4 781c |x | Jump 0x111 ; case 0x8
00f5 4800 |H | Short_Literal 0x0
00f6 00db | | Load_Top At_Offset_3
00f7 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
00f8 4800 |H | Short_Literal 0x0
00f9 00db | | Load_Top At_Offset_3
00fa 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
00fb 4302 |C | Exit_Subprogram From_Utility,0x2
00fc e5fc | | Load 0x2,-0x4
00fd e5fd | | Load 0x2,-0x3
00fe e5fe | | Load 0x2,-0x2
00ff 4801 |H | Short_Literal 0x1
0100 e5fc | | Load 0x2,-0x4
0101 00e9 | | Load_Encached String_Cache
0102 035b | [ | Declare_Type Array,Constrained
0103 4801 |H | Short_Literal 0x1
0104 e5fd | | Load 0x2,-0x3
0105 e003 | | Load 0x0,0x3
0106 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0107 035b | [ | Declare_Type Array,Constrained
0108 4801 |H | Short_Literal 0x1
0109 e5fe | | Load 0x2,-0x2
010a e003 | | Load 0x0,0x3
010b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
010c 035b | [ | Declare_Type Array,Constrained
010d 4803 |H | Short_Literal 0x3
010e e5ff | | Load 0x2,-0x1
010f 031b | | Declare_Type Variant_Record,Constrained
0110 4204 |B | Exit_Subprogram From_Utility,With_Result,0x4
0111 e5fc | | Load 0x2,-0x4
0112 e5fd | | Load 0x2,-0x3
0113 e5fe | | Load 0x2,-0x2
0114 e5ff | | Load 0x2,-0x1
0115 02fc | | Declare_Variable Variant_Record,With_Constraint
0116 4801 |H | Short_Literal 0x1
0117 e5fc | | Load 0x2,-0x4
0118 00e9 | | Load_Encached String_Cache
0119 0334 | 4 | Declare_Variable Array,With_Constraint
011a 2d07 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x7
011b 4801 |H | Short_Literal 0x1
011c e5fd | | Load 0x2,-0x3
011d e003 | | Load 0x0,0x3
011e 1b0d | | Execute Package,Field_Read,Field_Number 0xd
011f 0334 | 4 | Declare_Variable Array,With_Constraint
0120 2d08 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x8
0121 4801 |H | Short_Literal 0x1
0122 e5fe | | Load 0x2,-0x2
0123 e003 | | Load 0x0,0x3
0124 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0125 0334 | 4 | Declare_Variable Array,With_Constraint
0126 2d09 |- | Execute Variant_Record,Field_Append,Fixed,Indirect,Field_Number 0x9
0127 016a | j | Execute Variant_Record,Indirects_Appended
0128 4204 |B | Exit_Subprogram From_Utility,With_Result,0x4
0129 0000 0000 | | .BLANK 0000[0x7]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0133 | 3 | .CONST 0x0133 ; Address of begin
0131 0157 | W | .CONST 0x0157 ; Address of exception handler
0132 0001 | | .CONST 0x0001 ; Number of locals
0133 BODY_0130:
0133 INIT_0130:
0133 00cf | | Action Mark_Auxiliary ; Debug Table 0x8 = .DEBUG 0x0133,0x0436,0x0001,0x0000,0x004c,0x3376,0x0000,0x00c9
; Debug Table 0x8.0x0 = 0x133,0x1
0134 00db | | Load_Top At_Offset_3 ; Debug Table 0x8.0x1 = 0x134,0xfbff
0135 e001 | | Load 0x0,0x1
0136 180d | | Execute Package,Field_Execute,Field_Number 0xd
0137 e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x2 = 0x137,0xfbfe
0138 e001 | | Load 0x0,0x1
0139 180e | | Execute Package,Field_Execute,Field_Number 0xe
013a e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x3 = 0x13a,0xfbfd
013b 01db | | Execute Vector,Length
013c 00da | | Load_Top At_Offset_2
013d 01db | | Execute Vector,Length
013e 00da | | Load_Top At_Offset_2
013f 01db | | Execute Vector,Length
0140 e21b | | Load 0x1,0x1b
0141 1c08 | | Execute_Immediate Run_Utility,0x8
0142 00d8 | | Load_Top At_Offset_0
0143 1c00 | | Execute_Immediate Run_Utility,0x0
0144 e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0x4 = 0x144,0x401
0145 00d9 | | Load_Top At_Offset_1
0146 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7
0147 00da | | Load_Top At_Offset_2 ; Debug Table 0x8.0x5 = 0x147,0x402
0148 00d9 | | Load_Top At_Offset_1
0149 2908 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x8
014a 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x8.0x6 = 0x14a,0x403
014b 00d9 | | Load_Top At_Offset_1
014c 2909 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x9
014d e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0x7 = 0x14d,0x404
014e 00d9 | | Load_Top At_Offset_1
014f 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0150 e21c | | Load 0x1,0x1c ; Debug Table 0x8.0x8 = 0x150,0x405
0151 00d9 | | Load_Top At_Offset_1
0152 4802 |H | Short_Literal 0x2
0153 e21d | | Load 0x1,0x1d
0154 170e | | Execute Task,Entry_Call,Field_Number 0xe
0155 c5fd | | Store 0x2,-0x3
0156 4503 |E | Exit_Subprogram 0x3
0157 TRAP_0130:
0157 e001 | | Load 0x0,0x1
0158 1b10 | | Execute Package,Field_Read,Field_Number 0x10
0159 010f | | Execute Exception,Equal
015a 6819 |h | Jump_Zero 0x174
015b 00cf | | Action Mark_Auxiliary ; Debug Table 0x8.0x9 = 0x15b,0x2
015c e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0xa = 0x15c,0xf7ff
015d 01db | | Execute Vector,Length
015e 4800 |H | Short_Literal 0x0
015f 4800 |H | Short_Literal 0x0
0160 e21b | | Load 0x1,0x1b
0161 1c08 | | Execute_Immediate Run_Utility,0x8
0162 00d8 | | Load_Top At_Offset_0
0163 1c00 | | Execute_Immediate Run_Utility,0x0
0164 e5ff | | Load 0x2,-0x1 ; Debug Table 0x8.0xb = 0x164,0x801
0165 00d9 | | Load_Top At_Offset_1
0166 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7
0167 e5fe | | Load 0x2,-0x2 ; Debug Table 0x8.0xc = 0x167,0x802
0168 00d9 | | Load_Top At_Offset_1
0169 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
016a e21c | | Load 0x1,0x1c ; Debug Table 0x8.0xd = 0x16a,0x803
016b 00d9 | | Load_Top At_Offset_1
016c 4802 |H | Short_Literal 0x2
016d e21d | | Load 0x1,0x1d
016e 170e | | Execute Task,Entry_Call,Field_Number 0xe
016f c5fd | | Store 0x2,-0x3
0170 00d1 | | Pop_Control Pop_Count_1
0171 00ce | | Action Pop_Auxiliary
0172 00d8 | | Load_Top At_Offset_0 ; Debug Table 0x8.0xe = 0x172,0x3
0173 0101 | | Execute Exception,Reraise
0174 0100 | | Execute Exception,Raise
0175 0000 0000 | | .XXX[0x3]
0177 0000 | |
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 0180 | | .CONST 0x0180 ; Address of begin
0179 0004 | | .CONST 0x0004 ; Address of exception handler
017a 0004 | | .CONST 0x0004 ; Number of locals
017b INIT_0178:
017b e002 | | Load 0x0,0x2 ; Debug Table 0x9 = .DEBUG 0x017b,0x0456,0x0002,0x0000,0x004c,0x3376,0x0000,0x01d4
; Debug Table 0x9.0x0 = 0x17b,0xffff
017c 1b16 | | Execute Package,Field_Read,Field_Number 0x16
017d 03e9 | | Declare_Variable Discrete,Duplicate
017e e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x1 = 0x17e,0xfffe
017f 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0180 BODY_0178:
0180 e002 | | Load 0x0,0x2 ; Debug Table 0x9.0x2 = 0x180,0x1
0181 1b17 | | Execute Package,Field_Read,Field_Number 0x17
0182 e002 | | Load 0x0,0x2
0183 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0184 e002 | | Load 0x0,0x2
0185 1b16 | | Execute Package,Field_Read,Field_Number 0x16
0186 e002 | | Load 0x0,0x2
0187 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0188 c403 | | Store 0x2,0x3
0189 c402 | | Store 0x2,0x2
018a 0059 | Y | Store_Top Discrete,At_Offset_1
018b 00da | | Load_Top At_Offset_2 ; Debug Table 0x9.0x3 = 0x18b,0x2
018c 00ca | | Action Exit_Nullary_Function
018d 0000 0000 | | .XXX[0x3]
018f 0000 | |
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 01a8 | | .CONST 0x01a8 ; Address of begin
0191 0004 | | .CONST 0x0004 ; Address of exception handler
0192 0003 | | .CONST 0x0003 ; Number of locals
0193 INIT_0190:
0193 4801 |H | Short_Literal 0x1 ; Debug Table 0xa = .DEBUG 0x0193,0x0460,0x0002,0x0000,0x004c,0x3376,0x0000,0x01fe
; Debug Table 0xa.0x0 = 0x193,0xffff
0194 4804 |H | Short_Literal 0x4
0195 e003 | | Load 0x0,0x3
0196 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0197 0334 | 4 | Declare_Variable Array,With_Constraint
0198 4801 |H | Short_Literal 0x1
0199 4804 |H | Short_Literal 0x4
019a e003 | | Load 0x0,0x3
019b 1b11 | | Execute Package,Field_Read,Field_Number 0x11
019c 0334 | 4 | Declare_Variable Array,With_Constraint
019d 4804 |H | Short_Literal 0x4
019e 4801 |H | Short_Literal 0x1
019f 4800 |H | Short_Literal 0x0
01a0 00d9 | | Load_Top At_Offset_1
01a1 e403 | | Load 0x2,0x3
01a2 01d6 | | Execute Vector,Field_Write
01a3 3ffb |? | Loop_Increasing 0x19f
01a4 00d9 | | Load_Top At_Offset_1
01a5 01d4 | | Execute Vector,Structure_Write
01a6 00e3 | | Load_Encached Natural_Cache ; Debug Table 0xa.0x1 = 0x1a6,0xfffe
01a7 0601 | | Execute_Immediate Set_Value_Unchecked,0x1
01a8 BODY_0190:
01a8 00cf | | Action Mark_Auxiliary
01a9 e5ff | | Load 0x2,-0x1 ; Debug Table 0xa.0x2 = 0x1a9,0x1
01aa 01d9 | | Execute Vector,Reverse_Bounds
01ab 0263 | c | Execute Discrete,Above_Bound
01ac 7024 |p$ | Jump_Nonzero 0x1d1
01ad 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x3 = 0x1ad,0x2
01ae e5ff | | Load 0x2,-0x1
01af 01d7 | | Execute Vector,Field_Read
01b0 00d8 | | Load_Top At_Offset_0
01b1 4830 |H0 | Short_Literal 0x30
01b2 4839 |H9 | Short_Literal 0x39
01b3 0262 | b | Execute Discrete,In_Range
01b4 7004 |p | Jump_Nonzero 0x1b9
01b5 0b2e | . | Execute_Immediate Case_Compare,0x2e
01b6 7014 |p | Jump_Nonzero 0x1cb
01b7 48e0 |H | Short_Literal 0xe0 ; Debug Table 0xa.0x4 = 0x1b7,0x5
01b8 0257 | W | Execute Discrete,Raise
01b9 e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x5 = 0x1b9,0x3
01ba e402 | | Load 0x2,0x2
01bb 01d7 | | Execute Vector,Field_Read
01bc 480a |H | Short_Literal 0xa
01bd 0271 | q | Execute Discrete,Times
01be 0248 | H | Execute Discrete,Check_In_Integer
01bf 00da | | Load_Top At_Offset_2
01c0 e5ff | | Load 0x2,-0x1
01c1 01d7 | | Execute Vector,Field_Read
01c2 0ad0 | | Execute_Immediate Plus,-0x30
01c3 e009 | | Load 0x0,0x9
01c4 1b11 | | Execute Package,Field_Read,Field_Number 0x11
01c5 025b | [ | Execute Discrete,Check_In_Type
01c6 0273 | s | Execute Discrete,Plus
01c7 e403 | | Load 0x2,0x3
01c8 e402 | | Load 0x2,0x2
01c9 01d6 | | Execute Vector,Field_Write
01ca 7803 |x | Jump 0x1ce
01cb e403 | | Load 0x2,0x3 ; Debug Table 0xa.0x6 = 0x1cb,0x4
01cc 0a01 | | Execute_Immediate Plus,0x1
01cd c403 | | Store 0x2,0x3
01ce 00d1 | | Pop_Control Pop_Count_1
01cf 00c8 | | Action Pop_Auxiliary_Range
01d0 3fdc |? | Loop_Increasing 0x1ad
01d1 00ce | | Action Pop_Auxiliary
01d2 00d8 | | Load_Top At_Offset_0 ; Debug Table 0xa.0x7 = 0x1d2,0x6
01d3 0e04 | | Execute_Immediate Not_Equal,0x4
01d4 6802 |h | Jump_Zero 0x1d7
01d5 48e0 |H | Short_Literal 0xe0 ; Debug Table 0xa.0x8 = 0x1d5,0x7
01d6 0257 | W | Execute Discrete,Raise
01d7 00d9 | | Load_Top At_Offset_1 ; Debug Table 0xa.0x9 = 0x1d7,0x8
01d8 4401 |D | Exit_Subprogram With_Result,0x1
01d9 0000 0000 | | .BLANK 0000[0x7]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 00da | | Load_Top At_Offset_2 ; Debug Table 0xb = .DEBUG 0x01e3,0x0476,0x0002,0x0000,0x004c,0x3376,0x0000,0x027b
; Debug Table 0xb.0x0 = 0x1e3,0x1
01e4 01dd | | Execute Vector,First
01e5 00db | | Load_Top At_Offset_3
01e6 01d7 | | Execute Vector,Field_Read
01e7 0f5b | [ | Execute_Immediate Equal,0x5b
01e8 6812 |h | Jump_Zero 0x1fb
01e9 00da | | Load_Top At_Offset_2
01ea 01dc | | Execute Vector,Last
01eb 00db | | Load_Top At_Offset_3
01ec 01d7 | | Execute Vector,Field_Read
01ed 0f5d | ] | Execute_Immediate Equal,0x5d
01ee 680c |h | Jump_Zero 0x1fb
01ef 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x1 = 0x1ef,0x2
01f0 01dd | | Execute Vector,First
01f1 0a01 | | Execute_Immediate Plus,0x1
01f2 0248 | H | Execute Discrete,Check_In_Integer
01f3 00db | | Load_Top At_Offset_3
01f4 01dc | | Execute Vector,Last
01f5 0aff | | Execute_Immediate Plus,-0x1
01f6 0248 | H | Execute Discrete,Check_In_Integer
01f7 e5ff | | Load 0x2,-0x1
01f8 01cf | | Execute Vector,Slice_Read
01f9 8221 | ! | Call 0x1,0x21
01fa 4401 |D | Exit_Subprogram With_Result,0x1
01fb 00da | | Load_Top At_Offset_2 ; Debug Table 0xb.0x2 = 0x1fb,0x3
01fc 8221 | ! | Call 0x1,0x21
01fd 4401 |D | Exit_Subprogram With_Result,0x1
01fe 0000 0000 | | .XXX[0x2]
0200 ; --------------------------------------------------------------------------------------
0200 ; SUBPROGRAM
0200 ; --------------------------------------------------------------------------------------
0200 0203 | | .CONST 0x0203 ; Address of begin
0201 0004 | | .CONST 0x0004 ; Address of exception handler
0202 0001 | | .CONST 0x0001 ; Number of locals
0203 BODY_0200:
0203 INIT_0200:
0203 00da | | Load_Top At_Offset_2 ; Debug Table 0xc = .DEBUG 0x0203,0x047e,0x0002,0x0000,0x004c,0x3376,0x0000,0x02bf
; Debug Table 0xc.0x0 = 0x203,0x1
0204 01db | | Execute Vector,Length
0205 e5fe | | Load 0x2,-0x2
0206 01db | | Execute Vector,Length
0207 e5fd | | Load 0x2,-0x3
0208 01db | | Execute Vector,Length
0209 e21b | | Load 0x1,0x1b
020a 1c08 | | Execute_Immediate Run_Utility,0x8
020b 00db | | Load_Top At_Offset_3
020c 00d9 | | Load_Top At_Offset_1
020d 00d8 | | Load_Top At_Offset_0
020e 2507 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x7
020f 00da | | Load_Top At_Offset_2
0210 01da | | Execute Vector,Bounds
0211 00da | | Load_Top At_Offset_2
0212 01da | | Execute Vector,Bounds
0213 00da | | Load_Top At_Offset_2
0214 027f | | Execute Discrete,Equal
0215 7002 |p | Jump_Nonzero 0x218
0216 48e0 |H | Short_Literal 0xe0
0217 0257 | W | Execute Discrete,Raise
0218 00d0 | | Action Swap_Control
0219 00d1 | | Pop_Control Pop_Count_1
021a 027f | | Execute Discrete,Equal
021b 7002 |p | Jump_Nonzero 0x21e
021c 48e0 |H | Short_Literal 0xe0
021d 0257 | W | Execute Discrete,Raise
021e 00d2 | | Pop_Control Pop_Count_2
021f 00d9 | | Load_Top At_Offset_1
0220 2907 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x7
0221 e5fe | | Load 0x2,-0x2
0222 00d9 | | Load_Top At_Offset_1
0223 00d8 | | Load_Top At_Offset_0
0224 2508 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x8
0225 00da | | Load_Top At_Offset_2
0226 01da | | Execute Vector,Bounds
0227 00da | | Load_Top At_Offset_2
0228 01da | | Execute Vector,Bounds
0229 00da | | Load_Top At_Offset_2
022a 027f | | Execute Discrete,Equal
022b 7002 |p | Jump_Nonzero 0x22e
022c 48e0 |H | Short_Literal 0xe0
022d 0257 | W | Execute Discrete,Raise
022e 00d0 | | Action Swap_Control
022f 00d1 | | Pop_Control Pop_Count_1
0230 027f | | Execute Discrete,Equal
0231 7002 |p | Jump_Nonzero 0x234
0232 48e0 |H | Short_Literal 0xe0
0233 0257 | W | Execute Discrete,Raise
0234 00d2 | | Pop_Control Pop_Count_2
0235 00d9 | | Load_Top At_Offset_1
0236 2908 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x8
0237 e5fd | | Load 0x2,-0x3
0238 00d9 | | Load_Top At_Offset_1
0239 00d8 | | Load_Top At_Offset_0
023a 2509 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x9
023b 00da | | Load_Top At_Offset_2
023c 01da | | Execute Vector,Bounds
023d 00da | | Load_Top At_Offset_2
023e 01da | | Execute Vector,Bounds
023f 00da | | Load_Top At_Offset_2
0240 027f | | Execute Discrete,Equal
0241 7002 |p | Jump_Nonzero 0x244
0242 48e0 |H | Short_Literal 0xe0
0243 0257 | W | Execute Discrete,Raise
0244 00d0 | | Action Swap_Control
0245 00d1 | | Pop_Control Pop_Count_1
0246 027f | | Execute Discrete,Equal
0247 7002 |p | Jump_Nonzero 0x24a
0248 48e0 |H | Short_Literal 0xe0
0249 0257 | W | Execute Discrete,Raise
024a 00d2 | | Pop_Control Pop_Count_2
024b 00d9 | | Load_Top At_Offset_1
024c 2909 |) | Execute Variant_Record,Field_Write,Fixed,Indirect,Field_Number 0x9
024d 4800 |H | Short_Literal 0x0
024e 00d9 | | Load_Top At_Offset_1
024f 2804 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x4
0250 4800 |H | Short_Literal 0x0
0251 00d9 | | Load_Top At_Offset_1
0252 2805 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x5
0253 e21c | | Load 0x1,0x1c
0254 00d9 | | Load_Top At_Offset_1
0255 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
0256 4403 |D | Exit_Subprogram With_Result,0x3
0257 0000 | | .XXX[0x1]
0258 ; --------------------------------------------------------------------------------------
0258 ; SUBPROGRAM
0258 ; --------------------------------------------------------------------------------------
0258 0260 | ` | .CONST 0x0260 ; Address of begin
0259 0004 | | .CONST 0x0004 ; Address of exception handler
025a 0004 | | .CONST 0x0004 ; Number of locals
025b INIT_0258:
025b e21c | | Load 0x1,0x1c ; Debug Table 0xd = .DEBUG 0x025b,0x0482,0x0002,0x0000,0x004c,0x3376,0x0000,0x0304
; Debug Table 0xd.0x0 = 0x25b,0xffff
025c 029f 026b | k| Declare_Subprogram For_Call,INIT_0268
025e 029f 0283 | | Declare_Subprogram For_Call,INIT_0280
0260 BODY_0258:
0260 8403 | | Call 0x2,0x3 ; Debug Table 0xd.0x1 = 0x260,0x1
0261 8404 | | Call 0x2,0x4 ; Debug Table 0xd.0x2 = 0x261,0x2
0262 00da | | Load_Top At_Offset_2 ; Debug Table 0xd.0x3 = 0x262,0x3
0263 0227 | ' | Execute Access,All_Reference
0264 02fd | | Declare_Variable Variant_Record,Duplicate
0265 4401 |D | Exit_Subprogram With_Result,0x1
0266 0000 0000 | | .XXX[0x2]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0279 | y | .CONST 0x0279 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b e5ff | | Load 0x2,-0x1 ; Debug Table 0xe = .DEBUG 0x026b,0x048c,0x0004,0x0000,0x004c,0x3376,0x0000,0x032f
; Debug Table 0xe.0x0 = 0x26b,0x1
026c 8222 | " | Call 0x1,0x22
026d 4801 |H | Short_Literal 0x1
026e 4806 |H | Short_Literal 0x6
026f e003 | | Load 0x0,0x3
0270 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0271 0334 | 4 | Declare_Variable Array,With_Constraint
0272 5041 |PA | Indirect_Literal Any,0x2b4,{0x5443502f, 0x49502020}
0273 e003 | | Load 0x0,0x3
0274 180f | | Execute Package,Field_Execute,Field_Number 0xf
0275 e5ff | | Load 0x2,-0x1
0276 8223 | # | Call 0x1,0x23
0277 00cb | | Action Pop_Block_With_Result
0278 4401 |D | Exit_Subprogram With_Result,0x1
0279 TRAP_0268:
0279 010e | | Execute Exception,Is_Constraint_Error
027a 6801 |h | Jump_Zero 0x27c
027b 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0xe.0x1 = 0x27b,0x2
027c 0100 | | Execute Exception,Raise
027d 0000 0000 | | .XXX[0x3]
027f 0000 | |
0280 ; --------------------------------------------------------------------------------------
0280 ; SUBPROGRAM
0280 ; --------------------------------------------------------------------------------------
0280 0283 | | .CONST 0x0283 ; Address of begin
0281 028a | | .CONST 0x028a ; Address of exception handler
0282 0001 | | .CONST 0x0001 ; Number of locals
0283 BODY_0280:
0283 INIT_0280:
0283 e21c | | Load 0x1,0x1c ; Debug Table 0xf = .DEBUG 0x0283,0x0492,0x0004,0x0000,0x004c,0x3376,0x0000,0x0346
; Debug Table 0xf.0x0 = 0x283,0x1
0284 e5ff | | Load 0x2,-0x1
0285 4802 |H | Short_Literal 0x2
0286 e21d | | Load 0x1,0x1d
0287 170d | | Execute Task,Entry_Call,Field_Number 0xd
0288 c402 | | Store 0x2,0x2
0289 4501 |E | Exit_Subprogram 0x1
028a TRAP_0280:
028a 6009 |` | Indirect_Literal Discrete,0x294,{0x00000000, 0x4c337601}
028b 010f | | Execute Exception,Equal
028c 6806 |h | Jump_Zero 0x293
028d e21c | | Load 0x1,0x1c ; Debug Table 0xf.0x1 = 0x28d,0x2
028e 8220 | | Call 0x1,0x20
028f e5ff | | Load 0x2,-0x1
0290 821f | | Call 0x1,0x1f
0291 c402 | | Store 0x2,0x2
0292 4501 |E | Exit_Subprogram 0x1
0293 0100 | | Execute Exception,Raise
0294 0000 0000 | | .LITERAL {0x00000000, 0x4c337601}
0298 0045 680e | Eh | .LITERAL {0x0045680e, 0x00002bb0}
029c 0045 640e | Ed | .LITERAL {0x0045640e, 0x000000b0}
02a0 0000 0000 | | .LITERAL {0x00000000, 0x7fffffff}
02a4 3f00 0000 |? | .DBL 3.0517578125e-05
02a6 0000 0000 | |
02a8 410f a400 |A | .DBL 259200.0
02aa 0000 0000 | |
02ac 0000 0000 | | .LITERAL {0x00000000, 0x0e100000}
02b0 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020}
02b4 5443 502f |TCP/| .LITERAL {0x5443502f, 0x49502020}
02b8 02c4 0004 | | .XXX[0x3]
02ba 0011 | |
02bb 4801 |H | Short_Literal 0x1 ; Debug Table 0x10 = .DEBUG 0x02bb,0x0498,0x0000,0x0000,0x004c,0x3376,0x0000,0x00ba
02bc 02cb | | Declare_Variable Entry
02bd 00bf | | Action Accept_Activation
02be e001 | | Load 0x0,0x1 ; Debug Table 0x11 = .DEBUG 0x02be,0x049a,0x0000,0x0000,0x004c,0x3376,0x0000,0x015e
; Debug Table 0x11.0x0 = 0x2be,0xffff
02bf 03bd | | Declare_Variable Access,Duplicate
02c0 03bd | | Declare_Variable Access,Duplicate
02c1 029f 02d3 | | Declare_Subprogram For_Call,INIT_02d0
02c3 00bc | | Action Signal_Activated
02c4 00cf | | Action Mark_Auxiliary
02c5 0007 | | Action Break_Optional ; Debug Table 0x11.0x1 = 0x2c5,0x1
02c6 8211 | | Call 0x1,0x11 ; Debug Table 0x11.0x2 = 0x2c6,0x2
02c7 00c9 | | Action Pop_Auxiliary_Loop
02c8 7ffd | | Jump 0x2c6
02c9 0000 0000 | | .BLANK 0000[0x7]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02dc | | .CONST 0x02dc ; Address of begin
02d1 02eb | | .CONST 0x02eb ; Address of exception handler
02d2 0003 | | .CONST 0x0003 ; Number of locals
02d3 INIT_02d0:
02d3 029f 02f3 | | Declare_Subprogram For_Call,INIT_02f0 ; Debug Table 0x12 = .DEBUG 0x02d3,0x04a2,0x0004,0x0000,0x004c,0x3376,0x0000,0x01cd
02d5 480d 4863 |H Hc| Declare_Variable Select 0x000, 0x001,
02d7 4800 4801 |H H | [0x000]: 0x001 = 0x0008,
02d9 4800 4801 |H H | [0x00d]: 0x063 = 0x0318
02db 02cf | |
02dc BODY_02d0:
02dc 00cf | | Action Mark_Auxiliary
02dd 0007 | | Action Break_Optional ; Debug Table 0x12.0x0 = 0x2dd,0x1
02de 00d9 | | Load_Top At_Offset_1 ; Debug Table 0x12.0x1 = 0x2de,0x2
02df 013f | ? | Execute Select,Rendezvous
02e0 4601 |F | Jump_Case 0x1
02e1 7800 |x | Jump 0x2e2 ; case 0x0
02e2 00cf | | Action Mark_Auxiliary ; case 0x1
02e3 7802 |x | Jump 0x2e6
02e4 8402 | | Call 0x2,0x2 ; Debug Table 0x12.0x2 = 0x2e4,0x5
02e5 00c9 | | Action Pop_Auxiliary_Loop
02e6 e20e | | Load 0x1,0xe ; Debug Table 0x12.0x3 = 0x2e6,0x4
02e7 77fc |w | Jump_Nonzero 0x2e4
02e8 00ce | | Action Pop_Auxiliary
02e9 00c9 | | Action Pop_Auxiliary_Loop
02ea 7ff3 | | Jump 0x2de
02eb TRAP_02d0:
02eb 0007 | | Action Break_Optional
02ec 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x12.0x4 = 0x2ec,0x6
02ed 0000 0000 | | .XXX[0x3]
02ef 0000 | |
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02ff | | .CONST 0x02ff ; Address of begin
02f1 0313 | | .CONST 0x0313 ; Address of exception handler
02f2 0003 | | .CONST 0x0003 ; Number of locals
02f3 INIT_02f0:
02f3 e20e | | Load 0x1,0xe ; Debug Table 0x13 = .DEBUG 0x02f3,0x04ae,0x0004,0x0000,0x004c,0x3376,0x0000,0x01b9
; Debug Table 0x13.0x0 = 0x2f3,0xffff
02f4 0227 | ' | Execute Access,All_Reference
02f5 2507 |% | Execute Variant_Record,Field_Reference,Fixed,Indirect,Field_Number 0x7
02f6 0335 | 5 | Declare_Variable Array,Duplicate
02f7 00d0 | | Action Swap_Control
02f8 00d1 | | Pop_Control Pop_Count_1
02f9 e20e | | Load 0x1,0xe ; Debug Table 0x13.0x1 = 0x2f9,0xfffe
02fa 0227 | ' | Execute Access,All_Reference
02fb 2c04 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x4
02fc e002 | | Load 0x0,0x2
02fd 1b16 | | Execute Package,Field_Read,Field_Number 0x16
02fe 03f1 | | Declare_Variable Discrete,With_Value
02ff BODY_02f0:
02ff e20e | | Load 0x1,0xe ; Debug Table 0x13.0x2 = 0x2ff,0x1
0300 a20f | | Store_Unchecked 0x1,0xf
0301 e20f | | Load 0x1,0xf ; Debug Table 0x13.0x3 = 0x301,0x2
0302 0227 | ' | Execute Access,All_Reference
0303 2c06 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x6
0304 a20e | | Store_Unchecked 0x1,0xe
0305 e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x4 = 0x305,0x3
0306 e20f | | Load 0x1,0xf
0307 0227 | ' | Execute Access,All_Reference
0308 2806 |( | Execute Variant_Record,Field_Write,Fixed,Direct,Field_Number 0x6
0309 e20f | | Load 0x1,0xf ; Debug Table 0x13.0x5 = 0x309,0x4
030a 4801 |H | Short_Literal 0x1
030b e003 | | Load 0x0,0x3
030c 170f | | Execute Task,Entry_Call,Field_Number 0xf
030d e001 | | Load 0x0,0x1 ; Debug Table 0x13.0x6 = 0x30d,0x5
030e 00d9 | | Load_Top At_Offset_1
030f 00db | | Load_Top At_Offset_3
0310 8004 | | Call 0x0,0x4
0311 c210 | | Store 0x1,0x10
0312 4501 |E | Exit_Subprogram 0x1
0313 TRAP_02f0:
0313 0007 | | Action Break_Optional
0314 4501 |E | Exit_Subprogram 0x1 ; Debug Table 0x13.0x7 = 0x314,0x6
0315 0000 0000 | | .XXX[0x3]
0317 0000 | |
0318 ; --------------------------------------------------------------------------------------
0318 ; SUBPROGRAM
0318 ; See instruction 0x02cf at 0x2d5, index=0xd
0318 ; --------------------------------------------------------------------------------------
0318 031b | | .CONST 0x031b ; Address of begin
0319 0004 | | .CONST 0x0004 ; Address of exception handler
031a 0001 | | .CONST 0x0001 ; Number of locals
031b BODY_0318:
031b INIT_0318:
031b 00db | | Load_Top At_Offset_3 ; Debug Table 0x14 = .DEBUG 0x031b,0x04c0,0x0003,0x0000,0x004c,0x3376,0x0000,0x017b
; Debug Table 0x14.0x0 = 0x31b,0x1
031c a20e | | Store_Unchecked 0x1,0xe
031d e001 | | Load 0x0,0x1 ; Debug Table 0x14.0x1 = 0x31d,0x2
031e a7fe | | Store_Unchecked 0x3,-0x2
031f 4101 |A | End_Rendezvous 0x1
0320 ; --------------------------------------------------------------------------------------
0320 ; Debug Table
0320 ; --------------------------------------------------------------------------------------
0320 0003 0015 | | .CONST 0x0003,0x0015
0322 000b 03ca | | .DEBUG 0x000b,0x03ca,0x8000,0x0000,0x004c,0x32d6,0x0000,0x0009
032a 0034 03ec | 4 | .DEBUG 0x0034,0x03ec,0x8000,0x0000,0x004c,0x3376,0x0000,0x000f
0332 009b 041a | | .DEBUG 0x009b,0x041a,0x0002,0x0000,0x004c,0x32d6,0x0000,0x0032
033a 00a3 041e | | .DEBUG 0x00a3,0x041e,0x0002,0x0000,0x004c,0x32d6,0x0000,0x003d
0342 00ab 0422 | "| .DEBUG 0x00ab,0x0422,0x0002,0x0000,0x004c,0x32d6,0x0000,0x0055
034a 00d3 042c | ,| .DEBUG 0x00d3,0x042c,0x0002,0x0000,0x004c,0x32d6,0x0000,0x0066
0352 00e3 0430 | 0| .DEBUG 0x00e3,0x0430,0x0001,0x0000,0x004c,0x32d6,0x0000,0x00b0
035a 00eb 0434 | 4| .DEBUG 0x00eb,0x0434,0x0005,0x0000,0x004c,0x3376,0x0000,0x004a
0362 0133 0436 | 3 6| .DEBUG 0x0133,0x0436,0x0001,0x0000,0x004c,0x3376,0x0000,0x00c9
036a 017b 0456 | { V| .DEBUG 0x017b,0x0456,0x0002,0x0000,0x004c,0x3376,0x0000,0x01d4
0372 0193 0460 | `| .DEBUG 0x0193,0x0460,0x0002,0x0000,0x004c,0x3376,0x0000,0x01fe
037a 01e3 0476 | v| .DEBUG 0x01e3,0x0476,0x0002,0x0000,0x004c,0x3376,0x0000,0x027b
0382 0203 047e | ~| .DEBUG 0x0203,0x047e,0x0002,0x0000,0x004c,0x3376,0x0000,0x02bf
038a 025b 0482 | [ | .DEBUG 0x025b,0x0482,0x0002,0x0000,0x004c,0x3376,0x0000,0x0304
0392 026b 048c | k | .DEBUG 0x026b,0x048c,0x0004,0x0000,0x004c,0x3376,0x0000,0x032f
039a 0283 0492 | | .DEBUG 0x0283,0x0492,0x0004,0x0000,0x004c,0x3376,0x0000,0x0346
03a2 02bb 0498 | | .DEBUG 0x02bb,0x0498,0x0000,0x0000,0x004c,0x3376,0x0000,0x00ba
03aa 02be 049a | | .DEBUG 0x02be,0x049a,0x0000,0x0000,0x004c,0x3376,0x0000,0x015e
03b2 02d3 04a2 | | .DEBUG 0x02d3,0x04a2,0x0004,0x0000,0x004c,0x3376,0x0000,0x01cd
03ba 02f3 04ae | | .DEBUG 0x02f3,0x04ae,0x0004,0x0000,0x004c,0x3376,0x0000,0x01b9
03c2 031b 04c0 | | .DEBUG 0x031b,0x04c0,0x0003,0x0000,0x004c,0x3376,0x0000,0x017b
03ca ; --------------------------------------------------------------------------------------
03ca ; Debug3 Subtable 0x0
03ca ; --------------------------------------------------------------------------------------
03ca 0010 0000 | | .DBG3TAB 0x0010,0x0000
03cc 000b ffff | | .CONST 0x000b,0xffff
03ce 000c fffe | | .CONST 0x000c,0xfffe
03d0 000d fffd | | .CONST 0x000d,0xfffd
03d2 0010 fffc | | .CONST 0x0010,0xfffc
03d4 0016 fffb | | .CONST 0x0016,0xfffb
03d6 0018 fffa | | .CONST 0x0018,0xfffa
03d8 001a fff9 | | .CONST 0x001a,0xfff9
03da 001d fff8 | | .CONST 0x001d,0xfff8
03dc 001f fff7 | | .CONST 0x001f,0xfff7
03de 0021 fff6 | ! | .CONST 0x0021,0xfff6
03e0 0022 fff5 | " | .CONST 0x0022,0xfff5
03e2 0025 fff4 | % | .CONST 0x0025,0xfff4
03e4 0028 fff3 | ( | .CONST 0x0028,0xfff3
03e6 002b fff2 | + | .CONST 0x002b,0xfff2
03e8 002e fff1 | . | .CONST 0x002e,0xfff1
03ea 0031 fff0 | 1 | .CONST 0x0031,0xfff0
03ec ; --------------------------------------------------------------------------------------
03ec ; Debug3 Subtable 0x1
03ec ; --------------------------------------------------------------------------------------
03ec 0016 0000 | | .DBG3TAB 0x0016,0x0000
03ee 0034 ffff | 4 | .CONST 0x0034,0xffff
03f0 0035 fffe | 5 | .CONST 0x0035,0xfffe
03f2 0036 fffd | 6 | .CONST 0x0036,0xfffd
03f4 003a fffc | : | .CONST 0x003a,0xfffc
03f6 0042 fffb | B | .CONST 0x0042,0xfffb
03f8 0046 fffa | F | .CONST 0x0046,0xfffa
03fa 005a fff9 | Z | .CONST 0x005a,0xfff9
03fc 005f fff8 | _ | .CONST 0x005f,0xfff8
03fe 0060 fff7 | ` | .CONST 0x0060,0xfff7
0400 0065 fff6 | e | .CONST 0x0065,0xfff6
0402 0072 fff5 | r | .CONST 0x0072,0xfff5
0404 0074 fff4 | t | .CONST 0x0074,0xfff4
0406 007c fff3 | | | .CONST 0x007c,0xfff3
0408 007e fff2 | ~ | .CONST 0x007e,0xfff2
040a 0080 fff1 | | .CONST 0x0080,0xfff1
040c 0082 fff0 | | .CONST 0x0082,0xfff0
040e 0084 ffef | | .CONST 0x0084,0xffef
0410 0086 ffee | | .CONST 0x0086,0xffee
0412 0088 ffed | | .CONST 0x0088,0xffed
0414 008a ffec | | .CONST 0x008a,0xffec
0416 008c ffeb | | .CONST 0x008c,0xffeb
0418 008e ffea | | .CONST 0x008e,0xffea
041a ; --------------------------------------------------------------------------------------
041a ; Debug3 Subtable 0x2
041a ; --------------------------------------------------------------------------------------
041a 0000 0001 | | .DBG3TAB 0x0000,0x0001
041c 009b 0001 | | .CONST 0x009b,0x0001
041e ; --------------------------------------------------------------------------------------
041e ; Debug3 Subtable 0x3
041e ; --------------------------------------------------------------------------------------
041e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0420 00a3 0001 | | .CONST 0x00a3,0x0001
0422 ; --------------------------------------------------------------------------------------
0422 ; Debug3 Subtable 0x4
0422 ; --------------------------------------------------------------------------------------
0422 0000 0004 | | .DBG3TAB 0x0000,0x0004
0424 00ab 0001 | | .CONST 0x00ab,0x0001
0426 00b4 0002 | | .CONST 0x00b4,0x0002
0428 00c1 0003 | | .CONST 0x00c1,0x0003
042a 00c9 0004 | | .CONST 0x00c9,0x0004
042c ; --------------------------------------------------------------------------------------
042c ; Debug3 Subtable 0x5
042c ; --------------------------------------------------------------------------------------
042c 0000 0001 | | .DBG3TAB 0x0000,0x0001
042e 00d3 0001 | | .CONST 0x00d3,0x0001
0430 ; --------------------------------------------------------------------------------------
0430 ; Debug3 Subtable 0x6
0430 ; --------------------------------------------------------------------------------------
0430 0000 0001 | | .DBG3TAB 0x0000,0x0001
0432 00e3 0001 | | .CONST 0x00e3,0x0001
0434 ; --------------------------------------------------------------------------------------
0434 ; Debug3 Subtable 0x7
0434 ; --------------------------------------------------------------------------------------
0434 0000 0000 | | .DBG3TAB 0x0000,0x0000
0436 ; --------------------------------------------------------------------------------------
0436 ; Debug3 Subtable 0x8
0436 ; --------------------------------------------------------------------------------------
0436 0004 000b | | .DBG3TAB 0x0004,0x000b
0438 0133 0001 | 3 | .CONST 0x0133,0x0001
043a 0134 fbff | 4 | .CONST 0x0134,0xfbff
043c 0137 fbfe | 7 | .CONST 0x0137,0xfbfe
043e 013a fbfd | : | .CONST 0x013a,0xfbfd
0440 0144 0401 | D | .CONST 0x0144,0x0401
0442 0147 0402 | G | .CONST 0x0147,0x0402
0444 014a 0403 | J | .CONST 0x014a,0x0403
0446 014d 0404 | M | .CONST 0x014d,0x0404
0448 0150 0405 | P | .CONST 0x0150,0x0405
044a 015b 0002 | [ | .CONST 0x015b,0x0002
044c 015c f7ff | \ | .CONST 0x015c,0xf7ff
044e 0164 0801 | d | .CONST 0x0164,0x0801
0450 0167 0802 | g | .CONST 0x0167,0x0802
0452 016a 0803 | j | .CONST 0x016a,0x0803
0454 0172 0003 | r | .CONST 0x0172,0x0003
0456 ; --------------------------------------------------------------------------------------
0456 ; Debug3 Subtable 0x9
0456 ; --------------------------------------------------------------------------------------
0456 0002 0002 | | .DBG3TAB 0x0002,0x0002
0458 017b ffff | { | .CONST 0x017b,0xffff
045a 017e fffe | ~ | .CONST 0x017e,0xfffe
045c 0180 0001 | | .CONST 0x0180,0x0001
045e 018b 0002 | | .CONST 0x018b,0x0002
0460 ; --------------------------------------------------------------------------------------
0460 ; Debug3 Subtable 0xa
0460 ; --------------------------------------------------------------------------------------
0460 0002 0008 | | .DBG3TAB 0x0002,0x0008
0462 0193 ffff | | .CONST 0x0193,0xffff
0464 01a6 fffe | | .CONST 0x01a6,0xfffe
0466 01a9 0001 | | .CONST 0x01a9,0x0001
0468 01ad 0002 | | .CONST 0x01ad,0x0002
046a 01b7 0005 | | .CONST 0x01b7,0x0005
046c 01b9 0003 | | .CONST 0x01b9,0x0003
046e 01cb 0004 | | .CONST 0x01cb,0x0004
0470 01d2 0006 | | .CONST 0x01d2,0x0006
0472 01d5 0007 | | .CONST 0x01d5,0x0007
0474 01d7 0008 | | .CONST 0x01d7,0x0008
0476 ; --------------------------------------------------------------------------------------
0476 ; Debug3 Subtable 0xb
0476 ; --------------------------------------------------------------------------------------
0476 0000 0003 | | .DBG3TAB 0x0000,0x0003
0478 01e3 0001 | | .CONST 0x01e3,0x0001
047a 01ef 0002 | | .CONST 0x01ef,0x0002
047c 01fb 0003 | | .CONST 0x01fb,0x0003
047e ; --------------------------------------------------------------------------------------
047e ; Debug3 Subtable 0xc
047e ; --------------------------------------------------------------------------------------
047e 0000 0001 | | .DBG3TAB 0x0000,0x0001
0480 0203 0001 | | .CONST 0x0203,0x0001
0482 ; --------------------------------------------------------------------------------------
0482 ; Debug3 Subtable 0xd
0482 ; --------------------------------------------------------------------------------------
0482 0001 0003 | | .DBG3TAB 0x0001,0x0003
0484 025b ffff | [ | .CONST 0x025b,0xffff
0486 0260 0001 | ` | .CONST 0x0260,0x0001
0488 0261 0002 | a | .CONST 0x0261,0x0002
048a 0262 0003 | b | .CONST 0x0262,0x0003
048c ; --------------------------------------------------------------------------------------
048c ; Debug3 Subtable 0xe
048c ; --------------------------------------------------------------------------------------
048c 0000 0002 | | .DBG3TAB 0x0000,0x0002
048e 026b 0001 | k | .CONST 0x026b,0x0001
0490 027b 0002 | { | .CONST 0x027b,0x0002
0492 ; --------------------------------------------------------------------------------------
0492 ; Debug3 Subtable 0xf
0492 ; --------------------------------------------------------------------------------------
0492 0000 0002 | | .DBG3TAB 0x0000,0x0002
0494 0283 0001 | | .CONST 0x0283,0x0001
0496 028d 0002 | | .CONST 0x028d,0x0002
0498 ; --------------------------------------------------------------------------------------
0498 ; Debug3 Subtable 0x10
0498 ; --------------------------------------------------------------------------------------
0498 0000 0000 | | .DBG3TAB 0x0000,0x0000
049a ; --------------------------------------------------------------------------------------
049a ; Debug3 Subtable 0x11
049a ; --------------------------------------------------------------------------------------
049a 0001 0002 | | .DBG3TAB 0x0001,0x0002
049c 02be ffff | | .CONST 0x02be,0xffff
049e 02c5 0001 | | .CONST 0x02c5,0x0001
04a0 02c6 0002 | | .CONST 0x02c6,0x0002
04a2 ; --------------------------------------------------------------------------------------
04a2 ; Debug3 Subtable 0x12
04a2 ; --------------------------------------------------------------------------------------
04a2 0000 0005 | | .DBG3TAB 0x0000,0x0005
04a4 02dd 0001 | | .CONST 0x02dd,0x0001
04a6 02de 0002 | | .CONST 0x02de,0x0002
04a8 02e4 0005 | | .CONST 0x02e4,0x0005
04aa 02e6 0004 | | .CONST 0x02e6,0x0004
04ac 02ec 0006 | | .CONST 0x02ec,0x0006
04ae ; --------------------------------------------------------------------------------------
04ae ; Debug3 Subtable 0x13
04ae ; --------------------------------------------------------------------------------------
04ae 0002 0006 | | .DBG3TAB 0x0002,0x0006
04b0 02f3 ffff | | .CONST 0x02f3,0xffff
04b2 02f9 fffe | | .CONST 0x02f9,0xfffe
04b4 02ff 0001 | | .CONST 0x02ff,0x0001
04b6 0301 0002 | | .CONST 0x0301,0x0002
04b8 0305 0003 | | .CONST 0x0305,0x0003
04ba 0309 0004 | | .CONST 0x0309,0x0004
04bc 030d 0005 | | .CONST 0x030d,0x0005
04be 0314 0006 | | .CONST 0x0314,0x0006
04c0 ; --------------------------------------------------------------------------------------
04c0 ; Debug3 Subtable 0x14
04c0 ; --------------------------------------------------------------------------------------
04c0 0000 0002 | | .DBG3TAB 0x0000,0x0002
04c2 031b 0001 | | .CONST 0x031b,0x0001
04c4 031d 0002 | | .CONST 0x031d,0x0002
04c6 0000 0000 | | .BLANK 0000[0x13a]