|
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_03c0fe
└─⟦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 0298 | | .CONST 0x0298 ; 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 0103 | | Declare_Subprogram INIT_0100,For_Outer_Call,Visible,Unelaborated
001d 029a 013b | ;| Declare_Subprogram INIT_0138,For_Outer_Call,Visible,Unelaborated
001f 00bf | | Action Accept_Activation
0020 0092 0252 | R| Action Push_String_Extended,0x252 ; "Login_Limit_Transfer.Donate_Time"
0022 0092 0253 | S| Action Push_String_Extended,0x253 ; "Login_Limit_Transfer.Accept_Time"
0024 0092 0254 | T| Action Push_String_Extended,0x254 ; "Site_Name"
0026 0092 0255 | U| Action Push_String_Extended,0x255 ; "Authorization_Code.History"
0028 e003 | | Load 0x0,0x3
0029 e004 | | Load 0x0,0x4
002a e005 | | Load 0x0,0x5
002b 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002c e006 | | Load 0x0,0x6
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 e007 | | Load 0x0,0x7
0032 e008 | | Load 0x0,0x8
0033 00e9 | | Load_Encached String_Cache
0034 e006 | | Load 0x0,0x6
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 015b | [| Declare_Subprogram INIT_0158,For_Outer_Call
003b 029d 018b | | Declare_Subprogram INIT_0188,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 01ab | | Declare_Subprogram INIT_01a8,For_Outer_Call
0047 029d 01bb | | Declare_Subprogram INIT_01b8,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 e006 | | Load 0x0,0x6
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 e006 | | Load 0x0,0x6
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 e006 | | Load 0x0,0x6
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 e006 | | Load 0x0,0x6
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 e005 | | Load 0x0,0x5
00a1 1b0d | | Execute Package,Field_Read,Field_Number 0xd
00a2 02c7 | | Declare_Variable Any
00a3 e009 | | Load 0x0,0x9
00a4 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
00a5 a403 | | Store_Unchecked 0x2,0x3
00a6 029f 01cb | | Declare_Subprogram INIT_01c8,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 e006 | | Load 0x0,0x6
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 0256 | V| Action Push_String_Extended,0x256 ; "rational"
00bf e00a | | Load 0x0,0xa
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 00e5 | | .CONST 0x00e5 ; Address of begin
00c9 00f8 | | .CONST 0x00f8 ; Address of exception handler
00ca 000a | | .CONST 0x000a ; Number of locals
00cb INIT_00c8:
00cb 0093 0000 | | push_full_address 0x0
00cd 602e |`. | Indirect_Literal Discrete,0xfc,{0x80000000, 0x00010000}
00ce 0273 | s | Execute Discrete,Plus
00cf 0007 | | Action Break_Optional
00d0 e006 | | Load 0x0,0x6
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 e006 | | Load 0x0,0x6
00d6 1b0f | | Execute Package,Field_Read,Field_Number 0xf
00d7 02c7 | | Declare_Variable Any
00d8 00d8 | | Load_Top At_Offset_0
00d9 1c00 | | Execute_Immediate Run_Utility,0x0
00da 00e1 | | Load_Encached Boolean_Cache
00db 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
00dc 03e9 | | Declare_Variable Discrete,Duplicate
00dd 029f 01e3 | | Declare_Subprogram INIT_01e0,For_Call
00df 029f 01fb | | Declare_Subprogram INIT_01f8,For_Call
00e1 029f 0213 | | Declare_Subprogram INIT_0210,For_Call
00e3 029f 0233 | 3| Declare_Subprogram INIT_0230,For_Call
00e5 BODY_00c8:
00e5 e5ff | | Load 0x2,-0x1
00e6 01db | | Execute Vector,Length
00e7 6803 |h | Jump_Zero 0xeb
00e8 e5fe | | Load 0x2,-0x2
00e9 01db | | Execute Vector,Length
00ea 7002 |p | Jump_Nonzero 0xed
00eb 4800 |H | Short_Literal 0x0
00ec 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00ed 840a | | Call 0x2,0xa
00ee 8407 | | Call 0x2,0x7
00ef 8407 | | Call 0x2,0x7
00f0 8409 | | Call 0x2,0x9
00f1 e404 | | Load 0x2,0x4
00f2 4801 |H | Short_Literal 0x1
00f3 e006 | | Load 0x0,0x6
00f4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
00f5 c404 | | Store 0x2,0x4
00f6 4801 |H | Short_Literal 0x1
00f7 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00f8 TRAP_00c8:
00f8 0007 | | Action Break_Optional
00f9 4800 |H | Short_Literal 0x0
00fa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
00fb 0000 | | .XXX[0x1]
00fc 8000 0000 | | .LITERAL {0x80000000, 0x00010000}
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 010c | | .CONST 0x010c ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0005 | | .CONST 0x0005 ; Number of locals
0103 INIT_0100:
0103 00e7 | | Load_Encached Duration_Cache
0104 00e1 | | Load_Encached Boolean_Cache
0105 03e9 | | Declare_Variable Discrete,Duplicate
0106 0092 0257 | W| Action Push_String_Extended,0x257 ; "Snapshot"
0108 e00b | | Load 0x0,0xb
0109 1817 | | Execute Package,Field_Execute,Field_Number 0x17
010a 00e7 | | Load_Encached Duration_Cache
010b 03f1 | | Declare_Variable Discrete,With_Value
010c BODY_0100:
010c 00e1 | | Load_Encached Boolean_Cache
010d 00e1 | | Load_Encached Boolean_Cache
010e 00e7 | | Load_Encached Duration_Cache
010f e00b | | Load 0x0,0xb
0110 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0111 c402 | | Store 0x2,0x2
0112 c403 | | Store 0x2,0x3
0113 c404 | | Store 0x2,0x4
0114 4800 |H | Short_Literal 0x0
0115 e00b | | Load 0x0,0xb
0116 181e | | Execute Package,Field_Execute,Field_Number 0x1e
0117 4801 |H | Short_Literal 0x1
0118 e00b | | Load 0x0,0xb
0119 181f | | Execute Package,Field_Execute,Field_Number 0x1f
011a 4801 |H | Short_Literal 0x1
011b e00b | | Load 0x0,0xb
011c 1820 | | Execute Package,Field_Execute,Field_Number 0x20
011d 00ea | | Load_Encached Null_String_Cache
011e e405 | | Load 0x2,0x5
011f 00d8 | | Load_Top At_Offset_0
0120 0092 0257 | W| Action Push_String_Extended,0x257 ; "Snapshot"
0122 e00b | | Load 0x0,0xb
0123 180f | | Execute Package,Field_Execute,Field_Number 0xf
0124 0092 0258 | X| Action Push_String_Extended,0x258 ; "<PROFILE>"
0126 0092 0257 | W| Action Push_String_Extended,0x257 ; "Snapshot"
0128 e00b | | Load 0x0,0xb
0129 180e | | Execute Package,Field_Execute,Field_Number 0xe
012a e402 | | Load 0x2,0x2
012b e00b | | Load 0x0,0xb
012c 181e | | Execute Package,Field_Execute,Field_Number 0x1e
012d e403 | | Load 0x2,0x3
012e e00b | | Load 0x0,0xb
012f 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0130 e404 | | Load 0x2,0x4
0131 e00b | | Load 0x0,0xb
0132 1820 | | Execute Package,Field_Execute,Field_Number 0x20
0133 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0134 0000 0000 | | .BLANK 0000[0x4]
0138 ; --------------------------------------------------------------------------------------
0138 ; SUBPROGRAM
0138 ; --------------------------------------------------------------------------------------
0138 013d | = | .CONST 0x013d ; Address of begin
0139 0004 | | .CONST 0x0004 ; Address of exception handler
013a 0002 | | .CONST 0x0002 ; Number of locals
013b INIT_0138:
013b 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call
013d BODY_0138:
013d e219 | | Load 0x1,0x19
013e e006 | | Load 0x0,0x6
013f 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0140 e217 | | Load 0x1,0x17
0141 e006 | | Load 0x0,0x6
0142 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0143 e218 | | Load 0x1,0x18
0144 e006 | | Load 0x0,0x6
0145 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0146 e21a | | Load 0x1,0x1a
0147 e006 | | Load 0x0,0x6
0148 1812 | | Execute Package,Field_Execute,Field_Number 0x12
0149 00cf | | Action Mark_Auxiliary
014a e00c | | Load 0x0,0xc
014b 1819 | | Execute Package,Field_Execute,Field_Number 0x19
014c 4801 |H | Short_Literal 0x1
014d 0263 | c | Execute Discrete,Above_Bound
014e 7003 |p | Jump_Nonzero 0x152
014f 8402 | | Call 0x2,0x2
0150 00c8 | | Action Pop_Auxiliary_Range
0151 3ffd |? | Loop_Increasing 0x14f
0152 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0153 0000 0000 | | .BLANK 0000[0x5]
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 0166 | f | .CONST 0x0166 ; Address of begin
0159 017e | ~ | .CONST 0x017e ; Address of exception handler
015a 0003 | | .CONST 0x0003 ; Number of locals
015b INIT_0158:
015b e006 | | Load 0x0,0x6
015c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
015d 02c7 | | Declare_Variable Any
015e 00d8 | | Load_Top At_Offset_0
015f 1c00 | | Execute_Immediate Run_Utility,0x0
0160 e005 | | Load 0x0,0x5
0161 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0162 02c7 | | Declare_Variable Any
0163 e009 | | Load 0x0,0x9
0164 182a | * | Execute Package,Field_Execute,Field_Number 0x2a
0165 a403 | | Store_Unchecked 0x2,0x3
0166 BODY_0158:
0166 e402 | | Load 0x2,0x2
0167 4865 |He | Short_Literal 0x65
0168 e5ff | | Load 0x2,-0x1
0169 4800 |H | Short_Literal 0x0
016a e006 | | Load 0x0,0x6
016b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
016c c402 | | Store 0x2,0x2
016d 4801 |H | Short_Literal 0x1
016e e402 | | Load 0x2,0x2
016f e006 | | Load 0x0,0x6
0170 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0171 7005 |p | Jump_Nonzero 0x177
0172 4800 |H | Short_Literal 0x0
0173 e402 | | Load 0x2,0x2
0174 e21b | | Load 0x1,0x1b
0175 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0176 c403 | | Store 0x2,0x3
0177 e402 | | Load 0x2,0x2
0178 4801 |H | Short_Literal 0x1
0179 e006 | | Load 0x0,0x6
017a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
017b c402 | | Store 0x2,0x2
017c 00d8 | | Load_Top At_Offset_0
017d 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
017e TRAP_0158:
017e 0007 | | Action Break_Optional
017f e403 | | Load 0x2,0x3
0180 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0181 0000 0000 | | .BLANK 0000[0x7]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 0190 | | .CONST 0x0190 ; Address of begin
0189 0004 | | .CONST 0x0004 ; Address of exception handler
018a 0002 | | .CONST 0x0002 ; Number of locals
018b INIT_0188:
018b e006 | | Load 0x0,0x6
018c 1b0f | | Execute Package,Field_Read,Field_Number 0xf
018d 02c7 | | Declare_Variable Any
018e 00d8 | | Load_Top At_Offset_0
018f 1c00 | | Execute_Immediate Run_Utility,0x0
0190 BODY_0188:
0190 00d8 | | Load_Top At_Offset_0
0191 4865 |He | Short_Literal 0x65
0192 e5ff | | Load 0x2,-0x1
0193 4801 |H | Short_Literal 0x1
0194 e006 | | Load 0x0,0x6
0195 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0196 c402 | | Store 0x2,0x2
0197 e5fe | | Load 0x2,-0x2
0198 e402 | | Load 0x2,0x2
0199 e21b | | Load 0x1,0x1b
019a 1811 | | Execute Package,Field_Execute,Field_Number 0x11
019b 00d8 | | Load_Top At_Offset_0
019c 4801 |H | Short_Literal 0x1
019d e006 | | Load 0x0,0x6
019e 1811 | | Execute Package,Field_Execute,Field_Number 0x11
019f c402 | | Store 0x2,0x2
01a0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
01a1 0000 0000 | | .BLANK 0000[0x7]
01a8 ; --------------------------------------------------------------------------------------
01a8 ; SUBPROGRAM
01a8 ; --------------------------------------------------------------------------------------
01a8 01ab | | .CONST 0x01ab ; Address of begin
01a9 0004 | | .CONST 0x0004 ; Address of exception handler
01aa 0001 | | .CONST 0x0001 ; Number of locals
01ab BODY_01a8:
01ab INIT_01a8:
01ab 4801 |H | Short_Literal 0x1
01ac e5ff | | Load 0x2,-0x1
01ad e006 | | Load 0x0,0x6
01ae 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01af 7005 |p | Jump_Nonzero 0x1b5
01b0 4800 |H | Short_Literal 0x0
01b1 e5ff | | Load 0x2,-0x1
01b2 e21c | | Load 0x1,0x1c
01b3 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01b4 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01b5 0831 | 1 | Execute_Immediate Raise,0x31
01b6 0000 0000 | | .XXX[0x2]
01b8 ; --------------------------------------------------------------------------------------
01b8 ; SUBPROGRAM
01b8 ; --------------------------------------------------------------------------------------
01b8 01bb | | .CONST 0x01bb ; Address of begin
01b9 0004 | | .CONST 0x0004 ; Address of exception handler
01ba 0001 | | .CONST 0x0001 ; Number of locals
01bb BODY_01b8:
01bb INIT_01b8:
01bb 00ea | | Load_Encached Null_String_Cache
01bc 800d | | Call 0x0,0xd
01bd e5ff | | Load 0x2,-0x1
01be e00e | | Load 0x0,0xe
01bf 1815 | | Execute Package,Field_Execute,Field_Number 0x15
01c0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01c1 0000 0000 | | .BLANK 0000[0x7]
01c8 ; --------------------------------------------------------------------------------------
01c8 ; SUBPROGRAM
01c8 ; --------------------------------------------------------------------------------------
01c8 01cf | | .CONST 0x01cf ; Address of begin
01c9 0004 | | .CONST 0x0004 ; Address of exception handler
01ca 0003 | | .CONST 0x0003 ; Number of locals
01cb INIT_01c8:
01cb e402 | | Load 0x2,0x2
01cc 821f | | Call 0x1,0x1f
01cd e402 | | Load 0x2,0x2
01ce 821f | | Call 0x1,0x1f
01cf BODY_01c8:
01cf e402 | | Load 0x2,0x2
01d0 4801 |H | Short_Literal 0x1
01d1 e006 | | Load 0x0,0x6
01d2 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01d3 c402 | | Store 0x2,0x2
01d4 00d8 | | Load_Top At_Offset_0
01d5 e602 | | Load 0x3,0x2
01d6 8220 | | Call 0x1,0x20
01d7 01df | | Execute Vector,Equal
01d8 6803 |h | Jump_Zero 0x1dc
01d9 e602 | | Load 0x3,0x2
01da 00cb | | Action Pop_Block_With_Result
01db 00ca | | Action Exit_Nullary_Function
01dc 00ea | | Load_Encached Null_String_Cache
01dd 00cb | | Action Pop_Block_With_Result
01de 00ca | | Action Exit_Nullary_Function
01df 0000 | | .XXX[0x1]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; SUBPROGRAM
01e0 ; --------------------------------------------------------------------------------------
01e0 01e3 | | .CONST 0x01e3 ; Address of begin
01e1 0004 | | .CONST 0x0004 ; Address of exception handler
01e2 0001 | | .CONST 0x0001 ; Number of locals
01e3 BODY_01e0:
01e3 INIT_01e0:
01e3 e405 | | Load 0x2,0x5
01e4 6811 |h | Jump_Zero 0x1f6
01e5 4801 |H | Short_Literal 0x1
01e6 e403 | | Load 0x2,0x3
01e7 e006 | | Load 0x0,0x6
01e8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01e9 7005 |p | Jump_Nonzero 0x1ef
01ea 4800 |H | Short_Literal 0x0
01eb e403 | | Load 0x2,0x3
01ec e21c | | Load 0x1,0x1c
01ed 1810 | | Execute Package,Field_Execute,Field_Number 0x10
01ee 00ca | | Action Exit_Nullary_Function
01ef 4800 |H | Short_Literal 0x0
01f0 a405 | | Store_Unchecked 0x2,0x5
01f1 e403 | | Load 0x2,0x3
01f2 4801 |H | Short_Literal 0x1
01f3 e006 | | Load 0x0,0x6
01f4 1811 | | Execute Package,Field_Execute,Field_Number 0x11
01f5 c403 | | Store 0x2,0x3
01f6 00ea | | Load_Encached Null_String_Cache
01f7 00ca | | Action Exit_Nullary_Function
01f8 ; --------------------------------------------------------------------------------------
01f8 ; SUBPROGRAM
01f8 ; --------------------------------------------------------------------------------------
01f8 01fb | | .CONST 0x01fb ; Address of begin
01f9 0004 | | .CONST 0x0004 ; Address of exception handler
01fa 0001 | | .CONST 0x0001 ; Number of locals
01fb BODY_01f8:
01fb INIT_01f8:
01fb e406 | | Load 0x2,0x6
01fc 7009 |p | Jump_Nonzero 0x206
01fd e404 | | Load 0x2,0x4
01fe 4865 |He | Short_Literal 0x65
01ff e21a | | Load 0x1,0x1a
0200 4801 |H | Short_Literal 0x1
0201 e006 | | Load 0x0,0x6
0202 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0203 c404 | | Store 0x2,0x4
0204 4801 |H | Short_Literal 0x1
0205 a406 | | Store_Unchecked 0x2,0x6
0206 e7ff | | Load 0x3,-0x1
0207 e404 | | Load 0x2,0x4
0208 e21c | | Load 0x1,0x1c
0209 1811 | | Execute Package,Field_Execute,Field_Number 0x11
020a e7fe | | Load 0x3,-0x2
020b e404 | | Load 0x2,0x4
020c e21c | | Load 0x1,0x1c
020d 1811 | | Execute Package,Field_Execute,Field_Number 0x11
020e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
020f 0000 | | .XXX[0x1]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 0213 | | .CONST 0x0213 ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0001 | | .CONST 0x0001 ; Number of locals
0213 BODY_0210:
0213 INIT_0210:
0213 e7fe | | Load 0x3,-0x2
0214 01db | | Execute Vector,Length
0215 7004 |p | Jump_Nonzero 0x21a
0216 e5fe | | Load 0x2,-0x2
0217 e5ff | | Load 0x2,-0x1
0218 8408 | | Call 0x2,0x8
0219 4503 |E | Exit_Suprogram New_Top_Offset 0x3
021a 4801 |H | Short_Literal 0x1
021b e5ff | | Load 0x2,-0x1
021c e7fe | | Load 0x3,-0x2
021d e00a | | Load 0x0,0xa
021e 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
021f 6808 |h | Jump_Zero 0x228
0220 4801 |H | Short_Literal 0x1
0221 e5fe | | Load 0x2,-0x2
0222 e7ff | | Load 0x3,-0x1
0223 e00a | | Load 0x0,0xa
0224 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0225 6802 |h | Jump_Zero 0x228
0226 e402 | | Load 0x2,0x2
0227 0257 | W | Execute Discrete,Raise
0228 8407 | | Call 0x2,0x7
0229 8407 | | Call 0x2,0x7
022a 8409 | | Call 0x2,0x9
022b e7ff | | Load 0x3,-0x1
022c e7fe | | Load 0x3,-0x2
022d 8408 | | Call 0x2,0x8
022e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
022f 0000 | | .XXX[0x1]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0233 | 3 | .CONST 0x0233 ; Address of begin
0231 023d | = | .CONST 0x023d ; Address of exception handler
0232 0001 | | .CONST 0x0001 ; Number of locals
0233 BODY_0230:
0233 INIT_0230:
0233 e403 | | Load 0x2,0x3
0234 4865 |He | Short_Literal 0x65
0235 e21a | | Load 0x1,0x1a
0236 4800 |H | Short_Literal 0x0
0237 e006 | | Load 0x0,0x6
0238 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0239 c403 | | Store 0x2,0x3
023a 4801 |H | Short_Literal 0x1
023b a405 | | Store_Unchecked 0x2,0x5
023c 4501 |E | Exit_Suprogram New_Top_Offset 0x1
023d TRAP_0230:
023d 0007 | | Action Break_Optional
023e 4501 |E | Exit_Suprogram New_Top_Offset 0x1
023f 0000 | | .XXX[0x1]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0246 | F | .CONST 0x0246 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0002 | | .CONST 0x0002 ; Number of locals
0243 INIT_0240:
0243 e405 | | Load 0x2,0x5
0244 e00c | | Load 0x0,0xc
0245 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0246 BODY_0240:
0246 00d8 | | Load_Top At_Offset_0
0247 01db | | Execute Vector,Length
0248 6808 |h | Jump_Zero 0x251
0249 4800 |H | Short_Literal 0x0
024a e602 | | Load 0x3,0x2
024b e00c | | Load 0x0,0xc
024c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
024d 480c |H | Short_Literal 0xc
024e e602 | | Load 0x3,0x2
024f e00c | | Load 0x0,0xc
0250 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0251 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0252 ; --------------------------------------------------------------------------------------
0252 ; STRING TABLE
0252 ; --------------------------------------------------------------------------------------
0252 0010 | | .STRTAB 0x0010->0x025a ; "Login_Limit_Transfer.Donate_Time"
0253 002e | . | .STRTAB 0x002e->0x026a ; "Login_Limit_Transfer.Accept_Time"
0254 004c | L | .STRTAB 0x004c->0x027a ; "Site_Name"
0255 0053 | S | .STRTAB 0x0053->0x027e ; "Authorization_Code.History"
0256 006b | k | .STRTAB 0x006b->0x028b ; "rational"
0257 0071 | q | .STRTAB 0x0071->0x028f ; "Snapshot"
0258 0077 | w | .STRTAB 0x0077->0x0293 ; "<PROFILE>"
0259 007e | ~ | .STREND 0x007e->0x0298
025a 4c6f 6769 |Logi| .STRTAB_STRINGS
0298 ; --------------------------------------------------------------------------------------
0298 ; Debug Table
0298 ; --------------------------------------------------------------------------------------
0298 0004 0011 | | .DEBUG4 0x0004,0x0011,0x97ad,0x0000,0x0001,0x0000
029e 0000 0000 | | .BLANK 0000[0x162]