|
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_6148f2
└─⟦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 04e8 | | .CONST 0x04e8 ; 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 ; --------------------------------------------------------------------------------------
0008 0010 | | .CONST 0x0010 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0001 | | .CONST 0x0001 ; Number of locals
000b INIT_0008:
000b 029a 001b | | Declare_Subprogram For_Outer_Call,Visible,Unelaborated,INIT_0018
000d 00bf | | Action Accept_Activation
000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd
000f 00c7 | | Action Elaborate_Subprogram
0010 BODY_0008:
0010 00bc | | Action Signal_Activated
0011 00bb | | Action Signal_Completion
0012 0000 0000 | | .BLANK 0000[0x6]
0018 ; --------------------------------------------------------------------------------------
0018 ; SUBPROGRAM
0018 ; --------------------------------------------------------------------------------------
0018 0091 | | .CONST 0x0091 ; Address of begin
0019 0004 | | .CONST 0x0004 ; Address of exception handler
001a 0030 | 0 | .CONST 0x0030 ; Number of locals
001b INIT_0018:
001b 029f 0103 | | Declare_Subprogram For_Call,INIT_0100
001d 029f 010b | | Declare_Subprogram For_Call,INIT_0108
001f 029f 0113 | | Declare_Subprogram For_Call,INIT_0110
0021 029e 011b | | Declare_Subprogram For_Call,Unelaborated,INIT_0118
0023 4805 |H | Short_Literal 0x5
0024 4802 |H | Short_Literal 0x2
0025 0099 | | Action Reference_Dynamic
0026 00c7 | | Action Elaborate_Subprogram
0027 029f 035b | [| Declare_Subprogram For_Call,INIT_0358
0029 029f 036b | k| Declare_Subprogram For_Call,INIT_0368
002b 4805 |H | Short_Literal 0x5
002c 4802 |H | Short_Literal 0x2
002d 0099 | | Action Reference_Dynamic
002e 00c6 | | Action Check_Subprogram_Elaborated
002f 0092 0489 | | Action Push_String_Extended,0x489 ; "Class"
0031 e002 | | Load 0x0,0x2
0032 e003 | | Load 0x0,0x3
0033 e004 | | Load 0x0,0x4
0034 a005 | | Reference 0x0,0x5
0035 a006 | | Reference 0x0,0x6
0036 4806 |H | Short_Literal 0x6
0037 4802 |H | Short_Literal 0x2
0038 0099 | | Action Reference_Dynamic
0039 4807 |H | Short_Literal 0x7
003a 4802 |H | Short_Literal 0x2
003b 0099 | | Action Reference_Dynamic
003c a007 | | Reference 0x0,0x7
003d 4802 |H | Short_Literal 0x2
003e 4802 |H | Short_Literal 0x2
003f 0099 | | Action Reference_Dynamic
0040 0093 0000 | | PushFullAddress InMicrocode
0042 60b5 |` | Indirect_Literal Discrete,0xf8,{0x80000000, 0x00030000}
0043 0273 | s | Execute Discrete,Plus
0044 e008 | | Load 0x0,0x8
0045 0273 | s | Execute Discrete,Plus
0046 e009 | | Load 0x0,0x9
0047 0273 | s | Execute Discrete,Plus
0048 4813 |H | Short_Literal 0x13
0049 0007 | | Action Break_Optional
004a 029f 037b | {| Declare_Subprogram For_Call,INIT_0378
004c 029f 038b | | Declare_Subprogram For_Call,INIT_0388
004e 4805 |H | Short_Literal 0x5
004f 4802 |H | Short_Literal 0x2
0050 0099 | | Action Reference_Dynamic
0051 00c6 | | Action Check_Subprogram_Elaborated
0052 0092 048a | | Action Push_String_Extended,0x48a ; "Name"
0054 e002 | | Load 0x0,0x2
0055 e00a | | Load 0x0,0xa
0056 e00b | | Load 0x0,0xb
0057 a00c | | Reference 0x0,0xc
0058 a00d | | Reference 0x0,0xd
0059 4814 |H | Short_Literal 0x14
005a 4802 |H | Short_Literal 0x2
005b 0099 | | Action Reference_Dynamic
005c 4815 |H | Short_Literal 0x15
005d 4802 |H | Short_Literal 0x2
005e 0099 | | Action Reference_Dynamic
005f a00e | | Reference 0x0,0xe
0060 4803 |H | Short_Literal 0x3
0061 4802 |H | Short_Literal 0x2
0062 0099 | | Action Reference_Dynamic
0063 0093 0000 | | PushFullAddress InMicrocode
0065 608e |` | Indirect_Literal Discrete,0xf4,{0x80000000, 0x00020000}
0066 0273 | s | Execute Discrete,Plus
0067 e008 | | Load 0x0,0x8
0068 0273 | s | Execute Discrete,Plus
0069 e00f | | Load 0x0,0xf
006a 0273 | s | Execute Discrete,Plus
006b 4821 |H! | Short_Literal 0x21
006c 0007 | | Action Break_Optional
006d 029f 039b | | Declare_Subprogram For_Call,INIT_0398
006f 029f 03ab | | Declare_Subprogram For_Call,INIT_03a8
0071 4805 |H | Short_Literal 0x5
0072 4802 |H | Short_Literal 0x2
0073 0099 | | Action Reference_Dynamic
0074 00c6 | | Action Check_Subprogram_Elaborated
0075 0092 048b | | Action Push_String_Extended,0x48b ; "Representation"
0077 e002 | | Load 0x0,0x2
0078 e010 | | Load 0x0,0x10
0079 e011 | | Load 0x0,0x11
007a a012 | | Reference 0x0,0x12
007b a013 | | Reference 0x0,0x13
007c 4822 |H" | Short_Literal 0x22
007d 4802 |H | Short_Literal 0x2
007e 0099 | | Action Reference_Dynamic
007f 4823 |H# | Short_Literal 0x23
0080 4802 |H | Short_Literal 0x2
0081 0099 | | Action Reference_Dynamic
0082 a014 | | Reference 0x0,0x14
0083 4804 |H | Short_Literal 0x4
0084 4802 |H | Short_Literal 0x2
0085 0099 | | Action Reference_Dynamic
0086 0093 0000 | | PushFullAddress InMicrocode
0088 6067 |`g | Indirect_Literal Discrete,0xf0,{0x80000000, 0x00010000}
0089 0273 | s | Execute Discrete,Plus
008a e008 | | Load 0x0,0x8
008b 0273 | s | Execute Discrete,Plus
008c e015 | | Load 0x0,0x15
008d 0273 | s | Execute Discrete,Plus
008e 482f |H/ | Short_Literal 0x2f
008f 029f 03bb | | Declare_Subprogram For_Call,INIT_03b8
0091 BODY_0018:
0091 8016 | | Call 0x0,0x16
0092 8430 | 0 | Call 0x2,0x30
0093 e002 | | Load 0x0,0x2
0094 0322 | " | Declare_Variable Record
0095 6056 |`V | Indirect_Literal Discrete,0xec,{0x00000000, 0x000007d0}
0096 00d9 | | Load_Top At_Offset_1
0097 3800 |8 | Execute Record,Field_Write,Field_Number 0x0
0098 4801 |H | Short_Literal 0x1
0099 e017 | | Load 0x0,0x17
009a e018 | | Load 0x0,0x18
009b 00ad | | Action InMicrocode,Package,Field_Execute_Dynamic
009c e408 | | Load 0x2,0x8
009d e409 | | Load 0x2,0x9
009e e40a | | Load 0x2,0xa
009f e40b | | Load 0x2,0xb
00a0 480c |H | Short_Literal 0xc
00a1 4802 |H | Short_Literal 0x2
00a2 0099 | | Action Reference_Dynamic
00a3 480d |H | Short_Literal 0xd
00a4 4802 |H | Short_Literal 0x2
00a5 0099 | | Action Reference_Dynamic
00a6 480e |H | Short_Literal 0xe
00a7 4802 |H | Short_Literal 0x2
00a8 0099 | | Action Reference_Dynamic
00a9 480f |H | Short_Literal 0xf
00aa 4802 |H | Short_Literal 0x2
00ab 0099 | | Action Reference_Dynamic
00ac 4810 |H | Short_Literal 0x10
00ad 4802 |H | Short_Literal 0x2
00ae 0099 | | Action Reference_Dynamic
00af 4811 |H | Short_Literal 0x11
00b0 4802 |H | Short_Literal 0x2
00b1 0099 | | Action Reference_Dynamic
00b2 4812 |H | Short_Literal 0x12
00b3 4802 |H | Short_Literal 0x2
00b4 0099 | | Action Reference_Dynamic
00b5 8405 | | Call 0x2,0x5
00b6 e416 | | Load 0x2,0x16
00b7 e417 | | Load 0x2,0x17
00b8 e418 | | Load 0x2,0x18
00b9 e419 | | Load 0x2,0x19
00ba 481a |H | Short_Literal 0x1a
00bb 4802 |H | Short_Literal 0x2
00bc 0099 | | Action Reference_Dynamic
00bd 481b |H | Short_Literal 0x1b
00be 4802 |H | Short_Literal 0x2
00bf 0099 | | Action Reference_Dynamic
00c0 481c |H | Short_Literal 0x1c
00c1 4802 |H | Short_Literal 0x2
00c2 0099 | | Action Reference_Dynamic
00c3 481d |H | Short_Literal 0x1d
00c4 4802 |H | Short_Literal 0x2
00c5 0099 | | Action Reference_Dynamic
00c6 481e |H | Short_Literal 0x1e
00c7 4802 |H | Short_Literal 0x2
00c8 0099 | | Action Reference_Dynamic
00c9 481f |H | Short_Literal 0x1f
00ca 4802 |H | Short_Literal 0x2
00cb 0099 | | Action Reference_Dynamic
00cc 4820 |H | Short_Literal 0x20
00cd 4802 |H | Short_Literal 0x2
00ce 0099 | | Action Reference_Dynamic
00cf 8405 | | Call 0x2,0x5
00d0 e424 | $ | Load 0x2,0x24
00d1 e425 | % | Load 0x2,0x25
00d2 e426 | & | Load 0x2,0x26
00d3 e427 | ' | Load 0x2,0x27
00d4 4828 |H( | Short_Literal 0x28
00d5 4802 |H | Short_Literal 0x2
00d6 0099 | | Action Reference_Dynamic
00d7 4829 |H) | Short_Literal 0x29
00d8 4802 |H | Short_Literal 0x2
00d9 0099 | | Action Reference_Dynamic
00da 482a |H* | Short_Literal 0x2a
00db 4802 |H | Short_Literal 0x2
00dc 0099 | | Action Reference_Dynamic
00dd 482b |H+ | Short_Literal 0x2b
00de 4802 |H | Short_Literal 0x2
00df 0099 | | Action Reference_Dynamic
00e0 482c |H, | Short_Literal 0x2c
00e1 4802 |H | Short_Literal 0x2
00e2 0099 | | Action Reference_Dynamic
00e3 482d |H- | Short_Literal 0x2d
00e4 4802 |H | Short_Literal 0x2
00e5 0099 | | Action Reference_Dynamic
00e6 482e |H. | Short_Literal 0x2e
00e7 4802 |H | Short_Literal 0x2
00e8 0099 | | Action Reference_Dynamic
00e9 8405 | | Call 0x2,0x5
00ea 4501 |E | Exit_Subprogram 0x1
00eb 0000 | | .XXX[0x1]
00ec 0000 0000 | | .LITERAL {0x00000000, 0x000007d0}
00f0 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
00f4 8000 0000 | | .LITERAL {0x80000000, 0x00020000}
00f8 8000 0000 | | .LITERAL {0x80000000, 0x00030000}
00fc 0000 0000 | | .BLANK 0000[0x4]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0103 | | .CONST 0x0103 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0001 | | .CONST 0x0001 ; Number of locals
0103 BODY_0100:
0103 INIT_0100:
0103 00da | | Load_Top At_Offset_2
0104 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0105 4401 |D | Exit_Subprogram With_Result,0x1
0106 0000 0000 | | .XXX[0x2]
0108 ; --------------------------------------------------------------------------------------
0108 ; SUBPROGRAM
0108 ; --------------------------------------------------------------------------------------
0108 010b | | .CONST 0x010b ; Address of begin
0109 0004 | | .CONST 0x0004 ; Address of exception handler
010a 0001 | | .CONST 0x0001 ; Number of locals
010b BODY_0108:
010b INIT_0108:
010b 00da | | Load_Top At_Offset_2
010c 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
010d 4401 |D | Exit_Subprogram With_Result,0x1
010e 0000 0000 | | .XXX[0x2]
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 3c00 |< | Execute Record,Field_Read,Field_Number 0x0
0115 4401 |D | Exit_Subprogram With_Result,0x1
0116 0000 0000 | | .XXX[0x2]
0118 ; --------------------------------------------------------------------------------------
0118 ; SUBPROGRAM
0118 ; --------------------------------------------------------------------------------------
0118 0131 | 1 | .CONST 0x0131 ; Address of begin
0119 0004 | | .CONST 0x0004 ; Address of exception handler
011a 0007 | | .CONST 0x0007 ; Number of locals
011b INIT_0118:
011b e7f6 | | Load 0x3,-0xa
011c 02c7 | | Declare_Variable Any
011d 00d8 | | Load_Top At_Offset_0
011e 1c00 | | Execute_Immediate Run_Utility,0x0
011f 4801 |H | Short_Literal 0x1
0120 480a |H | Short_Literal 0xa
0121 e7f8 | | Load 0x3,-0x8
0122 035b | [ | Declare_Type Array,Constrained
0123 0337 | 7 | Declare_Variable Array
0124 00d8 | | Load_Top At_Offset_0
0125 1c00 | | Execute_Immediate Run_Utility,0x0
0126 4801 |H | Short_Literal 0x1
0127 480a |H | Short_Literal 0xa
0128 e019 | | Load 0x0,0x19
0129 035b | [ | Declare_Type Array,Constrained
012a 0337 | 7 | Declare_Variable Array
012b 029f 03d3 | | Declare_Subprogram For_Call,INIT_03d0
012d 029f 0403 | | Declare_Subprogram For_Call,INIT_0400
012f 029f 0443 | C| Declare_Subprogram For_Call,INIT_0440
0131 BODY_0118:
0131 0092 048c | | Action Push_String_Extended,0x48c ; "Unique_"
0133 e7f5 | | Load 0x3,-0xb
0134 01cc | | Execute Vector,Catenate
0135 801a | | Call 0x0,0x1a
0136 00cf | | Action Mark_Auxiliary
0137 4805 |H | Short_Literal 0x5
0138 4801 |H | Short_Literal 0x1
0139 0007 | | Action Break_Optional
013a 87fd | | Call 0x3,-0x3
013b c602 | | Store 0x3,0x2
013c 0092 048d | | Action Push_String_Extended,0x48d ; "Unique "
013e e7f5 | | Load 0x3,-0xb
013f 01cc | | Execute Vector,Catenate
0140 0092 048e | | Action Push_String_Extended,0x48e ; " "
0142 01cc | | Execute Vector,Catenate
0143 801b | | Call 0x0,0x1b
0144 480a |H | Short_Literal 0xa
0145 4801 |H | Short_Literal 0x1
0146 e602 | | Load 0x3,0x2
0147 87fe | | Call 0x3,-0x2
0148 801c | | Call 0x0,0x1c
0149 0092 048f | | Action Push_String_Extended,0x48f ; " => "
014b 801b | | Call 0x0,0x1b
014c 4822 |H" | Short_Literal 0x22
014d 4822 |H" | Short_Literal 0x22
014e e602 | | Load 0x3,0x2
014f 87fa | | Call 0x3,-0x6
0150 01ca | | Execute Vector,Prepend
0151 01cb | | Execute Vector,Append
0152 801d | | Call 0x0,0x1d
0153 4801 |H | Short_Literal 0x1
0154 801e | | Call 0x0,0x1e
0155 00c8 | | Action Pop_Auxiliary_Range
0156 3fe3 |? | Loop_Increasing 0x13a
0157 00ce | | Action Pop_Auxiliary
0158 0092 0490 | | Action Push_String_Extended,0x490 ; "To/From_String"
015a 801a | | Call 0x0,0x1a
015b 4800 |H | Short_Literal 0x0
015c 4803 |H | Short_Literal 0x3
015d e01f | | Load 0x0,0x1f
015e 0334 | 4 | Declare_Variable Array,With_Constraint
015f 50e4 |P | Indirect_Literal Any,0x244,{0x514f6e65, 0x00000000}
0160 8605 | | Call 0x3,0x5
0161 4800 |H | Short_Literal 0x0
0162 4803 |H | Short_Literal 0x3
0163 e01f | | Load 0x0,0x1f
0164 0334 | 4 | Declare_Variable Array,With_Constraint
0165 50e2 |P | Indirect_Literal Any,0x248,{0x5254776f, 0x00000000}
0166 8605 | | Call 0x3,0x5
0167 4800 |H | Short_Literal 0x0
0168 4805 |H | Short_Literal 0x5
0169 e01f | | Load 0x0,0x1f
016a 0334 | 4 | Declare_Variable Array,With_Constraint
016b 50e0 |P | Indirect_Literal Any,0x24c,{0x53546872, 0x65650000}
016c 8605 | | Call 0x3,0x5
016d 4800 |H | Short_Literal 0x0
016e 4804 |H | Short_Literal 0x4
016f e01f | | Load 0x0,0x1f
0170 0334 | 4 | Declare_Variable Array,With_Constraint
0171 50de |P | Indirect_Literal Any,0x250,{0x54466f75, 0x72000000}
0172 8605 | | Call 0x3,0x5
0173 4800 |H | Short_Literal 0x0
0174 4811 |H | Short_Literal 0x11
0175 e01f | | Load 0x0,0x1f
0176 0334 | 4 | Declare_Variable Array,With_Constraint
0177 50dc |P | Indirect_Literal Any,0x254,{0x55416e64, 0x2d412d4c}
0178 8605 | | Call 0x3,0x5
0179 4800 |H | Short_Literal 0x0
017a 480e |H | Short_Literal 0xe
017b e01f | | Load 0x0,0x1f
017c 0334 | 4 | Declare_Variable Array,With_Constraint
017d 50e2 |P | Indirect_Literal Any,0x260,{0x56536f6d, 0x65746869}
017e 8605 | | Call 0x3,0x5
017f 4800 |H | Short_Literal 0x0
0180 480e |H | Short_Literal 0xe
0181 e01f | | Load 0x0,0x1f
0182 0334 | 4 | Declare_Variable Array,With_Constraint
0183 50e4 |P | Indirect_Literal Any,0x268,{0x57736f6d, 0x65746869}
0184 8605 | | Call 0x3,0x5
0185 0092 0491 | | Action Push_String_Extended,0x491 ; "To/From_Old_String"
0187 801a | | Call 0x0,0x1a
0188 4800 |H | Short_Literal 0x0
0189 4803 |H | Short_Literal 0x3
018a e01f | | Load 0x0,0x1f
018b 0334 | 4 | Declare_Variable Array,With_Constraint
018c 50e3 |P | Indirect_Literal Any,0x270,{0x514f6e65, 0x00000000}
018d 8605 | | Call 0x3,0x5
018e 4800 |H | Short_Literal 0x0
018f 4803 |H | Short_Literal 0x3
0190 e01f | | Load 0x0,0x1f
0191 0334 | 4 | Declare_Variable Array,With_Constraint
0192 50e1 |P | Indirect_Literal Any,0x274,{0x5254776f, 0x00000000}
0193 8605 | | Call 0x3,0x5
0194 4800 |H | Short_Literal 0x0
0195 4805 |H | Short_Literal 0x5
0196 e01f | | Load 0x0,0x1f
0197 0334 | 4 | Declare_Variable Array,With_Constraint
0198 50df |P | Indirect_Literal Any,0x278,{0x53546872, 0x65650000}
0199 8605 | | Call 0x3,0x5
019a 4800 |H | Short_Literal 0x0
019b 4804 |H | Short_Literal 0x4
019c e01f | | Load 0x0,0x1f
019d 0334 | 4 | Declare_Variable Array,With_Constraint
019e 50dd |P | Indirect_Literal Any,0x27c,{0x54466f75, 0x72000000}
019f 8605 | | Call 0x3,0x5
01a0 4800 |H | Short_Literal 0x0
01a1 4811 |H | Short_Literal 0x11
01a2 e01f | | Load 0x0,0x1f
01a3 0334 | 4 | Declare_Variable Array,With_Constraint
01a4 50db |P | Indirect_Literal Any,0x280,{0x55416e64, 0x2d412d4c}
01a5 8605 | | Call 0x3,0x5
01a6 4800 |H | Short_Literal 0x0
01a7 480e |H | Short_Literal 0xe
01a8 e01f | | Load 0x0,0x1f
01a9 0334 | 4 | Declare_Variable Array,With_Constraint
01aa 50e1 |P | Indirect_Literal Any,0x28c,{0x56536f6d, 0x65746869}
01ab 8605 | | Call 0x3,0x5
01ac 4800 |H | Short_Literal 0x0
01ad 480e |H | Short_Literal 0xe
01ae e01f | | Load 0x0,0x1f
01af 0334 | 4 | Declare_Variable Array,With_Constraint
01b0 50e3 |P | Indirect_Literal Any,0x294,{0x57736f6d, 0x65746869}
01b1 8605 | | Call 0x3,0x5
01b2 0092 0492 | | Action Push_String_Extended,0x492 ; "Simple "
01b4 e7f5 | | Load 0x3,-0xb
01b5 01cc | | Execute Vector,Catenate
01b6 0092 0493 | | Action Push_String_Extended,0x493 ; " lists"
01b8 01cc | | Execute Vector,Catenate
01b9 801a | | Call 0x0,0x1a
01ba 4800 |H | Short_Literal 0x0
01bb 4803 |H | Short_Literal 0x3
01bc e01f | | Load 0x0,0x1f
01bd 0334 | 4 | Declare_Variable Array,With_Constraint
01be 50dd |P | Indirect_Literal Any,0x29c,{0x514f6e65, 0x00000000}
01bf 8606 | | Call 0x3,0x6
01c0 4800 |H | Short_Literal 0x0
01c1 4804 |H | Short_Literal 0x4
01c2 e01f | | Load 0x0,0x1f
01c3 0334 | 4 | Declare_Variable Array,With_Constraint
01c4 50db |P | Indirect_Literal Any,0x2a0,{0x5254776f, 0x2e000000}
01c5 8606 | | Call 0x3,0x6
01c6 4800 |H | Short_Literal 0x0
01c7 480b |H | Short_Literal 0xb
01c8 e01f | | Load 0x0,0x1f
01c9 0334 | 4 | Declare_Variable Array,With_Constraint
01ca 50d9 |P | Indirect_Literal Any,0x2a4,{0x53546872, 0x65652e54}
01cb 8606 | | Call 0x3,0x6
01cc 4800 |H | Short_Literal 0x0
01cd 4825 |H% | Short_Literal 0x25
01ce e01f | | Load 0x0,0x1f
01cf 0334 | 4 | Declare_Variable Array,With_Constraint
01d0 50db |P | Indirect_Literal Any,0x2ac,{0x54466f75, 0x722e5354}
01d1 8606 | | Call 0x3,0x6
01d2 4800 |H | Short_Literal 0x0
01d3 4813 |H | Short_Literal 0x13
01d4 e01f | | Load 0x0,0x1f
01d5 0334 | 4 | Declare_Variable Array,With_Constraint
01d6 50e9 |P | Indirect_Literal Any,0x2c0,{0x55412e55, 0x422e5543}
01d7 8606 | | Call 0x3,0x6
01d8 0092 0494 | | Action Push_String_Extended,0x494 ; "Tight "
01da e7f5 | | Load 0x3,-0xb
01db 01cc | | Execute Vector,Catenate
01dc 0092 0495 | | Action Push_String_Extended,0x495 ; "/Binding lists"
01de 01cc | | Execute Vector,Catenate
01df 801a | | Call 0x0,0x1a
01e0 4800 |H | Short_Literal 0x0
01e1 4803 |H | Short_Literal 0x3
01e2 e01f | | Load 0x0,0x1f
01e3 0334 | 4 | Declare_Variable Array,With_Constraint
01e4 50e7 |P | Indirect_Literal Any,0x2cc,{0x514f6e65, 0x00000000}
01e5 8607 | | Call 0x3,0x7
01e6 4800 |H | Short_Literal 0x0
01e7 4804 |H | Short_Literal 0x4
01e8 e01f | | Load 0x0,0x1f
01e9 0334 | 4 | Declare_Variable Array,With_Constraint
01ea 50e5 |P | Indirect_Literal Any,0x2d0,{0x5254776f, 0x2e000000}
01eb 8607 | | Call 0x3,0x7
01ec 4800 |H | Short_Literal 0x0
01ed 480b |H | Short_Literal 0xb
01ee e01f | | Load 0x0,0x1f
01ef 0334 | 4 | Declare_Variable Array,With_Constraint
01f0 50e3 |P | Indirect_Literal Any,0x2d4,{0x53546872, 0x65652e54}
01f1 8607 | | Call 0x3,0x7
01f2 4800 |H | Short_Literal 0x0
01f3 4825 |H% | Short_Literal 0x25
01f4 e01f | | Load 0x0,0x1f
01f5 0334 | 4 | Declare_Variable Array,With_Constraint
01f6 50e5 |P | Indirect_Literal Any,0x2dc,{0x54466f75, 0x722e5354}
01f7 8607 | | Call 0x3,0x7
01f8 4800 |H | Short_Literal 0x0
01f9 4813 |H | Short_Literal 0x13
01fa e01f | | Load 0x0,0x1f
01fb 0334 | 4 | Declare_Variable Array,With_Constraint
01fc 50f3 |P | Indirect_Literal Any,0x2f0,{0x55412e55, 0x422e5543}
01fd 8607 | | Call 0x3,0x7
01fe 0092 0496 | | Action Push_String_Extended,0x496 ; "Mixed "
0200 e7f5 | | Load 0x3,-0xb
0201 01cc | | Execute Vector,Catenate
0202 0092 0495 | | Action Push_String_Extended,0x495 ; "/Binding lists"
0204 01cc | | Execute Vector,Catenate
0205 801a | | Call 0x0,0x1a
0206 4800 |H | Short_Literal 0x0
0207 4803 |H | Short_Literal 0x3
0208 e01f | | Load 0x0,0x1f
0209 0334 | 4 | Declare_Variable Array,With_Constraint
020a 50f1 |P | Indirect_Literal Any,0x2fc,{0x514f6e65, 0x00000000}
020b 8607 | | Call 0x3,0x7
020c 4800 |H | Short_Literal 0x0
020d 4804 |H | Short_Literal 0x4
020e e01f | | Load 0x0,0x1f
020f 0334 | 4 | Declare_Variable Array,With_Constraint
0210 50ef |P | Indirect_Literal Any,0x300,{0x2a514f6e, 0x65000000}
0211 8607 | | Call 0x3,0x7
0212 4800 |H | Short_Literal 0x0
0213 4804 |H | Short_Literal 0x4
0214 e01f | | Load 0x0,0x1f
0215 0334 | 4 | Declare_Variable Array,With_Constraint
0216 50ed |P | Indirect_Literal Any,0x304,{0x2e514f6e, 0x65000000}
0217 8607 | | Call 0x3,0x7
0218 4800 |H | Short_Literal 0x0
0219 4804 |H | Short_Literal 0x4
021a e01f | | Load 0x0,0x1f
021b 0334 | 4 | Declare_Variable Array,With_Constraint
021c 50eb |P | Indirect_Literal Any,0x308,{0x5254776f, 0x2e000000}
021d 8607 | | Call 0x3,0x7
021e 4800 |H | Short_Literal 0x0
021f 4804 |H | Short_Literal 0x4
0220 e01f | | Load 0x0,0x1f
0221 0334 | 4 | Declare_Variable Array,With_Constraint
0222 50e9 |P | Indirect_Literal Any,0x30c,{0x5254776f, 0x2a000000}
0223 8607 | | Call 0x3,0x7
0224 4800 |H | Short_Literal 0x0
0225 480b |H | Short_Literal 0xb
0226 e01f | | Load 0x0,0x1f
0227 0334 | 4 | Declare_Variable Array,With_Constraint
0228 50e7 |P | Indirect_Literal Any,0x310,{0x53546872, 0x65652e54}
0229 8607 | | Call 0x3,0x7
022a 4800 |H | Short_Literal 0x0
022b 480b |H | Short_Literal 0xb
022c e01f | | Load 0x0,0x1f
022d 0334 | 4 | Declare_Variable Array,With_Constraint
022e 50e9 |P | Indirect_Literal Any,0x318,{0x53546872, 0x65652a54}
022f 8607 | | Call 0x3,0x7
0230 4800 |H | Short_Literal 0x0
0231 4825 |H% | Short_Literal 0x25
0232 e01f | | Load 0x0,0x1f
0233 0334 | 4 | Declare_Variable Array,With_Constraint
0234 50eb |P | Indirect_Literal Any,0x320,{0x54466f75, 0x722e5354}
0235 8607 | | Call 0x3,0x7
0236 4800 |H | Short_Literal 0x0
0237 4826 |H& | Short_Literal 0x26
0238 e01f | | Load 0x0,0x1f
0239 0334 | 4 | Declare_Variable Array,With_Constraint
023a 50f9 |P | Indirect_Literal Any,0x334,{0x2a54466f, 0x75722e53}
023b 8607 | | Call 0x3,0x7
023c 4800 |H | Short_Literal 0x0
023d 4813 |H | Short_Literal 0x13
023e e01f | | Load 0x0,0x1f
023f 0334 | 4 | Declare_Variable Array,With_Constraint
0240 5107 |Q | Indirect_Literal Any,0x348,{0x55412a55, 0x422a5543}
0241 8607 | | Call 0x3,0x7
0242 450c |E | Exit_Subprogram 0xc
0243 0000 | | .XXX[0x1]
0244 514f 6e65 |QOne| .LITERAL {0x514f6e65, 0x00000000}
0248 5254 776f |RTwo| .LITERAL {0x5254776f, 0x00000000}
024c 5354 6872 |SThr| .LITERAL {0x53546872, 0x65650000}
0250 5446 6f75 |TFou| .LITERAL {0x54466f75, 0x72000000}
0254 5541 6e64 |UAnd| .LITERAL {0x55416e64, 0x2d412d4c}
0258 6f6e 672d |ong-| .XXX[0x8]
025a 5374 7269 |Stri|
025c 6e67 0000 |ng |
025e 0000 0000 | |
0260 5653 6f6d |VSom| .LITERAL {0x56536f6d, 0x65746869}
0264 6e67 5f45 |ng_E| .XXX[0x4]
0266 6c73 6500 |lse |
0268 5773 6f6d |Wsom| .LITERAL {0x57736f6d, 0x65746869}
026c 6e67 5f65 |ng_e| .XXX[0x4]
026e 6c73 6500 |lse |
0270 514f 6e65 |QOne| .LITERAL {0x514f6e65, 0x00000000}
0274 5254 776f |RTwo| .LITERAL {0x5254776f, 0x00000000}
0278 5354 6872 |SThr| .LITERAL {0x53546872, 0x65650000}
027c 5446 6f75 |TFou| .LITERAL {0x54466f75, 0x72000000}
0280 5541 6e64 |UAnd| .LITERAL {0x55416e64, 0x2d412d4c}
0284 6f6e 672d |ong-| .XXX[0x8]
0286 5374 7269 |Stri|
0288 6e67 0000 |ng |
028a 0000 0000 | |
028c 5653 6f6d |VSom| .LITERAL {0x56536f6d, 0x65746869}
0290 6e67 5f45 |ng_E| .XXX[0x4]
0292 6c73 6500 |lse |
0294 5773 6f6d |Wsom| .LITERAL {0x57736f6d, 0x65746869}
0298 6e67 5f65 |ng_e| .XXX[0x4]
029a 6c73 6500 |lse |
029c 514f 6e65 |QOne| .LITERAL {0x514f6e65, 0x00000000}
02a0 5254 776f |RTwo| .LITERAL {0x5254776f, 0x2e000000}
02a4 5354 6872 |SThr| .LITERAL {0x53546872, 0x65652e54}
02a8 466f 7572 |Four| .XXX[0x4]
02aa 0000 0000 | |
02ac 5446 6f75 |TFou| .LITERAL {0x54466f75, 0x722e5354}
02b0 6872 6565 |hree| .XXX[0x10]
02b2 2e51 4f6e |.QOn|
02b4 652e 5254 |e.RT|
02b6 776f 2e56 |wo.V|
02b8 536f 6d65 |Some|
02ba 7468 696e |thin|
02bc 675f 456c |g_El|
02be 7365 0000 |se |
02c0 5541 2e55 |UA.U| .LITERAL {0x55412e55, 0x422e5543}
02c4 2e55 442e |.UD.| .XXX[0x8]
02c6 5545 2e55 |UE.U|
02c8 462e 5547 |F.UG|
02ca 0000 0000 | |
02cc 514f 6e65 |QOne| .LITERAL {0x514f6e65, 0x00000000}
02d0 5254 776f |RTwo| .LITERAL {0x5254776f, 0x2e000000}
02d4 5354 6872 |SThr| .LITERAL {0x53546872, 0x65652e54}
02d8 466f 7572 |Four| .XXX[0x4]
02da 0000 0000 | |
02dc 5446 6f75 |TFou| .LITERAL {0x54466f75, 0x722e5354}
02e0 6872 6565 |hree| .XXX[0x10]
02e2 2e51 4f6e |.QOn|
02e4 652e 5254 |e.RT|
02e6 776f 2e56 |wo.V|
02e8 536f 6d65 |Some|
02ea 7468 696e |thin|
02ec 675f 456c |g_El|
02ee 7365 0000 |se |
02f0 5541 2e55 |UA.U| .LITERAL {0x55412e55, 0x422e5543}
02f4 2e55 442e |.UD.| .XXX[0x8]
02f6 5545 2e55 |UE.U|
02f8 462e 5547 |F.UG|
02fa 0000 0000 | |
02fc 514f 6e65 |QOne| .LITERAL {0x514f6e65, 0x00000000}
0300 2a51 4f6e |*QOn| .LITERAL {0x2a514f6e, 0x65000000}
0304 2e51 4f6e |.QOn| .LITERAL {0x2e514f6e, 0x65000000}
0308 5254 776f |RTwo| .LITERAL {0x5254776f, 0x2e000000}
030c 5254 776f |RTwo| .LITERAL {0x5254776f, 0x2a000000}
0310 5354 6872 |SThr| .LITERAL {0x53546872, 0x65652e54}
0314 466f 7572 |Four| .XXX[0x4]
0316 0000 0000 | |
0318 5354 6872 |SThr| .LITERAL {0x53546872, 0x65652a54}
031c 466f 7572 |Four| .XXX[0x4]
031e 0000 0000 | |
0320 5446 6f75 |TFou| .LITERAL {0x54466f75, 0x722e5354}
0324 6872 6565 |hree| .XXX[0x10]
0326 2e51 4f6e |.QOn|
0328 652e 5254 |e.RT|
032a 776f 2e56 |wo.V|
032c 536f 6d65 |Some|
032e 7468 696e |thin|
0330 675f 456c |g_El|
0332 7365 0000 |se |
0334 2a54 466f |*TFo| .LITERAL {0x2a54466f, 0x75722e53}
0338 5468 7265 |Thre| .XXX[0x10]
033a 652a 514f |e*QO|
033c 6e65 2e52 |ne.R|
033e 5477 6f2a |Two*|
0340 5653 6f6d |VSom|
0342 6574 6869 |ethi|
0344 6e67 5f45 |ng_E|
0346 6c73 6500 |lse |
0348 5541 2a55 |UA*U| .LITERAL {0x55412a55, 0x422a5543}
034c 2a55 442e |*UD.| .XXX[0x6]
034e 5545 2e55 |UE.U|
0350 462e 5547 |F.UG|
0352 0000 0000 | | .BLANK 0000[0x6]
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 00db | | Load_Top At_Offset_3
035c 00db | | Load_Top At_Offset_3
035d e020 | | Load 0x0,0x20
035e e021 | ! | Load 0x0,0x21
035f e022 | " | Load 0x0,0x22
0360 a023 | # | Reference 0x0,0x23
0361 a024 | $ | Reference 0x0,0x24
0362 8025 | % | Call 0x0,0x25
0363 4502 |E | Exit_Subprogram 0x2
0364 0000 0000 | | .BLANK 0000[0x4]
0368 ; --------------------------------------------------------------------------------------
0368 ; SUBPROGRAM
0368 ; --------------------------------------------------------------------------------------
0368 036b | k | .CONST 0x036b ; Address of begin
0369 0004 | | .CONST 0x0004 ; Address of exception handler
036a 0001 | | .CONST 0x0001 ; Number of locals
036b BODY_0368:
036b INIT_0368:
036b e7fd | | Load 0x3,-0x3
036c e7fe | | Load 0x3,-0x2
036d e7ff | | Load 0x3,-0x1
036e e026 | & | Load 0x0,0x26
036f e027 | ' | Load 0x0,0x27
0370 e028 | ( | Load 0x0,0x28
0371 a029 | ) | Reference 0x0,0x29
0372 a02a | * | Reference 0x0,0x2a
0373 802b | + | Call 0x0,0x2b
0374 4502 |E | Exit_Subprogram 0x2
0375 0000 0000 | | .XXX[0x3]
0377 0000 | |
0378 ; --------------------------------------------------------------------------------------
0378 ; SUBPROGRAM
0378 ; --------------------------------------------------------------------------------------
0378 037b | { | .CONST 0x037b ; Address of begin
0379 0004 | | .CONST 0x0004 ; Address of exception handler
037a 0001 | | .CONST 0x0001 ; Number of locals
037b BODY_0378:
037b INIT_0378:
037b 00db | | Load_Top At_Offset_3
037c 00db | | Load_Top At_Offset_3
037d e02c | , | Load 0x0,0x2c
037e e02d | - | Load 0x0,0x2d
037f e02e | . | Load 0x0,0x2e
0380 a02f | / | Reference 0x0,0x2f
0381 a030 | 0 | Reference 0x0,0x30
0382 8025 | % | Call 0x0,0x25
0383 4502 |E | Exit_Subprogram 0x2
0384 0000 0000 | | .BLANK 0000[0x4]
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b e7fd | | Load 0x3,-0x3
038c e7fe | | Load 0x3,-0x2
038d e7ff | | Load 0x3,-0x1
038e e031 | 1 | Load 0x0,0x31
038f e032 | 2 | Load 0x0,0x32
0390 e033 | 3 | Load 0x0,0x33
0391 a034 | 4 | Reference 0x0,0x34
0392 a035 | 5 | Reference 0x0,0x35
0393 802b | + | Call 0x0,0x2b
0394 4502 |E | Exit_Subprogram 0x2
0395 0000 0000 | | .XXX[0x3]
0397 0000 | |
0398 ; --------------------------------------------------------------------------------------
0398 ; SUBPROGRAM
0398 ; --------------------------------------------------------------------------------------
0398 039b | | .CONST 0x039b ; Address of begin
0399 0004 | | .CONST 0x0004 ; Address of exception handler
039a 0001 | | .CONST 0x0001 ; Number of locals
039b BODY_0398:
039b INIT_0398:
039b 00db | | Load_Top At_Offset_3
039c 00db | | Load_Top At_Offset_3
039d e036 | 6 | Load 0x0,0x36
039e e037 | 7 | Load 0x0,0x37
039f e038 | 8 | Load 0x0,0x38
03a0 a039 | 9 | Reference 0x0,0x39
03a1 a03a | : | Reference 0x0,0x3a
03a2 8025 | % | Call 0x0,0x25
03a3 4502 |E | Exit_Subprogram 0x2
03a4 0000 0000 | | .BLANK 0000[0x4]
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 e7fd | | Load 0x3,-0x3
03ac e7fe | | Load 0x3,-0x2
03ad e7ff | | Load 0x3,-0x1
03ae e03b | ; | Load 0x0,0x3b
03af e03c | < | Load 0x0,0x3c
03b0 e03d | = | Load 0x0,0x3d
03b1 a03e | > | Reference 0x0,0x3e
03b2 a03f | ? | Reference 0x0,0x3f
03b3 802b | + | Call 0x0,0x2b
03b4 4502 |E | Exit_Subprogram 0x2
03b5 0000 0000 | | .XXX[0x3]
03b7 0000 | |
03b8 ; --------------------------------------------------------------------------------------
03b8 ; SUBPROGRAM
03b8 ; --------------------------------------------------------------------------------------
03b8 03bd | | .CONST 0x03bd ; Address of begin
03b9 0004 | | .CONST 0x0004 ; Address of exception handler
03ba 0002 | | .CONST 0x0002 ; Number of locals
03bb INIT_03b8:
03bb e040 | @ | Load 0x0,0x40
03bc 0007 | | Action Break_Optional
03bd BODY_03b8:
03bd e040 | @ | Load 0x0,0x40
03be 4801 |H | Short_Literal 0x1
03bf e017 | | Load 0x0,0x17
03c0 e041 | A | Load 0x0,0x41
03c1 00ad | | Action InMicrocode,Package,Field_Execute_Dynamic
03c2 0039 | 9 | Store_Top Access,At_Offset_1
03c3 e040 | @ | Load 0x0,0x40
03c4 8042 | B | Call 0x0,0x42
03c5 0039 | 9 | Store_Top Access,At_Offset_1
03c6 00d8 | | Load_Top At_Offset_0
03c7 4801 |H | Short_Literal 0x1
03c8 e017 | | Load 0x0,0x17
03c9 e043 | C | Load 0x0,0x43
03ca 00ad | | Action InMicrocode,Package,Field_Execute_Dynamic
03cb 0039 | 9 | Store_Top Access,At_Offset_1
03cc 4501 |E | Exit_Subprogram 0x1
03cd 0000 0000 | | .XXX[0x3]
03cf 0000 | |
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 4800 |H | Short_Literal 0x0
03d4 00db | | Load_Top At_Offset_3
03d5 87f9 | | Call 0x3,-0x7
03d6 c602 | | Store 0x3,0x2
03d7 0092 0497 | | Action Push_String_Extended,0x497 ; "Named "
03d9 e7f5 | | Load 0x3,-0xb
03da 01cc | | Execute Vector,Catenate
03db 0092 048e | | Action Push_String_Extended,0x48e ; " "
03dd 01cc | | Execute Vector,Catenate
03de 801b | | Call 0x0,0x1b
03df 4822 |H" | Short_Literal 0x22
03e0 4822 |H" | Short_Literal 0x22
03e1 e9ff | | Load 0x4,-0x1
03e2 01ca | | Execute Vector,Prepend
03e3 01cb | | Execute Vector,Append
03e4 801d | | Call 0x0,0x1d
03e5 4820 |H | Short_Literal 0x20
03e6 8044 | D | Call 0x0,0x44
03e7 481f |H | Short_Literal 0x1f
03e8 8045 | E | Call 0x0,0x45
03e9 480a |H | Short_Literal 0xa
03ea 4801 |H | Short_Literal 0x1
03eb e602 | | Load 0x3,0x2
03ec 87fe | | Call 0x3,-0x2
03ed 801c | | Call 0x0,0x1c
03ee 0092 048f | | Action Push_String_Extended,0x48f ; " => "
03f0 801b | | Call 0x0,0x1b
03f1 4822 |H" | Short_Literal 0x22
03f2 4822 |H" | Short_Literal 0x22
03f3 e602 | | Load 0x3,0x2
03f4 87fa | | Call 0x3,-0x6
03f5 01ca | | Execute Vector,Prepend
03f6 01cb | | Execute Vector,Append
03f7 801d | | Call 0x0,0x1d
03f8 4801 |H | Short_Literal 0x1
03f9 801e | | Call 0x0,0x1e
03fa 4502 |E | Exit_Subprogram 0x2
03fb 0000 0000 | | .BLANK 0000[0x5]
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 e7f5 | | Load 0x3,-0xb
0404 0092 0498 | | Action Push_String_Extended,0x498 ; "-List := "
0406 01cc | | Execute Vector,Catenate
0407 801b | | Call 0x0,0x1b
0408 4822 |H" | Short_Literal 0x22
0409 4822 |H" | Short_Literal 0x22
040a e9ff | | Load 0x4,-0x1
040b 01ca | | Execute Vector,Prepend
040c 01cb | | Execute Vector,Append
040d 801d | | Call 0x0,0x1d
040e 4801 |H | Short_Literal 0x1
040f 801e | | Call 0x0,0x1e
0410 e603 | | Load 0x3,0x3
0411 00db | | Load_Top At_Offset_3
0412 87fb | | Call 0x3,-0x5
0413 00d1 | | Pop_Control Pop_Count_1
0414 0092 0499 | | Action Push_String_Extended,0x499 ; "Result =>"
0416 801b | | Call 0x0,0x1b
0417 4801 |H | Short_Literal 0x1
0418 801e | | Call 0x0,0x1e
0419 00cf | | Action Mark_Auxiliary
041a e603 | | Load 0x3,0x3
041b 01d9 | | Execute Vector,Reverse_Bounds
041c 0007 | | Action Break_Optional
041d 00d8 | | Load_Top At_Offset_0
041e e603 | | Load 0x3,0x3
041f 01d7 | | Execute Vector,Field_Read
0420 e7f7 | | Load 0x3,-0x9
0421 012f | / | Execute Any,Equal
0422 6802 |h | Jump_Zero 0x425
0423 00d2 | | Pop_Control Pop_Count_2
0424 7816 |x | Jump 0x43b
0425 0092 049a | | Action Push_String_Extended,0x49a ; " "
0427 801b | | Call 0x0,0x1b
0428 480a |H | Short_Literal 0xa
0429 4801 |H | Short_Literal 0x1
042a 00da | | Load_Top At_Offset_2
042b 801c | | Call 0x0,0x1c
042c 4820 |H | Short_Literal 0x20
042d 8044 | D | Call 0x0,0x44
042e 4822 |H" | Short_Literal 0x22
042f 4822 |H" | Short_Literal 0x22
0430 00da | | Load_Top At_Offset_2
0431 e603 | | Load 0x3,0x3
0432 01d7 | | Execute Vector,Field_Read
0433 87fa | | Call 0x3,-0x6
0434 01ca | | Execute Vector,Prepend
0435 01cb | | Execute Vector,Append
0436 801d | | Call 0x0,0x1d
0437 4801 |H | Short_Literal 0x1
0438 801e | | Call 0x0,0x1e
0439 00c8 | | Action Pop_Auxiliary_Range
043a 3fe2 |? | Loop_Increasing 0x41d
043b 00ce | | Action Pop_Auxiliary
043c 4801 |H | Short_Literal 0x1
043d 801e | | Call 0x0,0x1e
043e 4502 |E | Exit_Subprogram 0x2
043f 0000 | | .XXX[0x1]
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 e7f5 | | Load 0x3,-0xb
0444 0092 0498 | | Action Push_String_Extended,0x498 ; "-List := "
0446 01cc | | Execute Vector,Catenate
0447 801b | | Call 0x0,0x1b
0448 4822 |H" | Short_Literal 0x22
0449 4822 |H" | Short_Literal 0x22
044a e9ff | | Load 0x4,-0x1
044b 01ca | | Execute Vector,Prepend
044c 01cb | | Execute Vector,Append
044d 801d | | Call 0x0,0x1d
044e 4801 |H | Short_Literal 0x1
044f 801e | | Call 0x0,0x1e
0450 e603 | | Load 0x3,0x3
0451 e604 | | Load 0x3,0x4
0452 e9ff | | Load 0x4,-0x1
0453 87fc | | Call 0x3,-0x4
0454 00d2 | | Pop_Control Pop_Count_2
0455 0092 0499 | | Action Push_String_Extended,0x499 ; "Result =>"
0457 801b | | Call 0x0,0x1b
0458 4801 |H | Short_Literal 0x1
0459 801e | | Call 0x0,0x1e
045a 00cf | | Action Mark_Auxiliary
045b e603 | | Load 0x3,0x3
045c 01d9 | | Execute Vector,Reverse_Bounds
045d 0007 | | Action Break_Optional
045e 00d8 | | Load_Top At_Offset_0
045f e603 | | Load 0x3,0x3
0460 01d7 | | Execute Vector,Field_Read
0461 e7f7 | | Load 0x3,-0x9
0462 012f | / | Execute Any,Equal
0463 6802 |h | Jump_Zero 0x466
0464 00d2 | | Pop_Control Pop_Count_2
0465 781f |x | Jump 0x485
0466 0092 049a | | Action Push_String_Extended,0x49a ; " "
0468 801b | | Call 0x0,0x1b
0469 480a |H | Short_Literal 0xa
046a 4801 |H | Short_Literal 0x1
046b 00da | | Load_Top At_Offset_2
046c 801c | | Call 0x0,0x1c
046d 4820 |H | Short_Literal 0x20
046e 8044 | D | Call 0x0,0x44
046f 00d8 | | Load_Top At_Offset_0
0470 e604 | | Load 0x3,0x4
0471 01d7 | | Execute Vector,Field_Read
0472 e046 | F | Load 0x0,0x46
0473 011c | | Execute Any,Convert_Unchecked
0474 1c01 | | Execute_Immediate Run_Utility,0x1
0475 801b | | Call 0x0,0x1b
0476 4820 |H | Short_Literal 0x20
0477 8044 | D | Call 0x0,0x44
0478 4822 |H" | Short_Literal 0x22
0479 4822 |H" | Short_Literal 0x22
047a 00da | | Load_Top At_Offset_2
047b e603 | | Load 0x3,0x3
047c 01d7 | | Execute Vector,Field_Read
047d 87fa | | Call 0x3,-0x6
047e 01ca | | Execute Vector,Prepend
047f 01cb | | Execute Vector,Append
0480 801d | | Call 0x0,0x1d
0481 4801 |H | Short_Literal 0x1
0482 801e | | Call 0x0,0x1e
0483 00c8 | | Action Pop_Auxiliary_Range
0484 3fd9 |? | Loop_Increasing 0x45e
0485 00ce | | Action Pop_Auxiliary
0486 4801 |H | Short_Literal 0x1
0487 801e | | Call 0x0,0x1e
0488 4502 |E | Exit_Subprogram 0x2
0489 ; --------------------------------------------------------------------------------------
0489 ; STRING TABLE
0489 ; --------------------------------------------------------------------------------------
0489 0026 | & | .STRTAB 0x0026->0x049c ; "Class"
048a 0029 | ) | .STRTAB 0x0029->0x049e ; "Name"
048b 002b | + | .STRTAB 0x002b->0x04a0 ; "Representation"
048c 0037 | 7 | .STRTAB 0x0037->0x04a7 ; "Unique_"
048d 003c | < | .STRTAB 0x003c->0x04ab ; "Unique "
048e 0041 | A | .STRTAB 0x0041->0x04ae ; " "
; " "
048f 0040 | @ | .STRTAB 0x0040->0x04af ; " => "
; " => "
0490 0042 | B | .STRTAB 0x0042->0x04b1 ; "To/From_String"
0491 004e | N | .STRTAB 0x004e->0x04b8 ; "To/From_Old_String"
0492 005e | ^ | .STRTAB 0x005e->0x04c1 ; "Simple "
0493 0063 | c | .STRTAB 0x0063->0x04c4 ; " lists"
0494 0067 | g | .STRTAB 0x0067->0x04c7 ; "Tight "
0495 006b | k | .STRTAB 0x006b->0x04ca ; "/Binding lists"
; "/Binding lists"
0496 0077 | w | .STRTAB 0x0077->0x04d1 ; "Mixed "
0497 007b | { | .STRTAB 0x007b->0x04d4 ; "Named "
0498 007f | | .STRTAB 0x007f->0x04d7 ; "-List := "
; "-List := "
0499 0086 | | .STRTAB 0x0086->0x04dc ; "Result =>"
; "Result =>"
049a 008d | | .STRTAB 0x008d->0x04e0 ; " "
; " "
049b 008f | | .STREND 0x008f->0x04e2
049c 436c 6173 |Clas| .STRTAB_STRINGS
04e3 0000 0000 | | .BLANK 0000[0x5]
04e8 ; --------------------------------------------------------------------------------------
04e8 ; Debug Table
04e8 ; --------------------------------------------------------------------------------------
04e8 0004 0000 | | .DEBUG4 0x0004,0x0000,0x691b,0x0000,0x0001,0x0010
04ee 000b 0000 | | .DBG4T 0x000b,0x0000,0x8000,0x0000
04f2 001b 052e | .| .DBG4T 0x001b,0x052e,0x8001,0x0000
04f6 0103 053e | >| .DBG4T 0x0103,0x053e,0x0002,0x0000
04fa 010b 0541 | A| .DBG4T 0x010b,0x0541,0x0002,0x0000
04fe 0113 0544 | D| .DBG4T 0x0113,0x0544,0x0002,0x0000
0502 011b 0547 | G| .DBG4T 0x011b,0x0547,0x2801,0x0003
0506 035b 0000 | [ | .DBG4T 0x035b,0x0000,0x000b,0x0000
050a 036b 0000 | k | .DBG4T 0x036b,0x0000,0x000b,0x0000
050e 037b 0000 | { | .DBG4T 0x037b,0x0000,0x000b,0x0000
0512 038b 0000 | | .DBG4T 0x038b,0x0000,0x000b,0x0000
0516 039b 0000 | | .DBG4T 0x039b,0x0000,0x000b,0x0000
051a 03ab 0000 | | .DBG4T 0x03ab,0x0000,0x000b,0x0000
051e 03bb 057e | ~| .DBG4T 0x03bb,0x057e,0x0004,0x0000
0522 03d3 0584 | | .DBG4T 0x03d3,0x0584,0x0801,0x0003
0526 0403 058f | | .DBG4T 0x0403,0x058f,0x0801,0x0003
052a 0443 05a0 | C | .DBG4T 0x0443,0x05a0,0x0801,0x0003
052e ; --------------------------------------------------------------------------------------
052e ; Debug chain
052e ; --------------------------------------------------------------------------------------
052e 0008 0006 | | .DBGLEN 0x0008,0x0006
0530 001b 001d | | .DBGLNO 0x001b,0x001d,0x001f,0x0021,0x0023,0x0027,0x004a,0x006d,0x0091,0x0092,0x0093,0x009c,0x00b6,0x00d0
053e ; --------------------------------------------------------------------------------------
053e ; Debug chain
053e ; --------------------------------------------------------------------------------------
053e 0000 0001 | | .DBGLEN 0x0000,0x0001
0540 0103 | | .DBGLNO 0x0103
0541 ; --------------------------------------------------------------------------------------
0541 ; Debug chain
0541 ; --------------------------------------------------------------------------------------
0541 0000 0001 | | .DBGLEN 0x0000,0x0001
0543 010b | | .DBGLNO 0x010b
0544 ; --------------------------------------------------------------------------------------
0544 ; Debug chain
0544 ; --------------------------------------------------------------------------------------
0544 0000 0001 | | .DBGLEN 0x0000,0x0001
0546 0113 | | .DBGLNO 0x0113
0547 ; --------------------------------------------------------------------------------------
0547 ; Debug chain
0547 ; --------------------------------------------------------------------------------------
0547 0006 002f | /| .DBGLEN 0x0006,0x002f
0549 011b 011f | | .DBGLNO 0x011b,0x011f,0x0126,0x012b,0x012d,0x012f,0x0131,0x0137,0x013a,0x013c,0x0144,0x0149,0x014c,0x0153,0x0158,0x015b,0x0161,0x0167,0x016d,0x0173,0x0179,0x017f,0x0185,0x0188,0x018e,0x0194,0x019a,0x01a0,0x01a6,0x01ac,0x01b2,0x01ba,0x01c0,0x01c6,0x01cc,0x01d2,0x01d8,0x01e0,0x01e6,0x01ec,0x01f2,0x01f8,0x01fe,0x0206,0x020c,0x0212,0x0218,0x021e,0x0224,0x022a,0x0230,0x0236,0x023c
057e ; --------------------------------------------------------------------------------------
057e ; Debug chain
057e ; --------------------------------------------------------------------------------------
057e 0001 0003 | | .DBGLEN 0x0001,0x0003
0580 03bb 03bd | | .DBGLNO 0x03bb,0x03bd,0x03c3,0x03c6
0584 ; --------------------------------------------------------------------------------------
0584 ; Debug chain
0584 ; --------------------------------------------------------------------------------------
0584 0000 0009 | | .DBGLEN 0x0000,0x0009
0586 03d3 03d7 | | .DBGLNO 0x03d3,0x03d7,0x03df,0x03e5,0x03e7,0x03e9,0x03ee,0x03f1,0x03f8
058f ; --------------------------------------------------------------------------------------
058f ; Debug chain
058f ; --------------------------------------------------------------------------------------
058f 0000 000f | | .DBGLEN 0x0000,0x000f
0591 0403 0408 | | .DBGLNO 0x0403,0x0408,0x040e,0x0410,0x0414,0x0417,0x041a,0x041d,0x0423,0x0425,0x0428,0x042c,0x042e,0x0437,0x043c
05a0 ; --------------------------------------------------------------------------------------
05a0 ; Debug chain
05a0 ; --------------------------------------------------------------------------------------
05a0 0000 0011 | | .DBGLEN 0x0000,0x0011
05a2 0443 0448 | C H| .DBGLNO 0x0443,0x0448,0x044e,0x0450,0x0455,0x0458,0x045b,0x045e,0x0464,0x0466,0x0469,0x046d,0x046f,0x0476,0x0478,0x0481,0x0486
05b3 0000 0000 | | .BLANK 0000[0x4d]