|
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: 8192 (0x2000) 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 0f90 | | .CONST 0x0f90 ; 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 8009 | | .CONST 0x8009 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0131 | 1 | .CONST 0x0131 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0056 | V | .CONST 0x0056 ; Number of locals 000b INIT_0008: 000b 00c4 | | Action Make_Default 000c 00c4 | | Action Make_Default 000d 00c4 | | Action Make_Default 000e 00c4 | | Action Make_Default 000f 00c4 | | Action Make_Default 0010 00c4 | | Action Make_Default 0011 00c4 | | Action Make_Default 0012 00c4 | | Action Make_Default 0013 00c4 | | Action Make_Default 0014 00c4 | | Action Make_Default 0015 00c4 | | Action Make_Default 0016 00c4 | | Action Make_Default 0017 00c4 | | Action Make_Default 0018 00c4 | | Action Make_Default 0019 00c4 | | Action Make_Default 001a 00c4 | | Action Make_Default 001b 00c4 | | Action Make_Default 001c 00c4 | | Action Make_Default 001d 00c4 | | Action Make_Default 001e 00c4 | | Action Make_Default 001f 00c4 | | Action Make_Default 0020 00c4 | | Action Make_Default 0021 00c4 | | Action Make_Default 0022 00c4 | | Action Make_Default 0023 00c4 | | Action Make_Default 0024 00c4 | | Action Make_Default 0025 00c4 | | Action Make_Default 0026 00c4 | | Action Make_Default 0027 00c4 | | Action Make_Default 0028 00c4 | | Action Make_Default 0029 00c4 | | Action Make_Default 002a 00c4 | | Action Make_Default 002b 00c4 | | Action Make_Default 002c 00c4 | | Action Make_Default 002d 00c4 | | Action Make_Default 002e 00c4 | | Action Make_Default 002f 00c4 | | Action Make_Default 0030 00c4 | | Action Make_Default 0031 00c4 | | Action Make_Default 0032 00c4 | | Action Make_Default 0033 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated 0035 c22b | + | Store 0x1,0x2b 0036 029a 021b | | Declare_Subprogram INIT_0218,For_Outer_Call,Visible,Unelaborated 0038 c219 | | Store 0x1,0x19 0039 029a 028b | | Declare_Subprogram INIT_0288,For_Outer_Call,Visible,Unelaborated 003b c22c | , | Store 0x1,0x2c 003c 029a 02eb | | Declare_Subprogram INIT_02e8,For_Outer_Call,Visible,Unelaborated 003e c21b | | Store 0x1,0x1b 003f 029a 02f3 | | Declare_Subprogram INIT_02f0,For_Outer_Call,Visible,Unelaborated 0041 c21c | | Store 0x1,0x1c 0042 e001 | | Load 0x0,0x1 0043 02a8 | | Declare_Subprogram For_Call,Visible,Unelaborated,With_Address 0044 c21d | | Store 0x1,0x1d 0045 029a 02fb | | Declare_Subprogram INIT_02f8,For_Outer_Call,Visible,Unelaborated 0047 c22d | - | Store 0x1,0x2d 0048 029a 03bb | | Declare_Subprogram INIT_03b8,For_Outer_Call,Visible,Unelaborated 004a c22e | . | Store 0x1,0x2e 004b 029a 042b | +| Declare_Subprogram INIT_0428,For_Outer_Call,Visible,Unelaborated 004d c22f | / | Store 0x1,0x2f 004e 029a 04ab | | Declare_Subprogram INIT_04a8,For_Outer_Call,Visible,Unelaborated 0050 c230 | 0 | Store 0x1,0x30 0051 029a 04fb | | Declare_Subprogram INIT_04f8,For_Outer_Call,Visible,Unelaborated 0053 c231 | 1 | Store 0x1,0x31 0054 029a 0553 | S| Declare_Subprogram INIT_0550,For_Outer_Call,Visible,Unelaborated 0056 c232 | 2 | Store 0x1,0x32 0057 029a 057b | {| Declare_Subprogram INIT_0578,For_Outer_Call,Visible,Unelaborated 0059 c233 | 3 | Store 0x1,0x33 005a 029a 05eb | | Declare_Subprogram INIT_05e8,For_Outer_Call,Visible,Unelaborated 005c c212 | | Store 0x1,0x12 005d 029a 05f3 | | Declare_Subprogram INIT_05f0,For_Outer_Call,Visible,Unelaborated 005f c220 | | Store 0x1,0x20 0060 029a 05fb | | Declare_Subprogram INIT_05f8,For_Outer_Call,Visible,Unelaborated 0062 c214 | | Store 0x1,0x14 0063 029a 0603 | | Declare_Subprogram INIT_0600,For_Outer_Call,Visible,Unelaborated 0065 c221 | ! | Store 0x1,0x21 0066 029a 060b | | Declare_Subprogram INIT_0608,For_Outer_Call,Visible,Unelaborated 0068 c222 | " | Store 0x1,0x22 0069 029a 0613 | | Declare_Subprogram INIT_0610,For_Outer_Call,Visible,Unelaborated 006b c234 | 4 | Store 0x1,0x34 006c 00bf | | Action Accept_Activation 006d 4800 |H | Short_Literal 0x0 006e 4840 |H@ | Short_Literal 0x40 006f 00e2 | | Load_Encached Integer_Cache 0070 03f8 | | Declare_Type Discrete,Constrained 0071 e002 | | Load 0x0,0x2 0072 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0073 0092 0995 | | Action Push_String_Extended,0x995 ; "Login" 0075 0092 0996 | | Action Push_String_Extended,0x996 ; "Full Session" 0077 0092 0997 | | Action Push_String_Extended,0x997 ; "Fundamental Session" 0079 00ea | | Load_Encached Null_String_Cache 007a 4800 |H | Short_Literal 0x0 007b e003 | | Load 0x0,0x3 007c 02a0 | | Declare_Subprogram Null_Subprogram 007d 038e | | Declare_Type Package,Defined 007e 0387 | | Declare_Variable Package 007f 4800 |H | Short_Literal 0x0 0080 e004 | | Load 0x0,0x4 0081 02a0 | | Declare_Subprogram Null_Subprogram 0082 038e | | Declare_Type Package,Defined 0083 0387 | | Declare_Variable Package 0084 4800 |H | Short_Literal 0x0 0085 e005 | | Load 0x0,0x5 0086 02a0 | | Declare_Subprogram Null_Subprogram 0087 038e | | Declare_Type Package,Defined 0088 0387 | | Declare_Variable Package 0089 e006 | | Load 0x0,0x6 008a 1916 | | Execute Package,Field_Reference,Field_Number 0x16 008b 0007 | | Action Break_Optional 008c e006 | | Load 0x0,0x6 008d 1917 | | Execute Package,Field_Reference,Field_Number 0x17 008e 0007 | | Action Break_Optional 008f e007 | | Load 0x0,0x7 0090 191b | | Execute Package,Field_Reference,Field_Number 0x1b 0091 0007 | | Action Break_Optional 0092 00ea | | Load_Encached Null_String_Cache 0093 4800 |H | Short_Literal 0x0 0094 4800 |H | Short_Literal 0x0 0095 4800 |H | Short_Literal 0x0 0096 e007 | | Load 0x0,0x7 0097 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0098 8240 | @ | Call 0x1,0x40 0099 029b 0633 | 3| Declare_Subprogram INIT_0630,For_Outer_Call,Unelaborated 009b 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 009c 029b 0653 | S| Declare_Subprogram INIT_0650,For_Outer_Call,Unelaborated 009e 029b 066b | k| Declare_Subprogram INIT_0668,For_Outer_Call,Unelaborated 00a0 029b 067b | {| Declare_Subprogram INIT_0678,For_Outer_Call,Unelaborated 00a2 029b 068b | | Declare_Subprogram INIT_0688,For_Outer_Call,Unelaborated 00a4 029b 0693 | | Declare_Subprogram INIT_0690,For_Outer_Call,Unelaborated 00a6 029b 06a3 | | Declare_Subprogram INIT_06a0,For_Outer_Call,Unelaborated 00a8 029b 06e3 | | Declare_Subprogram INIT_06e0,For_Outer_Call,Unelaborated 00aa 029b 0723 | #| Declare_Subprogram INIT_0720,For_Outer_Call,Unelaborated 00ac 029b 075b | [| Declare_Subprogram INIT_0758,For_Outer_Call,Unelaborated 00ae 029b 0793 | | Declare_Subprogram INIT_0790,For_Outer_Call,Unelaborated 00b0 029b 07cb | | Declare_Subprogram INIT_07c8,For_Outer_Call,Unelaborated 00b2 029b 07fb | | Declare_Subprogram INIT_07f8,For_Outer_Call,Unelaborated 00b4 029b 085b | [| Declare_Subprogram INIT_0858,For_Outer_Call,Unelaborated 00b6 029b 0873 | s| Declare_Subprogram INIT_0870,For_Outer_Call,Unelaborated 00b8 029b 08f3 | | Declare_Subprogram INIT_08f0,For_Outer_Call,Unelaborated 00ba 029b 0903 | | Declare_Subprogram INIT_0900,For_Outer_Call,Unelaborated 00bc 029b 0913 | | Declare_Subprogram INIT_0910,For_Outer_Call,Unelaborated 00be 1d2b | + | Execute_Immediate Reference_Lex_1,0x2b 00bf 00c7 | | Action Elaborate_Subprogram 00c0 1d19 | | Execute_Immediate Reference_Lex_1,0x19 00c1 00c7 | | Action Elaborate_Subprogram 00c2 1d30 | 0 | Execute_Immediate Reference_Lex_1,0x30 00c3 00c7 | | Action Elaborate_Subprogram 00c4 1d2f | / | Execute_Immediate Reference_Lex_1,0x2f 00c5 00c7 | | Action Elaborate_Subprogram 00c6 1d2d | - | Execute_Immediate Reference_Lex_1,0x2d 00c7 00c7 | | Action Elaborate_Subprogram 00c8 1d2e | . | Execute_Immediate Reference_Lex_1,0x2e 00c9 00c7 | | Action Elaborate_Subprogram 00ca 1d1b | | Execute_Immediate Reference_Lex_1,0x1b 00cb 00c7 | | Action Elaborate_Subprogram 00cc 1d2c | , | Execute_Immediate Reference_Lex_1,0x2c 00cd 00c7 | | Action Elaborate_Subprogram 00ce 1d32 | 2 | Execute_Immediate Reference_Lex_1,0x32 00cf 00c7 | | Action Elaborate_Subprogram 00d0 1d31 | 1 | Execute_Immediate Reference_Lex_1,0x31 00d1 00c7 | | Action Elaborate_Subprogram 00d2 1d33 | 3 | Execute_Immediate Reference_Lex_1,0x33 00d3 00c7 | | Action Elaborate_Subprogram 00d4 1d1d | | Execute_Immediate Reference_Lex_1,0x1d 00d5 00c7 | | Action Elaborate_Subprogram 00d6 1d1c | | Execute_Immediate Reference_Lex_1,0x1c 00d7 00c7 | | Action Elaborate_Subprogram 00d8 1d14 | | Execute_Immediate Reference_Lex_1,0x14 00d9 00c7 | | Action Elaborate_Subprogram 00da 1d12 | | Execute_Immediate Reference_Lex_1,0x12 00db 00c7 | | Action Elaborate_Subprogram 00dc 1d21 | ! | Execute_Immediate Reference_Lex_1,0x21 00dd 00c7 | | Action Elaborate_Subprogram 00de 1d20 | | Execute_Immediate Reference_Lex_1,0x20 00df 00c7 | | Action Elaborate_Subprogram 00e0 e008 | | Load 0x0,0x8 00e1 e002 | | Load 0x0,0x2 00e2 e009 | | Load 0x0,0x9 00e3 e00a | | Load 0x0,0xa 00e4 e00b | | Load 0x0,0xb 00e5 e00c | | Load 0x0,0xc 00e6 1d3e | > | Execute_Immediate Reference_Lex_1,0x3e 00e7 1d3f | ? | Execute_Immediate Reference_Lex_1,0x3f 00e8 e00d | | Load 0x0,0xd 00e9 e00e | | Load 0x0,0xe 00ea 480a |H | Short_Literal 0xa 00eb e23b | ; | Load 0x1,0x3b 00ec 020e | | Execute Module,Augment_Imports 00ed e23b | ; | Load 0x1,0x3b 00ee 020f | | Execute Module,Activate 00ef e00f | | Load 0x0,0xf 00f0 e010 | | Load 0x0,0x10 00f1 e011 | | Load 0x0,0x11 00f2 e012 | | Load 0x0,0x12 00f3 e013 | | Load 0x0,0x13 00f4 e014 | | Load 0x0,0x14 00f5 e007 | | Load 0x0,0x7 00f6 e006 | | Load 0x0,0x6 00f7 e015 | | Load 0x0,0x15 00f8 e016 | | Load 0x0,0x16 00f9 00b6 | | Action Make_Scope 00fa e017 | | Load 0x0,0x17 00fb e018 | | Load 0x0,0x18 00fc 480d |H | Short_Literal 0xd 00fd e23d | = | Load 0x1,0x3d 00fe 020e | | Execute Module,Augment_Imports 00ff e23d | = | Load 0x1,0x3d 0100 020f | | Execute Module,Activate 0101 e019 | | Load 0x0,0x19 0102 4801 |H | Short_Literal 0x1 0103 e23c | < | Load 0x1,0x3c 0104 020e | | Execute Module,Augment_Imports 0105 e23c | < | Load 0x1,0x3c 0106 020f | | Execute Module,Activate 0107 1d49 | I | Execute_Immediate Reference_Lex_1,0x49 0108 00c7 | | Action Elaborate_Subprogram 0109 1d48 | H | Execute_Immediate Reference_Lex_1,0x48 010a 00c7 | | Action Elaborate_Subprogram 010b 1d4a | J | Execute_Immediate Reference_Lex_1,0x4a 010c 00c7 | | Action Elaborate_Subprogram 010d 1d4b | K | Execute_Immediate Reference_Lex_1,0x4b 010e 00c7 | | Action Elaborate_Subprogram 010f 1d4c | L | Execute_Immediate Reference_Lex_1,0x4c 0110 00c7 | | Action Elaborate_Subprogram 0111 029d 0923 | #| Declare_Subprogram INIT_0920,For_Outer_Call 0113 1d50 | P | Execute_Immediate Reference_Lex_1,0x50 0114 00c7 | | Action Elaborate_Subprogram 0115 1d4d | M | Execute_Immediate Reference_Lex_1,0x4d 0116 00c7 | | Action Elaborate_Subprogram 0117 1d4f | O | Execute_Immediate Reference_Lex_1,0x4f 0118 00c7 | | Action Elaborate_Subprogram 0119 1d4e | N | Execute_Immediate Reference_Lex_1,0x4e 011a 00c7 | | Action Elaborate_Subprogram 011b 1d51 | Q | Execute_Immediate Reference_Lex_1,0x51 011c 00c7 | | Action Elaborate_Subprogram 011d 1d52 | R | Execute_Immediate Reference_Lex_1,0x52 011e 00c7 | | Action Elaborate_Subprogram 011f 1d34 | 4 | Execute_Immediate Reference_Lex_1,0x34 0120 00c7 | | Action Elaborate_Subprogram 0121 1d45 | E | Execute_Immediate Reference_Lex_1,0x45 0122 00c7 | | Action Elaborate_Subprogram 0123 1d53 | S | Execute_Immediate Reference_Lex_1,0x53 0124 00c7 | | Action Elaborate_Subprogram 0125 1d55 | U | Execute_Immediate Reference_Lex_1,0x55 0126 00c7 | | Action Elaborate_Subprogram 0127 1d54 | T | Execute_Immediate Reference_Lex_1,0x54 0128 00c7 | | Action Elaborate_Subprogram 0129 1d46 | F | Execute_Immediate Reference_Lex_1,0x46 012a 00c7 | | Action Elaborate_Subprogram 012b 1d47 | G | Execute_Immediate Reference_Lex_1,0x47 012c 00c7 | | Action Elaborate_Subprogram 012d 1d43 | C | Execute_Immediate Reference_Lex_1,0x43 012e 00c7 | | Action Elaborate_Subprogram 012f 1d22 | " | Execute_Immediate Reference_Lex_1,0x22 0130 00c7 | | Action Elaborate_Subprogram 0131 BODY_0008: 0131 00bc | | Action Signal_Activated 0132 00bb | | Action Signal_Completion 0133 0000 0000 | | .BLANK 0000[0x5] 0138 ; -------------------------------------------------------------------------------------- 0138 ; SUBPROGRAM 0138 ; -------------------------------------------------------------------------------------- 0138 0144 | D | .CONST 0x0144 ; Address of begin 0139 01fd | | .CONST 0x01fd ; Address of exception handler 013a 0005 | | .CONST 0x0005 ; Number of locals 013b INIT_0138: 013b 0092 0998 | | Action Push_String_Extended,0x998 ; "Accept_Tokens" 013d e236 | 6 | Load 0x1,0x36 013e 02c7 | | Declare_Variable Any 013f e002 | | Load 0x0,0x2 0140 180e | | Execute Package,Field_Execute,Field_Number 0xe 0141 a403 | | Store_Unchecked 0x2,0x3 0142 00e3 | | Load_Encached Natural_Cache 0143 00e3 | | Load_Encached Natural_Cache 0144 BODY_0138: 0144 e403 | | Load 0x2,0x3 0145 e5fa | | Load 0x2,-0x6 0146 e5fb | | Load 0x2,-0x5 0147 e5fc | | Load 0x2,-0x4 0148 e5fd | | Load 0x2,-0x3 0149 e23b | ; | Load 0x1,0x3b 014a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 014b e5fe | | Load 0x2,-0x2 014c e23b | ; | Load 0x1,0x3b 014d 181c | | Execute Package,Field_Execute,Field_Number 0x1c 014e e5ff | | Load 0x2,-0x1 014f e402 | | Load 0x2,0x2 0150 e23b | ; | Load 0x1,0x3b 0151 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0152 c403 | | Store 0x2,0x3 0153 e403 | | Load 0x2,0x3 0154 e23b | ; | Load 0x1,0x3b 0155 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0156 e5fb | | Load 0x2,-0x5 0157 01db | | Execute Vector,Length 0158 7009 |p | Jump_Nonzero 0x162 0159 e23d | = | Load 0x1,0x3d 015a 180e | | Execute Package,Field_Execute,Field_Number 0xe 015b 8248 | H | Call 0x1,0x48 015c 6805 |h | Jump_Zero 0x162 015d e403 | | Load 0x2,0x3 015e 0092 0999 | | Action Push_String_Extended,0x999 ; "This machine has donated tokens today; it may not also accept them" 0160 e23b | ; | Load 0x1,0x3b 0161 180d | | Execute Package,Field_Execute,Field_Number 0xd 0162 e403 | | Load 0x2,0x3 0163 e5ff | | Load 0x2,-0x1 0164 824d | M | Call 0x1,0x4d 0165 e403 | | Load 0x2,0x3 0166 e5fd | | Load 0x2,-0x3 0167 e5fe | | Load 0x2,-0x2 0168 e5ff | | Load 0x2,-0x1 0169 8250 | P | Call 0x1,0x50 016a e5ff | | Load 0x2,-0x1 016b 8253 | S | Call 0x1,0x53 016c a405 | | Store_Unchecked 0x2,0x5 016d 00d8 | | Load_Top At_Offset_0 016e e5fe | | Load 0x2,-0x2 016f 0273 | s | Execute Discrete,Plus 0170 c404 | | Store 0x2,0x4 0171 e404 | | Load 0x2,0x4 0172 e5fd | | Load 0x2,-0x3 0173 027e | ~ | Execute Discrete,Not_Equal 0174 6827 |h' | Jump_Zero 0x19c 0175 e403 | | Load 0x2,0x3 0176 483d |H= | Short_Literal 0x3d 0177 482b |H+ | Short_Literal 0x2b 0178 0092 099a | | Action Push_String_Extended,0x99a ; "The sum of currently authorized tokens and Donations (" 017a 4820 |H | Short_Literal 0x20 017b 4800 |H | Short_Literal 0x0 017c 480a |H | Short_Literal 0xa 017d e405 | | Load 0x2,0x5 017e 823e | > | Call 0x1,0x3e 017f 01cc | | Execute Vector,Catenate 0180 01cb | | Execute Vector,Append 0181 4820 |H | Short_Literal 0x20 0182 4800 |H | Short_Literal 0x0 0183 480a |H | Short_Literal 0xa 0184 e5fe | | Load 0x2,-0x2 0185 823e | > | Call 0x1,0x3e 0186 01cc | | Execute Vector,Catenate 0187 01cb | | Execute Vector,Append 0188 4820 |H | Short_Literal 0x20 0189 4800 |H | Short_Literal 0x0 018a 480a |H | Short_Literal 0xa 018b e404 | | Load 0x2,0x4 018c 823e | > | Call 0x1,0x3e 018d 01cc | | Execute Vector,Catenate 018e 0092 099b | | Action Push_String_Extended,0x99b ; ") is NOT equal to Resulting_Count parameter (" 0190 01cc | | Execute Vector,Catenate 0191 4820 |H | Short_Literal 0x20 0192 4800 |H | Short_Literal 0x0 0193 480a |H | Short_Literal 0xa 0194 e5fd | | Load 0x2,-0x3 0195 823e | > | Call 0x1,0x3e 0196 01cc | | Execute Vector,Catenate 0197 0092 099c | | Action Push_String_Extended,0x99c ; "); these must be equal in order to proceed." 0199 01cc | | Execute Vector,Catenate 019a e23b | ; | Load 0x1,0x3b 019b 180d | | Execute Package,Field_Execute,Field_Number 0xd 019c e5fb | | Load 0x2,-0x5 019d e5fc | | Load 0x2,-0x4 019e e5fd | | Load 0x2,-0x3 019f e5fe | | Load 0x2,-0x2 01a0 e5ff | | Load 0x2,-0x1 01a1 8246 | F | Call 0x1,0x46 01a2 7019 |p | Jump_Nonzero 0x1bc 01a3 e403 | | Load 0x2,0x3 01a4 0092 099d | | Action Push_String_Extended,0x99d ; "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 (" 01a6 821b | | Call 0x1,0x1b 01a7 01cc | | Execute Vector,Catenate 01a8 0092 099e | | Action Push_String_Extended,0x99e ; "), a transcription error of the Machine ID of this machine (" 01aa 01cc | | Execute Vector,Catenate 01ab 4820 |H | Short_Literal 0x20 01ac 4800 |H | Short_Literal 0x0 01ad 480a |H | Short_Literal 0xa 01ae 821c | | Call 0x1,0x1c 01af 823f | ? | Call 0x1,0x3f 01b0 01cc | | Execute Vector,Catenate 01b1 0092 099f | | Action Push_String_Extended,0x99f ; "), a delay in posting the request (code only valid for one day), " 01b3 01cc | | Execute Vector,Catenate 01b4 0092 09a0 | | Action Push_String_Extended,0x9a0 ; "or some other combination of parameter problems. " 01b6 01cc | | Execute Vector,Catenate 01b7 0092 09a1 | | Action Push_String_Extended,0x9a1 ; "Contact your Rational representative for further assistance." 01b9 01cc | | Execute Vector,Catenate 01ba e23b | ; | Load 0x1,0x3b 01bb 180d | | Execute Package,Field_Execute,Field_Number 0xd 01bc e5fb | | Load 0x2,-0x5 01bd 01db | | Execute Vector,Length 01be 680a |h | Jump_Zero 0x1c9 01bf e5fb | | Load 0x2,-0x5 01c0 e5ff | | Load 0x2,-0x1 01c1 e23d | = | Load 0x1,0x3d 01c2 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01c3 7005 |p | Jump_Nonzero 0x1c9 01c4 e403 | | Load 0x2,0x3 01c5 0092 09a2 | | Action Push_String_Extended,0x9a2 ; "The authorization provided has been used previously for this product. It must be unique for this machine for all time." 01c7 e23b | ; | Load 0x1,0x3b 01c8 180d | | Execute Package,Field_Execute,Field_Number 0xd 01c9 e5ff | | Load 0x2,-0x1 01ca e017 | | Load 0x0,0x17 01cb 180e | | Execute Package,Field_Execute,Field_Number 0xe 01cc 7009 |p | Jump_Nonzero 0x1d6 01cd 00ea | | Load_Encached Null_String_Cache 01ce 00ea | | Load_Encached Null_String_Cache 01cf 821c | | Call 0x1,0x1c 01d0 e5ff | | Load 0x2,-0x1 01d1 e017 | | Load 0x0,0x17 01d2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01d3 e5ff | | Load 0x2,-0x1 01d4 e017 | | Load 0x0,0x17 01d5 180d | | Execute Package,Field_Execute,Field_Number 0xd 01d6 e5fd | | Load 0x2,-0x3 01d7 e5ff | | Load 0x2,-0x1 01d8 e016 | | Load 0x0,0x16 01d9 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01da e5ff | | Load 0x2,-0x1 01db 8254 | T | Call 0x1,0x54 01dc 7004 |p | Jump_Nonzero 0x1e1 01dd 480c |H | Short_Literal 0xc 01de e5ff | | Load 0x2,-0x1 01df e016 | | Load 0x0,0x16 01e0 1814 | | Execute Package,Field_Execute,Field_Number 0x14 01e1 e403 | | Load 0x2,0x3 01e2 e5ff | | Load 0x2,-0x1 01e3 0092 09a3 | | Action Push_String_Extended,0x9a3 ; " tokens set to " 01e5 01cc | | Execute Vector,Catenate 01e6 4820 |H | Short_Literal 0x20 01e7 4800 |H | Short_Literal 0x0 01e8 480a |H | Short_Literal 0xa 01e9 e5fd | | Load 0x2,-0x3 01ea 823e | > | Call 0x1,0x3e 01eb 01cc | | Execute Vector,Catenate 01ec e23b | ; | Load 0x1,0x3b 01ed 180f | | Execute Package,Field_Execute,Field_Number 0xf 01ee e5fb | | Load 0x2,-0x5 01ef 01db | | Execute Vector,Length 01f0 7004 |p | Jump_Nonzero 0x1f5 01f1 e011 | | Load 0x0,0x11 01f2 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01f3 e23d | = | Load 0x1,0x3d 01f4 180f | | Execute Package,Field_Execute,Field_Number 0xf 01f5 e23d | = | Load 0x1,0x3d 01f6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01f7 e403 | | Load 0x2,0x3 01f8 00ea | | Load_Encached Null_String_Cache 01f9 e402 | | Load 0x2,0x2 01fa e23b | ; | Load 0x1,0x3b 01fb 1819 | | Execute Package,Field_Execute,Field_Number 0x19 01fc 4507 |E | Exit_Suprogram New_Top_Offset 0x7 01fd TRAP_0138: 01fd e002 | | Load 0x0,0x2 01fe 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 01ff 010f | | Execute Exception,Equal 0200 6806 |h | Jump_Zero 0x207 0201 e403 | | Load 0x2,0x3 0202 e402 | | Load 0x2,0x2 0203 e23b | ; | Load 0x1,0x3b 0204 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0205 00d8 | | Load_Top At_Offset_0 0206 0101 | | Execute Exception,Reraise 0207 e009 | | Load 0x0,0x9 0208 010f | | Execute Exception,Equal 0209 6805 |h | Jump_Zero 0x20f 020a e403 | | Load 0x2,0x3 020b e402 | | Load 0x2,0x2 020c e23b | ; | Load 0x1,0x3b 020d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 020e 4507 |E | Exit_Suprogram New_Top_Offset 0x7 020f e403 | | Load 0x2,0x3 0210 4800 |H | Short_Literal 0x0 0211 4801 |H | Short_Literal 0x1 0212 e01a | | Load 0x0,0x1a 0213 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0214 e402 | | Load 0x2,0x2 0215 e23b | ; | Load 0x1,0x3b 0216 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0217 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0222 | " | .CONST 0x0222 ; Address of begin 0219 026b | k | .CONST 0x026b ; Address of exception handler 021a 0003 | | .CONST 0x0003 ; Number of locals 021b INIT_0218: 021b 0092 09a4 | | Action Push_String_Extended,0x9a4 ; "Donate_Tokens" 021d e236 | 6 | Load 0x1,0x36 021e 02c7 | | Declare_Variable Any 021f e002 | | Load 0x0,0x2 0220 180e | | Execute Package,Field_Execute,Field_Number 0xe 0221 a403 | | Store_Unchecked 0x2,0x3 0222 BODY_0218: 0222 00d8 | | Load_Top At_Offset_0 0223 e5fa | | Load 0x2,-0x6 0224 e5fb | | Load 0x2,-0x5 0225 e5fc | | Load 0x2,-0x4 0226 e23b | ; | Load 0x1,0x3b 0227 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0228 e5fd | | Load 0x2,-0x3 0229 e23b | ; | Load 0x1,0x3b 022a 181c | | Execute Package,Field_Execute,Field_Number 0x1c 022b e5fe | | Load 0x2,-0x2 022c e23b | ; | Load 0x1,0x3b 022d 181c | | Execute Package,Field_Execute,Field_Number 0x1c 022e e5ff | | Load 0x2,-0x1 022f e402 | | Load 0x2,0x2 0230 e23b | ; | Load 0x1,0x3b 0231 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0232 c403 | | Store 0x2,0x3 0233 00d8 | | Load_Top At_Offset_0 0234 e23b | ; | Load 0x1,0x3b 0235 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0236 00d8 | | Load_Top At_Offset_0 0237 e5fb | | Load 0x2,-0x5 0238 824e | N | Call 0x1,0x4e 0239 00d8 | | Load_Top At_Offset_0 023a e5ff | | Load 0x2,-0x1 023b 824d | M | Call 0x1,0x4d 023c e5fc | | Load 0x2,-0x4 023d 821c | | Call 0x1,0x1c 023e 027f | | Execute Discrete,Equal 023f 6805 |h | Jump_Zero 0x245 0240 00d8 | | Load_Top At_Offset_0 0241 0092 09a5 | | Action Push_String_Extended,0x9a5 ; "Remote_Machine_ID specified is the Machine_ID for this machine." 0243 e23b | ; | Load 0x1,0x3b 0244 180d | | Execute Package,Field_Execute,Field_Number 0xd 0245 e23d | = | Load 0x1,0x3d 0246 180d | | Execute Package,Field_Execute,Field_Number 0xd 0247 8248 | H | Call 0x1,0x48 0248 6805 |h | Jump_Zero 0x24e 0249 00d8 | | Load_Top At_Offset_0 024a 0092 09a6 | | Action Push_String_Extended,0x9a6 ; "This machine has accepted tokens today; it may not also give them up" 024c e23b | ; | Load 0x1,0x3b 024d 180d | | Execute Package,Field_Execute,Field_Number 0xd 024e 00d8 | | Load_Top At_Offset_0 024f e5fd | | Load 0x2,-0x3 0250 e5fe | | Load 0x2,-0x2 0251 e5ff | | Load 0x2,-0x1 0252 8250 | P | Call 0x1,0x50 0253 00d8 | | Load_Top At_Offset_0 0254 e5fe | | Load 0x2,-0x2 0255 e5ff | | Load 0x2,-0x1 0256 8252 | R | Call 0x1,0x52 0257 e011 | | Load 0x0,0x11 0258 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0259 e23d | = | Load 0x1,0x3d 025a 1810 | | Execute Package,Field_Execute,Field_Number 0x10 025b e23d | = | Load 0x1,0x3d 025c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 025d e242 | B | Load 0x1,0x42 025e e23a | : | Load 0x1,0x3a 025f e5fb | | Load 0x2,-0x5 0260 e5fc | | Load 0x2,-0x4 0261 e5fd | | Load 0x2,-0x3 0262 e5fe | | Load 0x2,-0x2 0263 e5ff | | Load 0x2,-0x1 0264 824a | J | Call 0x1,0x4a 0265 00d8 | | Load_Top At_Offset_0 0266 00ea | | Load_Encached Null_String_Cache 0267 e402 | | Load 0x2,0x2 0268 e23b | ; | Load 0x1,0x3b 0269 1819 | | Execute Package,Field_Execute,Field_Number 0x19 026a 4507 |E | Exit_Suprogram New_Top_Offset 0x7 026b TRAP_0218: 026b e002 | | Load 0x0,0x2 026c 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 026d 010f | | Execute Exception,Equal 026e 6806 |h | Jump_Zero 0x275 026f e403 | | Load 0x2,0x3 0270 e402 | | Load 0x2,0x2 0271 e23b | ; | Load 0x1,0x3b 0272 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0273 00d8 | | Load_Top At_Offset_0 0274 0101 | | Execute Exception,Reraise 0275 e009 | | Load 0x0,0x9 0276 010f | | Execute Exception,Equal 0277 6805 |h | Jump_Zero 0x27d 0278 e403 | | Load 0x2,0x3 0279 e402 | | Load 0x2,0x2 027a e23b | ; | Load 0x1,0x3b 027b 181a | | Execute Package,Field_Execute,Field_Number 0x1a 027c 4507 |E | Exit_Suprogram New_Top_Offset 0x7 027d e403 | | Load 0x2,0x3 027e 4800 |H | Short_Literal 0x0 027f 4801 |H | Short_Literal 0x1 0280 e01a | | Load 0x0,0x1a 0281 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0282 e402 | | Load 0x2,0x2 0283 e23b | ; | Load 0x1,0x3b 0284 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0285 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0286 0000 0000 | | .XXX[0x2] 0288 ; -------------------------------------------------------------------------------------- 0288 ; SUBPROGRAM 0288 ; -------------------------------------------------------------------------------------- 0288 0292 | | .CONST 0x0292 ; Address of begin 0289 02cc | | .CONST 0x02cc ; Address of exception handler 028a 0003 | | .CONST 0x0003 ; Number of locals 028b INIT_0288: 028b 0092 09a7 | | Action Push_String_Extended,0x9a7 ; "Set_Site" 028d e236 | 6 | Load 0x1,0x36 028e 02c7 | | Declare_Variable Any 028f e002 | | Load 0x0,0x2 0290 180e | | Execute Package,Field_Execute,Field_Number 0xe 0291 a403 | | Store_Unchecked 0x2,0x3 0292 BODY_0288: 0292 00d8 | | Load_Top At_Offset_0 0293 e5fc | | Load 0x2,-0x4 0294 e5fd | | Load 0x2,-0x3 0295 e5fe | | Load 0x2,-0x2 0296 e5ff | | Load 0x2,-0x1 0297 e402 | | Load 0x2,0x2 0298 e23b | ; | Load 0x1,0x3b 0299 1814 | | Execute Package,Field_Execute,Field_Number 0x14 029a c403 | | Store 0x2,0x3 029b 00d8 | | Load_Top At_Offset_0 029c e23b | ; | Load 0x1,0x3b 029d 1811 | | Execute Package,Field_Execute,Field_Number 0x11 029e e5fe | | Load 0x2,-0x2 029f e241 | A | Load 0x1,0x41 02a0 e5fd | | Load 0x2,-0x3 02a1 821c | | Call 0x1,0x1c 02a2 e5ff | | Load 0x2,-0x1 02a3 8244 | D | Call 0x1,0x44 02a4 01de | | Execute Vector,Not_Equal 02a5 6814 |h | Jump_Zero 0x2ba 02a6 00d8 | | Load_Top At_Offset_0 02a7 0092 09a8 | | Action Push_String_Extended,0x9a8 ; "Code (" 02a9 e5fe | | Load 0x2,-0x2 02aa e23b | ; | Load 0x1,0x3b 02ab 181e | | Execute Package,Field_Execute,Field_Number 0x1e 02ac 01cc | | Execute Vector,Catenate 02ad 0092 09a9 | | Action Push_String_Extended,0x9a9 ; ") does not correspond to Site (" 02af 01cc | | Execute Vector,Catenate 02b0 e5ff | | Load 0x2,-0x1 02b1 e23b | ; | Load 0x1,0x3b 02b2 181e | | Execute Package,Field_Execute,Field_Number 0x1e 02b3 01cc | | Execute Vector,Catenate 02b4 0092 09aa | | Action Push_String_Extended,0x9aa ; ")." 02b6 01cc | | Execute Vector,Catenate 02b7 e23b | ; | Load 0x1,0x3b 02b8 180d | | Execute Package,Field_Execute,Field_Number 0xd 02b9 780a |x | Jump 0x2c4 02ba e5ff | | Load 0x2,-0x1 02bb e23d | = | Load 0x1,0x3d 02bc 1811 | | Execute Package,Field_Execute,Field_Number 0x11 02bd 00d8 | | Load_Top At_Offset_0 02be 0092 09ab | | Action Push_String_Extended,0x9ab ; "Site set to " 02c0 e5ff | | Load 0x2,-0x1 02c1 01cc | | Execute Vector,Catenate 02c2 e23b | ; | Load 0x1,0x3b 02c3 180f | | Execute Package,Field_Execute,Field_Number 0xf 02c4 e23d | = | Load 0x1,0x3d 02c5 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02c6 00d8 | | Load_Top At_Offset_0 02c7 00ea | | Load_Encached Null_String_Cache 02c8 e402 | | Load 0x2,0x2 02c9 e23b | ; | Load 0x1,0x3b 02ca 1819 | | Execute Package,Field_Execute,Field_Number 0x19 02cb 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02cc TRAP_0288: 02cc e002 | | Load 0x0,0x2 02cd 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 02ce 010f | | Execute Exception,Equal 02cf 6806 |h | Jump_Zero 0x2d6 02d0 e403 | | Load 0x2,0x3 02d1 e402 | | Load 0x2,0x2 02d2 e23b | ; | Load 0x1,0x3b 02d3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 02d4 00d8 | | Load_Top At_Offset_0 02d5 0101 | | Execute Exception,Reraise 02d6 e009 | | Load 0x0,0x9 02d7 010f | | Execute Exception,Equal 02d8 6805 |h | Jump_Zero 0x2de 02d9 e403 | | Load 0x2,0x3 02da e402 | | Load 0x2,0x2 02db e23b | ; | Load 0x1,0x3b 02dc 181a | | Execute Package,Field_Execute,Field_Number 0x1a 02dd 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02de e403 | | Load 0x2,0x3 02df 4800 |H | Short_Literal 0x0 02e0 4801 |H | Short_Literal 0x1 02e1 e01a | | Load 0x0,0x1a 02e2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 02e3 e402 | | Load 0x2,0x2 02e4 e23b | ; | Load 0x1,0x3b 02e5 181b | | Execute Package,Field_Execute,Field_Number 0x1b 02e6 4505 |E | Exit_Suprogram New_Top_Offset 0x5 02e7 0000 | | .XXX[0x1] 02e8 ; -------------------------------------------------------------------------------------- 02e8 ; SUBPROGRAM 02e8 ; -------------------------------------------------------------------------------------- 02e8 02eb | | .CONST 0x02eb ; Address of begin 02e9 0004 | | .CONST 0x0004 ; Address of exception handler 02ea 0001 | | .CONST 0x0001 ; Number of locals 02eb BODY_02e8: 02eb INIT_02e8: 02eb e23d | = | Load 0x1,0x3d 02ec 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02ed 00ca | | Action Exit_Nullary_Function 02ee 0000 0000 | | .XXX[0x2] 02f0 ; -------------------------------------------------------------------------------------- 02f0 ; SUBPROGRAM 02f0 ; -------------------------------------------------------------------------------------- 02f0 02f3 | | .CONST 0x02f3 ; Address of begin 02f1 0004 | | .CONST 0x0004 ; Address of exception handler 02f2 0001 | | .CONST 0x0001 ; Number of locals 02f3 BODY_02f0: 02f3 INIT_02f0: 02f3 e01b | | Load 0x0,0x1b 02f4 180e | | Execute Package,Field_Execute,Field_Number 0xe 02f5 00ca | | Action Exit_Nullary_Function 02f6 0000 0000 | | .XXX[0x2] 02f8 ; -------------------------------------------------------------------------------------- 02f8 ; SUBPROGRAM 02f8 ; -------------------------------------------------------------------------------------- 02f8 0305 | | .CONST 0x0305 ; Address of begin 02f9 039c | | .CONST 0x039c ; Address of exception handler 02fa 0005 | | .CONST 0x0005 ; Number of locals 02fb INIT_02f8: 02fb 0092 09ac | | Action Push_String_Extended,0x9ac ; "Convert_Tokens" 02fd e236 | 6 | Load 0x1,0x36 02fe 02c7 | | Declare_Variable Any 02ff e002 | | Load 0x0,0x2 0300 180e | | Execute Package,Field_Execute,Field_Number 0xe 0301 a403 | | Store_Unchecked 0x2,0x3 0302 00e3 | | Load_Encached Natural_Cache 0303 029f 093b | ;| Declare_Subprogram INIT_0938,For_Call 0305 BODY_02f8: 0305 e403 | | Load 0x2,0x3 0306 e5fa | | Load 0x2,-0x6 0307 e5fb | | Load 0x2,-0x5 0308 e5fc | | Load 0x2,-0x4 0309 e5fd | | Load 0x2,-0x3 030a e23b | ; | Load 0x1,0x3b 030b 181c | | Execute Package,Field_Execute,Field_Number 0x1c 030c e5fe | | Load 0x2,-0x2 030d e5ff | | Load 0x2,-0x1 030e e402 | | Load 0x2,0x2 030f e23b | ; | Load 0x1,0x3b 0310 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0311 c403 | | Store 0x2,0x3 0312 e403 | | Load 0x2,0x3 0313 e23b | ; | Load 0x1,0x3b 0314 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0315 e403 | | Load 0x2,0x3 0316 e5ff | | Load 0x2,-0x1 0317 824d | M | Call 0x1,0x4d 0318 e403 | | Load 0x2,0x3 0319 e5fe | | Load 0x2,-0x2 031a 824d | M | Call 0x1,0x4d 031b e5ff | | Load 0x2,-0x1 031c 8253 | S | Call 0x1,0x53 031d a404 | | Store_Unchecked 0x2,0x4 031e e5fd | | Load 0x2,-0x3 031f e404 | | Load 0x2,0x4 0320 027e | ~ | Execute Discrete,Not_Equal 0321 6817 |h | Jump_Zero 0x339 0322 e403 | | Load 0x2,0x3 0323 0092 09ad | | Action Push_String_Extended,0x9ad ; "The token count for the current product (" 0325 4820 |H | Short_Literal 0x20 0326 4800 |H | Short_Literal 0x0 0327 480a |H | Short_Literal 0xa 0328 e404 | | Load 0x2,0x4 0329 823e | > | Call 0x1,0x3e 032a 01cc | | Execute Vector,Catenate 032b 0092 09ae | | Action Push_String_Extended,0x9ae ; ") is NOT equal to Token_Count parameter (" 032d 01cc | | Execute Vector,Catenate 032e 4820 |H | Short_Literal 0x20 032f 4800 |H | Short_Literal 0x0 0330 480a |H | Short_Literal 0xa 0331 e5fd | | Load 0x2,-0x3 0332 823e | > | Call 0x1,0x3e 0333 01cc | | Execute Vector,Catenate 0334 0092 099c | | Action Push_String_Extended,0x99c ; "); these must be equal in order to proceed." 0336 01cc | | Execute Vector,Catenate 0337 e23b | ; | Load 0x1,0x3b 0338 180d | | Execute Package,Field_Execute,Field_Number 0xd 0339 e5fb | | Load 0x2,-0x5 033a e5fc | | Load 0x2,-0x4 033b e5fd | | Load 0x2,-0x3 033c e5fe | | Load 0x2,-0x2 033d e5ff | | Load 0x2,-0x1 033e 8247 | G | Call 0x1,0x47 033f 7014 |p | Jump_Nonzero 0x354 0340 e403 | | Load 0x2,0x3 0341 0092 09af | | Action Push_String_Extended,0x9af ; "The code provided does NOT match the request being made. This might be caused by a transcription error of the code, current product, new product, or the Machine ID of this machine (" 0343 4820 |H | Short_Literal 0x20 0344 4800 |H | Short_Literal 0x0 0345 480a |H | Short_Literal 0xa 0346 821c | | Call 0x1,0x1c 0347 823f | ? | Call 0x1,0x3f 0348 01cc | | Execute Vector,Catenate 0349 0092 099f | | Action Push_String_Extended,0x99f ; "), a delay in posting the request (code only valid for one day), " 034b 01cc | | Execute Vector,Catenate 034c 0092 09a0 | | Action Push_String_Extended,0x9a0 ; "or some other combination of parameter problems. " 034e 01cc | | Execute Vector,Catenate 034f 0092 09a1 | | Action Push_String_Extended,0x9a1 ; "Contact your Rational representative for further assistance." 0351 01cc | | Execute Vector,Catenate 0352 e23b | ; | Load 0x1,0x3b 0353 180d | | Execute Package,Field_Execute,Field_Number 0xd 0354 e5fb | | Load 0x2,-0x5 0355 01db | | Execute Vector,Length 0356 680a |h | Jump_Zero 0x361 0357 e5fb | | Load 0x2,-0x5 0358 e5ff | | Load 0x2,-0x1 0359 e23d | = | Load 0x1,0x3d 035a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 035b 7005 |p | Jump_Nonzero 0x361 035c e403 | | Load 0x2,0x3 035d 0092 09a2 | | Action Push_String_Extended,0x9a2 ; "The authorization provided has been used previously for this product. It must be unique for this machine for all time." 035f e23b | ; | Load 0x1,0x3b 0360 180d | | Execute Package,Field_Execute,Field_Number 0xd 0361 e5fe | | Load 0x2,-0x2 0362 e017 | | Load 0x0,0x17 0363 180e | | Execute Package,Field_Execute,Field_Number 0xe 0364 7009 |p | Jump_Nonzero 0x36e 0365 00ea | | Load_Encached Null_String_Cache 0366 00ea | | Load_Encached Null_String_Cache 0367 821c | | Call 0x1,0x1c 0368 e5fe | | Load 0x2,-0x2 0369 e017 | | Load 0x0,0x17 036a 1815 | | Execute Package,Field_Execute,Field_Number 0x15 036b e5fe | | Load 0x2,-0x2 036c e017 | | Load 0x0,0x17 036d 180d | | Execute Package,Field_Execute,Field_Number 0xd 036e e5fd | | Load 0x2,-0x3 036f e5fe | | Load 0x2,-0x2 0370 e016 | | Load 0x0,0x16 0371 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0372 4800 |H | Short_Literal 0x0 0373 e5ff | | Load 0x2,-0x1 0374 e016 | | Load 0x0,0x16 0375 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0376 8405 | | Call 0x2,0x5 0377 e5fe | | Load 0x2,-0x2 0378 8254 | T | Call 0x1,0x54 0379 7004 |p | Jump_Nonzero 0x37e 037a 480c |H | Short_Literal 0xc 037b e5fe | | Load 0x2,-0x2 037c e016 | | Load 0x0,0x16 037d 1814 | | Execute Package,Field_Execute,Field_Number 0x14 037e e403 | | Load 0x2,0x3 037f 482e |H. | Short_Literal 0x2e 0380 e5fe | | Load 0x2,-0x2 0381 0092 09a3 | | Action Push_String_Extended,0x9a3 ; " tokens set to " 0383 01cc | | Execute Vector,Catenate 0384 4820 |H | Short_Literal 0x20 0385 4800 |H | Short_Literal 0x0 0386 480a |H | Short_Literal 0xa 0387 e5fd | | Load 0x2,-0x3 0388 823e | > | Call 0x1,0x3e 0389 01cc | | Execute Vector,Catenate 038a 01cb | | Execute Vector,Append 038b e23b | ; | Load 0x1,0x3b 038c 180f | | Execute Package,Field_Execute,Field_Number 0xf 038d e403 | | Load 0x2,0x3 038e e5ff | | Load 0x2,-0x1 038f 0092 09b0 | | Action Push_String_Extended,0x9b0 ; " has no more tokens." 0391 01cc | | Execute Vector,Catenate 0392 e23b | ; | Load 0x1,0x3b 0393 180f | | Execute Package,Field_Execute,Field_Number 0xf 0394 e23d | = | Load 0x1,0x3d 0395 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0396 e403 | | Load 0x2,0x3 0397 00ea | | Load_Encached Null_String_Cache 0398 e402 | | Load 0x2,0x2 0399 e23b | ; | Load 0x1,0x3b 039a 1819 | | Execute Package,Field_Execute,Field_Number 0x19 039b 4507 |E | Exit_Suprogram New_Top_Offset 0x7 039c TRAP_02f8: 039c e002 | | Load 0x0,0x2 039d 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 039e 010f | | Execute Exception,Equal 039f 6806 |h | Jump_Zero 0x3a6 03a0 e403 | | Load 0x2,0x3 03a1 e402 | | Load 0x2,0x2 03a2 e23b | ; | Load 0x1,0x3b 03a3 181a | | Execute Package,Field_Execute,Field_Number 0x1a 03a4 00d8 | | Load_Top At_Offset_0 03a5 0101 | | Execute Exception,Reraise 03a6 e009 | | Load 0x0,0x9 03a7 010f | | Execute Exception,Equal 03a8 6805 |h | Jump_Zero 0x3ae 03a9 e403 | | Load 0x2,0x3 03aa e402 | | Load 0x2,0x2 03ab e23b | ; | Load 0x1,0x3b 03ac 181a | | Execute Package,Field_Execute,Field_Number 0x1a 03ad 4507 |E | Exit_Suprogram New_Top_Offset 0x7 03ae e403 | | Load 0x2,0x3 03af 4800 |H | Short_Literal 0x0 03b0 4801 |H | Short_Literal 0x1 03b1 e01a | | Load 0x0,0x1a 03b2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 03b3 e402 | | Load 0x2,0x2 03b4 e23b | ; | Load 0x1,0x3b 03b5 181b | | Execute Package,Field_Execute,Field_Number 0x1b 03b6 4507 |E | Exit_Suprogram New_Top_Offset 0x7 03b7 0000 | | .XXX[0x1] 03b8 ; -------------------------------------------------------------------------------------- 03b8 ; SUBPROGRAM 03b8 ; -------------------------------------------------------------------------------------- 03b8 03c2 | | .CONST 0x03c2 ; Address of begin 03b9 040d | | .CONST 0x040d ; Address of exception handler 03ba 0003 | | .CONST 0x0003 ; Number of locals 03bb INIT_03b8: 03bb 0092 09b1 | | Action Push_String_Extended,0x9b1 ; "Allow_Token_Conversion" 03bd e236 | 6 | Load 0x1,0x36 03be 02c7 | | Declare_Variable Any 03bf e002 | | Load 0x0,0x2 03c0 180e | | Execute Package,Field_Execute,Field_Number 0xe 03c1 a403 | | Store_Unchecked 0x2,0x3 03c2 BODY_03b8: 03c2 00d8 | | Load_Top At_Offset_0 03c3 e5f9 | | Load 0x2,-0x7 03c4 e5fa | | Load 0x2,-0x6 03c5 e5fb | | Load 0x2,-0x5 03c6 e5fc | | Load 0x2,-0x4 03c7 e23b | ; | Load 0x1,0x3b 03c8 181d | | Execute Package,Field_Execute,Field_Number 0x1d 03c9 e5fd | | Load 0x2,-0x3 03ca e23b | ; | Load 0x1,0x3b 03cb 181c | | Execute Package,Field_Execute,Field_Number 0x1c 03cc e5fe | | Load 0x2,-0x2 03cd e5ff | | Load 0x2,-0x1 03ce e402 | | Load 0x2,0x2 03cf e23b | ; | Load 0x1,0x3b 03d0 1817 | | Execute Package,Field_Execute,Field_Number 0x17 03d1 c403 | | Store 0x2,0x3 03d2 00d8 | | Load_Top At_Offset_0 03d3 e23b | ; | Load 0x1,0x3b 03d4 1811 | | Execute Package,Field_Execute,Field_Number 0x11 03d5 00d8 | | Load_Top At_Offset_0 03d6 e5fa | | Load 0x2,-0x6 03d7 824f | O | Call 0x1,0x4f 03d8 00d8 | | Load_Top At_Offset_0 03d9 e5ff | | Load 0x2,-0x1 03da 824d | M | Call 0x1,0x4d 03db 00d8 | | Load_Top At_Offset_0 03dc e5fe | | Load 0x2,-0x2 03dd 824d | M | Call 0x1,0x4d 03de e23d | = | Load 0x1,0x3d 03df 1813 | | Execute Package,Field_Execute,Field_Number 0x13 03e0 7005 |p | Jump_Nonzero 0x3e6 03e1 00d8 | | Load_Top At_Offset_0 03e2 0092 09b2 | | Action Push_String_Extended,0x9b2 ; "Must be run from a Rational site." 03e4 e23b | ; | Load 0x1,0x3b 03e5 180d | | Execute Package,Field_Execute,Field_Number 0xd 03e6 e5fc | | Load 0x2,-0x4 03e7 821c | | Call 0x1,0x1c 03e8 027f | | Execute Discrete,Equal 03e9 6805 |h | Jump_Zero 0x3ef 03ea 00d8 | | Load_Top At_Offset_0 03eb 0092 09a5 | | Action Push_String_Extended,0x9a5 ; "Remote_Machine_ID specified is the Machine_ID for this machine." 03ed e23b | ; | Load 0x1,0x3b 03ee 1810 | | Execute Package,Field_Execute,Field_Number 0x10 03ef 00d8 | | Load_Top At_Offset_0 03f0 e5fa | | Load 0x2,-0x6 03f1 e5fb | | Load 0x2,-0x5 03f2 e5ff | | Load 0x2,-0x1 03f3 8251 | Q | Call 0x1,0x51 03f4 e5fa | | Load 0x2,-0x6 03f5 e241 | A | Load 0x1,0x41 03f6 01df | | Execute Vector,Equal 03f7 6808 |h | Jump_Zero 0x400 03f8 e242 | B | Load 0x1,0x42 03f9 e5fb | | Load 0x2,-0x5 03fa e5fc | | Load 0x2,-0x4 03fb e5fd | | Load 0x2,-0x3 03fc e5fe | | Load 0x2,-0x2 03fd e5ff | | Load 0x2,-0x1 03fe 824b | K | Call 0x1,0x4b 03ff 7807 |x | Jump 0x407 0400 e5fa | | Load 0x2,-0x6 0401 e5fb | | Load 0x2,-0x5 0402 e5fc | | Load 0x2,-0x4 0403 e5fd | | Load 0x2,-0x3 0404 e5fe | | Load 0x2,-0x2 0405 e5ff | | Load 0x2,-0x1 0406 824b | K | Call 0x1,0x4b 0407 00d8 | | Load_Top At_Offset_0 0408 00ea | | Load_Encached Null_String_Cache 0409 e402 | | Load 0x2,0x2 040a e23b | ; | Load 0x1,0x3b 040b 1819 | | Execute Package,Field_Execute,Field_Number 0x19 040c 4508 |E | Exit_Suprogram New_Top_Offset 0x8 040d TRAP_03b8: 040d e002 | | Load 0x0,0x2 040e 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 040f 010f | | Execute Exception,Equal 0410 6806 |h | Jump_Zero 0x417 0411 e403 | | Load 0x2,0x3 0412 e402 | | Load 0x2,0x2 0413 e23b | ; | Load 0x1,0x3b 0414 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0415 00d8 | | Load_Top At_Offset_0 0416 0101 | | Execute Exception,Reraise 0417 e009 | | Load 0x0,0x9 0418 010f | | Execute Exception,Equal 0419 6805 |h | Jump_Zero 0x41f 041a e403 | | Load 0x2,0x3 041b e402 | | Load 0x2,0x2 041c e23b | ; | Load 0x1,0x3b 041d 181a | | Execute Package,Field_Execute,Field_Number 0x1a 041e 4508 |E | Exit_Suprogram New_Top_Offset 0x8 041f e403 | | Load 0x2,0x3 0420 4800 |H | Short_Literal 0x0 0421 4801 |H | Short_Literal 0x1 0422 e01a | | Load 0x0,0x1a 0423 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0424 e402 | | Load 0x2,0x2 0425 e23b | ; | Load 0x1,0x3b 0426 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0427 4508 |E | Exit_Suprogram New_Top_Offset 0x8 0428 ; -------------------------------------------------------------------------------------- 0428 ; SUBPROGRAM 0428 ; -------------------------------------------------------------------------------------- 0428 0432 | 2 | .CONST 0x0432 ; Address of begin 0429 0487 | | .CONST 0x0487 ; Address of exception handler 042a 0003 | | .CONST 0x0003 ; Number of locals 042b INIT_0428: 042b 0092 09b3 | | Action Push_String_Extended,0x9b3 ; "Assign_Tokens" 042d e236 | 6 | Load 0x1,0x36 042e 02c7 | | Declare_Variable Any 042f e002 | | Load 0x0,0x2 0430 180e | | Execute Package,Field_Execute,Field_Number 0xe 0431 a403 | | Store_Unchecked 0x2,0x3 0432 BODY_0428: 0432 00d8 | | Load_Top At_Offset_0 0433 e5f8 | | Load 0x2,-0x8 0434 e5f9 | | Load 0x2,-0x7 0435 e5fa | | Load 0x2,-0x6 0436 e5fb | | Load 0x2,-0x5 0437 e5fc | | Load 0x2,-0x4 0438 e23b | ; | Load 0x1,0x3b 0439 181d | | Execute Package,Field_Execute,Field_Number 0x1d 043a e5fd | | Load 0x2,-0x3 043b e23b | ; | Load 0x1,0x3b 043c 181c | | Execute Package,Field_Execute,Field_Number 0x1c 043d e5fe | | Load 0x2,-0x2 043e e23b | ; | Load 0x1,0x3b 043f 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0440 e5ff | | Load 0x2,-0x1 0441 e402 | | Load 0x2,0x2 0442 e23b | ; | Load 0x1,0x3b 0443 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0444 c403 | | Store 0x2,0x3 0445 00d8 | | Load_Top At_Offset_0 0446 e23b | ; | Load 0x1,0x3b 0447 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0448 00d8 | | Load_Top At_Offset_0 0449 e5fb | | Load 0x2,-0x5 044a 824e | N | Call 0x1,0x4e 044b 00d8 | | Load_Top At_Offset_0 044c e5f9 | | Load 0x2,-0x7 044d 824f | O | Call 0x1,0x4f 044e 00d8 | | Load_Top At_Offset_0 044f e5ff | | Load 0x2,-0x1 0450 824d | M | Call 0x1,0x4d 0451 e23d | = | Load 0x1,0x3d 0452 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0453 7005 |p | Jump_Nonzero 0x459 0454 00d8 | | Load_Top At_Offset_0 0455 0092 09b2 | | Action Push_String_Extended,0x9b2 ; "Must be run from a Rational site." 0457 e23b | ; | Load 0x1,0x3b 0458 180d | | Execute Package,Field_Execute,Field_Number 0xd 0459 e5fc | | Load 0x2,-0x4 045a 821c | | Call 0x1,0x1c 045b 027f | | Execute Discrete,Equal 045c 6805 |h | Jump_Zero 0x462 045d 00d8 | | Load_Top At_Offset_0 045e 0092 09a5 | | Action Push_String_Extended,0x9a5 ; "Remote_Machine_ID specified is the Machine_ID for this machine." 0460 e23b | ; | Load 0x1,0x3b 0461 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0462 00d8 | | Load_Top At_Offset_0 0463 e5fd | | Load 0x2,-0x3 0464 e5fe | | Load 0x2,-0x2 0465 e5ff | | Load 0x2,-0x1 0466 8250 | P | Call 0x1,0x50 0467 00d8 | | Load_Top At_Offset_0 0468 e5f9 | | Load 0x2,-0x7 0469 e5fa | | Load 0x2,-0x6 046a e5ff | | Load 0x2,-0x1 046b 8251 | Q | Call 0x1,0x51 046c e5f9 | | Load 0x2,-0x7 046d e241 | A | Load 0x1,0x41 046e 01df | | Execute Vector,Equal 046f 6809 |h | Jump_Zero 0x479 0470 e242 | B | Load 0x1,0x42 0471 e5fa | | Load 0x2,-0x6 0472 e5fb | | Load 0x2,-0x5 0473 e5fc | | Load 0x2,-0x4 0474 e5fd | | Load 0x2,-0x3 0475 e5fe | | Load 0x2,-0x2 0476 e5ff | | Load 0x2,-0x1 0477 824a | J | Call 0x1,0x4a 0478 7808 |x | Jump 0x481 0479 e5f9 | | Load 0x2,-0x7 047a e5fa | | Load 0x2,-0x6 047b e5fb | | Load 0x2,-0x5 047c e5fc | | Load 0x2,-0x4 047d e5fd | | Load 0x2,-0x3 047e e5fe | | Load 0x2,-0x2 047f e5ff | | Load 0x2,-0x1 0480 824a | J | Call 0x1,0x4a 0481 00d8 | | Load_Top At_Offset_0 0482 00ea | | Load_Encached Null_String_Cache 0483 e402 | | Load 0x2,0x2 0484 e23b | ; | Load 0x1,0x3b 0485 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0486 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0487 TRAP_0428: 0487 e002 | | Load 0x0,0x2 0488 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0489 010f | | Execute Exception,Equal 048a 6806 |h | Jump_Zero 0x491 048b e403 | | Load 0x2,0x3 048c e402 | | Load 0x2,0x2 048d e23b | ; | Load 0x1,0x3b 048e 181a | | Execute Package,Field_Execute,Field_Number 0x1a 048f 00d8 | | Load_Top At_Offset_0 0490 0101 | | Execute Exception,Reraise 0491 e009 | | Load 0x0,0x9 0492 010f | | Execute Exception,Equal 0493 6805 |h | Jump_Zero 0x499 0494 e403 | | Load 0x2,0x3 0495 e402 | | Load 0x2,0x2 0496 e23b | ; | Load 0x1,0x3b 0497 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0498 4509 |E | Exit_Suprogram New_Top_Offset 0x9 0499 e403 | | Load 0x2,0x3 049a 4800 |H | Short_Literal 0x0 049b 4801 |H | Short_Literal 0x1 049c e01a | | Load 0x0,0x1a 049d 1815 | | Execute Package,Field_Execute,Field_Number 0x15 049e e402 | | Load 0x2,0x2 049f e23b | ; | Load 0x1,0x3b 04a0 181b | | Execute Package,Field_Execute,Field_Number 0x1b 04a1 4509 |E | Exit_Suprogram New_Top_Offset 0x9 04a2 0000 0000 | | .BLANK 0000[0x6] 04a8 ; -------------------------------------------------------------------------------------- 04a8 ; SUBPROGRAM 04a8 ; -------------------------------------------------------------------------------------- 04a8 04be | | .CONST 0x04be ; Address of begin 04a9 04ee | | .CONST 0x04ee ; Address of exception handler 04aa 0002 | | .CONST 0x0002 ; Number of locals 04ab INIT_04a8: 04ab e236 | 6 | Load 0x1,0x36 04ac 02c7 | | Declare_Variable Any 04ad e002 | | Load 0x0,0x2 04ae 180e | | Execute Package,Field_Execute,Field_Number 0xe 04af e002 | | Load 0x0,0x2 04b0 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 04b1 e002 | | Load 0x0,0x2 04b2 180e | | Execute Package,Field_Execute,Field_Number 0xe 04b3 e002 | | Load 0x0,0x2 04b4 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 04b5 484d |HM | Short_Literal 0x4d 04b6 e002 | | Load 0x0,0x2 04b7 1b45 | E | Execute Package,Field_Read,Field_Number 0x45 04b8 e002 | | Load 0x0,0x2 04b9 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 04ba 4800 |H | Short_Literal 0x0 04bb e002 | | Load 0x0,0x2 04bc 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 04bd a402 | | Store_Unchecked 0x2,0x2 04be BODY_04a8: 04be 00d8 | | Load_Top At_Offset_0 04bf e23b | ; | Load 0x1,0x3b 04c0 1811 | | Execute Package,Field_Execute,Field_Number 0x11 04c1 00d8 | | Load_Top At_Offset_0 04c2 e5fb | | Load 0x2,-0x5 04c3 824e | N | Call 0x1,0x4e 04c4 00d8 | | Load_Top At_Offset_0 04c5 e5f9 | | Load 0x2,-0x7 04c6 824f | O | Call 0x1,0x4f 04c7 00d8 | | Load_Top At_Offset_0 04c8 e5ff | | Load 0x2,-0x1 04c9 824d | M | Call 0x1,0x4d 04ca e23d | = | Load 0x1,0x3d 04cb 1813 | | Execute Package,Field_Execute,Field_Number 0x13 04cc 7005 |p | Jump_Nonzero 0x4d2 04cd 00d8 | | Load_Top At_Offset_0 04ce 0092 09b2 | | Action Push_String_Extended,0x9b2 ; "Must be run from a Rational site." 04d0 e23b | ; | Load 0x1,0x3b 04d1 180d | | Execute Package,Field_Execute,Field_Number 0xd 04d2 e5fc | | Load 0x2,-0x4 04d3 821c | | Call 0x1,0x1c 04d4 027f | | Execute Discrete,Equal 04d5 6805 |h | Jump_Zero 0x4db 04d6 00d8 | | Load_Top At_Offset_0 04d7 0092 09a5 | | Action Push_String_Extended,0x9a5 ; "Remote_Machine_ID specified is the Machine_ID for this machine." 04d9 e23b | ; | Load 0x1,0x3b 04da 1810 | | Execute Package,Field_Execute,Field_Number 0x10 04db 00d8 | | Load_Top At_Offset_0 04dc e5fd | | Load 0x2,-0x3 04dd e5fe | | Load 0x2,-0x2 04de e5ff | | Load 0x2,-0x1 04df 8250 | P | Call 0x1,0x50 04e0 00d8 | | Load_Top At_Offset_0 04e1 e5f9 | | Load 0x2,-0x7 04e2 e5fa | | Load 0x2,-0x6 04e3 e5ff | | Load 0x2,-0x1 04e4 8251 | Q | Call 0x1,0x51 04e5 e5f9 | | Load 0x2,-0x7 04e6 e5fa | | Load 0x2,-0x6 04e7 e5fb | | Load 0x2,-0x5 04e8 e5fc | | Load 0x2,-0x4 04e9 e5fd | | Load 0x2,-0x3 04ea e5fe | | Load 0x2,-0x2 04eb e5ff | | Load 0x2,-0x1 04ec 8234 | 4 | Call 0x1,0x34 04ed 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 04ee TRAP_04a8: 04ee e009 | | Load 0x0,0x9 04ef 010f | | Execute Exception,Equal 04f0 6803 |h | Jump_Zero 0x4f4 04f1 e002 | | Load 0x0,0x2 04f2 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 04f3 0257 | W | Execute Discrete,Raise 04f4 0100 | | Execute Exception,Raise 04f5 0000 0000 | | .XXX[0x3] 04f7 0000 | | 04f8 ; -------------------------------------------------------------------------------------- 04f8 ; SUBPROGRAM 04f8 ; -------------------------------------------------------------------------------------- 04f8 0502 | | .CONST 0x0502 ; Address of begin 04f9 0532 | 2 | .CONST 0x0532 ; Address of exception handler 04fa 0003 | | .CONST 0x0003 ; Number of locals 04fb INIT_04f8: 04fb 0092 09b4 | | Action Push_String_Extended,0x9b4 ; "Assign_Site" 04fd e236 | 6 | Load 0x1,0x36 04fe 02c7 | | Declare_Variable Any 04ff e002 | | Load 0x0,0x2 0500 180e | | Execute Package,Field_Execute,Field_Number 0xe 0501 a403 | | Store_Unchecked 0x2,0x3 0502 BODY_04f8: 0502 00d8 | | Load_Top At_Offset_0 0503 e5fc | | Load 0x2,-0x4 0504 e5fd | | Load 0x2,-0x3 0505 e5fe | | Load 0x2,-0x2 0506 e23b | ; | Load 0x1,0x3b 0507 181d | | Execute Package,Field_Execute,Field_Number 0x1d 0508 e5ff | | Load 0x2,-0x1 0509 e402 | | Load 0x2,0x2 050a e23b | ; | Load 0x1,0x3b 050b 1814 | | Execute Package,Field_Execute,Field_Number 0x14 050c c403 | | Store 0x2,0x3 050d 00d8 | | Load_Top At_Offset_0 050e e5ff | | Load 0x2,-0x1 050f 824e | N | Call 0x1,0x4e 0510 0092 09b5 | | Action Push_String_Extended,0x9b5 ; "Run the following on the remote machine:" 0512 e019 | | Load 0x0,0x19 0513 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0514 0092 09a7 | | Action Push_String_Extended,0x9a7 ; "Set_Site" 0516 e23c | < | Load 0x1,0x3c 0517 180d | | Execute Package,Field_Execute,Field_Number 0xd 0518 e5ff | | Load 0x2,-0x1 0519 e23b | ; | Load 0x1,0x3b 051a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 051b 0092 09b6 | | Action Push_String_Extended,0x9b6 ; "Site" 051d e23c | < | Load 0x1,0x3c 051e 180e | | Execute Package,Field_Execute,Field_Number 0xe 051f e241 | A | Load 0x1,0x41 0520 e5fd | | Load 0x2,-0x3 0521 e5fe | | Load 0x2,-0x2 0522 e5ff | | Load 0x2,-0x1 0523 8244 | D | Call 0x1,0x44 0524 e23b | ; | Load 0x1,0x3b 0525 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0526 0092 09b7 | | Action Push_String_Extended,0x9b7 ; "Code" 0528 e23c | < | Load 0x1,0x3c 0529 180e | | Execute Package,Field_Execute,Field_Number 0xe 052a e23c | < | Load 0x1,0x3c 052b 180f | | Execute Package,Field_Execute,Field_Number 0xf 052c 00d8 | | Load_Top At_Offset_0 052d 00ea | | Load_Encached Null_String_Cache 052e e402 | | Load 0x2,0x2 052f e23b | ; | Load 0x1,0x3b 0530 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0531 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0532 TRAP_04f8: 0532 e002 | | Load 0x0,0x2 0533 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0534 010f | | Execute Exception,Equal 0535 6806 |h | Jump_Zero 0x53c 0536 e403 | | Load 0x2,0x3 0537 e402 | | Load 0x2,0x2 0538 e23b | ; | Load 0x1,0x3b 0539 181a | | Execute Package,Field_Execute,Field_Number 0x1a 053a 00d8 | | Load_Top At_Offset_0 053b 0101 | | Execute Exception,Reraise 053c e009 | | Load 0x0,0x9 053d 010f | | Execute Exception,Equal 053e 6805 |h | Jump_Zero 0x544 053f e403 | | Load 0x2,0x3 0540 e402 | | Load 0x2,0x2 0541 e23b | ; | Load 0x1,0x3b 0542 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0543 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0544 e403 | | Load 0x2,0x3 0545 4800 |H | Short_Literal 0x0 0546 4801 |H | Short_Literal 0x1 0547 e01a | | Load 0x0,0x1a 0548 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0549 e402 | | Load 0x2,0x2 054a e23b | ; | Load 0x1,0x3b 054b 181b | | Execute Package,Field_Execute,Field_Number 0x1b 054c 4505 |E | Exit_Suprogram New_Top_Offset 0x5 054d 0000 0000 | | .XXX[0x3] 054f 0000 | | 0550 ; -------------------------------------------------------------------------------------- 0550 ; SUBPROGRAM 0550 ; -------------------------------------------------------------------------------------- 0550 0566 | f | .CONST 0x0566 ; Address of begin 0551 056f | o | .CONST 0x056f ; Address of exception handler 0552 0002 | | .CONST 0x0002 ; Number of locals 0553 INIT_0550: 0553 e236 | 6 | Load 0x1,0x36 0554 02c7 | | Declare_Variable Any 0555 e002 | | Load 0x0,0x2 0556 180e | | Execute Package,Field_Execute,Field_Number 0xe 0557 e002 | | Load 0x0,0x2 0558 183d | = | Execute Package,Field_Execute,Field_Number 0x3d 0559 e002 | | Load 0x0,0x2 055a 180e | | Execute Package,Field_Execute,Field_Number 0xe 055b e002 | | Load 0x0,0x2 055c 1839 | 9 | Execute Package,Field_Execute,Field_Number 0x39 055d 484d |HM | Short_Literal 0x4d 055e e002 | | Load 0x0,0x2 055f 1b45 | E | Execute Package,Field_Read,Field_Number 0x45 0560 e002 | | Load 0x0,0x2 0561 1b1c | | Execute Package,Field_Read,Field_Number 0x1c 0562 4800 |H | Short_Literal 0x0 0563 e002 | | Load 0x0,0x2 0564 1846 | F | Execute Package,Field_Execute,Field_Number 0x46 0565 a402 | | Store_Unchecked 0x2,0x2 0566 BODY_0550: 0566 00d8 | | Load_Top At_Offset_0 0567 e5ff | | Load 0x2,-0x1 0568 824e | N | Call 0x1,0x4e 0569 e241 | A | Load 0x1,0x41 056a e5fd | | Load 0x2,-0x3 056b e5fe | | Load 0x2,-0x2 056c e5ff | | Load 0x2,-0x1 056d 8244 | D | Call 0x1,0x44 056e 4403 |D | Exit_Subprogram With_Value,New_Top_Offset 0x3 056f TRAP_0550: 056f e009 | | Load 0x0,0x9 0570 010f | | Execute Exception,Equal 0571 6803 |h | Jump_Zero 0x575 0572 e002 | | Load 0x0,0x2 0573 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 0574 0257 | W | Execute Discrete,Raise 0575 0100 | | Execute Exception,Raise 0576 0000 0000 | | .XXX[0x2] 0578 ; -------------------------------------------------------------------------------------- 0578 ; SUBPROGRAM 0578 ; -------------------------------------------------------------------------------------- 0578 0585 | | .CONST 0x0585 ; Address of begin 0579 05ca | | .CONST 0x05ca ; Address of exception handler 057a 0004 | | .CONST 0x0004 ; Number of locals 057b INIT_0578: 057b 0092 09b8 | | Action Push_String_Extended,0x9b8 ; "Training" 057d 0092 09b9 | | Action Push_String_Extended,0x9b9 ; "Training_Authorization" 057f e002 | | Load 0x0,0x2 0580 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0581 02c7 | | Declare_Variable Any 0582 e002 | | Load 0x0,0x2 0583 180e | | Execute Package,Field_Execute,Field_Number 0xe 0584 a404 | | Store_Unchecked 0x2,0x4 0585 BODY_0578: 0585 00d8 | | Load_Top At_Offset_0 0586 e5fc | | Load 0x2,-0x4 0587 482b |H+ | Short_Literal 0x2b 0588 e5fd | | Load 0x2,-0x3 0589 00e1 | | Load_Encached Boolean_Cache 058a 011c | | Execute Any,Convert_Unchecked 058b 1c01 | | Execute_Immediate Run_Utility,0x1 058c 01ca | | Execute Vector,Prepend 058d e5fe | | Load 0x2,-0x2 058e e5ff | | Load 0x2,-0x1 058f e403 | | Load 0x2,0x3 0590 e23b | ; | Load 0x1,0x3b 0591 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0592 c404 | | Store 0x2,0x4 0593 e5fd | | Load 0x2,-0x3 0594 700f |p | Jump_Nonzero 0x5a4 0595 4801 |H | Short_Literal 0x1 0596 e017 | | Load 0x0,0x17 0597 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0598 4801 |H | Short_Literal 0x1 0599 e016 | | Load 0x0,0x16 059a 181a | | Execute Package,Field_Execute,Field_Number 0x1a 059b 4803 |H | Short_Literal 0x3 059c 0092 09ba | | Action Push_String_Extended,0x9ba ; "Product and Token authorization checking has been reinstated." 059e 0092 09bb | | Action Push_String_Extended,0x9bb ; "Authorization_Checking_Reinstated" 05a0 e403 | | Load 0x2,0x3 05a1 e23b | ; | Load 0x1,0x3b 05a2 181f | | Execute Package,Field_Execute,Field_Number 0x1f 05a3 7820 |x | Jump 0x5c4 05a4 e5ff | | Load 0x2,-0x1 05a5 e242 | B | Load 0x1,0x42 05a6 e5fe | | Load 0x2,-0x2 05a7 e01b | | Load 0x0,0x1b 05a8 180e | | Execute Package,Field_Execute,Field_Number 0xe 05a9 e402 | | Load 0x2,0x2 05aa 8243 | C | Call 0x1,0x43 05ab 01df | | Execute Vector,Equal 05ac 680f |h | Jump_Zero 0x5bc 05ad 4800 |H | Short_Literal 0x0 05ae e017 | | Load 0x0,0x17 05af 1816 | | Execute Package,Field_Execute,Field_Number 0x16 05b0 4800 |H | Short_Literal 0x0 05b1 e016 | | Load 0x0,0x16 05b2 181a | | Execute Package,Field_Execute,Field_Number 0x1a 05b3 4803 |H | Short_Literal 0x3 05b4 0092 09bc | | Action Push_String_Extended,0x9bc ; "Product and Token authorization checking has been suspended to allow training to proceed. Checking will be re-instated the next time the machine boots or by exectuting this procedure with Enable => False." 05b6 0092 09bd | | Action Push_String_Extended,0x9bd ; "Authorization_Checking_Suspended" 05b8 e403 | | Load 0x2,0x3 05b9 e23b | ; | Load 0x1,0x3b 05ba 181f | | Execute Package,Field_Execute,Field_Number 0x1f 05bb 7808 |x | Jump 0x5c4 05bc 4807 |H | Short_Literal 0x7 05bd 0092 09be | | Action Push_String_Extended,0x9be ; "The code provided is NOT correct for this purpose, on this machine, and for today's date. Please check for transcription errors or contact your Rational representative." 05bf 0092 09bf | | Action Push_String_Extended,0x9bf ; "Authorization_Code_Error" 05c1 e403 | | Load 0x2,0x3 05c2 e23b | ; | Load 0x1,0x3b 05c3 181f | | Execute Package,Field_Execute,Field_Number 0x1f 05c4 00d8 | | Load_Top At_Offset_0 05c5 00ea | | Load_Encached Null_String_Cache 05c6 e403 | | Load 0x2,0x3 05c7 e23b | ; | Load 0x1,0x3b 05c8 1819 | | Execute Package,Field_Execute,Field_Number 0x19 05c9 4505 |E | Exit_Suprogram New_Top_Offset 0x5 05ca TRAP_0578: 05ca e002 | | Load 0x0,0x2 05cb 1b47 | G | Execute Package,Field_Read,Field_Number 0x47 05cc 010f | | Execute Exception,Equal 05cd 6806 |h | Jump_Zero 0x5d4 05ce e404 | | Load 0x2,0x4 05cf e403 | | Load 0x2,0x3 05d0 e23b | ; | Load 0x1,0x3b 05d1 181a | | Execute Package,Field_Execute,Field_Number 0x1a 05d2 00d8 | | Load_Top At_Offset_0 05d3 0101 | | Execute Exception,Reraise 05d4 e009 | | Load 0x0,0x9 05d5 010f | | Execute Exception,Equal 05d6 6805 |h | Jump_Zero 0x5dc 05d7 e404 | | Load 0x2,0x4 05d8 e403 | | Load 0x2,0x3 05d9 e23b | ; | Load 0x1,0x3b 05da 181a | | Execute Package,Field_Execute,Field_Number 0x1a 05db 4505 |E | Exit_Suprogram New_Top_Offset 0x5 05dc e404 | | Load 0x2,0x4 05dd 4800 |H | Short_Literal 0x0 05de 4801 |H | Short_Literal 0x1 05df e01a | | Load 0x0,0x1a 05e0 1815 | | Execute Package,Field_Execute,Field_Number 0x15 05e1 e403 | | Load 0x2,0x3 05e2 e23b | ; | Load 0x1,0x3b 05e3 181b | | Execute Package,Field_Execute,Field_Number 0x1b 05e4 4505 |E | Exit_Suprogram New_Top_Offset 0x5 05e5 0000 0000 | | .XXX[0x3] 05e7 0000 | | 05e8 ; -------------------------------------------------------------------------------------- 05e8 ; SUBPROGRAM 05e8 ; -------------------------------------------------------------------------------------- 05e8 05eb | | .CONST 0x05eb ; Address of begin 05e9 0004 | | .CONST 0x0004 ; Address of exception handler 05ea 0001 | | .CONST 0x0001 ; Number of locals 05eb BODY_05e8: 05eb INIT_05e8: 05eb e011 | | Load 0x0,0x11 05ec 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05ed e23d | = | Load 0x1,0x3d 05ee 180f | | Execute Package,Field_Execute,Field_Number 0xf 05ef 4501 |E | Exit_Suprogram New_Top_Offset 0x1 05f0 ; -------------------------------------------------------------------------------------- 05f0 ; SUBPROGRAM 05f0 ; -------------------------------------------------------------------------------------- 05f0 05f3 | | .CONST 0x05f3 ; Address of begin 05f1 0004 | | .CONST 0x0004 ; Address of exception handler 05f2 0001 | | .CONST 0x0001 ; Number of locals 05f3 BODY_05f0: 05f3 INIT_05f0: 05f3 e011 | | Load 0x0,0x11 05f4 1812 | | Execute Package,Field_Execute,Field_Number 0x12 05f5 e23d | = | Load 0x1,0x3d 05f6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 05f7 4501 |E | Exit_Suprogram New_Top_Offset 0x1 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 e007 | | Load 0x0,0x7 05fc 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 05fd e23d | = | Load 0x1,0x3d 05fe 180f | | Execute Package,Field_Execute,Field_Number 0xf 05ff 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0600 ; -------------------------------------------------------------------------------------- 0600 ; SUBPROGRAM 0600 ; -------------------------------------------------------------------------------------- 0600 0603 | | .CONST 0x0603 ; Address of begin 0601 0004 | | .CONST 0x0004 ; Address of exception handler 0602 0001 | | .CONST 0x0001 ; Number of locals 0603 BODY_0600: 0603 INIT_0600: 0603 e007 | | Load 0x0,0x7 0604 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 0605 e23d | = | Load 0x1,0x3d 0606 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0607 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0608 ; -------------------------------------------------------------------------------------- 0608 ; SUBPROGRAM 0608 ; -------------------------------------------------------------------------------------- 0608 060b | | .CONST 0x060b ; Address of begin 0609 0004 | | .CONST 0x0004 ; Address of exception handler 060a 0001 | | .CONST 0x0001 ; Number of locals 060b BODY_0608: 060b INIT_0608: 060b e23d | = | Load 0x1,0x3d 060c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 060d 4501 |E | Exit_Suprogram New_Top_Offset 0x1 060e 0000 0000 | | .XXX[0x2] 0610 ; -------------------------------------------------------------------------------------- 0610 ; SUBPROGRAM 0610 ; -------------------------------------------------------------------------------------- 0610 0613 | | .CONST 0x0613 ; Address of begin 0611 0004 | | .CONST 0x0004 ; Address of exception handler 0612 0001 | | .CONST 0x0001 ; Number of locals 0613 BODY_0610: 0613 INIT_0610: 0613 e5f9 | | Load 0x2,-0x7 0614 e5fa | | Load 0x2,-0x6 0615 e5fc | | Load 0x2,-0x4 0616 e5ff | | Load 0x2,-0x1 0617 0092 09c0 | | Action Push_String_Extended,0x9c0 ; "/" 0619 01cc | | Execute Vector,Catenate 061a e5fb | | Load 0x2,-0x5 061b 01cc | | Execute Vector,Catenate 061c 0092 09c1 | | Action Push_String_Extended,0x9c1 ; "=" 061e 01cc | | Execute Vector,Catenate 061f 4820 |H | Short_Literal 0x20 0620 4800 |H | Short_Literal 0x0 0621 480a |H | Short_Literal 0xa 0622 e5fe | | Load 0x2,-0x2 0623 823e | > | Call 0x1,0x3e 0624 01cc | | Execute Vector,Catenate 0625 0092 09c2 | | Action Push_String_Extended,0x9c2 ; "|" 0627 01cc | | Execute Vector,Catenate 0628 4820 |H | Short_Literal 0x20 0629 4800 |H | Short_Literal 0x0 062a 480a |H | Short_Literal 0xa 062b e5fd | | Load 0x2,-0x3 062c 823e | > | Call 0x1,0x3e 062d 01cc | | Execute Vector,Catenate 062e 8243 | C | Call 0x1,0x43 062f 4407 |D | Exit_Subprogram With_Value,New_Top_Offset 0x7 0630 ; -------------------------------------------------------------------------------------- 0630 ; SUBPROGRAM 0630 ; -------------------------------------------------------------------------------------- 0630 0633 | 3 | .CONST 0x0633 ; Address of begin 0631 0004 | | .CONST 0x0004 ; Address of exception handler 0632 0001 | | .CONST 0x0001 ; Number of locals 0633 BODY_0630: 0633 INIT_0630: 0633 e5fd | | Load 0x2,-0x3 0634 01db | | Execute Vector,Length 0635 6808 |h | Jump_Zero 0x63e 0636 e241 | A | Load 0x1,0x41 0637 e5fe | | Load 0x2,-0x2 0638 e5ff | | Load 0x2,-0x1 0639 e5fd | | Load 0x2,-0x3 063a 01cc | | Execute Vector,Catenate 063b e017 | | Load 0x0,0x17 063c 1815 | | Execute Package,Field_Execute,Field_Number 0x15 063d 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 063e e5fc | | Load 0x2,-0x4 063f 01db | | Execute Vector,Length 0640 7006 |p | Jump_Nonzero 0x647 0641 e242 | B | Load 0x1,0x42 0642 e5fe | | Load 0x2,-0x2 0643 e5ff | | Load 0x2,-0x1 0644 e017 | | Load 0x0,0x17 0645 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0646 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 0647 e5fc | | Load 0x2,-0x4 0648 e5fe | | Load 0x2,-0x2 0649 e5ff | | Load 0x2,-0x1 064a e017 | | Load 0x0,0x17 064b 1815 | | Execute Package,Field_Execute,Field_Number 0x15 064c 4404 |D | Exit_Subprogram With_Value,New_Top_Offset 0x4 064d 0000 0000 | | .XXX[0x3] 064f 0000 | | 0650 ; -------------------------------------------------------------------------------------- 0650 ; SUBPROGRAM 0650 ; -------------------------------------------------------------------------------------- 0650 0653 | S | .CONST 0x0653 ; Address of begin 0651 0004 | | .CONST 0x0004 ; Address of exception handler 0652 0001 | | .CONST 0x0001 ; Number of locals 0653 BODY_0650: 0653 INIT_0650: 0653 e5fa | | Load 0x2,-0x6 0654 e5fb | | Load 0x2,-0x5 0655 e5fc | | Load 0x2,-0x4 0656 482d |H- | Short_Literal 0x2d 0657 e5ff | | Load 0x2,-0x1 0658 01cb | | Execute Vector,Append 0659 e5fe | | Load 0x2,-0x2 065a 01cc | | Execute Vector,Catenate 065b 4820 |H | Short_Literal 0x20 065c 4800 |H | Short_Literal 0x0 065d 480a |H | Short_Literal 0xa 065e e5fd | | Load 0x2,-0x3 065f 823e | > | Call 0x1,0x3e 0660 01cc | | Execute Vector,Catenate 0661 8243 | C | Call 0x1,0x43 0662 4406 |D | Exit_Subprogram With_Value,New_Top_Offset 0x6 0663 0000 0000 | | .BLANK 0000[0x5] 0668 ; -------------------------------------------------------------------------------------- 0668 ; SUBPROGRAM 0668 ; -------------------------------------------------------------------------------------- 0668 066b | k | .CONST 0x066b ; Address of begin 0669 0004 | | .CONST 0x0004 ; Address of exception handler 066a 0001 | | .CONST 0x0001 ; Number of locals 066b BODY_0668: 066b INIT_0668: 066b 4801 |H | Short_Literal 0x1 066c e5fc | | Load 0x2,-0x4 066d e242 | B | Load 0x1,0x42 066e e5fb | | Load 0x2,-0x5 066f 821b | | Call 0x1,0x1b 0670 821c | | Call 0x1,0x1c 0671 e5fd | | Load 0x2,-0x3 0672 e5fe | | Load 0x2,-0x2 0673 e5ff | | Load 0x2,-0x1 0674 8234 | 4 | Call 0x1,0x34 0675 e006 | | Load 0x0,0x6 0676 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0677 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0678 ; -------------------------------------------------------------------------------------- 0678 ; SUBPROGRAM 0678 ; -------------------------------------------------------------------------------------- 0678 067b | { | .CONST 0x067b ; Address of begin 0679 0004 | | .CONST 0x0004 ; Address of exception handler 067a 0001 | | .CONST 0x0001 ; Number of locals 067b BODY_0678: 067b INIT_0678: 067b 4801 |H | Short_Literal 0x1 067c e5fc | | Load 0x2,-0x4 067d e242 | B | Load 0x1,0x42 067e e5fb | | Load 0x2,-0x5 067f 821c | | Call 0x1,0x1c 0680 e5fd | | Load 0x2,-0x3 0681 e5fe | | Load 0x2,-0x2 0682 e5ff | | Load 0x2,-0x1 0683 8245 | E | Call 0x1,0x45 0684 e006 | | Load 0x0,0x6 0685 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0686 4405 |D | Exit_Subprogram With_Value,New_Top_Offset 0x5 0687 0000 | | .XXX[0x1] 0688 ; -------------------------------------------------------------------------------------- 0688 ; SUBPROGRAM 0688 ; -------------------------------------------------------------------------------------- 0688 068b | | .CONST 0x068b ; Address of begin 0689 0004 | | .CONST 0x0004 ; Address of exception handler 068a 0001 | | .CONST 0x0001 ; Number of locals 068b BODY_0688: 068b INIT_0688: 068b e5ff | | Load 0x2,-0x1 068c e011 | | Load 0x0,0x11 068d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 068e 8249 | I | Call 0x1,0x49 068f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0690 ; -------------------------------------------------------------------------------------- 0690 ; SUBPROGRAM 0690 ; -------------------------------------------------------------------------------------- 0690 0695 | | .CONST 0x0695 ; Address of begin 0691 0004 | | .CONST 0x0004 ; Address of exception handler 0692 0002 | | .CONST 0x0002 ; Number of locals 0693 INIT_0690: 0693 029f 094b | K| Declare_Subprogram INIT_0948,For_Call 0695 BODY_0690: 0695 e5ff | | Load 0x2,-0x1 0696 8402 | | Call 0x2,0x2 0697 e5fe | | Load 0x2,-0x2 0698 8402 | | Call 0x2,0x2 0699 017f | | Execute Record,Equal 069a 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 069b 0000 0000 | | .BLANK 0000[0x5] 06a0 ; -------------------------------------------------------------------------------------- 06a0 ; SUBPROGRAM 06a0 ; -------------------------------------------------------------------------------------- 06a0 06a3 | | .CONST 0x06a3 ; Address of begin 06a1 0004 | | .CONST 0x0004 ; Address of exception handler 06a2 0001 | | .CONST 0x0001 ; Number of locals 06a3 BODY_06a0: 06a3 INIT_06a0: 06a3 0092 09b5 | | Action Push_String_Extended,0x9b5 ; "Run the following on the remote machine:" 06a5 e019 | | Load 0x0,0x19 06a6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 06a7 0092 0998 | | Action Push_String_Extended,0x998 ; "Accept_Tokens" 06a9 e23c | < | Load 0x1,0x3c 06aa 180d | | Execute Package,Field_Execute,Field_Number 0xd 06ab e5ff | | Load 0x2,-0x1 06ac e23b | ; | Load 0x1,0x3b 06ad 181e | | Execute Package,Field_Execute,Field_Number 0x1e 06ae 0092 09c3 | | Action Push_String_Extended,0x9c3 ; "Product" 06b0 e23c | < | Load 0x1,0x3c 06b1 180e | | Execute Package,Field_Execute,Field_Number 0xe 06b2 4820 |H | Short_Literal 0x20 06b3 4800 |H | Short_Literal 0x0 06b4 480a |H | Short_Literal 0xa 06b5 e5fe | | Load 0x2,-0x2 06b6 823e | > | Call 0x1,0x3e 06b7 0092 09c4 | | Action Push_String_Extended,0x9c4 ; "Donation" 06b9 e23c | < | Load 0x1,0x3c 06ba 180e | | Execute Package,Field_Execute,Field_Number 0xe 06bb 4820 |H | Short_Literal 0x20 06bc 4800 |H | Short_Literal 0x0 06bd 480a |H | Short_Literal 0xa 06be e5fd | | Load 0x2,-0x3 06bf 823e | > | Call 0x1,0x3e 06c0 0092 09c5 | | Action Push_String_Extended,0x9c5 ; "Resulting_Count" 06c2 e23c | < | Load 0x1,0x3c 06c3 180e | | Execute Package,Field_Execute,Field_Number 0xe 06c4 e5f9 | | Load 0x2,-0x7 06c5 e5fa | | Load 0x2,-0x6 06c6 e5fb | | Load 0x2,-0x5 06c7 e5fc | | Load 0x2,-0x4 06c8 e5fd | | Load 0x2,-0x3 06c9 e5fe | | Load 0x2,-0x2 06ca e5ff | | Load 0x2,-0x1 06cb 8234 | 4 | Call 0x1,0x34 06cc e23b | ; | Load 0x1,0x3b 06cd 181e | | Execute Package,Field_Execute,Field_Number 0x1e 06ce 0092 09b7 | | Action Push_String_Extended,0x9b7 ; "Code" 06d0 e23c | < | Load 0x1,0x3c 06d1 180e | | Execute Package,Field_Execute,Field_Number 0xe 06d2 e5fa | | Load 0x2,-0x6 06d3 01db | | Execute Vector,Length 06d4 6807 |h | Jump_Zero 0x6dc 06d5 e5fa | | Load 0x2,-0x6 06d6 e23b | ; | Load 0x1,0x3b 06d7 181e | | Execute Package,Field_Execute,Field_Number 0x1e 06d8 0092 09c6 | | Action Push_String_Extended,0x9c6 ; "Authorization" 06da e23c | < | Load 0x1,0x3c 06db 180e | | Execute Package,Field_Execute,Field_Number 0xe 06dc e23c | < | Load 0x1,0x3c 06dd 180f | | Execute Package,Field_Execute,Field_Number 0xf 06de 4508 |E | Exit_Suprogram New_Top_Offset 0x8 06df 0000 | | .XXX[0x1] 06e0 ; -------------------------------------------------------------------------------------- 06e0 ; SUBPROGRAM 06e0 ; -------------------------------------------------------------------------------------- 06e0 06e3 | | .CONST 0x06e3 ; Address of begin 06e1 0004 | | .CONST 0x0004 ; Address of exception handler 06e2 0001 | | .CONST 0x0001 ; Number of locals 06e3 BODY_06e0: 06e3 INIT_06e0: 06e3 0092 09b5 | | Action Push_String_Extended,0x9b5 ; "Run the following on the remote machine:" 06e5 e019 | | Load 0x0,0x19 06e6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 06e7 0092 09ac | | Action Push_String_Extended,0x9ac ; "Convert_Tokens" 06e9 e23c | < | Load 0x1,0x3c 06ea 180d | | Execute Package,Field_Execute,Field_Number 0xd 06eb e5ff | | Load 0x2,-0x1 06ec e23b | ; | Load 0x1,0x3b 06ed 181e | | Execute Package,Field_Execute,Field_Number 0x1e 06ee 0092 09c7 | | Action Push_String_Extended,0x9c7 ; "Current_Product" 06f0 e23c | < | Load 0x1,0x3c 06f1 180e | | Execute Package,Field_Execute,Field_Number 0xe 06f2 e5fe | | Load 0x2,-0x2 06f3 e23b | ; | Load 0x1,0x3b 06f4 181e | | Execute Package,Field_Execute,Field_Number 0x1e 06f5 0092 09c8 | | Action Push_String_Extended,0x9c8 ; "New_Product" 06f7 e23c | < | Load 0x1,0x3c 06f8 180e | | Execute Package,Field_Execute,Field_Number 0xe 06f9 4820 |H | Short_Literal 0x20 06fa 4800 |H | Short_Literal 0x0 06fb 480a |H | Short_Literal 0xa 06fc e5fd | | Load 0x2,-0x3 06fd 823e | > | Call 0x1,0x3e 06fe 0092 09c9 | | Action Push_String_Extended,0x9c9 ; "Token_Count" 0700 e23c | < | Load 0x1,0x3c 0701 180e | | Execute Package,Field_Execute,Field_Number 0xe 0702 e5fa | | Load 0x2,-0x6 0703 e5fb | | Load 0x2,-0x5 0704 e5fc | | Load 0x2,-0x4 0705 e5fd | | Load 0x2,-0x3 0706 e5fe | | Load 0x2,-0x2 0707 e5ff | | Load 0x2,-0x1 0708 8245 | E | Call 0x1,0x45 0709 e23b | ; | Load 0x1,0x3b 070a 181e | | Execute Package,Field_Execute,Field_Number 0x1e 070b 0092 09b7 | | Action Push_String_Extended,0x9b7 ; "Code" 070d e23c | < | Load 0x1,0x3c 070e 180e | | Execute Package,Field_Execute,Field_Number 0xe 070f e5fb | | Load 0x2,-0x5 0710 01db | | Execute Vector,Length 0711 6807 |h | Jump_Zero 0x719 0712 e5fb | | Load 0x2,-0x5 0713 e23b | ; | Load 0x1,0x3b 0714 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0715 0092 09c6 | | Action Push_String_Extended,0x9c6 ; "Authorization" 0717 e23c | < | Load 0x1,0x3c 0718 180e | | Execute Package,Field_Execute,Field_Number 0xe 0719 e23c | < | Load 0x1,0x3c 071a 180f | | Execute Package,Field_Execute,Field_Number 0xf 071b 4507 |E | Exit_Suprogram New_Top_Offset 0x7 071c 0000 0000 | | .BLANK 0000[0x4] 0720 ; -------------------------------------------------------------------------------------- 0720 ; SUBPROGRAM 0720 ; -------------------------------------------------------------------------------------- 0720 0723 | # | .CONST 0x0723 ; Address of begin 0721 0004 | | .CONST 0x0004 ; Address of exception handler 0722 0001 | | .CONST 0x0001 ; Number of locals 0723 BODY_0720: 0723 INIT_0720: 0723 e5ff | | Load 0x2,-0x1 0724 e235 | 5 | Load 0x1,0x35 0725 025f | _ | Execute Discrete,Not_In_Type 0726 682a |h* | Jump_Zero 0x751 0727 e5fc | | Load 0x2,-0x4 0728 0092 09ca | | Action Push_String_Extended,0x9ca ; "The legal range of " 072a e5fe | | Load 0x2,-0x2 072b 01cc | | Execute Vector,Catenate 072c 0092 09cb | | Action Push_String_Extended,0x9cb ; " for " 072e 01cc | | Execute Vector,Catenate 072f e5fd | | Load 0x2,-0x3 0730 01cc | | Execute Vector,Catenate 0731 0092 09cc | | Action Push_String_Extended,0x9cc ; " is " 0733 01cc | | Execute Vector,Catenate 0734 4820 |H | Short_Literal 0x20 0735 4800 |H | Short_Literal 0x0 0736 480a |H | Short_Literal 0xa 0737 4800 |H | Short_Literal 0x0 0738 823e | > | Call 0x1,0x3e 0739 01cc | | Execute Vector,Catenate 073a 0092 09cd | | Action Push_String_Extended,0x9cd ; ".." 073c 01cc | | Execute Vector,Catenate 073d 4820 |H | Short_Literal 0x20 073e 4800 |H | Short_Literal 0x0 073f 480a |H | Short_Literal 0xa 0740 4840 |H@ | Short_Literal 0x40 0741 823e | > | Call 0x1,0x3e 0742 01cc | | Execute Vector,Catenate 0743 0092 09ce | | Action Push_String_Extended,0x9ce ; ", but the value specified (" 0745 01cc | | Execute Vector,Catenate 0746 4820 |H | Short_Literal 0x20 0747 4800 |H | Short_Literal 0x0 0748 480a |H | Short_Literal 0xa 0749 e5ff | | Load 0x2,-0x1 074a 823e | > | Call 0x1,0x3e 074b 01cc | | Execute Vector,Catenate 074c 0092 09cf | | Action Push_String_Extended,0x9cf ; ") is outside that range" 074e 01cc | | Execute Vector,Catenate 074f e23b | ; | Load 0x1,0x3b 0750 180d | | Execute Package,Field_Execute,Field_Number 0xd 0751 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0752 0000 0000 | | .BLANK 0000[0x6] 0758 ; -------------------------------------------------------------------------------------- 0758 ; SUBPROGRAM 0758 ; -------------------------------------------------------------------------------------- 0758 075b | [ | .CONST 0x075b ; Address of begin 0759 0004 | | .CONST 0x0004 ; Address of exception handler 075a 0001 | | .CONST 0x0001 ; Number of locals 075b BODY_0758: 075b INIT_0758: 075b e5ff | | Load 0x2,-0x1 075c 01db | | Execute Vector,Length 075d 7005 |p | Jump_Nonzero 0x763 075e e5fe | | Load 0x2,-0x2 075f 0092 09d0 | | Action Push_String_Extended,0x9d0 ; "Product name not specified." 0761 e23b | ; | Load 0x1,0x3b 0762 180d | | Execute Package,Field_Execute,Field_Number 0xd 0763 00cf | | Action Mark_Auxiliary 0764 e5ff | | Load 0x2,-0x1 0765 01d9 | | Execute Vector,Reverse_Bounds 0766 0263 | c | Execute Discrete,Above_Bound 0767 7018 |p | Jump_Nonzero 0x780 0768 00d8 | | Load_Top At_Offset_0 0769 e5ff | | Load 0x2,-0x1 076a 01d7 | | Execute Vector,Field_Read 076b 4820 |H | Short_Literal 0x20 076c 487e |H~ | Short_Literal 0x7e 076d 0261 | a | Execute Discrete,Not_In_Range 076e 680f |h | Jump_Zero 0x77e 076f e5fe | | Load 0x2,-0x2 0770 0092 09d1 | | Action Push_String_Extended,0x9d1 ; "Product name contains an illegal character (" 0772 e404 | | Load 0x2,0x4 0773 e5ff | | Load 0x2,-0x1 0774 01d7 | | Execute Vector,Field_Read 0775 00e8 | | Load_Encached Character_Cache 0776 011c | | Execute Any,Convert_Unchecked 0777 1c01 | | Execute_Immediate Run_Utility,0x1 0778 01cc | | Execute Vector,Catenate 0779 0092 09aa | | Action Push_String_Extended,0x9aa ; ")." 077b 01cc | | Execute Vector,Catenate 077c e23b | ; | Load 0x1,0x3b 077d 180d | | Execute Package,Field_Execute,Field_Number 0xd 077e 00c8 | | Action Pop_Auxiliary_Range 077f 3fe8 |? | Loop_Increasing 0x768 0780 00ce | | Action Pop_Auxiliary 0781 e5ff | | Load 0x2,-0x1 0782 4820 |H | Short_Literal 0x20 0783 e5ff | | Load 0x2,-0x1 0784 e006 | | Load 0x0,0x6 0785 181c | | Execute Package,Field_Execute,Field_Number 0x1c 0786 01de | | Execute Vector,Not_Equal 0787 6805 |h | Jump_Zero 0x78d 0788 e5fe | | Load 0x2,-0x2 0789 0092 09d2 | | Action Push_String_Extended,0x9d2 ; "Product name includes leading or trailing blanks." 078b e23b | ; | Load 0x1,0x3b 078c 180d | | Execute Package,Field_Execute,Field_Number 0xd 078d 4503 |E | Exit_Suprogram New_Top_Offset 0x3 078e 0000 0000 | | .XXX[0x2] 0790 ; -------------------------------------------------------------------------------------- 0790 ; SUBPROGRAM 0790 ; -------------------------------------------------------------------------------------- 0790 0793 | | .CONST 0x0793 ; Address of begin 0791 0004 | | .CONST 0x0004 ; Address of exception handler 0792 0001 | | .CONST 0x0001 ; Number of locals 0793 BODY_0790: 0793 INIT_0790: 0793 e5ff | | Load 0x2,-0x1 0794 01db | | Execute Vector,Length 0795 7005 |p | Jump_Nonzero 0x79b 0796 e5fe | | Load 0x2,-0x2 0797 0092 09d3 | | Action Push_String_Extended,0x9d3 ; "Site name not specified." 0799 e23b | ; | Load 0x1,0x3b 079a 180d | | Execute Package,Field_Execute,Field_Number 0xd 079b 00cf | | Action Mark_Auxiliary 079c e5ff | | Load 0x2,-0x1 079d 01d9 | | Execute Vector,Reverse_Bounds 079e 0263 | c | Execute Discrete,Above_Bound 079f 7018 |p | Jump_Nonzero 0x7b8 07a0 00d8 | | Load_Top At_Offset_0 07a1 e5ff | | Load 0x2,-0x1 07a2 01d7 | | Execute Vector,Field_Read 07a3 4820 |H | Short_Literal 0x20 07a4 487e |H~ | Short_Literal 0x7e 07a5 0261 | a | Execute Discrete,Not_In_Range 07a6 680f |h | Jump_Zero 0x7b6 07a7 e5fe | | Load 0x2,-0x2 07a8 0092 09d4 | | Action Push_String_Extended,0x9d4 ; "Site name contains an illegal character (" 07aa e404 | | Load 0x2,0x4 07ab e5ff | | Load 0x2,-0x1 07ac 01d7 | | Execute Vector,Field_Read 07ad 00e8 | | Load_Encached Character_Cache 07ae 011c | | Execute Any,Convert_Unchecked 07af 1c01 | | Execute_Immediate Run_Utility,0x1 07b0 01cc | | Execute Vector,Catenate 07b1 0092 09aa | | Action Push_String_Extended,0x9aa ; ")." 07b3 01cc | | Execute Vector,Catenate 07b4 e23b | ; | Load 0x1,0x3b 07b5 180d | | Execute Package,Field_Execute,Field_Number 0xd 07b6 00c8 | | Action Pop_Auxiliary_Range 07b7 3fe8 |? | Loop_Increasing 0x7a0 07b8 00ce | | Action Pop_Auxiliary 07b9 e5ff | | Load 0x2,-0x1 07ba 4820 |H | Short_Literal 0x20 07bb e5ff | | Load 0x2,-0x1 07bc e006 | | Load 0x0,0x6 07bd 181c | | Execute Package,Field_Execute,Field_Number 0x1c 07be 01de | | Execute Vector,Not_Equal 07bf 6805 |h | Jump_Zero 0x7c5 07c0 e5fe | | Load 0x2,-0x2 07c1 0092 09d5 | | Action Push_String_Extended,0x9d5 ; "Site name includes leading or trailing blanks." 07c3 e23b | ; | Load 0x1,0x3b 07c4 180d | | Execute Package,Field_Execute,Field_Number 0xd 07c5 4503 |E | Exit_Suprogram New_Top_Offset 0x3 07c6 0000 0000 | | .XXX[0x2] 07c8 ; -------------------------------------------------------------------------------------- 07c8 ; SUBPROGRAM 07c8 ; -------------------------------------------------------------------------------------- 07c8 07cd | | .CONST 0x07cd ; Address of begin 07c9 0004 | | .CONST 0x0004 ; Address of exception handler 07ca 0002 | | .CONST 0x0002 ; Number of locals 07cb INIT_07c8: 07cb 029f 096b | k| Declare_Subprogram INIT_0968,For_Call 07cd BODY_07c8: 07cd 4820 |H | Short_Literal 0x20 07ce e5ff | | Load 0x2,-0x1 07cf e006 | | Load 0x0,0x6 07d0 181c | | Execute Package,Field_Execute,Field_Number 0x1c 07d1 01db | | Execute Vector,Length 07d2 7001 |p | Jump_Nonzero 0x7d4 07d3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 07d4 00cf | | Action Mark_Auxiliary 07d5 e5ff | | Load 0x2,-0x1 07d6 01d9 | | Execute Vector,Reverse_Bounds 07d7 0263 | c | Execute Discrete,Above_Bound 07d8 7018 |p | Jump_Nonzero 0x7f1 07d9 00d8 | | Load_Top At_Offset_0 07da e5ff | | Load 0x2,-0x1 07db 01d7 | | Execute Vector,Field_Read 07dc 4820 |H | Short_Literal 0x20 07dd 487e |H~ | Short_Literal 0x7e 07de 0261 | a | Execute Discrete,Not_In_Range 07df 680f |h | Jump_Zero 0x7ef 07e0 e5fe | | Load 0x2,-0x2 07e1 0092 09d6 | | Action Push_String_Extended,0x9d6 ; "Date contains an illegal character (" 07e3 e405 | | Load 0x2,0x5 07e4 e5ff | | Load 0x2,-0x1 07e5 01d7 | | Execute Vector,Field_Read 07e6 00e8 | | Load_Encached Character_Cache 07e7 011c | | Execute Any,Convert_Unchecked 07e8 1c01 | | Execute_Immediate Run_Utility,0x1 07e9 01cc | | Execute Vector,Catenate 07ea 0092 09aa | | Action Push_String_Extended,0x9aa ; ")." 07ec 01cc | | Execute Vector,Catenate 07ed e23b | ; | Load 0x1,0x3b 07ee 180d | | Execute Package,Field_Execute,Field_Number 0xd 07ef 00c8 | | Action Pop_Auxiliary_Range 07f0 3fe8 |? | Loop_Increasing 0x7d9 07f1 00ce | | Action Pop_Auxiliary 07f2 8402 | | Call 0x2,0x2 07f3 4503 |E | Exit_Suprogram New_Top_Offset 0x3 07f4 0000 0000 | | .BLANK 0000[0x4] 07f8 ; -------------------------------------------------------------------------------------- 07f8 ; SUBPROGRAM 07f8 ; -------------------------------------------------------------------------------------- 07f8 0801 | | .CONST 0x0801 ; Address of begin 07f9 0004 | | .CONST 0x0004 ; Address of exception handler 07fa 0003 | | .CONST 0x0003 ; Number of locals 07fb INIT_07f8: 07fb e5ff | | Load 0x2,-0x1 07fc 8253 | S | Call 0x1,0x53 07fd 00e3 | | Load_Encached Natural_Cache 07fe 03f1 | | Declare_Variable Discrete,With_Value 07ff 029f 0983 | | Declare_Subprogram INIT_0980,For_Call 0801 BODY_07f8: 0801 e5fc | | Load 0x2,-0x4 0802 e5ff | | Load 0x2,-0x1 0803 0092 09c4 | | Action Push_String_Extended,0x9c4 ; "Donation" 0805 e5fe | | Load 0x2,-0x2 0806 824c | L | Call 0x1,0x4c 0807 e5fc | | Load 0x2,-0x4 0808 e5ff | | Load 0x2,-0x1 0809 0092 09c5 | | Action Push_String_Extended,0x9c5 ; "Resulting_Count" 080b e5fd | | Load 0x2,-0x3 080c 824c | L | Call 0x1,0x4c 080d e5fe | | Load 0x2,-0x2 080e e5fd | | Load 0x2,-0x3 080f 027d | } | Execute Discrete,Greater 0810 681c |h | Jump_Zero 0x82d 0811 e5fc | | Load 0x2,-0x4 0812 0092 09d7 | | Action Push_String_Extended,0x9d7 ; "The number of tokens (" 0814 4820 |H | Short_Literal 0x20 0815 4800 |H | Short_Literal 0x0 0816 480a |H | Short_Literal 0xa 0817 e5fe | | Load 0x2,-0x2 0818 823e | > | Call 0x1,0x3e 0819 01cc | | Execute Vector,Catenate 081a 0092 09d8 | | Action Push_String_Extended,0x9d8 ; ") for " 081c 01cc | | Execute Vector,Catenate 081d e5ff | | Load 0x2,-0x1 081e 01cc | | Execute Vector,Catenate 081f 0092 09d9 | | Action Push_String_Extended,0x9d9 ; " exceeds the target authorization (" 0821 01cc | | Execute Vector,Catenate 0822 4820 |H | Short_Literal 0x20 0823 4800 |H | Short_Literal 0x0 0824 480a |H | Short_Literal 0xa 0825 e5fd | | Load 0x2,-0x3 0826 823e | > | Call 0x1,0x3e 0827 01cc | | Execute Vector,Catenate 0828 0092 09aa | | Action Push_String_Extended,0x9aa ; ")." 082a 01cc | | Execute Vector,Catenate 082b e23b | ; | Load 0x1,0x3b 082c 180d | | Execute Package,Field_Execute,Field_Number 0xd 082d e5fe | | Load 0x2,-0x2 082e e5fd | | Load 0x2,-0x3 082f 027f | | Execute Discrete,Equal 0830 6820 |h | Jump_Zero 0x851 0831 4801 |H | Short_Literal 0x1 0832 e237 | 7 | Load 0x1,0x37 0833 e5ff | | Load 0x2,-0x1 0834 e006 | | Load 0x0,0x6 0835 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0836 6805 |h | Jump_Zero 0x83c 0837 e238 | 8 | Load 0x1,0x38 0838 8403 | | Call 0x2,0x3 0839 e239 | 9 | Load 0x1,0x39 083a 8403 | | Call 0x2,0x3 083b 4505 |E | Exit_Suprogram New_Top_Offset 0x5 083c 4801 |H | Short_Literal 0x1 083d e238 | 8 | Load 0x1,0x38 083e e5ff | | Load 0x2,-0x1 083f e006 | | Load 0x0,0x6 0840 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0841 6805 |h | Jump_Zero 0x847 0842 e237 | 7 | Load 0x1,0x37 0843 8403 | | Call 0x2,0x3 0844 e239 | 9 | Load 0x1,0x39 0845 8403 | | Call 0x2,0x3 0846 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0847 4801 |H | Short_Literal 0x1 0848 e239 | 9 | Load 0x1,0x39 0849 e5ff | | Load 0x2,-0x1 084a e006 | | Load 0x0,0x6 084b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 084c 6804 |h | Jump_Zero 0x851 084d e238 | 8 | Load 0x1,0x38 084e 8403 | | Call 0x2,0x3 084f e237 | 7 | Load 0x1,0x37 0850 8403 | | Call 0x2,0x3 0851 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0852 0000 0000 | | .BLANK 0000[0x6] 0858 ; -------------------------------------------------------------------------------------- 0858 ; SUBPROGRAM 0858 ; -------------------------------------------------------------------------------------- 0858 085b | [ | .CONST 0x085b ; Address of begin 0859 0004 | | .CONST 0x0004 ; Address of exception handler 085a 0001 | | .CONST 0x0001 ; Number of locals 085b BODY_0858: 085b INIT_0858: 085b e5fe | | Load 0x2,-0x2 085c 01db | | Execute Vector,Length 085d 680a |h | Jump_Zero 0x868 085e e5fd | | Load 0x2,-0x3 085f 01db | | Execute Vector,Length 0860 6807 |h | Jump_Zero 0x868 0861 e5fc | | Load 0x2,-0x4 0862 0092 09da | | Action Push_String_Extended,0x9da ; "Cannot specify both authorization and date for " 0864 e5ff | | Load 0x2,-0x1 0865 01cc | | Execute Vector,Catenate 0866 e23b | ; | Load 0x1,0x3b 0867 180d | | Execute Package,Field_Execute,Field_Number 0xd 0868 4505 |E | Exit_Suprogram New_Top_Offset 0x5 0869 0000 0000 | | .BLANK 0000[0x7] 0870 ; -------------------------------------------------------------------------------------- 0870 ; SUBPROGRAM 0870 ; -------------------------------------------------------------------------------------- 0870 087b | { | .CONST 0x087b ; Address of begin 0871 0004 | | .CONST 0x0004 ; Address of exception handler 0872 0003 | | .CONST 0x0003 ; Number of locals 0873 INIT_0870: 0873 e5ff | | Load 0x2,-0x1 0874 8253 | S | Call 0x1,0x53 0875 00e3 | | Load_Encached Natural_Cache 0876 03f1 | | Declare_Variable Discrete,With_Value 0877 e5ff | | Load 0x2,-0x1 0878 8255 | U | Call 0x1,0x55 0879 00e3 | | Load_Encached Natural_Cache 087a 03f1 | | Declare_Variable Discrete,With_Value 087b BODY_0870: 087b e402 | | Load 0x2,0x2 087c 700a |p | Jump_Nonzero 0x887 087d e5fd | | Load 0x2,-0x3 087e 0092 09db | | Action Push_String_Extended,0x9db ; "There are currently no tokens for " 0880 e5ff | | Load 0x2,-0x1 0881 01cc | | Execute Vector,Catenate 0882 0092 09dc | | Action Push_String_Extended,0x9dc ; ", so they can't be donated." 0884 01cc | | Execute Vector,Catenate 0885 e23b | ; | Load 0x1,0x3b 0886 180d | | Execute Package,Field_Execute,Field_Number 0xd 0887 e5fe | | Load 0x2,-0x2 0888 e402 | | Load 0x2,0x2 0889 027d | } | Execute Discrete,Greater 088a 681c |h | Jump_Zero 0x8a7 088b e5fd | | Load 0x2,-0x3 088c 0092 09dd | | Action Push_String_Extended,0x9dd ; "The requested donation (" 088e 4820 |H | Short_Literal 0x20 088f 4800 |H | Short_Literal 0x0 0890 480a |H | Short_Literal 0xa 0891 e5fe | | Load 0x2,-0x2 0892 823e | > | Call 0x1,0x3e 0893 01cc | | Execute Vector,Catenate 0894 0092 09d8 | | Action Push_String_Extended,0x9d8 ; ") for " 0896 01cc | | Execute Vector,Catenate 0897 e5ff | | Load 0x2,-0x1 0898 01cc | | Execute Vector,Catenate 0899 0092 09de | | Action Push_String_Extended,0x9de ; "exceeds the current limit (" 089b 01cc | | Execute Vector,Catenate 089c 4820 |H | Short_Literal 0x20 089d 4800 |H | Short_Literal 0x0 089e 480a |H | Short_Literal 0xa 089f e402 | | Load 0x2,0x2 08a0 823e | > | Call 0x1,0x3e 08a1 01cc | | Execute Vector,Catenate 08a2 0092 09aa | | Action Push_String_Extended,0x9aa ; ")." 08a4 01cc | | Execute Vector,Catenate 08a5 e23b | ; | Load 0x1,0x3b 08a6 180d | | Execute Package,Field_Execute,Field_Number 0xd 08a7 e402 | | Load 0x2,0x2 08a8 e5fe | | Load 0x2,-0x2 08a9 0272 | r | Execute Discrete,Minus 08aa e403 | | Load 0x2,0x3 08ab 027c | | | Execute Discrete,Less 08ac 6813 |h | Jump_Zero 0x8c0 08ad e5fd | | Load 0x2,-0x3 08ae 0092 09df | | Action Push_String_Extended,0x9df ; "Donation of " 08b0 4820 |H | Short_Literal 0x20 08b1 4800 |H | Short_Literal 0x0 08b2 480a |H | Short_Literal 0xa 08b3 e5fe | | Load 0x2,-0x2 08b4 823e | > | Call 0x1,0x3e 08b5 01cc | | Execute Vector,Catenate 08b6 0092 09e0 | | Action Push_String_Extended,0x9e0 ; " tokens for " 08b8 01cc | | Execute Vector,Catenate 08b9 e5ff | | Load 0x2,-0x1 08ba 01cc | | Execute Vector,Catenate 08bb 0092 09e1 | | Action Push_String_Extended,0x9e1 ; " would transfer tokens currently in use." 08bd 01cc | | Execute Vector,Catenate 08be e23b | ; | Load 0x1,0x3b 08bf 180d | | Execute Package,Field_Execute,Field_Number 0xd 08c0 e402 | | Load 0x2,0x2 08c1 e5fe | | Load 0x2,-0x2 08c2 0272 | r | Execute Discrete,Minus 08c3 00d8 | | Load_Top At_Offset_0 08c4 00e3 | | Load_Encached Natural_Cache 08c5 0260 | ` | Execute Discrete,In_Type 08c6 7001 |p | Jump_Nonzero 0x8c8 08c7 0801 | | Execute_Immediate Raise,0x1 08c8 e5ff | | Load 0x2,-0x1 08c9 e016 | | Load 0x0,0x16 08ca 1813 | | Execute Package,Field_Execute,Field_Number 0x13 08cb e5fd | | Load 0x2,-0x3 08cc 0092 09df | | Action Push_String_Extended,0x9df ; "Donation of " 08ce 4820 |H | Short_Literal 0x20 08cf 4800 |H | Short_Literal 0x0 08d0 480a |H | Short_Literal 0xa 08d1 e5fe | | Load 0x2,-0x2 08d2 823e | > | Call 0x1,0x3e 08d3 01cc | | Execute Vector,Catenate 08d4 0092 09e0 | | Action Push_String_Extended,0x9e0 ; " tokens for " 08d6 01cc | | Execute Vector,Catenate 08d7 e5ff | | Load 0x2,-0x1 08d8 01cc | | Execute Vector,Catenate 08d9 0092 09e2 | | Action Push_String_Extended,0x9e2 ; " has resulted in " 08db 01cc | | Execute Vector,Catenate 08dc 4820 |H | Short_Literal 0x20 08dd 4800 |H | Short_Literal 0x0 08de 480a |H | Short_Literal 0xa 08df e5ff | | Load 0x2,-0x1 08e0 8253 | S | Call 0x1,0x53 08e1 823e | > | Call 0x1,0x3e 08e2 01cc | | Execute Vector,Catenate 08e3 0092 09e3 | | Action Push_String_Extended,0x9e3 ; " tokens." 08e5 01cc | | Execute Vector,Catenate 08e6 e23b | ; | Load 0x1,0x3b 08e7 180f | | Execute Package,Field_Execute,Field_Number 0xf 08e8 4504 |E | Exit_Suprogram New_Top_Offset 0x4 08e9 0000 0000 | | .BLANK 0000[0x7] 08f0 ; -------------------------------------------------------------------------------------- 08f0 ; SUBPROGRAM 08f0 ; -------------------------------------------------------------------------------------- 08f0 08f3 | | .CONST 0x08f3 ; Address of begin 08f1 08f7 | | .CONST 0x08f7 ; Address of exception handler 08f2 0001 | | .CONST 0x0001 ; Number of locals 08f3 BODY_08f0: 08f3 INIT_08f0: 08f3 e5ff | | Load 0x2,-0x1 08f4 e016 | | Load 0x0,0x16 08f5 1815 | | Execute Package,Field_Execute,Field_Number 0x15 08f6 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08f7 TRAP_08f0: 08f7 0007 | | Action Break_Optional 08f8 4800 |H | Short_Literal 0x0 08f9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 08fa 0000 0000 | | .BLANK 0000[0x6] 0900 ; -------------------------------------------------------------------------------------- 0900 ; SUBPROGRAM 0900 ; -------------------------------------------------------------------------------------- 0900 0903 | | .CONST 0x0903 ; Address of begin 0901 0907 | | .CONST 0x0907 ; Address of exception handler 0902 0001 | | .CONST 0x0001 ; Number of locals 0903 BODY_0900: 0903 INIT_0900: 0903 e5ff | | Load 0x2,-0x1 0904 e016 | | Load 0x0,0x16 0905 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0906 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0907 TRAP_0900: 0907 0007 | | Action Break_Optional 0908 4800 |H | Short_Literal 0x0 0909 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 090a 0000 0000 | | .BLANK 0000[0x6] 0910 ; -------------------------------------------------------------------------------------- 0910 ; SUBPROGRAM 0910 ; -------------------------------------------------------------------------------------- 0910 0913 | | .CONST 0x0913 ; Address of begin 0911 0917 | | .CONST 0x0917 ; Address of exception handler 0912 0001 | | .CONST 0x0001 ; Number of locals 0913 BODY_0910: 0913 INIT_0910: 0913 e5ff | | Load 0x2,-0x1 0914 e016 | | Load 0x0,0x16 0915 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0916 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0917 TRAP_0910: 0917 0007 | | Action Break_Optional 0918 4800 |H | Short_Literal 0x0 0919 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 091a 0000 0000 | | .BLANK 0000[0x6] 0920 ; -------------------------------------------------------------------------------------- 0920 ; SUBPROGRAM 0920 ; -------------------------------------------------------------------------------------- 0920 0929 | ) | .CONST 0x0929 ; Address of begin 0921 0004 | | .CONST 0x0004 ; Address of exception handler 0922 0002 | | .CONST 0x0002 ; Number of locals 0923 INIT_0920: 0923 e5ff | | Load 0x2,-0x1 0924 e016 | | Load 0x0,0x16 0925 180e | | Execute Package,Field_Execute,Field_Number 0xe 0926 e016 | | Load 0x0,0x16 0927 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0928 03f1 | | Declare_Variable Discrete,With_Value 0929 BODY_0920: 0929 00d8 | | Load_Top At_Offset_0 092a 6804 |h | Jump_Zero 0x92f 092b 00d8 | | Load_Top At_Offset_0 092c e016 | | Load 0x0,0x16 092d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 092e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 092f 4800 |H | Short_Literal 0x0 0930 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0931 0000 0000 | | .BLANK 0000[0x7] 0938 ; -------------------------------------------------------------------------------------- 0938 ; SUBPROGRAM 0938 ; -------------------------------------------------------------------------------------- 0938 093d | = | .CONST 0x093d ; Address of begin 0939 0004 | | .CONST 0x0004 ; Address of exception handler 093a 0002 | | .CONST 0x0002 ; Number of locals 093b INIT_0938: 093b 0092 09e4 | | Action Push_String_Extended,0x9e4 ; "1/1/90" 093d BODY_0938: 093d 00d8 | | Load_Top At_Offset_0 093e e602 | | Load 0x3,0x2 093f 821c | | Call 0x1,0x1c 0940 e5ff | | Load 0x2,-0x1 0941 e017 | | Load 0x0,0x17 0942 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0943 e5ff | | Load 0x2,-0x1 0944 e017 | | Load 0x0,0x17 0945 180d | | Execute Package,Field_Execute,Field_Number 0xd 0946 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0947 0000 | | .XXX[0x1] 0948 ; -------------------------------------------------------------------------------------- 0948 ; SUBPROGRAM 0948 ; -------------------------------------------------------------------------------------- 0948 0953 | S | .CONST 0x0953 ; Address of begin 0949 0004 | | .CONST 0x0004 ; Address of exception handler 094a 0002 | | .CONST 0x0002 ; Number of locals 094b INIT_0948: 094b e007 | | Load 0x0,0x7 094c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 094d 0322 | " | Declare_Variable Record 094e e7ff | | Load 0x3,-0x1 094f e007 | | Load 0x0,0x7 0950 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0951 e602 | | Load 0x3,0x2 0952 017d | } | Execute Record,Structure_Write 0953 BODY_0948: 0953 4800 |H | Short_Literal 0x0 0954 e602 | | Load 0x3,0x2 0955 3805 |8 | Execute Record,Field_Write,Field_Number 0x5 0956 4800 |H | Short_Literal 0x0 0957 e602 | | Load 0x3,0x2 0958 3804 |8 | Execute Record,Field_Write,Field_Number 0x4 0959 4801 |H | Short_Literal 0x1 095a e602 | | Load 0x3,0x2 095b 3803 |8 | Execute Record,Field_Write,Field_Number 0x3 095c 4800 |H | Short_Literal 0x0 095d e602 | | Load 0x3,0x2 095e 3806 |8 | Execute Record,Field_Write,Field_Number 0x6 095f 00d8 | | Load_Top At_Offset_0 0960 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0961 0000 0000 | | .BLANK 0000[0x7] 0968 ; -------------------------------------------------------------------------------------- 0968 ; SUBPROGRAM 0968 ; -------------------------------------------------------------------------------------- 0968 096e | n | .CONST 0x096e ; Address of begin 0969 0974 | t | .CONST 0x0974 ; Address of exception handler 096a 0002 | | .CONST 0x0002 ; Number of locals 096b INIT_0968: 096b e007 | | Load 0x0,0x7 096c 1b14 | | Execute Package,Field_Read,Field_Number 0x14 096d 0322 | " | Declare_Variable Record 096e BODY_0968: 096e e5ff | | Load 0x2,-0x1 096f e007 | | Load 0x0,0x7 0970 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0971 e602 | | Load 0x3,0x2 0972 017d | } | Execute Record,Structure_Write 0973 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0974 TRAP_0968: 0974 0007 | | Action Break_Optional 0975 e5fe | | Load 0x2,-0x2 0976 0092 09e5 | | Action Push_String_Extended,0x9e5 ; "Date (" 0978 e5ff | | Load 0x2,-0x1 0979 01cc | | Execute Vector,Catenate 097a 0092 09e6 | | Action Push_String_Extended,0x9e6 ; ") doesn't represent a legal date." 097c 01cc | | Execute Vector,Catenate 097d e23b | ; | Load 0x1,0x3b 097e 180d | | Execute Package,Field_Execute,Field_Number 0xd 097f 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0980 ; -------------------------------------------------------------------------------------- 0980 ; SUBPROGRAM 0980 ; -------------------------------------------------------------------------------------- 0980 0983 | | .CONST 0x0983 ; Address of begin 0981 0004 | | .CONST 0x0004 ; Address of exception handler 0982 0001 | | .CONST 0x0001 ; Number of locals 0983 BODY_0980: 0983 INIT_0980: 0983 e7ff | | Load 0x3,-0x1 0984 8256 | V | Call 0x1,0x56 0985 680e |h | Jump_Zero 0x994 0986 e5fc | | Load 0x2,-0x4 0987 482e |H. | Short_Literal 0x2e 0988 0092 09e7 | | Action Push_String_Extended,0x9e7 ; "Active tokens for " 098a e7ff | | Load 0x3,-0x1 098b 01cc | | Execute Vector,Catenate 098c 0092 09e8 | | Action Push_String_Extended,0x9e8 ; " make it impossible to accept tokens for " 098e 01cc | | Execute Vector,Catenate 098f e5ff | | Load 0x2,-0x1 0990 01cc | | Execute Vector,Catenate 0991 01cb | | Execute Vector,Append 0992 e23b | ; | Load 0x1,0x3b 0993 180d | | Execute Package,Field_Execute,Field_Number 0xd 0994 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0995 ; -------------------------------------------------------------------------------------- 0995 ; STRING TABLE 0995 ; -------------------------------------------------------------------------------------- 0995 00aa | | .STRTAB 0x00aa->0x09ea ; "Login" 0996 00ad | | .STRTAB 0x00ad->0x09ec ; "Full Session" 0997 00b7 | | .STRTAB 0x00b7->0x09f2 ; "Fundamental Session" 0998 00c8 | | .STRTAB 0x00c8->0x09fc ; "Accept_Tokens" 0999 00d3 | | .STRTAB 0x00d3->0x0a02 ; "This machine has donated tokens today; it may not also accept them" 099a 0113 | | .STRTAB 0x0113->0x0a23 ; "The sum of currently authorized tokens and Donations (" 099b 0147 | G | .STRTAB 0x0147->0x0a3e ; ") is NOT equal to Resulting_Count parameter (" 099c 0172 | r | .STRTAB 0x0172->0x0a55 ; "); these must be equal in order to proceed." 099d 019b | | .STRTAB 0x019b->0x0a6a ; "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 (" 099e 0283 | | .STRTAB 0x0283->0x0adf ; "), a transcription error of the Machine ID of this machine (" 099f 02bd | | .STRTAB 0x02bd->0x0afd ; "), a delay in posting the request (code only valid for one day), " 09a0 02fc | | .STRTAB 0x02fc->0x0b1e ; "or some other combination of parameter problems. " 09a1 032c | , | .STRTAB 0x032c->0x0b37 ; "Contact your Rational representative for further assistance." 09a2 0366 | f | .STRTAB 0x0366->0x0b55 ; "The authorization provided has been used previously for this product. It must be unique for this machine for all time." 09a3 03db | | .STRTAB 0x03db->0x0b90 ; " tokens set to " 09a4 03e8 | | .STRTAB 0x03e8->0x0b98 ; "Donate_Tokens" 09a5 03f3 | | .STRTAB 0x03f3->0x0b9e ; "Remote_Machine_ID specified is the Machine_ID for this machine." 09a6 0430 | 0 | .STRTAB 0x0430->0x0bbe ; "This machine has accepted tokens today; it may not also give them up" 09a7 0472 | r | .STRTAB 0x0472->0x0be0 ; "Set_Site" 09a8 0478 | x | .STRTAB 0x0478->0x0be4 ; "Code (" 09a9 047c | | | .STRTAB 0x047c->0x0be7 ; ") does not correspond to Site (" 09aa 0499 | | .STRTAB 0x0499->0x0bf6 ; ")." 09ab 0499 | | .STRTAB 0x0499->0x0bf7 ; "Site set to " 09ac 04a3 | | .STRTAB 0x04a3->0x0bfd ; "Convert_Tokens" 09ad 04af | | .STRTAB 0x04af->0x0c04 ; "The token count for the current product (" 09ae 04d6 | | .STRTAB 0x04d6->0x0c19 ; ") is NOT equal to Token_Count parameter (" 09af 04fd | | .STRTAB 0x04fd->0x0c2d ; "The code provided does NOT match the request being made. This might be caused by a transcription error of the code, current product, new product, or the Machine ID of this machine (" 09b0 05b1 | | .STRTAB 0x05b1->0x0c88 ; " has no more tokens." 09b1 05c3 | | .STRTAB 0x05c3->0x0c92 ; "Allow_Token_Conversion" 09b2 05d7 | | .STRTAB 0x05d7->0x0c9d ; "Must be run from a Rational site." 09b3 05f6 | | .STRTAB 0x05f6->0x0cae ; "Assign_Tokens" 09b4 0601 | | .STRTAB 0x0601->0x0cb4 ; "Assign_Site" 09b5 060a | | .STRTAB 0x060a->0x0cba ; "Run the following on the remote machine:" 09b6 0630 | 0 | .STRTAB 0x0630->0x0cce ; "Site" 09b7 0632 | 2 | .STRTAB 0x0632->0x0cd0 ; "Code" 09b8 0634 | 4 | .STRTAB 0x0634->0x0cd2 ; "Training" 09b9 063a | : | .STRTAB 0x063a->0x0cd6 ; "Training_Authorization" 09ba 064e | N | .STRTAB 0x064e->0x0ce1 ; "Product and Token authorization checking has been reinstated." 09bb 0689 | | .STRTAB 0x0689->0x0cff ; "Authorization_Checking_Reinstated" 09bc 06a8 | | .STRTAB 0x06a8->0x0d10 ; "Product and Token authorization checking has been suspended to allow training to proceed. Checking will be re-instated the next time the machine boots or by exectuting this procedure with Enable => False." 09bd 0773 | s | .STRTAB 0x0773->0x0d76 ; "Authorization_Checking_Suspended" 09be 0791 | | .STRTAB 0x0791->0x0d86 ; "The code provided is NOT correct for this purpose, on this machine, and for today's date. Please check for transcription errors or contact your Rational representative." 09bf 0838 | 8 | .STRTAB 0x0838->0x0ddb ; "Authorization_Code_Error" 09c0 084e | N | .STRTAB 0x084e->0x0de7 ; "/" 09c1 084d | M | .STRTAB 0x084d->0x0de7 ; "=" 09c2 084c | L | .STRTAB 0x084c->0x0de8 ; "|" 09c3 084b | K | .STRTAB 0x084b->0x0de8 ; "Product" 09c4 0850 | P | .STRTAB 0x0850->0x0dec ; "Donation" 09c5 0856 | V | .STRTAB 0x0856->0x0df0 ; "Resulting_Count" 09c6 0863 | c | .STRTAB 0x0863->0x0df7 ; "Authorization" 09c7 086e | n | .STRTAB 0x086e->0x0dfe ; "Current_Product" 09c8 087b | { | .STRTAB 0x087b->0x0e05 ; "New_Product" 09c9 0884 | | .STRTAB 0x0884->0x0e0b ; "Token_Count" 09ca 088d | | .STRTAB 0x088d->0x0e10 ; "The legal range of " 09cb 089e | | .STRTAB 0x089e->0x0e1a ; " for " 09cc 08a1 | | .STRTAB 0x08a1->0x0e1c ; " is " 09cd 08a3 | | .STRTAB 0x08a3->0x0e1e ; ".." 09ce 08a3 | | .STRTAB 0x08a3->0x0e1f ; ", but the value specified (" 09cf 08bc | | .STRTAB 0x08bc->0x0e2d ; ") is outside that range" 09d0 08d1 | | .STRTAB 0x08d1->0x0e38 ; "Product name not specified." 09d1 08ea | | .STRTAB 0x08ea->0x0e46 ; "Product name contains an illegal character (" 09d2 0914 | | .STRTAB 0x0914->0x0e5c ; "Product name includes leading or trailing blanks." 09d3 0943 | C | .STRTAB 0x0943->0x0e74 ; "Site name not specified." 09d4 0959 | Y | .STRTAB 0x0959->0x0e80 ; "Site name contains an illegal character (" 09d5 0980 | | .STRTAB 0x0980->0x0e95 ; "Site name includes leading or trailing blanks." 09d6 09ac | | .STRTAB 0x09ac->0x0eac ; "Date contains an illegal character (" 09d7 09ce | | .STRTAB 0x09ce->0x0ebe ; "The number of tokens (" 09d8 09e2 | | .STRTAB 0x09e2->0x0ec9 ; ") for " 09d9 09e6 | | .STRTAB 0x09e6->0x0ecc ; " exceeds the target authorization (" 09da 0a07 | | .STRTAB 0x0a07->0x0edd ; "Cannot specify both authorization and date for " 09db 0a34 | 4 | .STRTAB 0x0a34->0x0ef5 ; "There are currently no tokens for " 09dc 0a54 | T | .STRTAB 0x0a54->0x0f06 ; ", so they can't be donated." 09dd 0a6d | m | .STRTAB 0x0a6d->0x0f13 ; "The requested donation (" 09de 0a83 | | .STRTAB 0x0a83->0x0f1f ; "exceeds the current limit (" 09df 0a9c | | .STRTAB 0x0a9c->0x0f2d ; "Donation of " 09e0 0aa6 | | .STRTAB 0x0aa6->0x0f33 ; " tokens for " 09e1 0ab0 | | .STRTAB 0x0ab0->0x0f39 ; " would transfer tokens currently in use." 09e2 0ad6 | | .STRTAB 0x0ad6->0x0f4d ; " has resulted in " 09e3 0ae5 | | .STRTAB 0x0ae5->0x0f55 ; " tokens." 09e4 0aeb | | .STRTAB 0x0aeb->0x0f59 ; "1/1/90" 09e5 0aef | | .STRTAB 0x0aef->0x0f5c ; "Date (" 09e6 0af3 | | .STRTAB 0x0af3->0x0f5f ; ") doesn't represent a legal date." 09e7 0b12 | | .STRTAB 0x0b12->0x0f70 ; "Active tokens for " 09e8 0b22 | " | .STRTAB 0x0b22->0x0f79 ; " make it impossible to accept tokens for " 09e9 0b49 | I | .STREND 0x0b49->0x0f8d 09ea 4c6f 6769 |Logi| .STRTAB_STRINGS 0f8e 0000 0000 | | .XXX[0x2] 0f90 ; -------------------------------------------------------------------------------------- 0f90 ; Debug Table 0f90 ; -------------------------------------------------------------------------------------- 0f90 0004 000e | | .DEBUG4 0x0004,0x000e,0xcedd,0x0000,0x0001,0x0000 0f96 0000 0000 | | .BLANK 0000[0x9] 0f9f 00bf 801e | | .XXX[0x1d] 0fa1 3f00 00a3 |? | 0fa3 4494 0001 |D | 0fa5 0014 000b | | 0fa7 3000 000c |0 | 0fa9 6f04 0000 |o | 0fab 2000 0000 | | 0fad 7002 8000 |p | 0faf 0051 0000 | Q | 0fb1 0020 0000 | | 0fb3 0110 0000 | | 0fb5 0000 8000 | | 0fb7 0005 2000 | | 0fb9 0103 a473 | s| 0fbb 8000 | | 0fbc 0000 0000 | | .BLANK 0000[0x44]