DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦038c04c87⟧

    Length: 1024 (0x400)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0f80a5

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

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 01e0       |    |		.CONST	0x01e0								; 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 004d       | M  |		.CONST	0x004d								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 001d       |    |		.CONST	0x001d								; Number of locals
000b			INIT_0008:
000b 029a 0053  |   S|		Declare_Subprogram	INIT_0050,For_Outer_Call,Visible,Unelaborated
000d 029a 005b  |   [|		Declare_Subprogram	INIT_0058,For_Outer_Call,Visible,Unelaborated
000f 029a 0063  |   c|		Declare_Subprogram	INIT_0060,For_Outer_Call,Visible,Unelaborated
0011 029a 006b  |   k|		Declare_Subprogram	INIT_0068,For_Outer_Call,Visible,Unelaborated
0013 029a 0073  |   s|		Declare_Subprogram	INIT_0070,For_Outer_Call,Visible,Unelaborated
0015 029a 0093  |    |		Declare_Subprogram	INIT_0090,For_Outer_Call,Visible,Unelaborated
0017 029a 00b3  |    |		Declare_Subprogram	INIT_00b0,For_Outer_Call,Visible,Unelaborated
0019 029a 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Outer_Call,Visible,Unelaborated
001b 029a 00fb  |    |		Declare_Subprogram	INIT_00f8,For_Outer_Call,Visible,Unelaborated
001d 00bf       |    |		Action	Accept_Activation
001e 0092 01a2  |    |		Action	Push_String_Extended,0x1a2					; "Login_Limit_Transfer.Donate_Time"
0020 0092 01a3  |    |		Action	Push_String_Extended,0x1a3					; "Login_Limit_Transfer.Accept_Time"
0022 0092 01a4  |    |		Action	Push_String_Extended,0x1a4					; "Site_Name"
0024 e001       |    |		Load	0x0,0x1
0025 e002       |    |		Load	0x0,0x2
0026 e003       |    |		Load	0x0,0x3
0027 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0028 e004       |    |		Load	0x0,0x4
0029 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
002a 0387       |    |		Declare_Variable	Package
002b 00d8       |    |		Load_Top	At_Offset_0
002c 020f       |    |		Execute	Module,Activate
002d e005       |    |		Load	0x0,0x5
002e e006       |    |		Load	0x0,0x6
002f 00e9       |    |		Load_Encached	String_Cache
0030 e004       |    |		Load	0x0,0x4
0031 1b14       |    |		Execute	Package,Field_Read,Field_Number 0x14
0032 0387       |    |		Declare_Variable	Package
0033 00d8       |    |		Load_Top	At_Offset_0
0034 020f       |    |		Execute	Module,Activate
0035 029d 0113  |    |		Declare_Subprogram	INIT_0110,For_Outer_Call
0037 029d 0143  |   C|		Declare_Subprogram	INIT_0140,For_Outer_Call
0039 1d0d       |    |		Execute_Immediate	Reference_Lex_1,0xd
003a 00c7       |    |		Action	Elaborate_Subprogram
003b 1d0e       |    |		Execute_Immediate	Reference_Lex_1,0xe
003c 00c7       |    |		Action	Elaborate_Subprogram
003d 1d0f       |    |		Execute_Immediate	Reference_Lex_1,0xf
003e 00c7       |    |		Action	Elaborate_Subprogram
003f 1d10       |    |		Execute_Immediate	Reference_Lex_1,0x10
0040 00c7       |    |		Action	Elaborate_Subprogram
0041 1d11       |    |		Execute_Immediate	Reference_Lex_1,0x11
0042 00c7       |    |		Action	Elaborate_Subprogram
0043 029d 0163  |   c|		Declare_Subprogram	INIT_0160,For_Outer_Call
0045 1d12       |    |		Execute_Immediate	Reference_Lex_1,0x12
0046 00c7       |    |		Action	Elaborate_Subprogram
0047 1d13       |    |		Execute_Immediate	Reference_Lex_1,0x13
0048 00c7       |    |		Action	Elaborate_Subprogram
0049 1d14       |    |		Execute_Immediate	Reference_Lex_1,0x14
004a 00c7       |    |		Action	Elaborate_Subprogram
004b 1d15       |    |		Execute_Immediate	Reference_Lex_1,0x15
004c 00c7       |    |		Action	Elaborate_Subprogram
004d			BODY_0008:
004d 00bc       |    |		Action	Signal_Activated
004e 00bb       |    |		Action	Signal_Completion
004f 0000       |    |		.XXX[0x1]
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0053       | S  |		.CONST	0x0053								; Address of begin
0051 0004       |    |		.CONST	0x0004								; Address of exception handler
0052 0001       |    |		.CONST	0x0001								; Number of locals
0053			BODY_0050:
0053			INIT_0050:
0053 e217       |    |		Load	0x1,0x17
0054 821b       |    |		Call	0x1,0x1b
0055 00ca       |    |		Action	Exit_Nullary_Function
0056 0000 0000  |    |		.XXX[0x2]
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 e216       |    |		Load	0x1,0x16
005c 821b       |    |		Call	0x1,0x1b
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 e5ff       |    |		Load	0x2,-0x1
0064 e217       |    |		Load	0x1,0x17
0065 821c       |    |		Call	0x1,0x1c
0066 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0067 0000       |    |		.XXX[0x1]
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 e216       |    |		Load	0x1,0x16
006d 821c       |    |		Call	0x1,0x1c
006e 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
006f 0000       |    |		.XXX[0x1]
0070 ; --------------------------------------------------------------------------------------
0070 ; SUBPROGRAM
0070 ; --------------------------------------------------------------------------------------
0070 0078       | x  |		.CONST	0x0078								; Address of begin
0071 0004       |    |		.CONST	0x0004								; Address of exception handler
0072 0002       |    |		.CONST	0x0002								; Number of locals
0073			INIT_0070:
0073 e004       |    |		Load	0x0,0x4
0074 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0075 02c7       |    |		Declare_Variable	Any
0076 00d8       |    |		Load_Top	At_Offset_0
0077 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0078			BODY_0070:
0078 00d8       |    |		Load_Top	At_Offset_0
0079 4865       |He  |		Short_Literal	0x65
007a e218       |    |		Load	0x1,0x18
007b 4801       |H   |		Short_Literal	0x1
007c e004       |    |		Load	0x0,0x4
007d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
007e c402       |    |		Store	0x2,0x2
007f e5ff       |    |		Load	0x2,-0x1
0080 e402       |    |		Load	0x2,0x2
0081 e21a       |    |		Load	0x1,0x1a
0082 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0083 e5fe       |    |		Load	0x2,-0x2
0084 e402       |    |		Load	0x2,0x2
0085 e21a       |    |		Load	0x1,0x1a
0086 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0087 00d8       |    |		Load_Top	At_Offset_0
0088 4801       |H   |		Short_Literal	0x1
0089 e004       |    |		Load	0x0,0x4
008a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
008b c402       |    |		Store	0x2,0x2
008c 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
008d 0000 0000  |    |		.XXX[0x3]
008f 0000       |    |
0090 ; --------------------------------------------------------------------------------------
0090 ; SUBPROGRAM
0090 ; --------------------------------------------------------------------------------------
0090 00a0       |    |		.CONST	0x00a0								; Address of begin
0091 00a9       |    |		.CONST	0x00a9								; Address of exception handler
0092 0004       |    |		.CONST	0x0004								; Number of locals
0093			INIT_0090:
0093 e004       |    |		Load	0x0,0x4
0094 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0095 02c7       |    |		Declare_Variable	Any
0096 00d8       |    |		Load_Top	At_Offset_0
0097 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0098 e003       |    |		Load	0x0,0x3
0099 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
009a 02c7       |    |		Declare_Variable	Any
009b e007       |    |		Load	0x0,0x7
009c 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
009d a403       |    |		Store_Unchecked	0x2,0x3
009e 029f 0173  |   s|		Declare_Subprogram	INIT_0170,For_Call
00a0			BODY_0090:
00a0 e402       |    |		Load	0x2,0x2
00a1 4865       |He  |		Short_Literal	0x65
00a2 e218       |    |		Load	0x1,0x18
00a3 4800       |H   |		Short_Literal	0x0
00a4 e004       |    |		Load	0x0,0x4
00a5 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
00a6 c402       |    |		Store	0x2,0x2
00a7 8404       |    |		Call	0x2,0x4
00a8 0831       | 1  |		Execute_Immediate	Raise,0x31
00a9			TRAP_0090:
00a9 0007       |    |		Action	Break_Optional
00aa 00ea       |    |		Load_Encached	Null_String_Cache
00ab 00ca       |    |		Action	Exit_Nullary_Function
00ac 0000 0000  |    |		.BLANK	0000[0x4]
00b0 ; --------------------------------------------------------------------------------------
00b0 ; SUBPROGRAM
00b0 ; --------------------------------------------------------------------------------------
00b0 00b3       |    |		.CONST	0x00b3								; Address of begin
00b1 0004       |    |		.CONST	0x0004								; Address of exception handler
00b2 0001       |    |		.CONST	0x0001								; Number of locals
00b3			BODY_00b0:
00b3			INIT_00b0:
00b3 4801       |H   |		Short_Literal	0x1
00b4 8212       |    |		Call	0x1,0x12
00b5 0092 01a5  |    |		Action	Push_String_Extended,0x1a5					; "rational"
00b7 e008       |    |		Load	0x0,0x8
00b8 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
00b9 0e00       |    |		Execute_Immediate	Not_Equal,0x0
00ba 00ca       |    |		Action	Exit_Nullary_Function
00bb 0000 0000  |    |		.BLANK	0000[0x5]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00cc       |    |		.CONST	0x00cc								; Address of begin
00c1 0004       |    |		.CONST	0x0004								; Address of exception handler
00c2 0005       |    |		.CONST	0x0005								; Number of locals
00c3			INIT_00c0:
00c3 00e7       |    |		Load_Encached	Duration_Cache
00c4 00e1       |    |		Load_Encached	Boolean_Cache
00c5 03e9       |    |		Declare_Variable	Discrete,Duplicate
00c6 0092 01a6  |    |		Action	Push_String_Extended,0x1a6					; "Snapshot"
00c8 e009       |    |		Load	0x0,0x9
00c9 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
00ca 00e7       |    |		Load_Encached	Duration_Cache
00cb 03f1       |    |		Declare_Variable	Discrete,With_Value
00cc			BODY_00c0:
00cc 00e1       |    |		Load_Encached	Boolean_Cache
00cd 00e1       |    |		Load_Encached	Boolean_Cache
00ce 00e7       |    |		Load_Encached	Duration_Cache
00cf e009       |    |		Load	0x0,0x9
00d0 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
00d1 c402       |    |		Store	0x2,0x2
00d2 c403       |    |		Store	0x2,0x3
00d3 c404       |    |		Store	0x2,0x4
00d4 4800       |H   |		Short_Literal	0x0
00d5 e009       |    |		Load	0x0,0x9
00d6 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
00d7 4801       |H   |		Short_Literal	0x1
00d8 e009       |    |		Load	0x0,0x9
00d9 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
00da 4801       |H   |		Short_Literal	0x1
00db e009       |    |		Load	0x0,0x9
00dc 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00dd 00ea       |    |		Load_Encached	Null_String_Cache
00de e405       |    |		Load	0x2,0x5
00df 00d8       |    |		Load_Top	At_Offset_0
00e0 0092 01a6  |    |		Action	Push_String_Extended,0x1a6					; "Snapshot"
00e2 e009       |    |		Load	0x0,0x9
00e3 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
00e4 0092 01a7  |    |		Action	Push_String_Extended,0x1a7					; "<PROFILE>"
00e6 0092 01a6  |    |		Action	Push_String_Extended,0x1a6					; "Snapshot"
00e8 e009       |    |		Load	0x0,0x9
00e9 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
00ea e402       |    |		Load	0x2,0x2
00eb e009       |    |		Load	0x0,0x9
00ec 181e       |    |		Execute	Package,Field_Execute,Field_Number 0x1e
00ed e403       |    |		Load	0x2,0x3
00ee e009       |    |		Load	0x0,0x9
00ef 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
00f0 e404       |    |		Load	0x2,0x4
00f1 e009       |    |		Load	0x0,0x9
00f2 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
00f3 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00f4 0000 0000  |    |		.BLANK	0000[0x4]
00f8 ; --------------------------------------------------------------------------------------
00f8 ; SUBPROGRAM
00f8 ; --------------------------------------------------------------------------------------
00f8 00fd       |    |		.CONST	0x00fd								; Address of begin
00f9 0004       |    |		.CONST	0x0004								; Address of exception handler
00fa 0002       |    |		.CONST	0x0002								; Number of locals
00fb			INIT_00f8:
00fb 029f 0193  |    |		Declare_Subprogram	INIT_0190,For_Call
00fd			BODY_00f8:
00fd e218       |    |		Load	0x1,0x18
00fe e004       |    |		Load	0x0,0x4
00ff 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0100 e216       |    |		Load	0x1,0x16
0101 e004       |    |		Load	0x0,0x4
0102 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0103 e217       |    |		Load	0x1,0x17
0104 e004       |    |		Load	0x0,0x4
0105 1812       |    |		Execute	Package,Field_Execute,Field_Number 0x12
0106 00cf       |    |		Action	Mark_Auxiliary
0107 e00a       |    |		Load	0x0,0xa
0108 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
0109 4801       |H   |		Short_Literal	0x1
010a 0263       | c  |		Execute	Discrete,Above_Bound
010b 7003       |p   |		Jump_Nonzero	0x10f
010c 8402       |    |		Call	0x2,0x2
010d 00c8       |    |		Action	Pop_Auxiliary_Range
010e 3ffd       |?   |		Loop_Increasing	0x10c
010f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0110 ; --------------------------------------------------------------------------------------
0110 ; SUBPROGRAM
0110 ; --------------------------------------------------------------------------------------
0110 011e       |    |		.CONST	0x011e								; Address of begin
0111 0136       | 6  |		.CONST	0x0136								; Address of exception handler
0112 0003       |    |		.CONST	0x0003								; Number of locals
0113			INIT_0110:
0113 e004       |    |		Load	0x0,0x4
0114 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0115 02c7       |    |		Declare_Variable	Any
0116 00d8       |    |		Load_Top	At_Offset_0
0117 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0118 e003       |    |		Load	0x0,0x3
0119 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
011a 02c7       |    |		Declare_Variable	Any
011b e007       |    |		Load	0x0,0x7
011c 182a       | *  |		Execute	Package,Field_Execute,Field_Number 0x2a
011d a403       |    |		Store_Unchecked	0x2,0x3
011e			BODY_0110:
011e e402       |    |		Load	0x2,0x2
011f 4865       |He  |		Short_Literal	0x65
0120 e5ff       |    |		Load	0x2,-0x1
0121 4800       |H   |		Short_Literal	0x0
0122 e004       |    |		Load	0x0,0x4
0123 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0124 c402       |    |		Store	0x2,0x2
0125 4801       |H   |		Short_Literal	0x1
0126 e402       |    |		Load	0x2,0x2
0127 e004       |    |		Load	0x0,0x4
0128 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0129 7005       |p   |		Jump_Nonzero	0x12f
012a 4800       |H   |		Short_Literal	0x0
012b e402       |    |		Load	0x2,0x2
012c e219       |    |		Load	0x1,0x19
012d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
012e c403       |    |		Store	0x2,0x3
012f e402       |    |		Load	0x2,0x2
0130 4801       |H   |		Short_Literal	0x1
0131 e004       |    |		Load	0x0,0x4
0132 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0133 c402       |    |		Store	0x2,0x2
0134 00d8       |    |		Load_Top	At_Offset_0
0135 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0136			TRAP_0110:
0136 0007       |    |		Action	Break_Optional
0137 e403       |    |		Load	0x2,0x3
0138 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
0139 0000 0000  |    |		.BLANK	0000[0x7]
0140 ; --------------------------------------------------------------------------------------
0140 ; SUBPROGRAM
0140 ; --------------------------------------------------------------------------------------
0140 0148       | H  |		.CONST	0x0148								; Address of begin
0141 0004       |    |		.CONST	0x0004								; Address of exception handler
0142 0002       |    |		.CONST	0x0002								; Number of locals
0143			INIT_0140:
0143 e004       |    |		Load	0x0,0x4
0144 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
0145 02c7       |    |		Declare_Variable	Any
0146 00d8       |    |		Load_Top	At_Offset_0
0147 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0148			BODY_0140:
0148 00d8       |    |		Load_Top	At_Offset_0
0149 4865       |He  |		Short_Literal	0x65
014a e5ff       |    |		Load	0x2,-0x1
014b 4801       |H   |		Short_Literal	0x1
014c e004       |    |		Load	0x0,0x4
014d 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
014e c402       |    |		Store	0x2,0x2
014f e5fe       |    |		Load	0x2,-0x2
0150 e402       |    |		Load	0x2,0x2
0151 e219       |    |		Load	0x1,0x19
0152 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0153 00d8       |    |		Load_Top	At_Offset_0
0154 4801       |H   |		Short_Literal	0x1
0155 e004       |    |		Load	0x0,0x4
0156 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0157 c402       |    |		Store	0x2,0x2
0158 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
0159 0000 0000  |    |		.BLANK	0000[0x7]
0160 ; --------------------------------------------------------------------------------------
0160 ; SUBPROGRAM
0160 ; --------------------------------------------------------------------------------------
0160 0163       | c  |		.CONST	0x0163								; Address of begin
0161 0004       |    |		.CONST	0x0004								; Address of exception handler
0162 0001       |    |		.CONST	0x0001								; Number of locals
0163			BODY_0160:
0163			INIT_0160:
0163 4801       |H   |		Short_Literal	0x1
0164 e5ff       |    |		Load	0x2,-0x1
0165 e004       |    |		Load	0x0,0x4
0166 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0167 7005       |p   |		Jump_Nonzero	0x16d
0168 4800       |H   |		Short_Literal	0x0
0169 e5ff       |    |		Load	0x2,-0x1
016a e21a       |    |		Load	0x1,0x1a
016b 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
016c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
016d 0831       | 1  |		Execute_Immediate	Raise,0x31
016e 0000 0000  |    |		.XXX[0x2]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0177       | w  |		.CONST	0x0177								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0003       |    |		.CONST	0x0003								; Number of locals
0173			INIT_0170:
0173 e402       |    |		Load	0x2,0x2
0174 821d       |    |		Call	0x1,0x1d
0175 e402       |    |		Load	0x2,0x2
0176 821d       |    |		Call	0x1,0x1d
0177			BODY_0170:
0177 e402       |    |		Load	0x2,0x2
0178 4801       |H   |		Short_Literal	0x1
0179 e004       |    |		Load	0x0,0x4
017a 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
017b c402       |    |		Store	0x2,0x2
017c 00d8       |    |		Load_Top	At_Offset_0
017d 00ea       |    |		Load_Encached	Null_String_Cache
017e e00b       |    |		Load	0x0,0xb
017f 1811       |    |		Execute	Package,Field_Execute,Field_Number 0x11
0180 e602       |    |		Load	0x3,0x2
0181 800c       |    |		Call	0x0,0xc
0182 01df       |    |		Execute	Vector,Equal
0183 6803       |h   |		Jump_Zero	0x187
0184 e602       |    |		Load	0x3,0x2
0185 00cb       |    |		Action	Pop_Block_With_Result
0186 00ca       |    |		Action	Exit_Nullary_Function
0187 00ea       |    |		Load_Encached	Null_String_Cache
0188 00cb       |    |		Action	Pop_Block_With_Result
0189 00ca       |    |		Action	Exit_Nullary_Function
018a 0000 0000  |    |		.BLANK	0000[0x6]
0190 ; --------------------------------------------------------------------------------------
0190 ; SUBPROGRAM
0190 ; --------------------------------------------------------------------------------------
0190 0196       |    |		.CONST	0x0196								; Address of begin
0191 0004       |    |		.CONST	0x0004								; Address of exception handler
0192 0002       |    |		.CONST	0x0002								; Number of locals
0193			INIT_0190:
0193 e405       |    |		Load	0x2,0x5
0194 e00a       |    |		Load	0x0,0xa
0195 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
0196			BODY_0190:
0196 00d8       |    |		Load_Top	At_Offset_0
0197 01db       |    |		Execute	Vector,Length
0198 6808       |h   |		Jump_Zero	0x1a1
0199 4800       |H   |		Short_Literal	0x0
019a e602       |    |		Load	0x3,0x2
019b e00a       |    |		Load	0x0,0xa
019c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
019d 480c       |H   |		Short_Literal	0xc
019e e602       |    |		Load	0x3,0x2
019f e00a       |    |		Load	0x0,0xa
01a0 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
01a1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01a2 ; --------------------------------------------------------------------------------------
01a2 ; STRING TABLE
01a2 ; --------------------------------------------------------------------------------------
01a2 000e       |    |		.STRTAB	0x000e->0x01a9							; "Login_Limit_Transfer.Donate_Time"
01a3 002c       | ,  |		.STRTAB	0x002c->0x01b9							; "Login_Limit_Transfer.Accept_Time"
01a4 004a       | J  |		.STRTAB	0x004a->0x01c9							; "Site_Name"
01a5 0051       | Q  |		.STRTAB	0x0051->0x01cd							; "rational"
01a6 0057       | W  |		.STRTAB	0x0057->0x01d1							; "Snapshot"
01a7 005d       | ]  |		.STRTAB	0x005d->0x01d5							; "<PROFILE>"
01a8 0064       | d  |		.STREND 0x0064->0x01da
01a9 4c6f 6769  |Logi|		.STRTAB_STRINGS
01da 0000 0000  |    |		.BLANK	0000[0x6]
01e0 ; --------------------------------------------------------------------------------------
01e0 ; Debug Table
01e0 ; --------------------------------------------------------------------------------------
01e0 0004 000e  |    |		.DEBUG4	0x0004,0x000e,0xd0d4,0x0000,0x0001,0x0000
01e6 0010 0000  |    |		.XXX[0x1a]
01e8 0120 0000  |    |
01ea 0000 0000  |    |
01ec 0068 df60  | h `|
01ee 0000 0004  |    |
01f0 0000 0048  |   H|
01f2 0000 0000  |    |
01f4 0000 001a  |    |
01f6 37d8 0000  |7   |
01f8 0001 0000  |    |
01fa 0012 0000  |    |
01fc 0000 0000  |    |
01fe 0006 8df6  |    |