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

⟦f712bfa7e⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0a7cf5

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 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 001f       |    |		.CONST	0x001f								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000e       |    |		.CONST	0x000e								; Number of locals
000b			INIT_0008:
000b 00e2       |    |		Load_Encached	Integer_Cache
000c 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
000d 00e2       |    |		Load_Encached	Integer_Cache
000e 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
000f 00e2       |    |		Load_Encached	Integer_Cache
0010 00e2       |    |		Load_Encached	Integer_Cache
0011 00e2       |    |		Load_Encached	Integer_Cache
0012 00e2       |    |		Load_Encached	Integer_Cache
0013 00e1       |    |		Load_Encached	Boolean_Cache
0014 00e2       |    |		Load_Encached	Integer_Cache
0015 029f 012b  |   +|		Declare_Subprogram	INIT_0128,For_Call
0017 029f 0173  |   s|		Declare_Subprogram	INIT_0170,For_Call
0019 029f 0183  |    |		Declare_Subprogram	INIT_0180,For_Call
001b 029f 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Call
001d 029f 0223  |   #|		Declare_Subprogram	INIT_0220,For_Call
001f			BODY_0008:
001f e5ff       |    |		Load	0x2,-0x1
0020 e022       | "  |		Load	0x0,0x22
0021 182c       | ,  |		Execute	Package,Field_Execute,Field_Number 0x2c
0022 700b       |p   |		Jump_Nonzero	0x2e
0023 e023       | #  |		Load	0x0,0x23
0024 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
0025 e023       | #  |		Load	0x0,0x23
0026 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0027 e5fc       |    |		Load	0x2,-0x4
0028 e022       | "  |		Load	0x0,0x22
0029 1819       |    |		Execute	Package,Field_Execute,Field_Number 0x19
002a e023       | #  |		Load	0x0,0x23
002b 1b32       | 2  |		Execute	Package,Field_Read,Field_Number 0x32
002c 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
002d 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
002e 840a       |    |		Call	0x2,0xa
002f 00cf       |    |		Action	Mark_Auxiliary
0030 e5ff       |    |		Load	0x2,-0x1
0031 e022       | "  |		Load	0x0,0x22
0032 182e       | .  |		Execute	Package,Field_Execute,Field_Number 0x2e
0033 e5ff       |    |		Load	0x2,-0x1
0034 e022       | "  |		Load	0x0,0x22
0035 182d       | -  |		Execute	Package,Field_Execute,Field_Number 0x2d
0036 0263       | c  |		Execute	Discrete,Above_Bound
0037 7007       |p   |		Jump_Nonzero	0x3f
0038 00d8       |    |		Load_Top	At_Offset_0
0039 e5ff       |    |		Load	0x2,-0x1
003a e022       | "  |		Load	0x0,0x22
003b 182f       | /  |		Execute	Package,Field_Execute,Field_Number 0x2f
003c 840d       |    |		Call	0x2,0xd
003d 00c8       |    |		Action	Pop_Auxiliary_Range
003e 3ff9       |?   |		Loop_Increasing	0x38
003f 00ce       |    |		Action	Pop_Auxiliary
0040 4801       |H   |		Short_Literal	0x1
0041 480d       |H   |		Short_Literal	0xd
0042 e022       | "  |		Load	0x0,0x22
0043 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0044 e023       | #  |		Load	0x0,0x23
0045 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0046 0092 025e  |   ^|		Action	Push_String_Extended,0x25e					; "TOTAL"
0048 820f       |    |		Call	0x1,0xf
0049 4801       |H   |		Short_Literal	0x1
004a 480d       |H   |		Short_Literal	0xd
004b e022       | "  |		Load	0x0,0x22
004c 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
004d e023       | #  |		Load	0x0,0x23
004e 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
004f 00ea       |    |		Load_Encached	Null_String_Cache
0050 820f       |    |		Call	0x1,0xf
0051 4801       |H   |		Short_Literal	0x1
0052 480d       |H   |		Short_Literal	0xd
0053 e022       | "  |		Load	0x0,0x22
0054 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0055 e023       | #  |		Load	0x0,0x23
0056 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0057 4820       |H   |		Short_Literal	0x20
0058 4800       |H   |		Short_Literal	0x0
0059 480a       |H   |		Short_Literal	0xa
005a e402       |    |		Load	0x2,0x2
005b e021       | !  |		Load	0x0,0x21
005c 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
005d 820f       |    |		Call	0x1,0xf
005e 4801       |H   |		Short_Literal	0x1
005f 480d       |H   |		Short_Literal	0xd
0060 e022       | "  |		Load	0x0,0x22
0061 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0062 e023       | #  |		Load	0x0,0x23
0063 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0064 4820       |H   |		Short_Literal	0x20
0065 4800       |H   |		Short_Literal	0x0
0066 480a       |H   |		Short_Literal	0xa
0067 e403       |    |		Load	0x2,0x3
0068 e021       | !  |		Load	0x0,0x21
0069 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
006a 820f       |    |		Call	0x1,0xf
006b 4801       |H   |		Short_Literal	0x1
006c 480d       |H   |		Short_Literal	0xd
006d e022       | "  |		Load	0x0,0x22
006e 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
006f e023       | #  |		Load	0x0,0x23
0070 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0071 0092 025f  |   _|		Action	Push_String_Extended,0x25f					; "TOTAL AVAILABLE"
0073 820f       |    |		Call	0x1,0xf
0074 4801       |H   |		Short_Literal	0x1
0075 480d       |H   |		Short_Literal	0xd
0076 e022       | "  |		Load	0x0,0x22
0077 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0078 e023       | #  |		Load	0x0,0x23
0079 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
007a 00ea       |    |		Load_Encached	Null_String_Cache
007b 820f       |    |		Call	0x1,0xf
007c 00e2       |    |		Load_Encached	Integer_Cache
007d 00e2       |    |		Load_Encached	Integer_Cache
007e 840e       |    |		Call	0x2,0xe
007f c404       |    |		Store	0x2,0x4
0080 c405       |    |		Store	0x2,0x5
0081 4801       |H   |		Short_Literal	0x1
0082 480d       |H   |		Short_Literal	0xd
0083 e022       | "  |		Load	0x0,0x22
0084 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0085 00ea       |    |		Load_Encached	Null_String_Cache
0086 4800       |H   |		Short_Literal	0x0
0087 e022       | "  |		Load	0x0,0x22
0088 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
0089 e022       | "  |		Load	0x0,0x22
008a 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
008b 4820       |H   |		Short_Literal	0x20
008c 4800       |H   |		Short_Literal	0x0
008d 480a       |H   |		Short_Literal	0xa
008e e405       |    |		Load	0x2,0x5
008f e021       | !  |		Load	0x0,0x21
0090 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0091 820f       |    |		Call	0x1,0xf
0092 4801       |H   |		Short_Literal	0x1
0093 480d       |H   |		Short_Literal	0xd
0094 e022       | "  |		Load	0x0,0x22
0095 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0096 00ea       |    |		Load_Encached	Null_String_Cache
0097 4800       |H   |		Short_Literal	0x0
0098 e022       | "  |		Load	0x0,0x22
0099 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
009a e022       | "  |		Load	0x0,0x22
009b 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
009c 4820       |H   |		Short_Literal	0x20
009d 4800       |H   |		Short_Literal	0x0
009e 480a       |H   |		Short_Literal	0xa
009f e404       |    |		Load	0x2,0x4
00a0 e021       | !  |		Load	0x0,0x21
00a1 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00a2 820f       |    |		Call	0x1,0xf
00a3 4801       |H   |		Short_Literal	0x1
00a4 480d       |H   |		Short_Literal	0xd
00a5 e022       | "  |		Load	0x0,0x22
00a6 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
00a7 e023       | #  |		Load	0x0,0x23
00a8 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00a9 0092 0260  |   `|		Action	Push_String_Extended,0x260					; "RESERVE"
00ab 820f       |    |		Call	0x1,0xf
00ac 4801       |H   |		Short_Literal	0x1
00ad 480d       |H   |		Short_Literal	0xd
00ae e022       | "  |		Load	0x0,0x22
00af 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
00b0 e023       | #  |		Load	0x0,0x23
00b1 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00b2 00ea       |    |		Load_Encached	Null_String_Cache
00b3 820f       |    |		Call	0x1,0xf
00b4 e405       |    |		Load	0x2,0x5
00b5 e402       |    |		Load	0x2,0x2
00b6 0272       | r  |		Execute	Discrete,Minus
00b7 c406       |    |		Store	0x2,0x6
00b8 4801       |H   |		Short_Literal	0x1
00b9 480d       |H   |		Short_Literal	0xd
00ba e022       | "  |		Load	0x0,0x22
00bb 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
00bc e023       | #  |		Load	0x0,0x23
00bd 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00be 4820       |H   |		Short_Literal	0x20
00bf 4800       |H   |		Short_Literal	0x0
00c0 480a       |H   |		Short_Literal	0xa
00c1 e406       |    |		Load	0x2,0x6
00c2 e021       | !  |		Load	0x0,0x21
00c3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00c4 820f       |    |		Call	0x1,0xf
00c5 e404       |    |		Load	0x2,0x4
00c6 e403       |    |		Load	0x2,0x3
00c7 0272       | r  |		Execute	Discrete,Minus
00c8 c407       |    |		Store	0x2,0x7
00c9 4801       |H   |		Short_Literal	0x1
00ca 480d       |H   |		Short_Literal	0xd
00cb e022       | "  |		Load	0x0,0x22
00cc 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
00cd e023       | #  |		Load	0x0,0x23
00ce 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00cf 4820       |H   |		Short_Literal	0x20
00d0 4800       |H   |		Short_Literal	0x0
00d1 480a       |H   |		Short_Literal	0xa
00d2 e407       |    |		Load	0x2,0x7
00d3 e021       | !  |		Load	0x0,0x21
00d4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
00d5 820f       |    |		Call	0x1,0xf
00d6 4801       |H   |		Short_Literal	0x1
00d7 480d       |H   |		Short_Literal	0xd
00d8 e022       | "  |		Load	0x0,0x22
00d9 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
00da e023       | #  |		Load	0x0,0x23
00db 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00dc 0092 0261  |   a|		Action	Push_String_Extended,0x261					; "PERCENT RESERVE"
00de 820f       |    |		Call	0x1,0xf
00df 4801       |H   |		Short_Literal	0x1
00e0 480d       |H   |		Short_Literal	0xd
00e1 e022       | "  |		Load	0x0,0x22
00e2 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
00e3 e023       | #  |		Load	0x0,0x23
00e4 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00e5 00ea       |    |		Load_Encached	Null_String_Cache
00e6 820f       |    |		Call	0x1,0xf
00e7 e406       |    |		Load	0x2,0x6
00e8 6802       |h   |		Jump_Zero	0xeb
00e9 e405       |    |		Load	0x2,0x5
00ea 7003       |p   |		Jump_Nonzero	0xee
00eb 4800       |H   |		Short_Literal	0x0
00ec a409       |    |		Store_Unchecked	0x2,0x9
00ed 7806       |x   |		Jump	0xf4
00ee 4864       |Hd  |		Short_Literal	0x64
00ef e406       |    |		Load	0x2,0x6
00f0 0271       | q  |		Execute	Discrete,Times
00f1 e405       |    |		Load	0x2,0x5
00f2 0270       | p  |		Execute	Discrete,Divide
00f3 c409       |    |		Store	0x2,0x9
00f4 4801       |H   |		Short_Literal	0x1
00f5 480d       |H   |		Short_Literal	0xd
00f6 e022       | "  |		Load	0x0,0x22
00f7 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
00f8 e023       | #  |		Load	0x0,0x23
00f9 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
00fa 4820       |H   |		Short_Literal	0x20
00fb 4800       |H   |		Short_Literal	0x0
00fc 480a       |H   |		Short_Literal	0xa
00fd e409       |    |		Load	0x2,0x9
00fe e021       | !  |		Load	0x0,0x21
00ff 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0100 820f       |    |		Call	0x1,0xf
0101 e407       |    |		Load	0x2,0x7
0102 6802       |h   |		Jump_Zero	0x105
0103 e404       |    |		Load	0x2,0x4
0104 7003       |p   |		Jump_Nonzero	0x108
0105 4800       |H   |		Short_Literal	0x0
0106 a409       |    |		Store_Unchecked	0x2,0x9
0107 7806       |x   |		Jump	0x10e
0108 4864       |Hd  |		Short_Literal	0x64
0109 e407       |    |		Load	0x2,0x7
010a 0271       | q  |		Execute	Discrete,Times
010b e404       |    |		Load	0x2,0x4
010c 0270       | p  |		Execute	Discrete,Divide
010d c409       |    |		Store	0x2,0x9
010e 4801       |H   |		Short_Literal	0x1
010f 480d       |H   |		Short_Literal	0xd
0110 e022       | "  |		Load	0x0,0x22
0111 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0112 e023       | #  |		Load	0x0,0x23
0113 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0114 4820       |H   |		Short_Literal	0x20
0115 4800       |H   |		Short_Literal	0x0
0116 480a       |H   |		Short_Literal	0xa
0117 e409       |    |		Load	0x2,0x9
0118 e021       | !  |		Load	0x0,0x21
0119 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
011a 820f       |    |		Call	0x1,0xf
011b e023       | #  |		Load	0x0,0x23
011c 1b1f       |    |		Execute	Package,Field_Read,Field_Number 0x1f
011d e023       | #  |		Load	0x0,0x23
011e 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
011f 8210       |    |		Call	0x1,0x10
0120 4505       |E   |		Exit_Suprogram	New_Top_Offset 0x5
0121 0000 0000  |    |		.BLANK	0000[0x7]
0128 ; --------------------------------------------------------------------------------------
0128 ; SUBPROGRAM
0128 ; --------------------------------------------------------------------------------------
0128 012b       | +  |		.CONST	0x012b								; Address of begin
0129 0004       |    |		.CONST	0x0004								; Address of exception handler
012a 0001       |    |		.CONST	0x0001								; Number of locals
012b			BODY_0128:
012b			INIT_0128:
012b 480a       |H   |		Short_Literal	0xa
012c e022       | "  |		Load	0x0,0x22
012d 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
012e e023       | #  |		Load	0x0,0x23
012f 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0130 4800       |H   |		Short_Literal	0x0
0131 e5fd       |    |		Load	0x2,-0x3
0132 e5fe       |    |		Load	0x2,-0x2
0133 820d       |    |		Call	0x1,0xd
0134 480b       |H   |		Short_Literal	0xb
0135 e022       | "  |		Load	0x0,0x22
0136 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0137 e023       | #  |		Load	0x0,0x23
0138 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0139 582e       |X.  |		Indirect_Literal	Float,0x168,30.0
013a 4802       |H   |		Short_Literal	0x2
013b 0092 0262  |   b|		Action	Push_String_Extended,0x262					; "CSC Name"
013d 820e       |    |		Call	0x1,0xe
013e 480b       |H   |		Short_Literal	0xb
013f e022       | "  |		Load	0x0,0x22
0140 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0141 e023       | #  |		Load	0x0,0x23
0142 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0143 5820       |X   |		Indirect_Literal	Float,0x164,20.0
0144 4802       |H   |		Short_Literal	0x2
0145 0092 0263  |   c|		Action	Push_String_Extended,0x263					; "CSC Number"
0147 820e       |    |		Call	0x1,0xe
0148 480b       |H   |		Short_Literal	0xb
0149 e022       | "  |		Load	0x0,0x22
014a 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
014b e023       | #  |		Load	0x0,0x23
014c 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
014d 5812       |X   |		Indirect_Literal	Float,0x160,25.0
014e 4802       |H   |		Short_Literal	0x2
014f 0092 0264  |   d|		Action	Push_String_Extended,0x264					; "Memory Budget"
0151 820e       |    |		Call	0x1,0xe
0152 480b       |H   |		Short_Literal	0xb
0153 e022       | "  |		Load	0x0,0x22
0154 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0155 e023       | #  |		Load	0x0,0x23
0156 1b16       |    |		Execute	Package,Field_Read,Field_Number 0x16
0157 5808       |X   |		Indirect_Literal	Float,0x160,25.0
0158 4802       |H   |		Short_Literal	0x2
0159 0092 0265  |   e|		Action	Push_String_Extended,0x265					; "Allocated Processing Time"
015b 820e       |    |		Call	0x1,0xe
015c 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
015d 0000 0000  |    |		.XXX[0x3]
015f 0000       |    |
0160 4039 0000  |@9  |		.DBL	25.0
0162 0000 0000  |    |
0164 4034 0000  |@4  |		.DBL	20.0
0166 0000 0000  |    |
0168 403e 0000  |@>  |		.DBL	30.0
016a 0000 0000  |    |
016c 0000 0000  |    |		.BLANK	0000[0x4]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 0173       | s  |		.CONST	0x0173								; Address of begin
0171 0004       |    |		.CONST	0x0004								; Address of exception handler
0172 0001       |    |		.CONST	0x0001								; Number of locals
0173			BODY_0170:
0173			INIT_0170:
0173 00da       |    |		Load_Top	At_Offset_2
0174 0c30       | 0  |		Execute_Immediate	Greater_Equal,0x30
0175 00db       |    |		Load_Top	At_Offset_3
0176 0d3a       | :  |		Execute_Immediate	Less,0x3a
0177 0279       | y  |		Execute	Discrete,And
0178 6802       |h   |		Jump_Zero	0x17b
0179 4801       |H   |		Short_Literal	0x1
017a 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017b 4800       |H   |		Short_Literal	0x0
017c 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
017d 0000 0000  |    |		.XXX[0x3]
017f 0000       |    |
0180 ; --------------------------------------------------------------------------------------
0180 ; SUBPROGRAM
0180 ; --------------------------------------------------------------------------------------
0180 018a       |    |		.CONST	0x018a								; Address of begin
0181 0004       |    |		.CONST	0x0004								; Address of exception handler
0182 0005       |    |		.CONST	0x0005								; Number of locals
0183			INIT_0180:
0183 00e2       |    |		Load_Encached	Integer_Cache
0184 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0185 00e2       |    |		Load_Encached	Integer_Cache
0186 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0187 00e2       |    |		Load_Encached	Integer_Cache
0188 0600       |    |		Execute_Immediate	Set_Value_Unchecked,0x0
0189 00e2       |    |		Load_Encached	Integer_Cache
018a			BODY_0180:
018a 00cf       |    |		Action	Mark_Auxiliary
018b e7ff       |    |		Load	0x3,-0x1
018c 01dc       |    |		Execute	Vector,Last
018d e7ff       |    |		Load	0x3,-0x1
018e 01dd       |    |		Execute	Vector,First
018f 0263       | c  |		Execute	Discrete,Above_Bound
0190 700b       |p   |		Jump_Nonzero	0x19c
0191 00d8       |    |		Load_Top	At_Offset_0
0192 e7ff       |    |		Load	0x3,-0x1
0193 01d7       |    |		Execute	Vector,Field_Read
0194 840b       |    |		Call	0x2,0xb
0195 6804       |h   |		Jump_Zero	0x19a
0196 00d8       |    |		Load_Top	At_Offset_0
0197 a604       |    |		Store_Unchecked	0x3,0x4
0198 00d2       |    |		Pop_Control	Pop_Count_2
0199 7802       |x   |		Jump	0x19c
019a 00c8       |    |		Action	Pop_Auxiliary_Range
019b 3ff5       |?   |		Loop_Increasing	0x191
019c 00c9       |    |		Action	Pop_Auxiliary_Loop
019d e7ff       |    |		Load	0x3,-0x1
019e 01dc       |    |		Execute	Vector,Last
019f e7ff       |    |		Load	0x3,-0x1
01a0 01dd       |    |		Execute	Vector,First
01a1 0263       | c  |		Execute	Discrete,Above_Bound
01a2 7011       |p   |		Jump_Nonzero	0x1b4
01a3 e7ff       |    |		Load	0x3,-0x1
01a4 01dc       |    |		Execute	Vector,Last
01a5 00d9       |    |		Load_Top	At_Offset_1
01a6 0272       | r  |		Execute	Discrete,Minus
01a7 0a01       |    |		Execute_Immediate	Plus,0x1
01a8 c605       |    |		Store	0x3,0x5
01a9 00db       |    |		Load_Top	At_Offset_3
01aa e7ff       |    |		Load	0x3,-0x1
01ab 01d7       |    |		Execute	Vector,Field_Read
01ac 840b       |    |		Call	0x2,0xb
01ad 6804       |h   |		Jump_Zero	0x1b2
01ae 00db       |    |		Load_Top	At_Offset_3
01af a603       |    |		Store_Unchecked	0x3,0x3
01b0 00d2       |    |		Pop_Control	Pop_Count_2
01b1 7802       |x   |		Jump	0x1b4
01b2 00c8       |    |		Action	Pop_Auxiliary_Range
01b3 3fef       |?   |		Loop_Increasing	0x1a3
01b4 00ce       |    |		Action	Pop_Auxiliary
01b5 00d9       |    |		Load_Top	At_Offset_1
01b6 6802       |h   |		Jump_Zero	0x1b9
01b7 00da       |    |		Load_Top	At_Offset_2
01b8 7002       |p   |		Jump_Nonzero	0x1bb
01b9 4800       |H   |		Short_Literal	0x0
01ba 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01bb 00e1       |    |		Load_Encached	Boolean_Cache
01bc 00e2       |    |		Load_Encached	Integer_Cache
01bd 480a       |H   |		Short_Literal	0xa
01be e604       |    |		Load	0x3,0x4
01bf e603       |    |		Load	0x3,0x3
01c0 e7ff       |    |		Load	0x3,-0x1
01c1 01cf       |    |		Execute	Vector,Slice_Read
01c2 e021       | !  |		Load	0x0,0x21
01c3 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
01c4 c602       |    |		Store	0x3,0x2
01c5 c408       |    |		Store	0x2,0x8
01c6 e408       |    |		Load	0x2,0x8
01c7 6802       |h   |		Jump_Zero	0x1ca
01c8 00db       |    |		Load_Top	At_Offset_3
01c9 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01ca 4800       |H   |		Short_Literal	0x0
01cb 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
01cc 0000 0000  |    |		.BLANK	0000[0x4]
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01d3       |    |		.CONST	0x01d3								; Address of begin
01d1 0004       |    |		.CONST	0x0004								; Address of exception handler
01d2 0001       |    |		.CONST	0x0001								; Number of locals
01d3			BODY_01d0:
01d3			INIT_01d0:
01d3 4801       |H   |		Short_Literal	0x1
01d4 480d       |H   |		Short_Literal	0xd
01d5 e022       | "  |		Load	0x0,0x22
01d6 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
01d7 00ea       |    |		Load_Encached	Null_String_Cache
01d8 4800       |H   |		Short_Literal	0x0
01d9 e7ff       |    |		Load	0x3,-0x1
01da e022       | "  |		Load	0x0,0x22
01db 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01dc 4801       |H   |		Short_Literal	0x1
01dd e7ff       |    |		Load	0x3,-0x1
01de e022       | "  |		Load	0x0,0x22
01df 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01e0 820f       |    |		Call	0x1,0xf
01e1 4801       |H   |		Short_Literal	0x1
01e2 480d       |H   |		Short_Literal	0xd
01e3 e022       | "  |		Load	0x0,0x22
01e4 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
01e5 00ea       |    |		Load_Encached	Null_String_Cache
01e6 4804       |H   |		Short_Literal	0x4
01e7 e7ff       |    |		Load	0x3,-0x1
01e8 e022       | "  |		Load	0x0,0x22
01e9 1822       | "  |		Execute	Package,Field_Execute,Field_Number 0x22
01ea 4804       |H   |		Short_Literal	0x4
01eb e7ff       |    |		Load	0x3,-0x1
01ec e022       | "  |		Load	0x0,0x22
01ed 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
01ee 820f       |    |		Call	0x1,0xf
01ef 4801       |H   |		Short_Literal	0x1
01f0 480d       |H   |		Short_Literal	0xd
01f1 e022       | "  |		Load	0x0,0x22
01f2 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
01f3 00ea       |    |		Load_Encached	Null_String_Cache
01f4 4817       |H   |		Short_Literal	0x17
01f5 e7ff       |    |		Load	0x3,-0x1
01f6 e022       | "  |		Load	0x0,0x22
01f7 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
01f8 4817       |H   |		Short_Literal	0x17
01f9 e7ff       |    |		Load	0x3,-0x1
01fa e022       | "  |		Load	0x0,0x22
01fb 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
01fc 820f       |    |		Call	0x1,0xf
01fd 4801       |H   |		Short_Literal	0x1
01fe 480d       |H   |		Short_Literal	0xd
01ff e022       | "  |		Load	0x0,0x22
0200 1862       | b  |		Execute	Package,Field_Execute,Field_Number 0x62
0201 00ea       |    |		Load_Encached	Null_String_Cache
0202 4818       |H   |		Short_Literal	0x18
0203 e7ff       |    |		Load	0x3,-0x1
0204 e022       | "  |		Load	0x0,0x22
0205 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
0206 4818       |H   |		Short_Literal	0x18
0207 e7ff       |    |		Load	0x3,-0x1
0208 e022       | "  |		Load	0x0,0x22
0209 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
020a 820f       |    |		Call	0x1,0xf
020b e402       |    |		Load	0x2,0x2
020c 4817       |H   |		Short_Literal	0x17
020d e7ff       |    |		Load	0x3,-0x1
020e e022       | "  |		Load	0x0,0x22
020f 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0210 840c       |    |		Call	0x2,0xc
0211 0273       | s  |		Execute	Discrete,Plus
0212 c402       |    |		Store	0x2,0x2
0213 e403       |    |		Load	0x2,0x3
0214 4818       |H   |		Short_Literal	0x18
0215 e7ff       |    |		Load	0x3,-0x1
0216 e022       | "  |		Load	0x0,0x22
0217 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0218 840c       |    |		Call	0x2,0xc
0219 0273       | s  |		Execute	Discrete,Plus
021a c403       |    |		Store	0x2,0x3
021b 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
021c 0000 0000  |    |		.BLANK	0000[0x4]
0220 ; --------------------------------------------------------------------------------------
0220 ; SUBPROGRAM
0220 ; --------------------------------------------------------------------------------------
0220 022d       | -  |		.CONST	0x022d								; Address of begin
0221 0004       |    |		.CONST	0x0004								; Address of exception handler
0222 0003       |    |		.CONST	0x0003								; Number of locals
0223			INIT_0220:
0223 e027       | '  |		Load	0x0,0x27
0224 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0225 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0226 e022       | "  |		Load	0x0,0x22
0227 1b1d       |    |		Execute	Package,Field_Read,Field_Number 0x1d
0228 02ff       |    |		Declare_Variable	Variant_Record
0229 e022       | "  |		Load	0x0,0x22
022a 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
022b 00d9       |    |		Load_Top	At_Offset_1
022c 016d       | m  |		Execute	Variant_Record,Structure_Write
022d			BODY_0220:
022d 00d8       |    |		Load_Top	At_Offset_0
022e 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
022f e02c       | ,  |		Load	0x0,0x2c
0230 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0231 4817       |H   |		Short_Literal	0x17
0232 e01f       |    |		Load	0x0,0x1f
0233 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0234 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
0235 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
0236 00d9       |    |		Load_Top	At_Offset_1
0237 e027       | '  |		Load	0x0,0x27
0238 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0239 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
023a 6803       |h   |		Jump_Zero	0x23e
023b 4800       |H   |		Short_Literal	0x0
023c a7fe       |    |		Store_Unchecked	0x3,-0x2
023d 7807       |x   |		Jump	0x245
023e 00ea       |    |		Load_Encached	Null_String_Cache
023f 00da       |    |		Load_Top	At_Offset_2
0240 e01f       |    |		Load	0x0,0x1f
0241 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
0242 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0243 840c       |    |		Call	0x2,0xc
0244 a7fe       |    |		Store_Unchecked	0x3,-0x2
0245 00d8       |    |		Load_Top	At_Offset_0
0246 2e03       |.   |		Execute	Variant_Record,Field_Read,Variant,Direct,Field_Number 0x3
0247 e02c       | ,  |		Load	0x0,0x2c
0248 1838       | 8  |		Execute	Package,Field_Execute,Field_Number 0x38
0249 4818       |H   |		Short_Literal	0x18
024a e01f       |    |		Load	0x0,0x1f
024b 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
024c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
024d 0032       | 2  |		Store_Top	Heap_Access,At_Offset_2
024e 00d9       |    |		Load_Top	At_Offset_1
024f e027       | '  |		Load	0x0,0x27
0250 1b20       |    |		Execute	Package,Field_Read,Field_Number 0x20
0251 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0252 6803       |h   |		Jump_Zero	0x256
0253 4800       |H   |		Short_Literal	0x0
0254 a7ff       |    |		Store_Unchecked	0x3,-0x1
0255 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0256 00ea       |    |		Load_Encached	Null_String_Cache
0257 00da       |    |		Load_Top	At_Offset_2
0258 e01f       |    |		Load	0x0,0x1f
0259 1b10       |    |		Execute	Package,Field_Read,Field_Number 0x10
025a 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
025b 840c       |    |		Call	0x2,0xc
025c a7ff       |    |		Store_Unchecked	0x3,-0x1
025d 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
025e ; --------------------------------------------------------------------------------------
025e ; STRING TABLE
025e ; --------------------------------------------------------------------------------------
025e 0012       |    |		.STRTAB	0x0012->0x0267							; "TOTAL"
025f 0015       |    |		.STRTAB	0x0015->0x0269							; "TOTAL AVAILABLE"
0260 0022       | "  |		.STRTAB	0x0022->0x0271							; "RESERVE"
0261 0027       | '  |		.STRTAB	0x0027->0x0274							; "PERCENT RESERVE"
0262 0034       | 4  |		.STRTAB	0x0034->0x027c							; "CSC Name"
0263 003a       | :  |		.STRTAB	0x003a->0x0280							; "CSC Number"
0264 0042       | B  |		.STRTAB	0x0042->0x0285							; "Memory Budget"
0265 004d       | M  |		.STRTAB	0x004d->0x028b							; "Allocated Processing Time"
0266 0064       | d  |		.STREND 0x0064->0x0298
0267 544f 5441  |TOTA|		.STRTAB_STRINGS
0298 ; --------------------------------------------------------------------------------------
0298 ; Debug Table
0298 ; --------------------------------------------------------------------------------------
0298 0004 0012  |    |		.DEBUG4	0x0004,0x0012,0xfc86,0x0000,0x0001,0x0000
029e 0000 0000  |    |		.BLANK	0000[0x162]