|
DataMuseum.dkPresents historical artifacts from the history of: Rational R1000/400 |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about Rational R1000/400 Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 6144 (0x1800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0f80a5
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
└─ ⟦5a81ac88f⟧ »Space Info Vol 1«
└─⟦this⟧
0000 000f | | .CONST 0x000f ; Version of machine code
0001 5800 |X | .CONST 0x5800 ; Diana Version, RCG Major Version, RCG minor version
0002 0000 | | .CONST 0x0000 ; Zero
0003 0a00 | | .CONST 0x0a00 ; 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 8005 | | .CONST 0x8005 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 00cb | | .CONST 0x00cb ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0035 | 5 | .CONST 0x0035 ; Number of locals
000b INIT_0008:
000b 029a 00d3 | | Declare_Subprogram INIT_00d0,For_Outer_Call,Visible,Unelaborated
000d 029a 019b | | Declare_Subprogram INIT_0198,For_Outer_Call,Visible,Unelaborated
000f 029a 020b | | Declare_Subprogram INIT_0208,For_Outer_Call,Visible,Unelaborated
0011 029a 026b | k| Declare_Subprogram INIT_0268,For_Outer_Call,Visible,Unelaborated
0013 029a 0273 | s| Declare_Subprogram INIT_0270,For_Outer_Call,Visible,Unelaborated
0015 e001 | | Load 0x0,0x1
0016 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address
0017 029a 027b | {| Declare_Subprogram INIT_0278,For_Outer_Call,Visible,Unelaborated
0019 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated
001b 029a 034b | K| Declare_Subprogram INIT_0348,For_Outer_Call,Visible,Unelaborated
001d 029a 03a3 | | Declare_Subprogram INIT_03a0,For_Outer_Call,Visible,Unelaborated
001f 029a 03cb | | Declare_Subprogram INIT_03c8,For_Outer_Call,Visible,Unelaborated
0021 029a 03d3 | | Declare_Subprogram INIT_03d0,For_Outer_Call,Visible,Unelaborated
0023 029a 03db | | Declare_Subprogram INIT_03d8,For_Outer_Call,Visible,Unelaborated
0025 029a 03e3 | | Declare_Subprogram INIT_03e0,For_Outer_Call,Visible,Unelaborated
0027 029a 03eb | | Declare_Subprogram INIT_03e8,For_Outer_Call,Visible,Unelaborated
0029 029a 03f3 | | Declare_Subprogram INIT_03f0,For_Outer_Call,Visible,Unelaborated
002b 00bf | | Action Accept_Activation
002c 4800 |H | Short_Literal 0x0
002d 4840 |H@ | Short_Literal 0x40
002e 00e2 | | Load_Encached Integer_Cache
002f 03f8 | | Declare_Type Discrete,Constrained
0030 e002 | | Load 0x0,0x2
0031 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0032 4800 |H | Short_Literal 0x0
0033 e003 | | Load 0x0,0x3
0034 02a0 | | Declare_Subprogram Null_Subprogram
0035 038e | | Declare_Type Package,Defined
0036 0387 | | Declare_Variable Package
0037 4800 |H | Short_Literal 0x0
0038 e004 | | Load 0x0,0x4
0039 02a0 | | Declare_Subprogram Null_Subprogram
003a 038e | | Declare_Type Package,Defined
003b 0387 | | Declare_Variable Package
003c 4800 |H | Short_Literal 0x0
003d e005 | | Load 0x0,0x5
003e 02a0 | | Declare_Subprogram Null_Subprogram
003f 038e | | Declare_Type Package,Defined
0040 0387 | | Declare_Variable Package
0041 e006 | | Load 0x0,0x6
0042 1916 | | Execute Package,Field_Reference,Field_Number 0x16
0043 0007 | | Action Break_Optional
0044 e006 | | Load 0x0,0x6
0045 1917 | | Execute Package,Field_Reference,Field_Number 0x17
0046 0007 | | Action Break_Optional
0047 e007 | | Load 0x0,0x7
0048 191b | | Execute Package,Field_Reference,Field_Number 0x1b
0049 0007 | | Action Break_Optional
004a 00ea | | Load_Encached Null_String_Cache
004b 4800 |H | Short_Literal 0x0
004c 4800 |H | Short_Literal 0x0
004d 4800 |H | Short_Literal 0x0
004e e007 | | Load 0x0,0x7
004f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0050 8224 | $ | Call 0x1,0x24
0051 e008 | | Load 0x0,0x8
0052 1915 | | Execute Package,Field_Reference,Field_Number 0x15
0053 0007 | | Action Break_Optional
0054 1d27 | ' | Execute_Immediate Reference_Lex_1,0x27
0055 029b 0413 | | Declare_Subprogram INIT_0410,For_Outer_Call,Unelaborated
0057 029b 0423 | #| Declare_Subprogram INIT_0420,For_Outer_Call,Unelaborated
0059 029b 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Unelaborated
005b 029b 043b | ;| Declare_Subprogram INIT_0438,For_Outer_Call,Unelaborated
005d 029b 0473 | s| Declare_Subprogram INIT_0470,For_Outer_Call,Unelaborated
005f 029b 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Unelaborated
0061 029b 04e3 | | Declare_Subprogram INIT_04e0,For_Outer_Call,Unelaborated
0063 029b 0513 | | Declare_Subprogram INIT_0510,For_Outer_Call,Unelaborated
0065 029b 054b | K| Declare_Subprogram INIT_0548,For_Outer_Call,Unelaborated
0067 029b 05cb | | Declare_Subprogram INIT_05c8,For_Outer_Call,Unelaborated
0069 029b 05db | | Declare_Subprogram INIT_05d8,For_Outer_Call,Unelaborated
006b 029b 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Unelaborated
006d 1d0d | | Execute_Immediate Reference_Lex_1,0xd
006e 00c7 | | Action Elaborate_Subprogram
006f 1d0e | | Execute_Immediate Reference_Lex_1,0xe
0070 00c7 | | Action Elaborate_Subprogram
0071 1d14 | | Execute_Immediate Reference_Lex_1,0x14
0072 00c7 | | Action Elaborate_Subprogram
0073 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0074 00c7 | | Action Elaborate_Subprogram
0075 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0076 00c7 | | Action Elaborate_Subprogram
0077 1d0f | | Execute_Immediate Reference_Lex_1,0xf
0078 00c7 | | Action Elaborate_Subprogram
0079 1d16 | | Execute_Immediate Reference_Lex_1,0x16
007a 00c7 | | Action Elaborate_Subprogram
007b 1d15 | | Execute_Immediate Reference_Lex_1,0x15
007c 00c7 | | Action Elaborate_Subprogram
007d 1d12 | | Execute_Immediate Reference_Lex_1,0x12
007e 00c7 | | Action Elaborate_Subprogram
007f 1d11 | | Execute_Immediate Reference_Lex_1,0x11
0080 00c7 | | Action Elaborate_Subprogram
0081 1d19 | | Execute_Immediate Reference_Lex_1,0x19
0082 00c7 | | Action Elaborate_Subprogram
0083 1d17 | | Execute_Immediate Reference_Lex_1,0x17
0084 00c7 | | Action Elaborate_Subprogram
0085 1d1a | | Execute_Immediate Reference_Lex_1,0x1a
0086 00c7 | | Action Elaborate_Subprogram
0087 1d18 | | Execute_Immediate Reference_Lex_1,0x18
0088 00c7 | | Action Elaborate_Subprogram
0089 e009 | | Load 0x0,0x9
008a e002 | | Load 0x0,0x2
008b e00a | | Load 0x0,0xa
008c e00b | | Load 0x0,0xb
008d e00c | | Load 0x0,0xc
008e e00d | | Load 0x0,0xd
008f 1d22 | " | Execute_Immediate Reference_Lex_1,0x22
0090 1d23 | # | Execute_Immediate Reference_Lex_1,0x23
0091 4808 |H | Short_Literal 0x8
0092 e21f | | Load 0x1,0x1f
0093 020e | | Execute Module,Augment_Imports
0094 e21f | | Load 0x1,0x1f
0095 020f | | Execute Module,Activate
0096 e00e | | Load 0x0,0xe
0097 e00f | | Load 0x0,0xf
0098 e010 | | Load 0x0,0x10
0099 e011 | | Load 0x0,0x11
009a e012 | | Load 0x0,0x12
009b e013 | | Load 0x0,0x13
009c e007 | | Load 0x0,0x7
009d e006 | | Load 0x0,0x6
009e e014 | | Load 0x0,0x14
009f e015 | | Load 0x0,0x15
00a0 00b6 | | Action Make_Scope
00a1 1d28 | ( | Execute_Immediate Reference_Lex_1,0x28
00a2 480c |H | Short_Literal 0xc
00a3 e221 | ! | Load 0x1,0x21
00a4 020e | | Execute Module,Augment_Imports
00a5 e221 | ! | Load 0x1,0x21
00a6 020f | | Execute Module,Activate
00a7 e016 | | Load 0x0,0x16
00a8 4801 |H | Short_Literal 0x1
00a9 e220 | | Load 0x1,0x20
00aa 020e | | Execute Module,Augment_Imports
00ab e220 | | Load 0x1,0x20
00ac 020f | | Execute Module,Activate
00ad 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b
00ae 00c7 | | Action Elaborate_Subprogram
00af 1d2a | * | Execute_Immediate Reference_Lex_1,0x2a
00b0 00c7 | | Action Elaborate_Subprogram
00b1 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c
00b2 00c7 | | Action Elaborate_Subprogram
00b3 029d 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call
00b5 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30
00b6 00c7 | | Action Elaborate_Subprogram
00b7 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d
00b8 00c7 | | Action Elaborate_Subprogram
00b9 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f
00ba 00c7 | | Action Elaborate_Subprogram
00bb 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e
00bc 00c7 | | Action Elaborate_Subprogram
00bd 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31
00be 00c7 | | Action Elaborate_Subprogram
00bf 1d1c | | Execute_Immediate Reference_Lex_1,0x1c
00c0 00c7 | | Action Elaborate_Subprogram
00c1 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32
00c2 00c7 | | Action Elaborate_Subprogram
00c3 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34
00c4 00c7 | | Action Elaborate_Subprogram
00c5 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33
00c6 00c7 | | Action Elaborate_Subprogram
00c7 1d29 | ) | Execute_Immediate Reference_Lex_1,0x29
00c8 00c7 | | Action Elaborate_Subprogram
00c9 1d1b | | Execute_Immediate Reference_Lex_1,0x1b
00ca 00c7 | | Action Elaborate_Subprogram
00cb BODY_0008:
00cb 00bc | | Action Signal_Activated
00cc 00bb | | Action Signal_Completion
00cd 0000 0000 | | .XXX[0x3]
00cf 0000 | |
00d0 ; --------------------------------------------------------------------------------------
00d0 ; SUBPROGRAM
00d0 ; --------------------------------------------------------------------------------------
00d0 00dc | | .CONST 0x00dc ; Address of begin
00d1 017b | { | .CONST 0x017b ; Address of exception handler
00d2 0005 | | .CONST 0x0005 ; Number of locals
00d3 INIT_00d0:
00d3 0092 0668 | h| Action Push_String_Extended,0x668 ; "Accept_Tokens"
00d5 e21e | | Load 0x1,0x1e
00d6 02c7 | | Declare_Variable Any
00d7 e002 | | Load 0x0,0x2
00d8 180e | | Execute Package,Field_Execute,Field_Number 0xe
00d9 a403 | | Store_Unchecked 0x2,0x3
00da 00e3 | | Load_Encached Natural_Cache
00db 00e3 | | Load_Encached Natural_Cache
00dc BODY_00d0:
00dc e403 | | Load 0x2,0x3
00dd e5fb | | Load 0x2,-0x5
00de e5fc | | Load 0x2,-0x4
00df e5fd | | Load 0x2,-0x3
00e0 e21f | | Load 0x1,0x1f
00e1 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00e2 e5fe | | Load 0x2,-0x2
00e3 e21f | | Load 0x1,0x1f
00e4 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00e5 e5ff | | Load 0x2,-0x1
00e6 e402 | | Load 0x2,0x2
00e7 e21f | | Load 0x1,0x1f
00e8 1815 | | Execute Package,Field_Execute,Field_Number 0x15
00e9 c403 | | Store 0x2,0x3
00ea e403 | | Load 0x2,0x3
00eb e21f | | Load 0x1,0x1f
00ec 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00ed e221 | ! | Load 0x1,0x21
00ee 180e | | Execute Package,Field_Execute,Field_Number 0xe
00ef 822a | * | Call 0x1,0x2a
00f0 6805 |h | Jump_Zero 0xf6
00f1 e403 | | Load 0x2,0x3
00f2 0092 0669 | i| Action Push_String_Extended,0x669 ; "This machine has donated tokens today; it may not also accept them"
00f4 e21f | | Load 0x1,0x1f
00f5 180d | | Execute Package,Field_Execute,Field_Number 0xd
00f6 e403 | | Load 0x2,0x3
00f7 e5ff | | Load 0x2,-0x1
00f8 822d | - | Call 0x1,0x2d
00f9 e403 | | Load 0x2,0x3
00fa e5fd | | Load 0x2,-0x3
00fb e5fe | | Load 0x2,-0x2
00fc e5ff | | Load 0x2,-0x1
00fd 8230 | 0 | Call 0x1,0x30
00fe e5ff | | Load 0x2,-0x1
00ff 8232 | 2 | Call 0x1,0x32
0100 a405 | | Store_Unchecked 0x2,0x5
0101 00d8 | | Load_Top At_Offset_0
0102 e5fe | | Load 0x2,-0x2
0103 0273 | s | Execute Discrete,Plus
0104 c404 | | Store 0x2,0x4
0105 e404 | | Load 0x2,0x4
0106 e5fd | | Load 0x2,-0x3
0107 027e | ~ | Execute Discrete,Not_Equal
0108 6827 |h' | Jump_Zero 0x130
0109 e403 | | Load 0x2,0x3
010a 483d |H= | Short_Literal 0x3d
010b 482b |H+ | Short_Literal 0x2b
010c 0092 066a | j| Action Push_String_Extended,0x66a ; "The sum of currently authorized tokens and Donations ("
010e 4820 |H | Short_Literal 0x20
010f 4800 |H | Short_Literal 0x0
0110 480a |H | Short_Literal 0xa
0111 e405 | | Load 0x2,0x5
0112 8222 | " | Call 0x1,0x22
0113 01cc | | Execute Vector,Catenate
0114 01cb | | Execute Vector,Append
0115 4820 |H | Short_Literal 0x20
0116 4800 |H | Short_Literal 0x0
0117 480a |H | Short_Literal 0xa
0118 e5fe | | Load 0x2,-0x2
0119 8222 | " | Call 0x1,0x22
011a 01cc | | Execute Vector,Catenate
011b 01cb | | Execute Vector,Append
011c 4820 |H | Short_Literal 0x20
011d 4800 |H | Short_Literal 0x0
011e 480a |H | Short_Literal 0xa
011f e404 | | Load 0x2,0x4
0120 8222 | " | Call 0x1,0x22
0121 01cc | | Execute Vector,Catenate
0122 0092 066b | k| Action Push_String_Extended,0x66b ; ") is NOT equal to Resulting_Count parameter ("
0124 01cc | | Execute Vector,Catenate
0125 4820 |H | Short_Literal 0x20
0126 4800 |H | Short_Literal 0x0
0127 480a |H | Short_Literal 0xa
0128 e5fd | | Load 0x2,-0x3
0129 8222 | " | Call 0x1,0x22
012a 01cc | | Execute Vector,Catenate
012b 0092 066c | l| Action Push_String_Extended,0x66c ; "); these must be equal in order to proceed."
012d 01cc | | Execute Vector,Catenate
012e e21f | | Load 0x1,0x1f
012f 180d | | Execute Package,Field_Execute,Field_Number 0xd
0130 e5fc | | Load 0x2,-0x4
0131 e5fd | | Load 0x2,-0x3
0132 e5fe | | Load 0x2,-0x2
0133 e5ff | | Load 0x2,-0x1
0134 8229 | ) | Call 0x1,0x29
0135 7019 |p | Jump_Nonzero 0x14f
0136 e403 | | Load 0x2,0x3
0137 0092 066d | m| Action Push_String_Extended,0x66d ; "The code provided does NOT match the request being made. This might be caused by a transcription error of the code, an attempt to transfer between sites without Rational assistance, a transcription error of the Site of this machine ("
0139 8210 | | Call 0x1,0x10
013a 01cc | | Execute Vector,Catenate
013b 0092 066e | n| Action Push_String_Extended,0x66e ; "), a transcription error of the Machine ID of this machine ("
013d 01cc | | Execute Vector,Catenate
013e 4820 |H | Short_Literal 0x20
013f 4800 |H | Short_Literal 0x0
0140 480a |H | Short_Literal 0xa
0141 8211 | | Call 0x1,0x11
0142 8223 | # | Call 0x1,0x23
0143 01cc | | Execute Vector,Catenate
0144 0092 066f | o| Action Push_String_Extended,0x66f ; "), a delay in posting the request (code only valid for one day), "
0146 01cc | | Execute Vector,Catenate
0147 0092 0670 | p| Action Push_String_Extended,0x670 ; "or some other combination of parameter problems. "
0149 01cc | | Execute Vector,Catenate
014a 0092 0671 | q| Action Push_String_Extended,0x671 ; "Contact your Rational representative for further assistance."
014c 01cc | | Execute Vector,Catenate
014d e21f | | Load 0x1,0x1f
014e 180d | | Execute Package,Field_Execute,Field_Number 0xd
014f 0092 0672 | r| Action Push_String_Extended,0x672 ; ">>Product Name<<"
0151 e008 | | Load 0x0,0x8
0152 180e | | Execute Package,Field_Execute,Field_Number 0xe
0153 7009 |p | Jump_Nonzero 0x15d
0154 00ea | | Load_Encached Null_String_Cache
0155 00ea | | Load_Encached Null_String_Cache
0156 8211 | | Call 0x1,0x11
0157 e5ff | | Load 0x2,-0x1
0158 e008 | | Load 0x0,0x8
0159 1815 | | Execute Package,Field_Execute,Field_Number 0x15
015a e5ff | | Load 0x2,-0x1
015b e008 | | Load 0x0,0x8
015c 180d | | Execute Package,Field_Execute,Field_Number 0xd
015d e5fd | | Load 0x2,-0x3
015e e5ff | | Load 0x2,-0x1
015f e015 | | Load 0x0,0x15
0160 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0161 e5ff | | Load 0x2,-0x1
0162 8233 | 3 | Call 0x1,0x33
0163 7004 |p | Jump_Nonzero 0x168
0164 480c |H | Short_Literal 0xc
0165 e5ff | | Load 0x2,-0x1
0166 e015 | | Load 0x0,0x15
0167 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0168 e403 | | Load 0x2,0x3
0169 e5ff | | Load 0x2,-0x1
016a 0092 0673 | s| Action Push_String_Extended,0x673 ; " tokens set to "
016c 01cc | | Execute Vector,Catenate
016d 4820 |H | Short_Literal 0x20
016e 4800 |H | Short_Literal 0x0
016f 480a |H | Short_Literal 0xa
0170 e5fd | | Load 0x2,-0x3
0171 8222 | " | Call 0x1,0x22
0172 01cc | | Execute Vector,Catenate
0173 e21f | | Load 0x1,0x1f
0174 180f | | Execute Package,Field_Execute,Field_Number 0xf
0175 e403 | | Load 0x2,0x3
0176 00ea | | Load_Encached Null_String_Cache
0177 e402 | | Load 0x2,0x2
0178 e21f | | Load 0x1,0x1f
0179 1818 | | Execute Package,Field_Execute,Field_Number 0x18
017a 4506 |E | Exit_Suprogram New_Top_Offset 0x6
017b TRAP_00d0:
017b e002 | | Load 0x0,0x2
017c 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
017d 010f | | Execute Exception,Equal
017e 6806 |h | Jump_Zero 0x185
017f e403 | | Load 0x2,0x3
0180 e402 | | Load 0x2,0x2
0181 e21f | | Load 0x1,0x1f
0182 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0183 00d8 | | Load_Top At_Offset_0
0184 0101 | | Execute Exception,Reraise
0185 e00a | | Load 0x0,0xa
0186 010f | | Execute Exception,Equal
0187 6805 |h | Jump_Zero 0x18d
0188 e403 | | Load 0x2,0x3
0189 e402 | | Load 0x2,0x2
018a e21f | | Load 0x1,0x1f
018b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
018c 4506 |E | Exit_Suprogram New_Top_Offset 0x6
018d e403 | | Load 0x2,0x3
018e 4800 |H | Short_Literal 0x0
018f 4801 |H | Short_Literal 0x1
0190 e017 | | Load 0x0,0x17
0191 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0192 e402 | | Load 0x2,0x2
0193 e21f | | Load 0x1,0x1f
0194 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0195 4506 |E | Exit_Suprogram New_Top_Offset 0x6
0196 0000 0000 | | .XXX[0x2]
0198 ; --------------------------------------------------------------------------------------
0198 ; SUBPROGRAM
0198 ; --------------------------------------------------------------------------------------
0198 01a2 | | .CONST 0x01a2 ; Address of begin
0199 01ea | | .CONST 0x01ea ; Address of exception handler
019a 0003 | | .CONST 0x0003 ; Number of locals
019b INIT_0198:
019b 0092 0674 | t| Action Push_String_Extended,0x674 ; "Donate_Tokens"
019d e21e | | Load 0x1,0x1e
019e 02c7 | | Declare_Variable Any
019f e002 | | Load 0x0,0x2
01a0 180e | | Execute Package,Field_Execute,Field_Number 0xe
01a1 a403 | | Store_Unchecked 0x2,0x3
01a2 BODY_0198:
01a2 00d8 | | Load_Top At_Offset_0
01a3 e5fa | | Load 0x2,-0x6
01a4 e5fb | | Load 0x2,-0x5
01a5 e5fc | | Load 0x2,-0x4
01a6 e21f | | Load 0x1,0x1f
01a7 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01a8 e5fd | | Load 0x2,-0x3
01a9 e21f | | Load 0x1,0x1f
01aa 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ab e5fe | | Load 0x2,-0x2
01ac e21f | | Load 0x1,0x1f
01ad 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01ae e5ff | | Load 0x2,-0x1
01af e402 | | Load 0x2,0x2
01b0 e21f | | Load 0x1,0x1f
01b1 1816 | | Execute Package,Field_Execute,Field_Number 0x16
01b2 c403 | | Store 0x2,0x3
01b3 00d8 | | Load_Top At_Offset_0
01b4 e21f | | Load 0x1,0x1f
01b5 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01b6 00d8 | | Load_Top At_Offset_0
01b7 e5fb | | Load 0x2,-0x5
01b8 822e | . | Call 0x1,0x2e
01b9 00d8 | | Load_Top At_Offset_0
01ba e5ff | | Load 0x2,-0x1
01bb 822d | - | Call 0x1,0x2d
01bc e5fc | | Load 0x2,-0x4
01bd 8211 | | Call 0x1,0x11
01be 027f | | Execute Discrete,Equal
01bf 6805 |h | Jump_Zero 0x1c5
01c0 00d8 | | Load_Top At_Offset_0
01c1 0092 0675 | u| Action Push_String_Extended,0x675 ; "Remote_Machine_ID specified is the Machine_ID for this machine."
01c3 e21f | | Load 0x1,0x1f
01c4 180d | | Execute Package,Field_Execute,Field_Number 0xd
01c5 e221 | ! | Load 0x1,0x21
01c6 180d | | Execute Package,Field_Execute,Field_Number 0xd
01c7 822a | * | Call 0x1,0x2a
01c8 6805 |h | Jump_Zero 0x1ce
01c9 00d8 | | Load_Top At_Offset_0
01ca 0092 0676 | v| Action Push_String_Extended,0x676 ; "This machine has accepted tokens today; it may not also give them up"
01cc e21f | | Load 0x1,0x1f
01cd 180d | | Execute Package,Field_Execute,Field_Number 0xd
01ce 00d8 | | Load_Top At_Offset_0
01cf e5fd | | Load 0x2,-0x3
01d0 e5fe | | Load 0x2,-0x2
01d1 e5ff | | Load 0x2,-0x1
01d2 8230 | 0 | Call 0x1,0x30
01d3 00d8 | | Load_Top At_Offset_0
01d4 e5fe | | Load 0x2,-0x2
01d5 e5ff | | Load 0x2,-0x1
01d6 8231 | 1 | Call 0x1,0x31
01d7 e010 | | Load 0x0,0x10
01d8 1812 | | Execute Package,Field_Execute,Field_Number 0x12
01d9 e221 | ! | Load 0x1,0x21
01da 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01db e221 | ! | Load 0x1,0x21
01dc 1814 | | Execute Package,Field_Execute,Field_Number 0x14
01dd e226 | & | Load 0x1,0x26
01de e5fb | | Load 0x2,-0x5
01df e5fc | | Load 0x2,-0x4
01e0 e5fd | | Load 0x2,-0x3
01e1 e5fe | | Load 0x2,-0x2
01e2 e5ff | | Load 0x2,-0x1
01e3 822c | , | Call 0x1,0x2c
01e4 00d8 | | Load_Top At_Offset_0
01e5 00ea | | Load_Encached Null_String_Cache
01e6 e402 | | Load 0x2,0x2
01e7 e21f | | Load 0x1,0x1f
01e8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01e9 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01ea TRAP_0198:
01ea e002 | | Load 0x0,0x2
01eb 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
01ec 010f | | Execute Exception,Equal
01ed 6806 |h | Jump_Zero 0x1f4
01ee e403 | | Load 0x2,0x3
01ef e402 | | Load 0x2,0x2
01f0 e21f | | Load 0x1,0x1f
01f1 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01f2 00d8 | | Load_Top At_Offset_0
01f3 0101 | | Execute Exception,Reraise
01f4 e00a | | Load 0x0,0xa
01f5 010f | | Execute Exception,Equal
01f6 6805 |h | Jump_Zero 0x1fc
01f7 e403 | | Load 0x2,0x3
01f8 e402 | | Load 0x2,0x2
01f9 e21f | | Load 0x1,0x1f
01fa 1819 | | Execute Package,Field_Execute,Field_Number 0x19
01fb 4507 |E | Exit_Suprogram New_Top_Offset 0x7
01fc e403 | | Load 0x2,0x3
01fd 4800 |H | Short_Literal 0x0
01fe 4801 |H | Short_Literal 0x1
01ff e017 | | Load 0x0,0x17
0200 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0201 e402 | | Load 0x2,0x2
0202 e21f | | Load 0x1,0x1f
0203 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0204 4507 |E | Exit_Suprogram New_Top_Offset 0x7
0205 0000 0000 | | .XXX[0x3]
0207 0000 | |
0208 ; --------------------------------------------------------------------------------------
0208 ; SUBPROGRAM
0208 ; --------------------------------------------------------------------------------------
0208 0212 | | .CONST 0x0212 ; Address of begin
0209 0249 | I | .CONST 0x0249 ; Address of exception handler
020a 0003 | | .CONST 0x0003 ; Number of locals
020b INIT_0208:
020b 0092 0677 | w| Action Push_String_Extended,0x677 ; "Set_Site"
020d e21e | | Load 0x1,0x1e
020e 02c7 | | Declare_Variable Any
020f e002 | | Load 0x0,0x2
0210 180e | | Execute Package,Field_Execute,Field_Number 0xe
0211 a403 | | Store_Unchecked 0x2,0x3
0212 BODY_0208:
0212 00d8 | | Load_Top At_Offset_0
0213 e5fd | | Load 0x2,-0x3
0214 e5fe | | Load 0x2,-0x2
0215 e5ff | | Load 0x2,-0x1
0216 e402 | | Load 0x2,0x2
0217 e21f | | Load 0x1,0x1f
0218 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0219 c403 | | Store 0x2,0x3
021a 00d8 | | Load_Top At_Offset_0
021b e21f | | Load 0x1,0x1f
021c 1811 | | Execute Package,Field_Execute,Field_Number 0x11
021d e5fe | | Load 0x2,-0x2
021e e225 | % | Load 0x1,0x25
021f 8211 | | Call 0x1,0x11
0220 e5ff | | Load 0x2,-0x1
0221 8228 | ( | Call 0x1,0x28
0222 01de | | Execute Vector,Not_Equal
0223 6814 |h | Jump_Zero 0x238
0224 00d8 | | Load_Top At_Offset_0
0225 0092 0678 | x| Action Push_String_Extended,0x678 ; "Code ("
0227 e5fe | | Load 0x2,-0x2
0228 e21f | | Load 0x1,0x1f
0229 181d | | Execute Package,Field_Execute,Field_Number 0x1d
022a 01cc | | Execute Vector,Catenate
022b 0092 0679 | y| Action Push_String_Extended,0x679 ; ") does not correspond to Site ("
022d 01cc | | Execute Vector,Catenate
022e e5ff | | Load 0x2,-0x1
022f e21f | | Load 0x1,0x1f
0230 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0231 01cc | | Execute Vector,Catenate
0232 0092 067a | z| Action Push_String_Extended,0x67a ; ")."
0234 01cc | | Execute Vector,Catenate
0235 e21f | | Load 0x1,0x1f
0236 180d | | Execute Package,Field_Execute,Field_Number 0xd
0237 780b |x | Jump 0x243
0238 e5fe | | Load 0x2,-0x2
0239 e5ff | | Load 0x2,-0x1
023a e221 | ! | Load 0x1,0x21
023b 1811 | | Execute Package,Field_Execute,Field_Number 0x11
023c 00d8 | | Load_Top At_Offset_0
023d 0092 067b | {| Action Push_String_Extended,0x67b ; "Site set to "
023f e5ff | | Load 0x2,-0x1
0240 01cc | | Execute Vector,Catenate
0241 e21f | | Load 0x1,0x1f
0242 180f | | Execute Package,Field_Execute,Field_Number 0xf
0243 00d8 | | Load_Top At_Offset_0
0244 00ea | | Load_Encached Null_String_Cache
0245 e402 | | Load 0x2,0x2
0246 e21f | | Load 0x1,0x1f
0247 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0248 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0249 TRAP_0208:
0249 e002 | | Load 0x0,0x2
024a 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
024b 010f | | Execute Exception,Equal
024c 6806 |h | Jump_Zero 0x253
024d e403 | | Load 0x2,0x3
024e e402 | | Load 0x2,0x2
024f e21f | | Load 0x1,0x1f
0250 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0251 00d8 | | Load_Top At_Offset_0
0252 0101 | | Execute Exception,Reraise
0253 e00a | | Load 0x0,0xa
0254 010f | | Execute Exception,Equal
0255 6805 |h | Jump_Zero 0x25b
0256 e403 | | Load 0x2,0x3
0257 e402 | | Load 0x2,0x2
0258 e21f | | Load 0x1,0x1f
0259 1819 | | Execute Package,Field_Execute,Field_Number 0x19
025a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
025b e403 | | Load 0x2,0x3
025c 4800 |H | Short_Literal 0x0
025d 4801 |H | Short_Literal 0x1
025e e017 | | Load 0x0,0x17
025f 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0260 e402 | | Load 0x2,0x2
0261 e21f | | Load 0x1,0x1f
0262 181a | | Execute Package,Field_Execute,Field_Number 0x1a
0263 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0264 0000 0000 | | .BLANK 0000[0x4]
0268 ; --------------------------------------------------------------------------------------
0268 ; SUBPROGRAM
0268 ; --------------------------------------------------------------------------------------
0268 026b | k | .CONST 0x026b ; Address of begin
0269 0004 | | .CONST 0x0004 ; Address of exception handler
026a 0001 | | .CONST 0x0001 ; Number of locals
026b BODY_0268:
026b INIT_0268:
026b e221 | ! | Load 0x1,0x21
026c 1812 | | Execute Package,Field_Execute,Field_Number 0x12
026d 00ca | | Action Exit_Nullary_Function
026e 0000 0000 | | .XXX[0x2]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 e018 | | Load 0x0,0x18
0274 180e | | Execute Package,Field_Execute,Field_Number 0xe
0275 00ca | | Action Exit_Nullary_Function
0276 0000 0000 | | .XXX[0x2]
0278 ; --------------------------------------------------------------------------------------
0278 ; SUBPROGRAM
0278 ; --------------------------------------------------------------------------------------
0278 0282 | | .CONST 0x0282 ; Address of begin
0279 02cf | | .CONST 0x02cf ; Address of exception handler
027a 0003 | | .CONST 0x0003 ; Number of locals
027b INIT_0278:
027b 0092 067c | || Action Push_String_Extended,0x67c ; "Assign_Tokens"
027d e21e | | Load 0x1,0x1e
027e 02c7 | | Declare_Variable Any
027f e002 | | Load 0x0,0x2
0280 180e | | Execute Package,Field_Execute,Field_Number 0xe
0281 a403 | | Store_Unchecked 0x2,0x3
0282 BODY_0278:
0282 00d8 | | Load_Top At_Offset_0
0283 e5f9 | | Load 0x2,-0x7
0284 e5fa | | Load 0x2,-0x6
0285 e5fb | | Load 0x2,-0x5
0286 e5fc | | Load 0x2,-0x4
0287 e21f | | Load 0x1,0x1f
0288 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0289 e5fd | | Load 0x2,-0x3
028a e21f | | Load 0x1,0x1f
028b 181b | | Execute Package,Field_Execute,Field_Number 0x1b
028c e5fe | | Load 0x2,-0x2
028d e21f | | Load 0x1,0x1f
028e 181b | | Execute Package,Field_Execute,Field_Number 0x1b
028f e5ff | | Load 0x2,-0x1
0290 e402 | | Load 0x2,0x2
0291 e21f | | Load 0x1,0x1f
0292 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0293 c403 | | Store 0x2,0x3
0294 00d8 | | Load_Top At_Offset_0
0295 e21f | | Load 0x1,0x1f
0296 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0297 00d8 | | Load_Top At_Offset_0
0298 e5fb | | Load 0x2,-0x5
0299 822e | . | Call 0x1,0x2e
029a 00d8 | | Load_Top At_Offset_0
029b e5fa | | Load 0x2,-0x6
029c 822f | / | Call 0x1,0x2f
029d 00d8 | | Load_Top At_Offset_0
029e e5ff | | Load 0x2,-0x1
029f 822d | - | Call 0x1,0x2d
02a0 e221 | ! | Load 0x1,0x21
02a1 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02a2 7005 |p | Jump_Nonzero 0x2a8
02a3 00d8 | | Load_Top At_Offset_0
02a4 0092 067d | }| Action Push_String_Extended,0x67d ; "Must be run from a Rational site."
02a6 e21f | | Load 0x1,0x1f
02a7 180d | | Execute Package,Field_Execute,Field_Number 0xd
02a8 e5fc | | Load 0x2,-0x4
02a9 8211 | | Call 0x1,0x11
02aa 027f | | Execute Discrete,Equal
02ab 6805 |h | Jump_Zero 0x2b1
02ac 00d8 | | Load_Top At_Offset_0
02ad 0092 0675 | u| Action Push_String_Extended,0x675 ; "Remote_Machine_ID specified is the Machine_ID for this machine."
02af e21f | | Load 0x1,0x1f
02b0 1810 | | Execute Package,Field_Execute,Field_Number 0x10
02b1 00d8 | | Load_Top At_Offset_0
02b2 e5fd | | Load 0x2,-0x3
02b3 e5fe | | Load 0x2,-0x2
02b4 e5ff | | Load 0x2,-0x1
02b5 8230 | 0 | Call 0x1,0x30
02b6 e5fa | | Load 0x2,-0x6
02b7 e225 | % | Load 0x1,0x25
02b8 01df | | Execute Vector,Equal
02b9 6808 |h | Jump_Zero 0x2c2
02ba e226 | & | Load 0x1,0x26
02bb e5fb | | Load 0x2,-0x5
02bc e5fc | | Load 0x2,-0x4
02bd e5fd | | Load 0x2,-0x3
02be e5fe | | Load 0x2,-0x2
02bf e5ff | | Load 0x2,-0x1
02c0 822c | , | Call 0x1,0x2c
02c1 7807 |x | Jump 0x2c9
02c2 e5fa | | Load 0x2,-0x6
02c3 e5fb | | Load 0x2,-0x5
02c4 e5fc | | Load 0x2,-0x4
02c5 e5fd | | Load 0x2,-0x3
02c6 e5fe | | Load 0x2,-0x2
02c7 e5ff | | Load 0x2,-0x1
02c8 822c | , | Call 0x1,0x2c
02c9 00d8 | | Load_Top At_Offset_0
02ca 00ea | | Load_Encached Null_String_Cache
02cb e402 | | Load 0x2,0x2
02cc e21f | | Load 0x1,0x1f
02cd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
02ce 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02cf TRAP_0278:
02cf e002 | | Load 0x0,0x2
02d0 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
02d1 010f | | Execute Exception,Equal
02d2 6806 |h | Jump_Zero 0x2d9
02d3 e403 | | Load 0x2,0x3
02d4 e402 | | Load 0x2,0x2
02d5 e21f | | Load 0x1,0x1f
02d6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02d7 00d8 | | Load_Top At_Offset_0
02d8 0101 | | Execute Exception,Reraise
02d9 e00a | | Load 0x0,0xa
02da 010f | | Execute Exception,Equal
02db 6805 |h | Jump_Zero 0x2e1
02dc e403 | | Load 0x2,0x3
02dd e402 | | Load 0x2,0x2
02de e21f | | Load 0x1,0x1f
02df 1819 | | Execute Package,Field_Execute,Field_Number 0x19
02e0 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02e1 e403 | | Load 0x2,0x3
02e2 4800 |H | Short_Literal 0x0
02e3 4801 |H | Short_Literal 0x1
02e4 e017 | | Load 0x0,0x17
02e5 1815 | | Execute Package,Field_Execute,Field_Number 0x15
02e6 e402 | | Load 0x2,0x2
02e7 e21f | | Load 0x1,0x1f
02e8 181a | | Execute Package,Field_Execute,Field_Number 0x1a
02e9 4508 |E | Exit_Suprogram New_Top_Offset 0x8
02ea 0000 0000 | | .BLANK 0000[0x6]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 0306 | | .CONST 0x0306 ; Address of begin
02f1 033c | < | .CONST 0x033c ; Address of exception handler
02f2 0002 | | .CONST 0x0002 ; Number of locals
02f3 INIT_02f0:
02f3 e21e | | Load 0x1,0x1e
02f4 02c7 | | Declare_Variable Any
02f5 e002 | | Load 0x0,0x2
02f6 180e | | Execute Package,Field_Execute,Field_Number 0xe
02f7 e002 | | Load 0x0,0x2
02f8 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
02f9 e002 | | Load 0x0,0x2
02fa 180e | | Execute Package,Field_Execute,Field_Number 0xe
02fb e002 | | Load 0x0,0x2
02fc 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
02fd 484d |HM | Short_Literal 0x4d
02fe e002 | | Load 0x0,0x2
02ff 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
0300 e002 | | Load 0x0,0x2
0301 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
0302 4800 |H | Short_Literal 0x0
0303 e002 | | Load 0x0,0x2
0304 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
0305 a402 | | Store_Unchecked 0x2,0x2
0306 BODY_02f0:
0306 00d8 | | Load_Top At_Offset_0
0307 e21f | | Load 0x1,0x1f
0308 1811 | | Execute Package,Field_Execute,Field_Number 0x11
0309 00d8 | | Load_Top At_Offset_0
030a e5fb | | Load 0x2,-0x5
030b 822e | . | Call 0x1,0x2e
030c 00d8 | | Load_Top At_Offset_0
030d e5fa | | Load 0x2,-0x6
030e 822f | / | Call 0x1,0x2f
030f 00d8 | | Load_Top At_Offset_0
0310 e5ff | | Load 0x2,-0x1
0311 822d | - | Call 0x1,0x2d
0312 e221 | ! | Load 0x1,0x21
0313 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0314 7005 |p | Jump_Nonzero 0x31a
0315 00d8 | | Load_Top At_Offset_0
0316 0092 067d | }| Action Push_String_Extended,0x67d ; "Must be run from a Rational site."
0318 e21f | | Load 0x1,0x1f
0319 180d | | Execute Package,Field_Execute,Field_Number 0xd
031a e5fc | | Load 0x2,-0x4
031b 8211 | | Call 0x1,0x11
031c 027f | | Execute Discrete,Equal
031d 6805 |h | Jump_Zero 0x323
031e 00d8 | | Load_Top At_Offset_0
031f 0092 0675 | u| Action Push_String_Extended,0x675 ; "Remote_Machine_ID specified is the Machine_ID for this machine."
0321 e21f | | Load 0x1,0x1f
0322 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0323 00d8 | | Load_Top At_Offset_0
0324 e5fd | | Load 0x2,-0x3
0325 e5fe | | Load 0x2,-0x2
0326 e5ff | | Load 0x2,-0x1
0327 8230 | 0 | Call 0x1,0x30
0328 e5fa | | Load 0x2,-0x6
0329 e225 | % | Load 0x1,0x25
032a 01df | | Execute Vector,Equal
032b 6808 |h | Jump_Zero 0x334
032c e226 | & | Load 0x1,0x26
032d e5fb | | Load 0x2,-0x5
032e e5fc | | Load 0x2,-0x4
032f e5fd | | Load 0x2,-0x3
0330 e5fe | | Load 0x2,-0x2
0331 e5ff | | Load 0x2,-0x1
0332 821c | | Call 0x1,0x1c
0333 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
0334 e5fa | | Load 0x2,-0x6
0335 e5fb | | Load 0x2,-0x5
0336 e5fc | | Load 0x2,-0x4
0337 e5fd | | Load 0x2,-0x3
0338 e5fe | | Load 0x2,-0x2
0339 e5ff | | Load 0x2,-0x1
033a 821c | | Call 0x1,0x1c
033b 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
033c TRAP_02f0:
033c e00a | | Load 0x0,0xa
033d 010f | | Execute Exception,Equal
033e 6803 |h | Jump_Zero 0x342
033f e002 | | Load 0x0,0x2
0340 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0341 0257 | W | Execute Discrete,Raise
0342 0100 | | Execute Exception,Raise
0343 0000 0000 | | .BLANK 0000[0x5]
0348 ; --------------------------------------------------------------------------------------
0348 ; SUBPROGRAM
0348 ; --------------------------------------------------------------------------------------
0348 0352 | R | .CONST 0x0352 ; Address of begin
0349 0380 | | .CONST 0x0380 ; Address of exception handler
034a 0003 | | .CONST 0x0003 ; Number of locals
034b INIT_0348:
034b 0092 067e | ~| Action Push_String_Extended,0x67e ; "Assign_Site"
034d e21e | | Load 0x1,0x1e
034e 02c7 | | Declare_Variable Any
034f e002 | | Load 0x0,0x2
0350 180e | | Execute Package,Field_Execute,Field_Number 0xe
0351 a403 | | Store_Unchecked 0x2,0x3
0352 BODY_0348:
0352 00d8 | | Load_Top At_Offset_0
0353 e5fd | | Load 0x2,-0x3
0354 e5fe | | Load 0x2,-0x2
0355 e21f | | Load 0x1,0x1f
0356 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0357 e5ff | | Load 0x2,-0x1
0358 e402 | | Load 0x2,0x2
0359 e21f | | Load 0x1,0x1f
035a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
035b c403 | | Store 0x2,0x3
035c 00d8 | | Load_Top At_Offset_0
035d e5ff | | Load 0x2,-0x1
035e 822e | . | Call 0x1,0x2e
035f 0092 067f | | Action Push_String_Extended,0x67f ; "Run the following on the remote machine:"
0361 e016 | | Load 0x0,0x16
0362 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0363 0092 0677 | w| Action Push_String_Extended,0x677 ; "Set_Site"
0365 e220 | | Load 0x1,0x20
0366 180d | | Execute Package,Field_Execute,Field_Number 0xd
0367 e5ff | | Load 0x2,-0x1
0368 e21f | | Load 0x1,0x1f
0369 181d | | Execute Package,Field_Execute,Field_Number 0x1d
036a 0092 0680 | | Action Push_String_Extended,0x680 ; "Site"
036c e220 | | Load 0x1,0x20
036d 180e | | Execute Package,Field_Execute,Field_Number 0xe
036e e225 | % | Load 0x1,0x25
036f e5fe | | Load 0x2,-0x2
0370 e5ff | | Load 0x2,-0x1
0371 8228 | ( | Call 0x1,0x28
0372 e21f | | Load 0x1,0x1f
0373 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0374 0092 0681 | | Action Push_String_Extended,0x681 ; "Code"
0376 e220 | | Load 0x1,0x20
0377 180e | | Execute Package,Field_Execute,Field_Number 0xe
0378 e220 | | Load 0x1,0x20
0379 180f | | Execute Package,Field_Execute,Field_Number 0xf
037a 00d8 | | Load_Top At_Offset_0
037b 00ea | | Load_Encached Null_String_Cache
037c e402 | | Load 0x2,0x2
037d e21f | | Load 0x1,0x1f
037e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
037f 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0380 TRAP_0348:
0380 e002 | | Load 0x0,0x2
0381 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
0382 010f | | Execute Exception,Equal
0383 6806 |h | Jump_Zero 0x38a
0384 e403 | | Load 0x2,0x3
0385 e402 | | Load 0x2,0x2
0386 e21f | | Load 0x1,0x1f
0387 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0388 00d8 | | Load_Top At_Offset_0
0389 0101 | | Execute Exception,Reraise
038a e00a | | Load 0x0,0xa
038b 010f | | Execute Exception,Equal
038c 6805 |h | Jump_Zero 0x392
038d e403 | | Load 0x2,0x3
038e e402 | | Load 0x2,0x2
038f e21f | | Load 0x1,0x1f
0390 1819 | | Execute Package,Field_Execute,Field_Number 0x19
0391 4504 |E | Exit_Suprogram New_Top_Offset 0x4
0392 e403 | | Load 0x2,0x3
0393 4800 |H | Short_Literal 0x0
0394 4801 |H | Short_Literal 0x1
0395 e017 | | Load 0x0,0x17
0396 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0397 e402 | | Load 0x2,0x2
0398 e21f | | Load 0x1,0x1f
0399 181a | | Execute Package,Field_Execute,Field_Number 0x1a
039a 4504 |E | Exit_Suprogram New_Top_Offset 0x4
039b 0000 0000 | | .BLANK 0000[0x5]
03a0 ; --------------------------------------------------------------------------------------
03a0 ; SUBPROGRAM
03a0 ; --------------------------------------------------------------------------------------
03a0 03b6 | | .CONST 0x03b6 ; Address of begin
03a1 03be | | .CONST 0x03be ; Address of exception handler
03a2 0002 | | .CONST 0x0002 ; Number of locals
03a3 INIT_03a0:
03a3 e21e | | Load 0x1,0x1e
03a4 02c7 | | Declare_Variable Any
03a5 e002 | | Load 0x0,0x2
03a6 180e | | Execute Package,Field_Execute,Field_Number 0xe
03a7 e002 | | Load 0x0,0x2
03a8 183d | = | Execute Package,Field_Execute,Field_Number 0x3d
03a9 e002 | | Load 0x0,0x2
03aa 180e | | Execute Package,Field_Execute,Field_Number 0xe
03ab e002 | | Load 0x0,0x2
03ac 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39
03ad 484d |HM | Short_Literal 0x4d
03ae e002 | | Load 0x0,0x2
03af 1b45 | E | Execute Package,Field_Read,Field_Number 0x45
03b0 e002 | | Load 0x0,0x2
03b1 1b1c | | Execute Package,Field_Read,Field_Number 0x1c
03b2 4800 |H | Short_Literal 0x0
03b3 e002 | | Load 0x0,0x2
03b4 1846 | F | Execute Package,Field_Execute,Field_Number 0x46
03b5 a402 | | Store_Unchecked 0x2,0x2
03b6 BODY_03a0:
03b6 00d8 | | Load_Top At_Offset_0
03b7 e5ff | | Load 0x2,-0x1
03b8 822e | . | Call 0x1,0x2e
03b9 e225 | % | Load 0x1,0x25
03ba e5fe | | Load 0x2,-0x2
03bb e5ff | | Load 0x2,-0x1
03bc 8228 | ( | Call 0x1,0x28
03bd 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
03be TRAP_03a0:
03be e00a | | Load 0x0,0xa
03bf 010f | | Execute Exception,Equal
03c0 6803 |h | Jump_Zero 0x3c4
03c1 e002 | | Load 0x0,0x2
03c2 1b47 | G | Execute Package,Field_Read,Field_Number 0x47
03c3 0257 | W | Execute Discrete,Raise
03c4 0100 | | Execute Exception,Raise
03c5 0000 0000 | | .XXX[0x3]
03c7 0000 | |
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb e010 | | Load 0x0,0x10
03cc 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03cd e221 | ! | Load 0x1,0x21
03ce 180f | | Execute Package,Field_Execute,Field_Number 0xf
03cf 4501 |E | Exit_Suprogram New_Top_Offset 0x1
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 e010 | | Load 0x0,0x10
03d4 1812 | | Execute Package,Field_Execute,Field_Number 0x12
03d5 e221 | ! | Load 0x1,0x21
03d6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03d7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03d8 ; --------------------------------------------------------------------------------------
03d8 ; SUBPROGRAM
03d8 ; --------------------------------------------------------------------------------------
03d8 03db | | .CONST 0x03db ; Address of begin
03d9 0004 | | .CONST 0x0004 ; Address of exception handler
03da 0001 | | .CONST 0x0001 ; Number of locals
03db BODY_03d8:
03db INIT_03d8:
03db e007 | | Load 0x0,0x7
03dc 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
03dd e221 | ! | Load 0x1,0x21
03de 180f | | Execute Package,Field_Execute,Field_Number 0xf
03df 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03e0 ; --------------------------------------------------------------------------------------
03e0 ; SUBPROGRAM
03e0 ; --------------------------------------------------------------------------------------
03e0 03e3 | | .CONST 0x03e3 ; Address of begin
03e1 0004 | | .CONST 0x0004 ; Address of exception handler
03e2 0001 | | .CONST 0x0001 ; Number of locals
03e3 BODY_03e0:
03e3 INIT_03e0:
03e3 e007 | | Load 0x0,0x7
03e4 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
03e5 e221 | ! | Load 0x1,0x21
03e6 1810 | | Execute Package,Field_Execute,Field_Number 0x10
03e7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03e8 ; --------------------------------------------------------------------------------------
03e8 ; SUBPROGRAM
03e8 ; --------------------------------------------------------------------------------------
03e8 03eb | | .CONST 0x03eb ; Address of begin
03e9 0004 | | .CONST 0x0004 ; Address of exception handler
03ea 0001 | | .CONST 0x0001 ; Number of locals
03eb BODY_03e8:
03eb INIT_03e8:
03eb e221 | ! | Load 0x1,0x21
03ec 1815 | | Execute Package,Field_Execute,Field_Number 0x15
03ed 4501 |E | Exit_Suprogram New_Top_Offset 0x1
03ee 0000 0000 | | .XXX[0x2]
03f0 ; --------------------------------------------------------------------------------------
03f0 ; SUBPROGRAM
03f0 ; --------------------------------------------------------------------------------------
03f0 03f3 | | .CONST 0x03f3 ; Address of begin
03f1 0004 | | .CONST 0x0004 ; Address of exception handler
03f2 0001 | | .CONST 0x0001 ; Number of locals
03f3 BODY_03f0:
03f3 INIT_03f0:
03f3 e5fa | | Load 0x2,-0x6
03f4 e5fc | | Load 0x2,-0x4
03f5 e5ff | | Load 0x2,-0x1
03f6 0092 0682 | | Action Push_String_Extended,0x682 ; "/"
03f8 01cc | | Execute Vector,Catenate
03f9 e5fb | | Load 0x2,-0x5
03fa 01cc | | Execute Vector,Catenate
03fb 0092 0683 | | Action Push_String_Extended,0x683 ; "="
03fd 01cc | | Execute Vector,Catenate
03fe 4820 |H | Short_Literal 0x20
03ff 4800 |H | Short_Literal 0x0
0400 480a |H | Short_Literal 0xa
0401 e5fe | | Load 0x2,-0x2
0402 8222 | " | Call 0x1,0x22
0403 01cc | | Execute Vector,Catenate
0404 0092 0684 | | Action Push_String_Extended,0x684 ; "|"
0406 01cc | | Execute Vector,Catenate
0407 4820 |H | Short_Literal 0x20
0408 4800 |H | Short_Literal 0x0
0409 480a |H | Short_Literal 0xa
040a e5fd | | Load 0x2,-0x3
040b 8222 | " | Call 0x1,0x22
040c 01cc | | Execute Vector,Catenate
040d 8227 | ' | Call 0x1,0x27
040e 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6
040f 0000 | | .XXX[0x1]
0410 ; --------------------------------------------------------------------------------------
0410 ; SUBPROGRAM
0410 ; --------------------------------------------------------------------------------------
0410 0413 | | .CONST 0x0413 ; Address of begin
0411 0004 | | .CONST 0x0004 ; Address of exception handler
0412 0001 | | .CONST 0x0001 ; Number of locals
0413 BODY_0410:
0413 INIT_0410:
0413 4801 |H | Short_Literal 0x1
0414 e5fc | | Load 0x2,-0x4
0415 e226 | & | Load 0x1,0x26
0416 8210 | | Call 0x1,0x10
0417 8211 | | Call 0x1,0x11
0418 e5fd | | Load 0x2,-0x3
0419 e5fe | | Load 0x2,-0x2
041a e5ff | | Load 0x2,-0x1
041b 821c | | Call 0x1,0x1c
041c e006 | | Load 0x0,0x6
041d 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
041e 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4
041f 0000 | | .XXX[0x1]
0420 ; --------------------------------------------------------------------------------------
0420 ; SUBPROGRAM
0420 ; --------------------------------------------------------------------------------------
0420 0423 | # | .CONST 0x0423 ; Address of begin
0421 0004 | | .CONST 0x0004 ; Address of exception handler
0422 0001 | | .CONST 0x0001 ; Number of locals
0423 BODY_0420:
0423 INIT_0420:
0423 e5ff | | Load 0x2,-0x1
0424 e010 | | Load 0x0,0x10
0425 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0426 822b | + | Call 0x1,0x2b
0427 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0428 ; --------------------------------------------------------------------------------------
0428 ; SUBPROGRAM
0428 ; --------------------------------------------------------------------------------------
0428 042d | - | .CONST 0x042d ; Address of begin
0429 0004 | | .CONST 0x0004 ; Address of exception handler
042a 0002 | | .CONST 0x0002 ; Number of locals
042b INIT_0428:
042b 029f 0633 | 3| Declare_Subprogram INIT_0630,For_Call
042d BODY_0428:
042d e5ff | | Load 0x2,-0x1
042e 8402 | | Call 0x2,0x2
042f e5fe | | Load 0x2,-0x2
0430 8402 | | Call 0x2,0x2
0431 017f | | Execute Record,Equal
0432 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
0433 0000 0000 | | .BLANK 0000[0x5]
0438 ; --------------------------------------------------------------------------------------
0438 ; SUBPROGRAM
0438 ; --------------------------------------------------------------------------------------
0438 043b | ; | .CONST 0x043b ; Address of begin
0439 0004 | | .CONST 0x0004 ; Address of exception handler
043a 0001 | | .CONST 0x0001 ; Number of locals
043b BODY_0438:
043b INIT_0438:
043b 0092 067f | | Action Push_String_Extended,0x67f ; "Run the following on the remote machine:"
043d e016 | | Load 0x0,0x16
043e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
043f 0092 0668 | h| Action Push_String_Extended,0x668 ; "Accept_Tokens"
0441 e220 | | Load 0x1,0x20
0442 180d | | Execute Package,Field_Execute,Field_Number 0xd
0443 e5ff | | Load 0x2,-0x1
0444 e21f | | Load 0x1,0x1f
0445 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0446 0092 0685 | | Action Push_String_Extended,0x685 ; "Product"
0448 e220 | | Load 0x1,0x20
0449 180e | | Execute Package,Field_Execute,Field_Number 0xe
044a 4820 |H | Short_Literal 0x20
044b 4800 |H | Short_Literal 0x0
044c 480a |H | Short_Literal 0xa
044d e5fe | | Load 0x2,-0x2
044e 8222 | " | Call 0x1,0x22
044f 0092 0686 | | Action Push_String_Extended,0x686 ; "Donation"
0451 e220 | | Load 0x1,0x20
0452 180e | | Execute Package,Field_Execute,Field_Number 0xe
0453 4820 |H | Short_Literal 0x20
0454 4800 |H | Short_Literal 0x0
0455 480a |H | Short_Literal 0xa
0456 e5fd | | Load 0x2,-0x3
0457 8222 | " | Call 0x1,0x22
0458 0092 0687 | | Action Push_String_Extended,0x687 ; "Resulting_Count"
045a e220 | | Load 0x1,0x20
045b 180e | | Execute Package,Field_Execute,Field_Number 0xe
045c e5fa | | Load 0x2,-0x6
045d e5fb | | Load 0x2,-0x5
045e e5fc | | Load 0x2,-0x4
045f e5fd | | Load 0x2,-0x3
0460 e5fe | | Load 0x2,-0x2
0461 e5ff | | Load 0x2,-0x1
0462 821c | | Call 0x1,0x1c
0463 e21f | | Load 0x1,0x1f
0464 181d | | Execute Package,Field_Execute,Field_Number 0x1d
0465 0092 0681 | | Action Push_String_Extended,0x681 ; "Code"
0467 e220 | | Load 0x1,0x20
0468 180e | | Execute Package,Field_Execute,Field_Number 0xe
0469 e220 | | Load 0x1,0x20
046a 180f | | Execute Package,Field_Execute,Field_Number 0xf
046b 4507 |E | Exit_Suprogram New_Top_Offset 0x7
046c 0000 0000 | | .BLANK 0000[0x4]
0470 ; --------------------------------------------------------------------------------------
0470 ; SUBPROGRAM
0470 ; --------------------------------------------------------------------------------------
0470 0473 | s | .CONST 0x0473 ; Address of begin
0471 0004 | | .CONST 0x0004 ; Address of exception handler
0472 0001 | | .CONST 0x0001 ; Number of locals
0473 BODY_0470:
0473 INIT_0470:
0473 e5ff | | Load 0x2,-0x1
0474 01db | | Execute Vector,Length
0475 7005 |p | Jump_Nonzero 0x47b
0476 e5fe | | Load 0x2,-0x2
0477 0092 0688 | | Action Push_String_Extended,0x688 ; "Product name not specified."
0479 e21f | | Load 0x1,0x1f
047a 180d | | Execute Package,Field_Execute,Field_Number 0xd
047b 00cf | | Action Mark_Auxiliary
047c e5ff | | Load 0x2,-0x1
047d 01d9 | | Execute Vector,Reverse_Bounds
047e 0263 | c | Execute Discrete,Above_Bound
047f 7018 |p | Jump_Nonzero 0x498
0480 00d8 | | Load_Top At_Offset_0
0481 e5ff | | Load 0x2,-0x1
0482 01d7 | | Execute Vector,Field_Read
0483 4820 |H | Short_Literal 0x20
0484 487e |H~ | Short_Literal 0x7e
0485 0261 | a | Execute Discrete,Not_In_Range
0486 680f |h | Jump_Zero 0x496
0487 e5fe | | Load 0x2,-0x2
0488 0092 0689 | | Action Push_String_Extended,0x689 ; "Product name contains an illegal character ("
048a e404 | | Load 0x2,0x4
048b e5ff | | Load 0x2,-0x1
048c 01d7 | | Execute Vector,Field_Read
048d 00e8 | | Load_Encached Character_Cache
048e 011c | | Execute Any,Convert_Unchecked
048f 1c01 | | Execute_Immediate Run_Utility,0x1
0490 01cc | | Execute Vector,Catenate
0491 0092 067a | z| Action Push_String_Extended,0x67a ; ")."
0493 01cc | | Execute Vector,Catenate
0494 e21f | | Load 0x1,0x1f
0495 180d | | Execute Package,Field_Execute,Field_Number 0xd
0496 00c8 | | Action Pop_Auxiliary_Range
0497 3fe8 |? | Loop_Increasing 0x480
0498 00ce | | Action Pop_Auxiliary
0499 e5ff | | Load 0x2,-0x1
049a 4820 |H | Short_Literal 0x20
049b e5ff | | Load 0x2,-0x1
049c e006 | | Load 0x0,0x6
049d 181c | | Execute Package,Field_Execute,Field_Number 0x1c
049e 01de | | Execute Vector,Not_Equal
049f 6805 |h | Jump_Zero 0x4a5
04a0 e5fe | | Load 0x2,-0x2
04a1 0092 068a | | Action Push_String_Extended,0x68a ; "Product name includes leading or trailing blanks."
04a3 e21f | | Load 0x1,0x1f
04a4 180d | | Execute Package,Field_Execute,Field_Number 0xd
04a5 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04a6 0000 0000 | | .XXX[0x2]
04a8 ; --------------------------------------------------------------------------------------
04a8 ; SUBPROGRAM
04a8 ; --------------------------------------------------------------------------------------
04a8 04ab | | .CONST 0x04ab ; Address of begin
04a9 0004 | | .CONST 0x0004 ; Address of exception handler
04aa 0001 | | .CONST 0x0001 ; Number of locals
04ab BODY_04a8:
04ab INIT_04a8:
04ab e5ff | | Load 0x2,-0x1
04ac 01db | | Execute Vector,Length
04ad 7005 |p | Jump_Nonzero 0x4b3
04ae e5fe | | Load 0x2,-0x2
04af 0092 068b | | Action Push_String_Extended,0x68b ; "Site name not specified."
04b1 e21f | | Load 0x1,0x1f
04b2 180d | | Execute Package,Field_Execute,Field_Number 0xd
04b3 00cf | | Action Mark_Auxiliary
04b4 e5ff | | Load 0x2,-0x1
04b5 01d9 | | Execute Vector,Reverse_Bounds
04b6 0263 | c | Execute Discrete,Above_Bound
04b7 7018 |p | Jump_Nonzero 0x4d0
04b8 00d8 | | Load_Top At_Offset_0
04b9 e5ff | | Load 0x2,-0x1
04ba 01d7 | | Execute Vector,Field_Read
04bb 4820 |H | Short_Literal 0x20
04bc 487e |H~ | Short_Literal 0x7e
04bd 0261 | a | Execute Discrete,Not_In_Range
04be 680f |h | Jump_Zero 0x4ce
04bf e5fe | | Load 0x2,-0x2
04c0 0092 068c | | Action Push_String_Extended,0x68c ; "Site name contains an illegal character ("
04c2 e404 | | Load 0x2,0x4
04c3 e5ff | | Load 0x2,-0x1
04c4 01d7 | | Execute Vector,Field_Read
04c5 00e8 | | Load_Encached Character_Cache
04c6 011c | | Execute Any,Convert_Unchecked
04c7 1c01 | | Execute_Immediate Run_Utility,0x1
04c8 01cc | | Execute Vector,Catenate
04c9 0092 067a | z| Action Push_String_Extended,0x67a ; ")."
04cb 01cc | | Execute Vector,Catenate
04cc e21f | | Load 0x1,0x1f
04cd 180d | | Execute Package,Field_Execute,Field_Number 0xd
04ce 00c8 | | Action Pop_Auxiliary_Range
04cf 3fe8 |? | Loop_Increasing 0x4b8
04d0 00ce | | Action Pop_Auxiliary
04d1 e5ff | | Load 0x2,-0x1
04d2 4820 |H | Short_Literal 0x20
04d3 e5ff | | Load 0x2,-0x1
04d4 e006 | | Load 0x0,0x6
04d5 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04d6 01de | | Execute Vector,Not_Equal
04d7 6805 |h | Jump_Zero 0x4dd
04d8 e5fe | | Load 0x2,-0x2
04d9 0092 068d | | Action Push_String_Extended,0x68d ; "Site name includes leading or trailing blanks."
04db e21f | | Load 0x1,0x1f
04dc 180d | | Execute Package,Field_Execute,Field_Number 0xd
04dd 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04de 0000 0000 | | .XXX[0x2]
04e0 ; --------------------------------------------------------------------------------------
04e0 ; SUBPROGRAM
04e0 ; --------------------------------------------------------------------------------------
04e0 04e5 | | .CONST 0x04e5 ; Address of begin
04e1 0004 | | .CONST 0x0004 ; Address of exception handler
04e2 0002 | | .CONST 0x0002 ; Number of locals
04e3 INIT_04e0:
04e3 029f 0653 | S| Declare_Subprogram INIT_0650,For_Call
04e5 BODY_04e0:
04e5 4820 |H | Short_Literal 0x20
04e6 e5ff | | Load 0x2,-0x1
04e7 e006 | | Load 0x0,0x6
04e8 181c | | Execute Package,Field_Execute,Field_Number 0x1c
04e9 01db | | Execute Vector,Length
04ea 7001 |p | Jump_Nonzero 0x4ec
04eb 4503 |E | Exit_Suprogram New_Top_Offset 0x3
04ec 00cf | | Action Mark_Auxiliary
04ed e5ff | | Load 0x2,-0x1
04ee 01d9 | | Execute Vector,Reverse_Bounds
04ef 0263 | c | Execute Discrete,Above_Bound
04f0 7018 |p | Jump_Nonzero 0x509
04f1 00d8 | | Load_Top At_Offset_0
04f2 e5ff | | Load 0x2,-0x1
04f3 01d7 | | Execute Vector,Field_Read
04f4 4820 |H | Short_Literal 0x20
04f5 487e |H~ | Short_Literal 0x7e
04f6 0261 | a | Execute Discrete,Not_In_Range
04f7 680f |h | Jump_Zero 0x507
04f8 e5fe | | Load 0x2,-0x2
04f9 0092 068e | | Action Push_String_Extended,0x68e ; "Date contains an illegal character ("
04fb e405 | | Load 0x2,0x5
04fc e5ff | | Load 0x2,-0x1
04fd 01d7 | | Execute Vector,Field_Read
04fe 00e8 | | Load_Encached Character_Cache
04ff 011c | | Execute Any,Convert_Unchecked
0500 1c01 | | Execute_Immediate Run_Utility,0x1
0501 01cc | | Execute Vector,Catenate
0502 0092 067a | z| Action Push_String_Extended,0x67a ; ")."
0504 01cc | | Execute Vector,Catenate
0505 e21f | | Load 0x1,0x1f
0506 180d | | Execute Package,Field_Execute,Field_Number 0xd
0507 00c8 | | Action Pop_Auxiliary_Range
0508 3fe8 |? | Loop_Increasing 0x4f1
0509 00ce | | Action Pop_Auxiliary
050a 8402 | | Call 0x2,0x2
050b 4503 |E | Exit_Suprogram New_Top_Offset 0x3
050c 0000 0000 | | .BLANK 0000[0x4]
0510 ; --------------------------------------------------------------------------------------
0510 ; SUBPROGRAM
0510 ; --------------------------------------------------------------------------------------
0510 0517 | | .CONST 0x0517 ; Address of begin
0511 0004 | | .CONST 0x0004 ; Address of exception handler
0512 0002 | | .CONST 0x0002 ; Number of locals
0513 INIT_0510:
0513 e5ff | | Load 0x2,-0x1
0514 8232 | 2 | Call 0x1,0x32
0515 00e3 | | Load_Encached Natural_Cache
0516 03f1 | | Declare_Variable Discrete,With_Value
0517 BODY_0510:
0517 e5fc | | Load 0x2,-0x4
0518 e5ff | | Load 0x2,-0x1
0519 0092 0686 | | Action Push_String_Extended,0x686 ; "Donation"
051b e5fe | | Load 0x2,-0x2
051c 8235 | 5 | Call 0x1,0x35
051d e5fc | | Load 0x2,-0x4
051e e5ff | | Load 0x2,-0x1
051f 0092 0687 | | Action Push_String_Extended,0x687 ; "Resulting_Count"
0521 e5fd | | Load 0x2,-0x3
0522 8235 | 5 | Call 0x1,0x35
0523 e5fe | | Load 0x2,-0x2
0524 e5fd | | Load 0x2,-0x3
0525 027d | } | Execute Discrete,Greater
0526 681c |h | Jump_Zero 0x543
0527 e5fc | | Load 0x2,-0x4
0528 0092 068f | | Action Push_String_Extended,0x68f ; "The number of tokens ("
052a 4820 |H | Short_Literal 0x20
052b 4800 |H | Short_Literal 0x0
052c 480a |H | Short_Literal 0xa
052d e5fe | | Load 0x2,-0x2
052e 8222 | " | Call 0x1,0x22
052f 01cc | | Execute Vector,Catenate
0530 0092 0690 | | Action Push_String_Extended,0x690 ; ") for "
0532 01cc | | Execute Vector,Catenate
0533 e5ff | | Load 0x2,-0x1
0534 01cc | | Execute Vector,Catenate
0535 0092 0691 | | Action Push_String_Extended,0x691 ; " exceeds the target authorization ("
0537 01cc | | Execute Vector,Catenate
0538 4820 |H | Short_Literal 0x20
0539 4800 |H | Short_Literal 0x0
053a 480a |H | Short_Literal 0xa
053b e5fd | | Load 0x2,-0x3
053c 8222 | " | Call 0x1,0x22
053d 01cc | | Execute Vector,Catenate
053e 0092 067a | z| Action Push_String_Extended,0x67a ; ")."
0540 01cc | | Execute Vector,Catenate
0541 e21f | | Load 0x1,0x1f
0542 180d | | Execute Package,Field_Execute,Field_Number 0xd
0543 4505 |E | Exit_Suprogram New_Top_Offset 0x5
0544 0000 0000 | | .BLANK 0000[0x4]
0548 ; --------------------------------------------------------------------------------------
0548 ; SUBPROGRAM
0548 ; --------------------------------------------------------------------------------------
0548 0553 | S | .CONST 0x0553 ; Address of begin
0549 0004 | | .CONST 0x0004 ; Address of exception handler
054a 0003 | | .CONST 0x0003 ; Number of locals
054b INIT_0548:
054b e5ff | | Load 0x2,-0x1
054c 8232 | 2 | Call 0x1,0x32
054d 00e3 | | Load_Encached Natural_Cache
054e 03f1 | | Declare_Variable Discrete,With_Value
054f e5ff | | Load 0x2,-0x1
0550 8234 | 4 | Call 0x1,0x34
0551 00e3 | | Load_Encached Natural_Cache
0552 03f1 | | Declare_Variable Discrete,With_Value
0553 BODY_0548:
0553 e402 | | Load 0x2,0x2
0554 700a |p | Jump_Nonzero 0x55f
0555 e5fd | | Load 0x2,-0x3
0556 0092 0692 | | Action Push_String_Extended,0x692 ; "There are currently no tokens for "
0558 e5ff | | Load 0x2,-0x1
0559 01cc | | Execute Vector,Catenate
055a 0092 0693 | | Action Push_String_Extended,0x693 ; ", so they can't be donated."
055c 01cc | | Execute Vector,Catenate
055d e21f | | Load 0x1,0x1f
055e 180d | | Execute Package,Field_Execute,Field_Number 0xd
055f e5fe | | Load 0x2,-0x2
0560 e402 | | Load 0x2,0x2
0561 027d | } | Execute Discrete,Greater
0562 681c |h | Jump_Zero 0x57f
0563 e5fd | | Load 0x2,-0x3
0564 0092 0694 | | Action Push_String_Extended,0x694 ; "The requested donation ("
0566 4820 |H | Short_Literal 0x20
0567 4800 |H | Short_Literal 0x0
0568 480a |H | Short_Literal 0xa
0569 e5fe | | Load 0x2,-0x2
056a 8222 | " | Call 0x1,0x22
056b 01cc | | Execute Vector,Catenate
056c 0092 0690 | | Action Push_String_Extended,0x690 ; ") for "
056e 01cc | | Execute Vector,Catenate
056f e5ff | | Load 0x2,-0x1
0570 01cc | | Execute Vector,Catenate
0571 0092 0695 | | Action Push_String_Extended,0x695 ; "exceeds the current limit ("
0573 01cc | | Execute Vector,Catenate
0574 4820 |H | Short_Literal 0x20
0575 4800 |H | Short_Literal 0x0
0576 480a |H | Short_Literal 0xa
0577 e402 | | Load 0x2,0x2
0578 8222 | " | Call 0x1,0x22
0579 01cc | | Execute Vector,Catenate
057a 0092 067a | z| Action Push_String_Extended,0x67a ; ")."
057c 01cc | | Execute Vector,Catenate
057d e21f | | Load 0x1,0x1f
057e 180d | | Execute Package,Field_Execute,Field_Number 0xd
057f e402 | | Load 0x2,0x2
0580 e5fe | | Load 0x2,-0x2
0581 0272 | r | Execute Discrete,Minus
0582 e403 | | Load 0x2,0x3
0583 027c | | | Execute Discrete,Less
0584 6813 |h | Jump_Zero 0x598
0585 e5fd | | Load 0x2,-0x3
0586 0092 0696 | | Action Push_String_Extended,0x696 ; "Donation of "
0588 4820 |H | Short_Literal 0x20
0589 4800 |H | Short_Literal 0x0
058a 480a |H | Short_Literal 0xa
058b e5fe | | Load 0x2,-0x2
058c 8222 | " | Call 0x1,0x22
058d 01cc | | Execute Vector,Catenate
058e 0092 0697 | | Action Push_String_Extended,0x697 ; " tokens for "
0590 01cc | | Execute Vector,Catenate
0591 e5ff | | Load 0x2,-0x1
0592 01cc | | Execute Vector,Catenate
0593 0092 0698 | | Action Push_String_Extended,0x698 ; " would transfer tokens currently in use."
0595 01cc | | Execute Vector,Catenate
0596 e21f | | Load 0x1,0x1f
0597 180d | | Execute Package,Field_Execute,Field_Number 0xd
0598 e402 | | Load 0x2,0x2
0599 e5fe | | Load 0x2,-0x2
059a 0272 | r | Execute Discrete,Minus
059b 00d8 | | Load_Top At_Offset_0
059c 00e3 | | Load_Encached Natural_Cache
059d 0260 | ` | Execute Discrete,In_Type
059e 7001 |p | Jump_Nonzero 0x5a0
059f 0801 | | Execute_Immediate Raise,0x1
05a0 e5ff | | Load 0x2,-0x1
05a1 e015 | | Load 0x0,0x15
05a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
05a3 e5fd | | Load 0x2,-0x3
05a4 0092 0696 | | Action Push_String_Extended,0x696 ; "Donation of "
05a6 4820 |H | Short_Literal 0x20
05a7 4800 |H | Short_Literal 0x0
05a8 480a |H | Short_Literal 0xa
05a9 e5fe | | Load 0x2,-0x2
05aa 8222 | " | Call 0x1,0x22
05ab 01cc | | Execute Vector,Catenate
05ac 0092 0697 | | Action Push_String_Extended,0x697 ; " tokens for "
05ae 01cc | | Execute Vector,Catenate
05af e5ff | | Load 0x2,-0x1
05b0 01cc | | Execute Vector,Catenate
05b1 0092 0699 | | Action Push_String_Extended,0x699 ; " has resulted in "
05b3 01cc | | Execute Vector,Catenate
05b4 4820 |H | Short_Literal 0x20
05b5 4800 |H | Short_Literal 0x0
05b6 480a |H | Short_Literal 0xa
05b7 e5ff | | Load 0x2,-0x1
05b8 8232 | 2 | Call 0x1,0x32
05b9 8222 | " | Call 0x1,0x22
05ba 01cc | | Execute Vector,Catenate
05bb 0092 069a | | Action Push_String_Extended,0x69a ; " tokens."
05bd 01cc | | Execute Vector,Catenate
05be e21f | | Load 0x1,0x1f
05bf 180f | | Execute Package,Field_Execute,Field_Number 0xf
05c0 4504 |E | Exit_Suprogram New_Top_Offset 0x4
05c1 0000 0000 | | .BLANK 0000[0x7]
05c8 ; --------------------------------------------------------------------------------------
05c8 ; SUBPROGRAM
05c8 ; --------------------------------------------------------------------------------------
05c8 05cb | | .CONST 0x05cb ; Address of begin
05c9 05cf | | .CONST 0x05cf ; Address of exception handler
05ca 0001 | | .CONST 0x0001 ; Number of locals
05cb BODY_05c8:
05cb INIT_05c8:
05cb e5ff | | Load 0x2,-0x1
05cc e015 | | Load 0x0,0x15
05cd 1815 | | Execute Package,Field_Execute,Field_Number 0x15
05ce 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05cf TRAP_05c8:
05cf 0007 | | Action Break_Optional
05d0 4800 |H | Short_Literal 0x0
05d1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05d2 0000 0000 | | .BLANK 0000[0x6]
05d8 ; --------------------------------------------------------------------------------------
05d8 ; SUBPROGRAM
05d8 ; --------------------------------------------------------------------------------------
05d8 05db | | .CONST 0x05db ; Address of begin
05d9 05df | | .CONST 0x05df ; Address of exception handler
05da 0001 | | .CONST 0x0001 ; Number of locals
05db BODY_05d8:
05db INIT_05d8:
05db e5ff | | Load 0x2,-0x1
05dc e015 | | Load 0x0,0x15
05dd 1816 | | Execute Package,Field_Execute,Field_Number 0x16
05de 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05df TRAP_05d8:
05df 0007 | | Action Break_Optional
05e0 4800 |H | Short_Literal 0x0
05e1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05e2 0000 0000 | | .BLANK 0000[0x6]
05e8 ; --------------------------------------------------------------------------------------
05e8 ; SUBPROGRAM
05e8 ; --------------------------------------------------------------------------------------
05e8 05eb | | .CONST 0x05eb ; Address of begin
05e9 05ef | | .CONST 0x05ef ; Address of exception handler
05ea 0001 | | .CONST 0x0001 ; Number of locals
05eb BODY_05e8:
05eb INIT_05e8:
05eb e5ff | | Load 0x2,-0x1
05ec e015 | | Load 0x0,0x15
05ed 1817 | | Execute Package,Field_Execute,Field_Number 0x17
05ee 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05ef TRAP_05e8:
05ef 0007 | | Action Break_Optional
05f0 4800 |H | Short_Literal 0x0
05f1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
05f2 0000 0000 | | .BLANK 0000[0x6]
05f8 ; --------------------------------------------------------------------------------------
05f8 ; SUBPROGRAM
05f8 ; --------------------------------------------------------------------------------------
05f8 05fb | | .CONST 0x05fb ; Address of begin
05f9 0004 | | .CONST 0x0004 ; Address of exception handler
05fa 0001 | | .CONST 0x0001 ; Number of locals
05fb BODY_05f8:
05fb INIT_05f8:
05fb e5ff | | Load 0x2,-0x1
05fc e21d | | Load 0x1,0x1d
05fd 025f | _ | Execute Discrete,Not_In_Type
05fe 682a |h* | Jump_Zero 0x629
05ff e5fc | | Load 0x2,-0x4
0600 0092 069b | | Action Push_String_Extended,0x69b ; "The legal range of "
0602 e5fe | | Load 0x2,-0x2
0603 01cc | | Execute Vector,Catenate
0604 0092 069c | | Action Push_String_Extended,0x69c ; " for "
0606 01cc | | Execute Vector,Catenate
0607 e5fd | | Load 0x2,-0x3
0608 01cc | | Execute Vector,Catenate
0609 0092 069d | | Action Push_String_Extended,0x69d ; " is "
060b 01cc | | Execute Vector,Catenate
060c 4820 |H | Short_Literal 0x20
060d 4800 |H | Short_Literal 0x0
060e 480a |H | Short_Literal 0xa
060f 4800 |H | Short_Literal 0x0
0610 8222 | " | Call 0x1,0x22
0611 01cc | | Execute Vector,Catenate
0612 0092 069e | | Action Push_String_Extended,0x69e ; ".."
0614 01cc | | Execute Vector,Catenate
0615 4820 |H | Short_Literal 0x20
0616 4800 |H | Short_Literal 0x0
0617 480a |H | Short_Literal 0xa
0618 4840 |H@ | Short_Literal 0x40
0619 8222 | " | Call 0x1,0x22
061a 01cc | | Execute Vector,Catenate
061b 0092 069f | | Action Push_String_Extended,0x69f ; ", but the value specified ("
061d 01cc | | Execute Vector,Catenate
061e 4820 |H | Short_Literal 0x20
061f 4800 |H | Short_Literal 0x0
0620 480a |H | Short_Literal 0xa
0621 e5ff | | Load 0x2,-0x1
0622 8222 | " | Call 0x1,0x22
0623 01cc | | Execute Vector,Catenate
0624 0092 06a0 | | Action Push_String_Extended,0x6a0 ; ") is outside that range"
0626 01cc | | Execute Vector,Catenate
0627 e21f | | Load 0x1,0x1f
0628 180d | | Execute Package,Field_Execute,Field_Number 0xd
0629 4505 |E | Exit_Suprogram New_Top_Offset 0x5
062a 0000 0000 | | .BLANK 0000[0x6]
0630 ; --------------------------------------------------------------------------------------
0630 ; SUBPROGRAM
0630 ; --------------------------------------------------------------------------------------
0630 063b | ; | .CONST 0x063b ; Address of begin
0631 0004 | | .CONST 0x0004 ; Address of exception handler
0632 0002 | | .CONST 0x0002 ; Number of locals
0633 INIT_0630:
0633 e007 | | Load 0x0,0x7
0634 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0635 0322 | " | Declare_Variable Record
0636 e7ff | | Load 0x3,-0x1
0637 e007 | | Load 0x0,0x7
0638 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0639 e602 | | Load 0x3,0x2
063a 017d | } | Execute Record,Structure_Write
063b BODY_0630:
063b 4800 |H | Short_Literal 0x0
063c e602 | | Load 0x3,0x2
063d 3805 |8 | Execute Record,Field_Write,Field_Number 0x5
063e 4800 |H | Short_Literal 0x0
063f e602 | | Load 0x3,0x2
0640 3804 |8 | Execute Record,Field_Write,Field_Number 0x4
0641 4801 |H | Short_Literal 0x1
0642 e602 | | Load 0x3,0x2
0643 3803 |8 | Execute Record,Field_Write,Field_Number 0x3
0644 4800 |H | Short_Literal 0x0
0645 e602 | | Load 0x3,0x2
0646 3806 |8 | Execute Record,Field_Write,Field_Number 0x6
0647 00d8 | | Load_Top At_Offset_0
0648 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0649 0000 0000 | | .BLANK 0000[0x7]
0650 ; --------------------------------------------------------------------------------------
0650 ; SUBPROGRAM
0650 ; --------------------------------------------------------------------------------------
0650 0656 | V | .CONST 0x0656 ; Address of begin
0651 065c | \ | .CONST 0x065c ; Address of exception handler
0652 0002 | | .CONST 0x0002 ; Number of locals
0653 INIT_0650:
0653 e007 | | Load 0x0,0x7
0654 1b14 | | Execute Package,Field_Read,Field_Number 0x14
0655 0322 | " | Declare_Variable Record
0656 BODY_0650:
0656 e5ff | | Load 0x2,-0x1
0657 e007 | | Load 0x0,0x7
0658 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0659 e602 | | Load 0x3,0x2
065a 017d | } | Execute Record,Structure_Write
065b 4501 |E | Exit_Suprogram New_Top_Offset 0x1
065c TRAP_0650:
065c 0007 | | Action Break_Optional
065d e5fe | | Load 0x2,-0x2
065e 0092 06a1 | | Action Push_String_Extended,0x6a1 ; "Date ("
0660 e5ff | | Load 0x2,-0x1
0661 01cc | | Execute Vector,Catenate
0662 0092 06a2 | | Action Push_String_Extended,0x6a2 ; ") doesn't represent a legal date."
0664 01cc | | Execute Vector,Catenate
0665 e21f | | Load 0x1,0x1f
0666 180d | | Execute Package,Field_Execute,Field_Number 0xd
0667 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0668 ; --------------------------------------------------------------------------------------
0668 ; STRING TABLE
0668 ; --------------------------------------------------------------------------------------
0668 0078 | x | .STRTAB 0x0078->0x06a4 ; "Accept_Tokens"
0669 0083 | | .STRTAB 0x0083->0x06aa ; "This machine has donated tokens today; it may not also accept them"
066a 00c3 | | .STRTAB 0x00c3->0x06cb ; "The sum of currently authorized tokens and Donations ("
066b 00f7 | | .STRTAB 0x00f7->0x06e6 ; ") is NOT equal to Resulting_Count parameter ("
066c 0122 | " | .STRTAB 0x0122->0x06fd ; "); these must be equal in order to proceed."
066d 014b | K | .STRTAB 0x014b->0x0712 ; "The code provided does NOT match the request being made. This might be caused by a transcription error of the code, an attempt to transfer between sites without Rational assistance, a transcription error of the Site of this machine ("
066e 0233 | 3 | .STRTAB 0x0233->0x0787 ; "), a transcription error of the Machine ID of this machine ("
066f 026d | m | .STRTAB 0x026d->0x07a5 ; "), a delay in posting the request (code only valid for one day), "
0670 02ac | | .STRTAB 0x02ac->0x07c6 ; "or some other combination of parameter problems. "
0671 02dc | | .STRTAB 0x02dc->0x07df ; "Contact your Rational representative for further assistance."
0672 0316 | | .STRTAB 0x0316->0x07fd ; ">>Product Name<<"
0673 0324 | $ | .STRTAB 0x0324->0x0805 ; " tokens set to "
0674 0331 | 1 | .STRTAB 0x0331->0x080c ; "Donate_Tokens"
0675 033c | < | .STRTAB 0x033c->0x0813 ; "Remote_Machine_ID specified is the Machine_ID for this machine."
0676 0379 | y | .STRTAB 0x0379->0x0832 ; "This machine has accepted tokens today; it may not also give them up"
0677 03bb | | .STRTAB 0x03bb->0x0854 ; "Set_Site"
0678 03c1 | | .STRTAB 0x03c1->0x0858 ; "Code ("
0679 03c5 | | .STRTAB 0x03c5->0x085b ; ") does not correspond to Site ("
067a 03e2 | | .STRTAB 0x03e2->0x086b ; ")."
067b 03e2 | | .STRTAB 0x03e2->0x086c ; "Site set to "
067c 03ec | | .STRTAB 0x03ec->0x0872 ; "Assign_Tokens"
067d 03f7 | | .STRTAB 0x03f7->0x0878 ; "Must be run from a Rational site."
067e 0416 | | .STRTAB 0x0416->0x0889 ; "Assign_Site"
067f 041f | | .STRTAB 0x041f->0x088e ; "Run the following on the remote machine:"
0680 0445 | E | .STRTAB 0x0445->0x08a2 ; "Site"
0681 0447 | G | .STRTAB 0x0447->0x08a4 ; "Code"
0682 0449 | I | .STRTAB 0x0449->0x08a6 ; "/"
0683 0448 | H | .STRTAB 0x0448->0x08a7 ; "="
0684 0447 | G | .STRTAB 0x0447->0x08a7 ; "|"
0685 0446 | F | .STRTAB 0x0446->0x08a8 ; "Product"
0686 044b | K | .STRTAB 0x044b->0x08ab ; "Donation"
0687 0451 | Q | .STRTAB 0x0451->0x08af ; "Resulting_Count"
0688 045e | ^ | .STRTAB 0x045e->0x08b7 ; "Product name not specified."
0689 0477 | w | .STRTAB 0x0477->0x08c4 ; "Product name contains an illegal character ("
068a 04a1 | | .STRTAB 0x04a1->0x08da ; "Product name includes leading or trailing blanks."
068b 04d0 | | .STRTAB 0x04d0->0x08f3 ; "Site name not specified."
068c 04e6 | | .STRTAB 0x04e6->0x08ff ; "Site name contains an illegal character ("
068d 050d | | .STRTAB 0x050d->0x0913 ; "Site name includes leading or trailing blanks."
068e 0539 | 9 | .STRTAB 0x0539->0x092a ; "Date contains an illegal character ("
068f 055b | [ | .STRTAB 0x055b->0x093c ; "The number of tokens ("
0690 056f | o | .STRTAB 0x056f->0x0947 ; ") for "
0691 0573 | s | .STRTAB 0x0573->0x094a ; " exceeds the target authorization ("
0692 0594 | | .STRTAB 0x0594->0x095c ; "There are currently no tokens for "
0693 05b4 | | .STRTAB 0x05b4->0x096d ; ", so they can't be donated."
0694 05cd | | .STRTAB 0x05cd->0x097a ; "The requested donation ("
0695 05e3 | | .STRTAB 0x05e3->0x0986 ; "exceeds the current limit ("
0696 05fc | | .STRTAB 0x05fc->0x0994 ; "Donation of "
0697 0606 | | .STRTAB 0x0606->0x099a ; " tokens for "
0698 0610 | | .STRTAB 0x0610->0x09a0 ; " would transfer tokens currently in use."
0699 0636 | 6 | .STRTAB 0x0636->0x09b4 ; " has resulted in "
069a 0645 | E | .STRTAB 0x0645->0x09bc ; " tokens."
069b 064b | K | .STRTAB 0x064b->0x09c0 ; "The legal range of "
069c 065c | \ | .STRTAB 0x065c->0x09ca ; " for "
069d 065f | _ | .STRTAB 0x065f->0x09cc ; " is "
069e 0661 | a | .STRTAB 0x0661->0x09ce ; ".."
069f 0661 | a | .STRTAB 0x0661->0x09cf ; ", but the value specified ("
06a0 067a | z | .STRTAB 0x067a->0x09dd ; ") is outside that range"
06a1 068f | | .STRTAB 0x068f->0x09e8 ; "Date ("
06a2 0693 | | .STRTAB 0x0693->0x09eb ; ") doesn't represent a legal date."
06a3 06b2 | | .STREND 0x06b2->0x09fc
06a4 4163 6365 |Acce| .STRTAB_STRINGS
09fc 0000 0000 | | .BLANK 0000[0x4]
0a00 ; --------------------------------------------------------------------------------------
0a00 ; Debug Table
0a00 ; --------------------------------------------------------------------------------------
0a00 0004 000e | | .DEBUG4 0x0004,0x000e,0xd0cd,0x0000,0x0001,0x0000
0a06 0000 0000 | | .XXX[0xe]
0a08 09c0 dc04 | |
0a0a 0000 0158 | X|
0a0c 0037 1c04 | 7 |
0a0e 0000 0000 | |
0a10 000b 2404 | $ |
0a12 0000 0158 | X|
0a14 0000 0000 | | .BLANK 0000[0x4]
0a18 0038 e804 | 8 | .XXX[0x4]
0a1a 0800 02b8 | |
0a1c 0000 0000 | | .BLANK 0000[0x4]
0a20 0038 e404 | 8 | .XXX[0xc]
0a22 0000 0012 | |
0a24 0038 e404 | 8 |
0a26 0000 0e40 | @|
0a28 000b 1c04 | |
0a2a 0000 0158 | X|
0a2c 0000 0000 | | .BLANK 0000[0x4]
0a30 09c0 dc04 | | .XXX[0x2c]
0a32 0000 0fd8 | |
0a34 0038 e804 | 8 |
0a36 0000 0000 | |
0a38 09ce c804 | |
0a3a 0000 0012 | |
0a3c 09ce c804 | |
0a3e 0000 2762 | 'b|
0a40 0038 f004 | 8 |
0a42 0800 0138 | 8|
0a44 310d 990b |1 |
0a46 0005 80d0 | |
0a48 09c0 dc04 | |
0a4a 0000 13d8 | |
0a4c 0038 f004 | 8 |
0a4e 0000 0000 | |
0a50 0038 e404 | 8 |
0a52 0000 0012 | |
0a54 0008 f462 | b|
0a56 0000 8340 | @|
0a58 0038 e804 | 8 |
0a5a 0800 07b8 | |
0a5c 0000 0000 | | .BLANK 0000[0x7]
0a63 000a 0008 | | .XXX[0x5]
0a65 f462 0000 | b |
0a67 7980 |y |
0a68 0000 0000 | | .BLANK 0000[0x190]
0bf8 000d 3aee | : | .XXX[0x8]
0bfa 000d 4100 | A |
0bfc 010e da08 | |
0bfe 0000 2962 | )b|