|
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: 2048 (0x800) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03b8fe
└─⟦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 0290 | | .CONST 0x0290 ; 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 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0055 | U | .CONST 0x0055 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0020 | | .CONST 0x0020 ; Number of locals 000b INIT_0008: 000b 029a 005b | [| Declare_Subprogram INIT_0058,For_Outer_Call,Visible,Unelaborated 000d 029a 0063 | c| Declare_Subprogram INIT_0060,For_Outer_Call,Visible,Unelaborated 000f 029a 006b | k| Declare_Subprogram INIT_0068,For_Outer_Call,Visible,Unelaborated 0011 029a 0073 | s| Declare_Subprogram INIT_0070,For_Outer_Call,Visible,Unelaborated 0013 029a 007b | {| Declare_Subprogram INIT_0078,For_Outer_Call,Visible,Unelaborated 0015 029a 009b | | Declare_Subprogram INIT_0098,For_Outer_Call,Visible,Unelaborated 0017 029a 00bb | | Declare_Subprogram INIT_00b8,For_Outer_Call,Visible,Unelaborated 0019 029a 00cb | | Declare_Subprogram INIT_00c8,For_Outer_Call,Visible,Unelaborated 001b 029a 00fb | | Declare_Subprogram INIT_00f8,For_Outer_Call,Visible,Unelaborated 001d 029a 0133 | 3| Declare_Subprogram INIT_0130,For_Outer_Call,Visible,Unelaborated 001f 00bf | | Action Accept_Activation 0020 0092 024a | J| Action Push_String_Extended,0x24a ; "Login_Limit_Transfer.Donate_Time" 0022 0092 024b | K| Action Push_String_Extended,0x24b ; "Login_Limit_Transfer.Accept_Time" 0024 0092 024c | L| Action Push_String_Extended,0x24c ; "Site_Name" 0026 0092 024d | M| Action Push_String_Extended,0x24d ; "Authorization_Code.History" 0028 e001 | | Load 0x0,0x1 0029 e002 | | Load 0x0,0x2 002a e003 | | Load 0x0,0x3 002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd 002c e004 | | Load 0x0,0x4 002d 1b14 | | Execute Package,Field_Read,Field_Number 0x14 002e 0387 | | Declare_Variable Package 002f 00d8 | | Load_Top At_Offset_0 0030 020f | | Execute Module,Activate 0031 e005 | | Load 0x0,0x5 0032 e006 | | Load 0x0,0x6 0033 00e9 | | Load_Encached String_Cache 0034 e004 | | Load 0x0,0x4 0035 1b14 | | Execute Package,Field_Read,Field_Number 0x14 0036 0387 | | Declare_Variable Package 0037 00d8 | | Load_Top At_Offset_0 0038 020f | | Execute Module,Activate 0039 029d 0153 | S| Declare_Subprogram INIT_0150,For_Outer_Call 003b 029d 0183 | | Declare_Subprogram INIT_0180,For_Outer_Call 003d 1d0d | | Execute_Immediate Reference_Lex_1,0xd 003e 00c7 | | Action Elaborate_Subprogram 003f 1d0e | | Execute_Immediate Reference_Lex_1,0xe 0040 00c7 | | Action Elaborate_Subprogram 0041 1d0f | | Execute_Immediate Reference_Lex_1,0xf 0042 00c7 | | Action Elaborate_Subprogram 0043 1d10 | | Execute_Immediate Reference_Lex_1,0x10 0044 00c7 | | Action Elaborate_Subprogram 0045 029d 01a3 | | Declare_Subprogram INIT_01a0,For_Outer_Call 0047 029d 01b3 | | Declare_Subprogram INIT_01b0,For_Outer_Call 0049 1d11 | | Execute_Immediate Reference_Lex_1,0x11 004a 00c7 | | Action Elaborate_Subprogram 004b 1d12 | | Execute_Immediate Reference_Lex_1,0x12 004c 00c7 | | Action Elaborate_Subprogram 004d 1d13 | | Execute_Immediate Reference_Lex_1,0x13 004e 00c7 | | Action Elaborate_Subprogram 004f 1d14 | | Execute_Immediate Reference_Lex_1,0x14 0050 00c7 | | Action Elaborate_Subprogram 0051 1d15 | | Execute_Immediate Reference_Lex_1,0x15 0052 00c7 | | Action Elaborate_Subprogram 0053 1d16 | | Execute_Immediate Reference_Lex_1,0x16 0054 00c7 | | Action Elaborate_Subprogram 0055 BODY_0008: 0055 00bc | | Action Signal_Activated 0056 00bb | | Action Signal_Completion 0057 0000 | | .XXX[0x1] 0058 ; -------------------------------------------------------------------------------------- 0058 ; SUBPROGRAM 0058 ; -------------------------------------------------------------------------------------- 0058 005b | [ | .CONST 0x005b ; Address of begin 0059 0004 | | .CONST 0x0004 ; Address of exception handler 005a 0001 | | .CONST 0x0001 ; Number of locals 005b BODY_0058: 005b INIT_0058: 005b e218 | | Load 0x1,0x18 005c 821d | | Call 0x1,0x1d 005d 00ca | | Action Exit_Nullary_Function 005e 0000 0000 | | .XXX[0x2] 0060 ; -------------------------------------------------------------------------------------- 0060 ; SUBPROGRAM 0060 ; -------------------------------------------------------------------------------------- 0060 0063 | c | .CONST 0x0063 ; Address of begin 0061 0004 | | .CONST 0x0004 ; Address of exception handler 0062 0001 | | .CONST 0x0001 ; Number of locals 0063 BODY_0060: 0063 INIT_0060: 0063 e217 | | Load 0x1,0x17 0064 821d | | Call 0x1,0x1d 0065 00ca | | Action Exit_Nullary_Function 0066 0000 0000 | | .XXX[0x2] 0068 ; -------------------------------------------------------------------------------------- 0068 ; SUBPROGRAM 0068 ; -------------------------------------------------------------------------------------- 0068 006b | k | .CONST 0x006b ; Address of begin 0069 0004 | | .CONST 0x0004 ; Address of exception handler 006a 0001 | | .CONST 0x0001 ; Number of locals 006b BODY_0068: 006b INIT_0068: 006b e5ff | | Load 0x2,-0x1 006c e218 | | Load 0x1,0x18 006d 821e | | Call 0x1,0x1e 006e 4502 |E | Exit_Suprogram New_Top_Offset 0x2 006f 0000 | | .XXX[0x1] 0070 ; -------------------------------------------------------------------------------------- 0070 ; SUBPROGRAM 0070 ; -------------------------------------------------------------------------------------- 0070 0073 | s | .CONST 0x0073 ; Address of begin 0071 0004 | | .CONST 0x0004 ; Address of exception handler 0072 0001 | | .CONST 0x0001 ; Number of locals 0073 BODY_0070: 0073 INIT_0070: 0073 e5ff | | Load 0x2,-0x1 0074 e217 | | Load 0x1,0x17 0075 821e | | Call 0x1,0x1e 0076 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0077 0000 | | .XXX[0x1] 0078 ; -------------------------------------------------------------------------------------- 0078 ; SUBPROGRAM 0078 ; -------------------------------------------------------------------------------------- 0078 0080 | | .CONST 0x0080 ; Address of begin 0079 0004 | | .CONST 0x0004 ; Address of exception handler 007a 0002 | | .CONST 0x0002 ; Number of locals 007b INIT_0078: 007b e004 | | Load 0x0,0x4 007c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 007d 02c7 | | Declare_Variable Any 007e 00d8 | | Load_Top At_Offset_0 007f 1c00 | | Execute_Immediate Run_Utility,0x0 0080 BODY_0078: 0080 00d8 | | Load_Top At_Offset_0 0081 4865 |He | Short_Literal 0x65 0082 e219 | | Load 0x1,0x19 0083 4801 |H | Short_Literal 0x1 0084 e004 | | Load 0x0,0x4 0085 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0086 c402 | | Store 0x2,0x2 0087 e5ff | | Load 0x2,-0x1 0088 e402 | | Load 0x2,0x2 0089 e21c | | Load 0x1,0x1c 008a 1811 | | Execute Package,Field_Execute,Field_Number 0x11 008b e5ff | | Load 0x2,-0x1 008c 8220 | | Call 0x1,0x20 008d e402 | | Load 0x2,0x2 008e e21c | | Load 0x1,0x1c 008f 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0090 00d8 | | Load_Top At_Offset_0 0091 4801 |H | Short_Literal 0x1 0092 e004 | | Load 0x0,0x4 0093 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0094 c402 | | Store 0x2,0x2 0095 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0096 0000 0000 | | .XXX[0x2] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 00a8 | | .CONST 0x00a8 ; Address of begin 0099 00b1 | | .CONST 0x00b1 ; Address of exception handler 009a 0004 | | .CONST 0x0004 ; Number of locals 009b INIT_0098: 009b e004 | | Load 0x0,0x4 009c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 009d 02c7 | | Declare_Variable Any 009e 00d8 | | Load_Top At_Offset_0 009f 1c00 | | Execute_Immediate Run_Utility,0x0 00a0 e003 | | Load 0x0,0x3 00a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00a2 02c7 | | Declare_Variable Any 00a3 e007 | | Load 0x0,0x7 00a4 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 00a5 a403 | | Store_Unchecked 0x2,0x3 00a6 029f 01c3 | | Declare_Subprogram INIT_01c0,For_Call 00a8 BODY_0098: 00a8 e402 | | Load 0x2,0x2 00a9 4865 |He | Short_Literal 0x65 00aa e219 | | Load 0x1,0x19 00ab 4800 |H | Short_Literal 0x0 00ac e004 | | Load 0x0,0x4 00ad 1810 | | Execute Package,Field_Execute,Field_Number 0x10 00ae c402 | | Store 0x2,0x2 00af 8404 | | Call 0x2,0x4 00b0 0831 | 1 | Execute_Immediate Raise,0x31 00b1 TRAP_0098: 00b1 0007 | | Action Break_Optional 00b2 00ea | | Load_Encached Null_String_Cache 00b3 00ca | | Action Exit_Nullary_Function 00b4 0000 0000 | | .BLANK 0000[0x4] 00b8 ; -------------------------------------------------------------------------------------- 00b8 ; SUBPROGRAM 00b8 ; -------------------------------------------------------------------------------------- 00b8 00bb | | .CONST 0x00bb ; Address of begin 00b9 0004 | | .CONST 0x0004 ; Address of exception handler 00ba 0001 | | .CONST 0x0001 ; Number of locals 00bb BODY_00b8: 00bb INIT_00b8: 00bb 4801 |H | Short_Literal 0x1 00bc 8212 | | Call 0x1,0x12 00bd 0092 024e | N| Action Push_String_Extended,0x24e ; "rational" 00bf e008 | | Load 0x0,0x8 00c0 181d | | Execute Package,Field_Execute,Field_Number 0x1d 00c1 0e00 | | Execute_Immediate Not_Equal,0x0 00c2 00ca | | Action Exit_Nullary_Function 00c3 0000 0000 | | .BLANK 0000[0x5] 00c8 ; -------------------------------------------------------------------------------------- 00c8 ; SUBPROGRAM 00c8 ; -------------------------------------------------------------------------------------- 00c8 00e0 | | .CONST 0x00e0 ; Address of begin 00c9 00f3 | | .CONST 0x00f3 ; Address of exception handler 00ca 0009 | | .CONST 0x0009 ; Number of locals 00cb INIT_00c8: 00cb e004 | | Load 0x0,0x4 00cc 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00cd 02c7 | | Declare_Variable Any 00ce 00d8 | | Load_Top At_Offset_0 00cf 1c00 | | Execute_Immediate Run_Utility,0x0 00d0 e004 | | Load 0x0,0x4 00d1 1b0f | | Execute Package,Field_Read,Field_Number 0xf 00d2 02c7 | | Declare_Variable Any 00d3 00d8 | | Load_Top At_Offset_0 00d4 1c00 | | Execute_Immediate Run_Utility,0x0 00d5 00e1 | | Load_Encached Boolean_Cache 00d6 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 00d7 03e9 | | Declare_Variable Discrete,Duplicate 00d8 029f 01db | | Declare_Subprogram INIT_01d8,For_Call 00da 029f 01f3 | | Declare_Subprogram INIT_01f0,For_Call 00dc 029f 020b | | Declare_Subprogram INIT_0208,For_Call 00de 029f 022b | +| Declare_Subprogram INIT_0228,For_Call 00e0 BODY_00c8: 00e0 e5ff | | Load 0x2,-0x1 00e1 01db | | Execute Vector,Length 00e2 6803 |h | Jump_Zero 0xe6 00e3 e5fe | | Load 0x2,-0x2 00e4 01db | | Execute Vector,Length 00e5 7002 |p | Jump_Nonzero 0xe8 00e6 4800 |H | Short_Literal 0x0 00e7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00e8 8409 | | Call 0x2,0x9 00e9 8406 | | Call 0x2,0x6 00ea 8406 | | Call 0x2,0x6 00eb 8408 | | Call 0x2,0x8 00ec e403 | | Load 0x2,0x3 00ed 4801 |H | Short_Literal 0x1 00ee e004 | | Load 0x0,0x4 00ef 1811 | | Execute Package,Field_Execute,Field_Number 0x11 00f0 c403 | | Store 0x2,0x3 00f1 4801 |H | Short_Literal 0x1 00f2 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f3 TRAP_00c8: 00f3 0007 | | Action Break_Optional 00f4 4800 |H | Short_Literal 0x0 00f5 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f6 0000 0000 | | .XXX[0x2] 00f8 ; -------------------------------------------------------------------------------------- 00f8 ; SUBPROGRAM 00f8 ; -------------------------------------------------------------------------------------- 00f8 0104 | | .CONST 0x0104 ; Address of begin 00f9 0004 | | .CONST 0x0004 ; Address of exception handler 00fa 0005 | | .CONST 0x0005 ; Number of locals 00fb INIT_00f8: 00fb 00e7 | | Load_Encached Duration_Cache 00fc 00e1 | | Load_Encached Boolean_Cache 00fd 03e9 | | Declare_Variable Discrete,Duplicate 00fe 0092 024f | O| Action Push_String_Extended,0x24f ; "Snapshot" 0100 e009 | | Load 0x0,0x9 0101 1817 | | Execute Package,Field_Execute,Field_Number 0x17 0102 00e7 | | Load_Encached Duration_Cache 0103 03f1 | | Declare_Variable Discrete,With_Value 0104 BODY_00f8: 0104 00e1 | | Load_Encached Boolean_Cache 0105 00e1 | | Load_Encached Boolean_Cache 0106 00e7 | | Load_Encached Duration_Cache 0107 e009 | | Load 0x0,0x9 0108 1822 | " | Execute Package,Field_Execute,Field_Number 0x22 0109 c402 | | Store 0x2,0x2 010a c403 | | Store 0x2,0x3 010b c404 | | Store 0x2,0x4 010c 4800 |H | Short_Literal 0x0 010d e009 | | Load 0x0,0x9 010e 181e | | Execute Package,Field_Execute,Field_Number 0x1e 010f 4801 |H | Short_Literal 0x1 0110 e009 | | Load 0x0,0x9 0111 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0112 4801 |H | Short_Literal 0x1 0113 e009 | | Load 0x0,0x9 0114 1820 | | Execute Package,Field_Execute,Field_Number 0x20 0115 00ea | | Load_Encached Null_String_Cache 0116 e405 | | Load 0x2,0x5 0117 00d8 | | Load_Top At_Offset_0 0118 0092 024f | O| Action Push_String_Extended,0x24f ; "Snapshot" 011a e009 | | Load 0x0,0x9 011b 180f | | Execute Package,Field_Execute,Field_Number 0xf 011c 0092 0250 | P| Action Push_String_Extended,0x250 ; "<PROFILE>" 011e 0092 024f | O| Action Push_String_Extended,0x24f ; "Snapshot" 0120 e009 | | Load 0x0,0x9 0121 180e | | Execute Package,Field_Execute,Field_Number 0xe 0122 e402 | | Load 0x2,0x2 0123 e009 | | Load 0x0,0x9 0124 181e | | Execute Package,Field_Execute,Field_Number 0x1e 0125 e403 | | Load 0x2,0x3 0126 e009 | | Load 0x0,0x9 0127 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0128 e404 | | Load 0x2,0x4 0129 e009 | | Load 0x0,0x9 012a 1820 | | Execute Package,Field_Execute,Field_Number 0x20 012b 4501 |E | Exit_Suprogram New_Top_Offset 0x1 012c 0000 0000 | | .BLANK 0000[0x4] 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0135 | 5 | .CONST 0x0135 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0002 | | .CONST 0x0002 ; Number of locals 0133 INIT_0130: 0133 029f 023b | ;| Declare_Subprogram INIT_0238,For_Call 0135 BODY_0130: 0135 e219 | | Load 0x1,0x19 0136 e004 | | Load 0x0,0x4 0137 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0138 e217 | | Load 0x1,0x17 0139 e004 | | Load 0x0,0x4 013a 1812 | | Execute Package,Field_Execute,Field_Number 0x12 013b e218 | | Load 0x1,0x18 013c e004 | | Load 0x0,0x4 013d 1812 | | Execute Package,Field_Execute,Field_Number 0x12 013e e21a | | Load 0x1,0x1a 013f e004 | | Load 0x0,0x4 0140 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0141 00cf | | Action Mark_Auxiliary 0142 e00a | | Load 0x0,0xa 0143 1819 | | Execute Package,Field_Execute,Field_Number 0x19 0144 4801 |H | Short_Literal 0x1 0145 0263 | c | Execute Discrete,Above_Bound 0146 7003 |p | Jump_Nonzero 0x14a 0147 8402 | | Call 0x2,0x2 0148 00c8 | | Action Pop_Auxiliary_Range 0149 3ffd |? | Loop_Increasing 0x147 014a 4501 |E | Exit_Suprogram New_Top_Offset 0x1 014b 0000 0000 | | .BLANK 0000[0x5] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 015e | ^ | .CONST 0x015e ; Address of begin 0151 0176 | v | .CONST 0x0176 ; Address of exception handler 0152 0003 | | .CONST 0x0003 ; Number of locals 0153 INIT_0150: 0153 e004 | | Load 0x0,0x4 0154 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0155 02c7 | | Declare_Variable Any 0156 00d8 | | Load_Top At_Offset_0 0157 1c00 | | Execute_Immediate Run_Utility,0x0 0158 e003 | | Load 0x0,0x3 0159 1b0d | | Execute Package,Field_Read,Field_Number 0xd 015a 02c7 | | Declare_Variable Any 015b e007 | | Load 0x0,0x7 015c 182a | * | Execute Package,Field_Execute,Field_Number 0x2a 015d a403 | | Store_Unchecked 0x2,0x3 015e BODY_0150: 015e e402 | | Load 0x2,0x2 015f 4865 |He | Short_Literal 0x65 0160 e5ff | | Load 0x2,-0x1 0161 4800 |H | Short_Literal 0x0 0162 e004 | | Load 0x0,0x4 0163 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0164 c402 | | Store 0x2,0x2 0165 4801 |H | Short_Literal 0x1 0166 e402 | | Load 0x2,0x2 0167 e004 | | Load 0x0,0x4 0168 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0169 7005 |p | Jump_Nonzero 0x16f 016a 4800 |H | Short_Literal 0x0 016b e402 | | Load 0x2,0x2 016c e21b | | Load 0x1,0x1b 016d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 016e c403 | | Store 0x2,0x3 016f e402 | | Load 0x2,0x2 0170 4801 |H | Short_Literal 0x1 0171 e004 | | Load 0x0,0x4 0172 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0173 c402 | | Store 0x2,0x2 0174 00d8 | | Load_Top At_Offset_0 0175 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0176 TRAP_0150: 0176 0007 | | Action Break_Optional 0177 e403 | | Load 0x2,0x3 0178 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0179 0000 0000 | | .BLANK 0000[0x7] 0180 ; -------------------------------------------------------------------------------------- 0180 ; SUBPROGRAM 0180 ; -------------------------------------------------------------------------------------- 0180 0188 | | .CONST 0x0188 ; Address of begin 0181 0004 | | .CONST 0x0004 ; Address of exception handler 0182 0002 | | .CONST 0x0002 ; Number of locals 0183 INIT_0180: 0183 e004 | | Load 0x0,0x4 0184 1b0f | | Execute Package,Field_Read,Field_Number 0xf 0185 02c7 | | Declare_Variable Any 0186 00d8 | | Load_Top At_Offset_0 0187 1c00 | | Execute_Immediate Run_Utility,0x0 0188 BODY_0180: 0188 00d8 | | Load_Top At_Offset_0 0189 4865 |He | Short_Literal 0x65 018a e5ff | | Load 0x2,-0x1 018b 4801 |H | Short_Literal 0x1 018c e004 | | Load 0x0,0x4 018d 1810 | | Execute Package,Field_Execute,Field_Number 0x10 018e c402 | | Store 0x2,0x2 018f e5fe | | Load 0x2,-0x2 0190 e402 | | Load 0x2,0x2 0191 e21b | | Load 0x1,0x1b 0192 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0193 00d8 | | Load_Top At_Offset_0 0194 4801 |H | Short_Literal 0x1 0195 e004 | | Load 0x0,0x4 0196 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0197 c402 | | Store 0x2,0x2 0198 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0199 0000 0000 | | .BLANK 0000[0x7] 01a0 ; -------------------------------------------------------------------------------------- 01a0 ; SUBPROGRAM 01a0 ; -------------------------------------------------------------------------------------- 01a0 01a3 | | .CONST 0x01a3 ; Address of begin 01a1 0004 | | .CONST 0x0004 ; Address of exception handler 01a2 0001 | | .CONST 0x0001 ; Number of locals 01a3 BODY_01a0: 01a3 INIT_01a0: 01a3 4801 |H | Short_Literal 0x1 01a4 e5ff | | Load 0x2,-0x1 01a5 e004 | | Load 0x0,0x4 01a6 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01a7 7005 |p | Jump_Nonzero 0x1ad 01a8 4800 |H | Short_Literal 0x0 01a9 e5ff | | Load 0x2,-0x1 01aa e21c | | Load 0x1,0x1c 01ab 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01ac 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ad 0831 | 1 | Execute_Immediate Raise,0x31 01ae 0000 0000 | | .XXX[0x2] 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 00ea | | Load_Encached Null_String_Cache 01b4 e00b | | Load 0x0,0xb 01b5 181c | | Execute Package,Field_Execute,Field_Number 0x1c 01b6 e5ff | | Load 0x2,-0x1 01b7 e00c | | Load 0x0,0xc 01b8 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01b9 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 01ba 0000 0000 | | .BLANK 0000[0x6] 01c0 ; -------------------------------------------------------------------------------------- 01c0 ; SUBPROGRAM 01c0 ; -------------------------------------------------------------------------------------- 01c0 01c7 | | .CONST 0x01c7 ; Address of begin 01c1 0004 | | .CONST 0x0004 ; Address of exception handler 01c2 0003 | | .CONST 0x0003 ; Number of locals 01c3 INIT_01c0: 01c3 e402 | | Load 0x2,0x2 01c4 821f | | Call 0x1,0x1f 01c5 e402 | | Load 0x2,0x2 01c6 821f | | Call 0x1,0x1f 01c7 BODY_01c0: 01c7 e402 | | Load 0x2,0x2 01c8 4801 |H | Short_Literal 0x1 01c9 e004 | | Load 0x0,0x4 01ca 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01cb c402 | | Store 0x2,0x2 01cc 00d8 | | Load_Top At_Offset_0 01cd e602 | | Load 0x3,0x2 01ce 8220 | | Call 0x1,0x20 01cf 01df | | Execute Vector,Equal 01d0 6803 |h | Jump_Zero 0x1d4 01d1 e602 | | Load 0x3,0x2 01d2 00cb | | Action Pop_Block_With_Result 01d3 00ca | | Action Exit_Nullary_Function 01d4 00ea | | Load_Encached Null_String_Cache 01d5 00cb | | Action Pop_Block_With_Result 01d6 00ca | | Action Exit_Nullary_Function 01d7 0000 | | .XXX[0x1] 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01db | | .CONST 0x01db ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0001 | | .CONST 0x0001 ; Number of locals 01db BODY_01d8: 01db INIT_01d8: 01db e404 | | Load 0x2,0x4 01dc 6811 |h | Jump_Zero 0x1ee 01dd 4801 |H | Short_Literal 0x1 01de e402 | | Load 0x2,0x2 01df e004 | | Load 0x0,0x4 01e0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 01e1 7005 |p | Jump_Nonzero 0x1e7 01e2 4800 |H | Short_Literal 0x0 01e3 e402 | | Load 0x2,0x2 01e4 e21c | | Load 0x1,0x1c 01e5 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01e6 00ca | | Action Exit_Nullary_Function 01e7 4800 |H | Short_Literal 0x0 01e8 a404 | | Store_Unchecked 0x2,0x4 01e9 e402 | | Load 0x2,0x2 01ea 4801 |H | Short_Literal 0x1 01eb e004 | | Load 0x0,0x4 01ec 1811 | | Execute Package,Field_Execute,Field_Number 0x11 01ed c402 | | Store 0x2,0x2 01ee 00ea | | Load_Encached Null_String_Cache 01ef 00ca | | Action Exit_Nullary_Function 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 e405 | | Load 0x2,0x5 01f4 7009 |p | Jump_Nonzero 0x1fe 01f5 e403 | | Load 0x2,0x3 01f6 4865 |He | Short_Literal 0x65 01f7 e21a | | Load 0x1,0x1a 01f8 4801 |H | Short_Literal 0x1 01f9 e004 | | Load 0x0,0x4 01fa 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01fb c403 | | Store 0x2,0x3 01fc 4801 |H | Short_Literal 0x1 01fd a405 | | Store_Unchecked 0x2,0x5 01fe e7ff | | Load 0x3,-0x1 01ff e403 | | Load 0x2,0x3 0200 e21c | | Load 0x1,0x1c 0201 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0202 e7fe | | Load 0x3,-0x2 0203 e403 | | Load 0x2,0x3 0204 e21c | | Load 0x1,0x1c 0205 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0206 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0207 0000 | | .XXX[0x1] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b e7fe | | Load 0x3,-0x2 020c 01db | | Execute Vector,Length 020d 7004 |p | Jump_Nonzero 0x212 020e e5fe | | Load 0x2,-0x2 020f e5ff | | Load 0x2,-0x1 0210 8407 | | Call 0x2,0x7 0211 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0212 4801 |H | Short_Literal 0x1 0213 e5ff | | Load 0x2,-0x1 0214 e7fe | | Load 0x3,-0x2 0215 e008 | | Load 0x0,0x8 0216 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 0217 6808 |h | Jump_Zero 0x220 0218 4801 |H | Short_Literal 0x1 0219 e5fe | | Load 0x2,-0x2 021a e7ff | | Load 0x3,-0x1 021b e008 | | Load 0x0,0x8 021c 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 021d 6802 |h | Jump_Zero 0x220 021e e00d | | Load 0x0,0xd 021f 0257 | W | Execute Discrete,Raise 0220 8406 | | Call 0x2,0x6 0221 8406 | | Call 0x2,0x6 0222 8408 | | Call 0x2,0x8 0223 e7ff | | Load 0x3,-0x1 0224 e7fe | | Load 0x3,-0x2 0225 8407 | | Call 0x2,0x7 0226 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0227 0000 | | .XXX[0x1] 0228 ; -------------------------------------------------------------------------------------- 0228 ; SUBPROGRAM 0228 ; -------------------------------------------------------------------------------------- 0228 022b | + | .CONST 0x022b ; Address of begin 0229 0235 | 5 | .CONST 0x0235 ; Address of exception handler 022a 0001 | | .CONST 0x0001 ; Number of locals 022b BODY_0228: 022b INIT_0228: 022b e402 | | Load 0x2,0x2 022c 4865 |He | Short_Literal 0x65 022d e21a | | Load 0x1,0x1a 022e 4800 |H | Short_Literal 0x0 022f e004 | | Load 0x0,0x4 0230 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0231 c402 | | Store 0x2,0x2 0232 4801 |H | Short_Literal 0x1 0233 a404 | | Store_Unchecked 0x2,0x4 0234 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0235 TRAP_0228: 0235 0007 | | Action Break_Optional 0236 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0237 0000 | | .XXX[0x1] 0238 ; -------------------------------------------------------------------------------------- 0238 ; SUBPROGRAM 0238 ; -------------------------------------------------------------------------------------- 0238 023e | > | .CONST 0x023e ; Address of begin 0239 0004 | | .CONST 0x0004 ; Address of exception handler 023a 0002 | | .CONST 0x0002 ; Number of locals 023b INIT_0238: 023b e405 | | Load 0x2,0x5 023c e00a | | Load 0x0,0xa 023d 1818 | | Execute Package,Field_Execute,Field_Number 0x18 023e BODY_0238: 023e 00d8 | | Load_Top At_Offset_0 023f 01db | | Execute Vector,Length 0240 6808 |h | Jump_Zero 0x249 0241 4800 |H | Short_Literal 0x0 0242 e602 | | Load 0x3,0x2 0243 e00a | | Load 0x0,0xa 0244 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0245 480c |H | Short_Literal 0xc 0246 e602 | | Load 0x3,0x2 0247 e00a | | Load 0x0,0xa 0248 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0249 4501 |E | Exit_Suprogram New_Top_Offset 0x1 024a ; -------------------------------------------------------------------------------------- 024a ; STRING TABLE 024a ; -------------------------------------------------------------------------------------- 024a 0010 | | .STRTAB 0x0010->0x0252 ; "Login_Limit_Transfer.Donate_Time" 024b 002e | . | .STRTAB 0x002e->0x0262 ; "Login_Limit_Transfer.Accept_Time" 024c 004c | L | .STRTAB 0x004c->0x0272 ; "Site_Name" 024d 0053 | S | .STRTAB 0x0053->0x0276 ; "Authorization_Code.History" 024e 006b | k | .STRTAB 0x006b->0x0283 ; "rational" 024f 0071 | q | .STRTAB 0x0071->0x0287 ; "Snapshot" 0250 0077 | w | .STRTAB 0x0077->0x028b ; "<PROFILE>" 0251 007e | ~ | .STREND 0x007e->0x0290 0252 4c6f 6769 |Logi| .STRTAB_STRINGS 0290 ; -------------------------------------------------------------------------------------- 0290 ; Debug Table 0290 ; -------------------------------------------------------------------------------------- 0290 0004 000d | | .DEBUG4 0x0004,0x000d,0xec4e,0x0000,0x0001,0x0000 0296 b94d 1531 | M 1| .XXX[0x16a] 0298 150d 517d | Q}| 029a 1549 493d | II=| 029c 48e1 985c |H \| 029e 006d 48c4 | mH | 02a0 c0c0 c17d | }| 02a2 1561 0d15 | a | 02a4 4151 253d |AQ%=| 02a6 394c b941 |9L A| 02a8 4915 1115 |I | 02aa 1925 3915 | %9 | 02ac 1000 4000 | @ | 02ae 5400 04ae |T | 02b0 4c38 5c00 |L8\ | 02b2 7d48 c4c0 |}H | 02b4 c0c1 7d15 | } | 02b6 610d 1541 |a A| 02b8 5125 3d39 |Q%=9| 02ba 4cb9 4149 |L AI| 02bc 3d1d 4905 |= I | 02be 357d 1931 |5} 1| 02c0 0559 3d48 | Y=H| 02c2 5c00 1519 |\ | 02c4 2549 4d50 |%IMP| 02c6 2000 0000 | | 02c8 0000 0000 | | 02ca 0008 0000 | | 02cc 014c 0000 | L | 02ce 0158 0095 | X | 02d0 48c4 c0c0 |H | 02d2 c17d 1561 | } a| 02d4 0d15 4151 | AQ| 02d6 253d 394c |%=9L| 02d8 b941 493d | AI=| 02da 1d49 0535 | I 5| 02dc 7d15 4949 |} II| 02de 3d49 7d19 |=I} | 02e0 3105 593d |1 Y=| 02e2 48f5 ea50 |H P| 02e4 5c00 a148 |\ H| 02e6 c4c0 c0c1 | | 02e8 7d15 610d |} a | 02ea 1541 5125 | AQ%| 02ec 3d39 4cb9 |=9L | 02ee 3905 3514 |9 5 | 02f0 b919 3d49 | =I| 02f2 7d41 493d |}AI=| 02f4 1d49 0535 | I 5| 02f6 7d19 3105 |} 1 | 02f8 593d 4800 |Y=H | 02fa 0000 004c | L| 02fc 0000 0210 | | 02fe 0089 48c4 | H | 0300 c0c0 c17d | }| 0302 1561 0d15 | a | 0304 4151 253d |AQ%=| 0306 394c b939 |9L 9| 0308 5531 317d |U11}| 030a 050d 0d15 | | 030c 4d4d 7d15 |MM} | 030e 4949 3d48 |II=H| 0310 e198 5c00 | \ | 0312 6d48 c4c0 |mH | 0314 c0c1 7d15 | } | 0316 610d 1541 |a A| 0318 5125 3d39 |Q%=9| 031a 4cb9 4149 |L AI| 031c 1511 1519 | | 031e 2539 1510 |%9 | 0320 0040 0054 | @ T| 0322 0004 ae4c | L| 0324 385c 0089 |8\ | 0326 48c4 c0c0 |H | 0328 c17d 1561 | } a| 032a 0d15 4151 | AQ| 032c 253d 394c |%=9L| 032e b90d 3d39 | =9| 0330 4d51 4905 |MQI | 0332 2539 517d |%9Q}| 0334 1931 0559 | 1 Y| 0336 3d48 5c00 |=H\ | 0338 1519 2549 | %I| 033a 4d50 2000 |MP | 033c 0000 0000 | | 033e 0000 000c | | 0340 0000 0124 | $| 0342 0000 0408 | | 0344 00ad 48c4 | H | 0346 c0c0 c17d | }| 0348 1561 0d15 | a | 034a 4151 253d |AQ%=| 034c 394c b939 |9L 9| 034e 0535 14b9 | 5 | 0350 193d 497d | =I}| 0352 0d3d 394d | =9M| 0354 5149 0525 |QI %| 0356 3951 7d19 |9Q} | 0358 3105 593d |1 Y=| 035a 48ee 65b8 |H e | 035c c400 2d49 | -I| 035e 0539 1d15 | 9 | 0360 7d15 4949 |} II| 0362 3d48 c400 |=H | 0364 410d 054d |A M| 0366 157d 4905 | }I | 0368 391d 157d |9 }| 036a 1549 493d | II=| 036c 48c4 0039 |H 9| 036e 1561 413d | aA=| 0370 3915 3951 |9 9Q| 0372 7d15 4949 |} II| 0374 3d48 c400 |=H | 0376 4539 5531 |E9U1| 0378 317d 050d |1} | 037a 0d15 4d4d | MM| 037c 7d15 4949 |} II| 037e 3d48 c400 |=H | 0380 2d25 3911 |-%9 | 0382 1561 7d15 | a} | 0384 4949 3d48 |II=H| 0386 c400 3131 | 11| 0388 1539 1d51 | 9 Q| 038a 217d 1549 |!} I| 038c 493d 48c4 |I=H | 038e 0049 1125 | I %| 0390 4d0d 4925 |M I%| 0392 3525 3905 |5%9 | 0394 3951 7d15 |9Q} | 0396 4949 3d48 |II=H| 0398 c400 3559 | 5Y| 039a 0549 2505 | I% | 039c 3951 7d15 |9Q} | 039e 4949 3d48 |II=H| 03a0 c400 3119 | 1 | 03a2 0535 2531 | 5%1| 03a4 657d 1549 |e} I| 03a6 493d 48c4 |I=H | 03a8 0065 1561 | e a| 03aa 4131 250d |A1% | 03ac 2551 7d0d |%Q} | 03ae 3d39 4d51 |=9MQ| 03b0 4905 2539 |I %9| 03b2 517d 1549 |Q} I| 03b4 493d 48c4 |I=H | 03b6 001d 4d41 | MA| 03b8 0549 157c | I || 03ba c0c4 001d | | 03bc 4d41 0549 |MA I| 03be 157c c4c4 | | | 03c0 001d 4d41 | MA| 03c2 0549 157c | I || 03c4 c800 0000 | | 03c6 0028 0000 | ( | 03c8 0158 007d | X }| 03ca 48c4 c0c0 |H | 03cc c17d 1561 | } a| 03ce 0d15 4151 | AQ| 03d0 253d 394c |%=9L| 03d2 b939 5535 | 9U5| 03d4 1549 250d | I% | 03d6 7d19 3105 |} 1 | 03d8 593d 48f1 |Y=H | 03da 985c 006d | \ m| 03dc 48c4 c0c0 |H | 03de c17d 1561 | } a| 03e0 0d15 4151 | AQ| 03e2 253d 394c |%=9L| 03e4 b941 4915 | AI | 03e6 1115 1925 | %| 03e8 3915 1184 |9 | 03ea 2000 0000 | | 03ec 0000 0000 | | 03ee 0080 2000 | | 03f0 0000 0000 | | 03f2 0000 00bc | | 03f4 0000 0020 | | 03f6 0000 0118 | | 03f8 0065 48c4 | eH | 03fa c0c0 c17d | }| 03fc 1561 0d15 | a | 03fe 4151 253d |AQ%=|