|
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: 3072 (0xc00)
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 0590 | | .CONST 0x0590 ; 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 8003 | | .CONST 0x8003 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 004b | K | .CONST 0x004b ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0018 | | .CONST 0x0018 ; Number of locals
000b INIT_0008:
000b 029a 0053 | S| Declare_Subprogram INIT_0050,For_Outer_Call,Visible,Unelaborated
000d 029a 00a3 | | Declare_Subprogram INIT_00a0,For_Outer_Call,Visible,Unelaborated
000f 00c4 | | Action Make_Default
0010 00c4 | | Action Make_Default
0011 00c4 | | Action Make_Default
0012 00c4 | | Action Make_Default
0013 00c4 | | Action Make_Default
0014 029a 00ab | | Declare_Subprogram INIT_00a8,For_Outer_Call,Visible,Unelaborated
0016 c212 | | Store 0x1,0x12
0017 029a 00eb | | Declare_Subprogram INIT_00e8,For_Outer_Call,Visible,Unelaborated
0019 c210 | | Store 0x1,0x10
001a 029a 0163 | c| Declare_Subprogram INIT_0160,For_Outer_Call,Visible,Unelaborated
001c c211 | | Store 0x1,0x11
001d 029a 0173 | s| Declare_Subprogram INIT_0170,For_Outer_Call,Visible,Unelaborated
001f c213 | | Store 0x1,0x13
0020 00bf | | Action Accept_Activation
0021 4800 |H | Short_Literal 0x0
0022 4804 |H | Short_Literal 0x4
0023 029f 01bb | | Declare_Subprogram INIT_01b8,For_Call
0025 03fd | | Declare_Type Discrete,Defined
0026 e001 | | Load 0x0,0x1
0027 e002 | | Load 0x0,0x2
0028 e214 | | Load 0x1,0x14
0029 4800 |H | Short_Literal 0x0
002a 4801 |H | Short_Literal 0x1
002b 4804 |H | Short_Literal 0x4
002c 0092 03de | | Action Push_String_Extended,0x3de ; "others => Unspecified"
002e 00ea | | Load_Encached Null_String_Cache
002f 00ea | | Load_Encached Null_String_Cache
0030 4801 |H | Short_Literal 0x1
0031 4804 |H | Short_Literal 0x4
0032 e003 | | Load 0x0,0x3
0033 0387 | | Declare_Variable Package
0034 00d8 | | Load_Top At_Offset_0
0035 020f | | Execute Module,Activate
0036 e004 | | Load 0x0,0x4
0037 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0038 02c7 | | Declare_Variable Any
0039 00d8 | | Load_Top At_Offset_0
003a 1c00 | | Execute_Immediate Run_Utility,0x0
003b 1d0d | | Execute_Immediate Reference_Lex_1,0xd
003c 00c7 | | Action Elaborate_Subprogram
003d 1d0e | | Execute_Immediate Reference_Lex_1,0xe
003e 00c7 | | Action Elaborate_Subprogram
003f 1d12 | | Execute_Immediate Reference_Lex_1,0x12
0040 00c7 | | Action Elaborate_Subprogram
0041 029d 01d3 | | Declare_Subprogram INIT_01d0,For_Outer_Call
0043 029d 0213 | | Declare_Subprogram INIT_0210,For_Outer_Call
0045 1d13 | | Execute_Immediate Reference_Lex_1,0x13
0046 00c7 | | Action Elaborate_Subprogram
0047 1d10 | | Execute_Immediate Reference_Lex_1,0x10
0048 00c7 | | Action Elaborate_Subprogram
0049 1d11 | | Execute_Immediate Reference_Lex_1,0x11
004a 00c7 | | Action Elaborate_Subprogram
004b BODY_0008:
004b 00bc | | Action Signal_Activated
004c 00bb | | Action Signal_Completion
004d 0000 0000 | | .XXX[0x3]
004f 0000 | |
0050 ; --------------------------------------------------------------------------------------
0050 ; SUBPROGRAM
0050 ; --------------------------------------------------------------------------------------
0050 0056 | V | .CONST 0x0056 ; Address of begin
0051 0004 | | .CONST 0x0004 ; Address of exception handler
0052 0003 | | .CONST 0x0003 ; Number of locals
0053 INIT_0050:
0053 e215 | | Load 0x1,0x15
0054 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0055 00e1 | | Load_Encached Boolean_Cache
0056 BODY_0050:
0056 e216 | | Load 0x1,0x16
0057 00ea | | Load_Encached Null_String_Cache
0058 e5fe | | Load 0x2,-0x2
0059 4801 |H | Short_Literal 0x1
005a e004 | | Load 0x0,0x4
005b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
005c c216 | | Store 0x1,0x16
005d 0092 03df | | Action Push_String_Extended,0x3df ; "~right_heading(~>Standard ACL Values for the Predefined Universe~>)"
005f e216 | | Load 0x1,0x16
0060 e004 | | Load 0x0,0x4
0061 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0062 0092 03e0 | | Action Push_String_Extended,0x3e0 ; "~left_heading(~>Standard ACL Values for the Predefined Universe~>)"
0064 e216 | | Load 0x1,0x16
0065 e004 | | Load 0x0,0x4
0066 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0067 0092 03e1 | | Action Push_String_Extended,0x3e1 ; "~left_footing(~>~>~value(date))"
0069 e216 | | Load 0x1,0x16
006a e004 | | Load 0x0,0x4
006b 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
006c 0092 03e2 | | Action Push_String_Extended,0x3e2 ; "~right_footing(~>~>~value(date))"
006e e216 | | Load 0x1,0x16
006f e004 | | Load 0x0,0x4
0070 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0071 0092 03e3 | | Action Push_String_Extended,0x3e3 ; "~macro(ce=\x22~column_entry(~argument(text))\x22)"
0073 e216 | | Load 0x1,0x16
0074 e004 | | Load 0x0,0x4
0075 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0076 0092 03e4 | | Action Push_String_Extended,0x3e4 ; "~Setup(table_space_after=.15inches)"
0078 e216 | | Load 0x1,0x16
0079 e004 | | Load 0x0,0x4
007a 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
007b 0092 03e5 | | Action Push_String_Extended,0x3e5 ; "~Setup(table_space_before=.15inches)"
007d e216 | | Load 0x1,0x16
007e e004 | | Load 0x0,0x4
007f 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0080 0092 03e6 | | Action Push_String_Extended,0x3e6 ; "~Setup(table_leading=1)"
0082 e216 | | Load 0x1,0x16
0083 e004 | | Load 0x0,0x4
0084 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0085 0092 03e7 | | Action Push_String_Extended,0x3e7 ; "~Setup(Header_Space_Before=.3inches)"
0087 e216 | | Load 0x1,0x16
0088 e004 | | Load 0x0,0x4
0089 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
008a 0092 03e8 | | Action Push_String_Extended,0x3e8 ; "~Setup(Header_Space_after=.3inches)"
008c e216 | | Load 0x1,0x16
008d e004 | | Load 0x0,0x4
008e 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
008f 0092 03e9 | | Action Push_String_Extended,0x3e9 ; "~Setup(footer_Space_before=.1inches)"
0091 e216 | | Load 0x1,0x16
0092 e004 | | Load 0x0,0x4
0093 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0094 0092 03ea | | Action Push_String_Extended,0x3ea ; "~Setup(footer_point=10.5inches)"
0096 e216 | | Load 0x1,0x16
0097 e004 | | Load 0x0,0x4
0098 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0099 0092 03eb | | Action Push_String_Extended,0x3eb ; "~macro(table_size=\x22~environment(point_size=9)\x22)"
009b e216 | | Load 0x1,0x16
009c e004 | | Load 0x0,0x4
009d 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
009e 4503 |E | Exit_Suprogram New_Top_Offset 0x3
009f 0000 | | .XXX[0x1]
00a0 ; --------------------------------------------------------------------------------------
00a0 ; SUBPROGRAM
00a0 ; --------------------------------------------------------------------------------------
00a0 00a3 | | .CONST 0x00a3 ; Address of begin
00a1 0004 | | .CONST 0x0004 ; Address of exception handler
00a2 0001 | | .CONST 0x0001 ; Number of locals
00a3 BODY_00a0:
00a3 INIT_00a0:
00a3 e216 | | Load 0x1,0x16
00a4 e004 | | Load 0x0,0x4
00a5 181b | | Execute Package,Field_Execute,Field_Number 0x1b
00a6 c216 | | Store 0x1,0x16
00a7 4501 |E | Exit_Suprogram New_Top_Offset 0x1
00a8 ; --------------------------------------------------------------------------------------
00a8 ; SUBPROGRAM
00a8 ; --------------------------------------------------------------------------------------
00a8 00ab | | .CONST 0x00ab ; Address of begin
00a9 0004 | | .CONST 0x0004 ; Address of exception handler
00aa 0001 | | .CONST 0x0001 ; Number of locals
00ab BODY_00a8:
00ab INIT_00a8:
00ab 0092 03ec | | Action Push_String_Extended,0x3ec ; "~begin(table)"
00ad e216 | | Load 0x1,0x16
00ae e004 | | Load 0x0,0x4
00af 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
00b0 0092 03ed | | Action Push_String_Extended,0x3ed ; "~table_size()"
00b2 e216 | | Load 0x1,0x16
00b3 e004 | | Load 0x0,0x4
00b4 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
00b5 0092 03ee | | Action Push_String_Extended,0x3ee ; "~title("
00b7 e5ff | | Load 0x2,-0x1
00b8 01cc | | Execute Vector,Catenate
00b9 0092 03ef | | Action Push_String_Extended,0x3ef ; ": "
00bb 01cc | | Execute Vector,Catenate
00bc e5fe | | Load 0x2,-0x2
00bd 01cc | | Execute Vector,Catenate
00be 0092 03f0 | | Action Push_String_Extended,0x3f0 ; ")"
00c0 01cc | | Execute Vector,Catenate
00c1 e216 | | Load 0x1,0x16
00c2 e004 | | Load 0x0,0x4
00c3 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
00c4 0092 03f1 | | Action Push_String_Extended,0x3f1 ; "~column_definition(heading_text=\x22Path Name\x22,heading_mode=c,body_mode=l,width=3inches)"
00c6 e216 | | Load 0x1,0x16
00c7 e004 | | Load 0x0,0x4
00c8 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
00c9 00cf | | Action Mark_Auxiliary
00ca e214 | | Load 0x1,0x14
00cb 0265 | e | Execute Discrete,Reverse_Bounds
00cc 0007 | | Action Break_Optional
00cd 00d8 | | Load_Top At_Offset_0
00ce 680f |h | Jump_Zero 0xde
00cf 0092 03f2 | | Action Push_String_Extended,0x3f2 ; "~column_definition(heading_text=\x22"
00d1 e404 | | Load 0x2,0x4
00d2 e214 | | Load 0x1,0x14
00d3 025e | ^ | Execute Discrete,Convert
00d4 1c01 | | Execute_Immediate Run_Utility,0x1
00d5 e005 | | Load 0x0,0x5
00d6 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
00d7 01cc | | Execute Vector,Catenate
00d8 0092 03f3 | | Action Push_String_Extended,0x3f3 ; "\x22,heading_mode=c,body_mode=l,width=0inches)"
00da 01cc | | Execute Vector,Catenate
00db e216 | | Load 0x1,0x16
00dc e004 | | Load 0x0,0x4
00dd 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
00de 00c8 | | Action Pop_Auxiliary_Range
00df 3fed |? | Loop_Increasing 0xcd
00e0 4503 |E | Exit_Suprogram New_Top_Offset 0x3
00e1 0000 0000 | | .BLANK 0000[0x7]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 00fe | | .CONST 0x00fe ; Address of begin
00e9 0004 | | .CONST 0x0004 ; Address of exception handler
00ea 0006 | | .CONST 0x0006 ; Number of locals
00eb INIT_00e8:
00eb e215 | | Load 0x1,0x15
00ec 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
00ed 00e1 | | Load_Encached Boolean_Cache
00ee e214 | | Load 0x1,0x14
00ef 0266 | f | Execute Discrete,Bounds
00f0 4832 |H2 | Short_Literal 0x32
00f1 e006 | | Load 0x0,0x6
00f2 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00f3 1c07 | | Execute_Immediate Run_Utility,0x7
00f4 029f 0243 | C| Declare_Subprogram INIT_0240,For_Call
00f6 4801 |H | Short_Literal 0x1
00f7 035d | ] | Declare_Type Array,Defined
00f8 00d8 | | Load_Top At_Offset_0
00f9 0337 | 7 | Declare_Variable Array
00fa 00d8 | | Load_Top At_Offset_0
00fb 1c00 | | Execute_Immediate Run_Utility,0x0
00fc e5fe | | Load 0x2,-0x2
00fd 8213 | | Call 0x1,0x13
00fe BODY_00e8:
00fe 00e1 | | Load_Encached Boolean_Cache
00ff e215 | | Load 0x1,0x15
0100 1b1e | | Execute Package,Field_Read,Field_Number 0x1e
0101 e406 | | Load 0x2,0x6
0102 e215 | | Load 0x1,0x15
0103 181f | | Execute Package,Field_Execute,Field_Number 0x1f
0104 c402 | | Store 0x2,0x2
0105 c403 | | Store 0x2,0x3
0106 0092 03f4 | | Action Push_String_Extended,0x3f4 ; "~ce("
0108 e5ff | | Load 0x2,-0x1
0109 e005 | | Load 0x0,0x5
010a 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
010b 0092 03f5 | | Action Push_String_Extended,0x3f5 ; ") "
010d 01cc | | Execute Vector,Catenate
010e 8217 | | Call 0x1,0x17
010f 01cc | | Execute Vector,Catenate
0110 e216 | | Load 0x1,0x16
0111 e004 | | Load 0x0,0x4
0112 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
0113 00cf | | Action Mark_Auxiliary
0114 7824 |x$ | Jump 0x139
0115 4800 |H | Short_Literal 0x0
0116 e402 | | Load 0x2,0x2
0117 e215 | | Load 0x1,0x15
0118 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
0119 700a |p | Jump_Nonzero 0x124
011a 0092 03f6 | | Action Push_String_Extended,0x3f6 ; "Illegal option: "
011c 4800 |H | Short_Literal 0x0
011d e402 | | Load 0x2,0x2
011e e215 | | Load 0x1,0x15
011f 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24
0120 01cc | | Execute Vector,Catenate
0121 e004 | | Load 0x0,0x4
0122 1864 | d | Execute Package,Field_Execute,Field_Number 0x64
0123 7810 |x | Jump 0x134
0124 e402 | | Load 0x2,0x2
0125 e215 | | Load 0x1,0x15
0126 1828 | ( | Execute Package,Field_Execute,Field_Number 0x28
0127 e405 | | Load 0x2,0x5
0128 01d5 | | Execute Vector,Field_Reference
0129 00d8 | | Load_Top At_Offset_0
012a 00ea | | Load_Encached Null_String_Cache
012b 4800 |H | Short_Literal 0x0
012c e402 | | Load 0x2,0x2
012d e215 | | Load 0x1,0x15
012e 182b | + | Execute Package,Field_Execute,Field_Number 0x2b
012f e005 | | Load 0x0,0x5
0130 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0131 e006 | | Load 0x0,0x6
0132 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0133 00d2 | | Pop_Control Pop_Count_2
0134 e402 | | Load 0x2,0x2
0135 e215 | | Load 0x1,0x15
0136 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0137 c402 | | Store 0x2,0x2
0138 00c9 | | Action Pop_Auxiliary_Loop
0139 e402 | | Load 0x2,0x2
013a e215 | | Load 0x1,0x15
013b 1825 | % | Execute Package,Field_Execute,Field_Number 0x25
013c 6fd8 |o | Jump_Zero 0x115
013d 00ce | | Action Pop_Auxiliary
013e 00cf | | Action Mark_Auxiliary
013f e214 | | Load 0x1,0x14
0140 0265 | e | Execute Discrete,Reverse_Bounds
0141 0007 | | Action Break_Optional
0142 00d8 | | Load_Top At_Offset_0
0143 680e |h | Jump_Zero 0x152
0144 0092 03f4 | | Action Push_String_Extended,0x3f4 ; "~ce("
0146 e409 | | Load 0x2,0x9
0147 e405 | | Load 0x2,0x5
0148 01d5 | | Execute Vector,Field_Reference
0149 e006 | | Load 0x0,0x6
014a 1813 | | Execute Package,Field_Execute,Field_Number 0x13
014b 01cc | | Execute Vector,Catenate
014c 0092 03f5 | | Action Push_String_Extended,0x3f5 ; ") "
014e 01cc | | Execute Vector,Catenate
014f e216 | | Load 0x1,0x16
0150 e004 | | Load 0x0,0x4
0151 185e | ^ | Execute Package,Field_Execute,Field_Number 0x5e
0152 00c8 | | Action Pop_Auxiliary_Range
0153 3fee |? | Loop_Increasing 0x142
0154 00ce | | Action Pop_Auxiliary
0155 4801 |H | Short_Literal 0x1
0156 e216 | | Load 0x1,0x16
0157 e004 | | Load 0x0,0x4
0158 183f | ? | Execute Package,Field_Execute,Field_Number 0x3f
0159 4503 |E | Exit_Suprogram New_Top_Offset 0x3
015a 0000 0000 | | .BLANK 0000[0x6]
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 0092 03f7 | | Action Push_String_Extended,0x3f7 ; "~end(table)"
0165 e216 | | Load 0x1,0x16
0166 e004 | | Load 0x0,0x4
0167 1863 | c | Execute Package,Field_Execute,Field_Number 0x63
0168 4501 |E | Exit_Suprogram New_Top_Offset 0x1
0169 0000 0000 | | .BLANK 0000[0x7]
0170 ; --------------------------------------------------------------------------------------
0170 ; SUBPROGRAM
0170 ; --------------------------------------------------------------------------------------
0170 01a2 | | .CONST 0x01a2 ; Address of begin
0171 0004 | | .CONST 0x0004 ; Address of exception handler
0172 000e | | .CONST 0x000e ; Number of locals
0173 INIT_0170:
0173 4800 |H | Short_Literal 0x0
0174 4806 |H | Short_Literal 0x6
0175 4864 |Hd | Short_Literal 0x64
0176 e006 | | Load 0x0,0x6
0177 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0178 1c07 | | Execute_Immediate Run_Utility,0x7
0179 029f 0273 | s| Declare_Subprogram INIT_0270,For_Call
017b 4801 |H | Short_Literal 0x1
017c 035d | ] | Declare_Type Array,Defined
017d 00d8 | | Load_Top At_Offset_0
017e 0337 | 7 | Declare_Variable Array
017f 00d8 | | Load_Top At_Offset_0
0180 1c00 | | Execute_Immediate Run_Utility,0x0
0181 4800 |H | Short_Literal 0x0
0182 4806 |H | Short_Literal 0x6
0183 4805 |H | Short_Literal 0x5
0184 e006 | | Load 0x0,0x6
0185 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0186 1c07 | | Execute_Immediate Run_Utility,0x7
0187 029f 02a3 | | Declare_Subprogram INIT_02a0,For_Call
0189 4801 |H | Short_Literal 0x1
018a 035d | ] | Declare_Type Array,Defined
018b 00d8 | | Load_Top At_Offset_0
018c 0337 | 7 | Declare_Variable Array
018d 00d8 | | Load_Top At_Offset_0
018e 1c00 | | Execute_Immediate Run_Utility,0x0
018f 00e3 | | Load_Encached Natural_Cache
0190 0600 | | Execute_Immediate Set_Value_Unchecked,0x0
0191 e5ff | | Load 0x2,-0x1
0192 01dd | | Execute Vector,First
0193 00e3 | | Load_Encached Natural_Cache
0194 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
0195 00e3 | | Load_Encached Natural_Cache
0196 029f 02d3 | | Declare_Subprogram INIT_02d0,For_Call
0198 029f 0303 | | Declare_Subprogram INIT_0300,For_Call
019a 029f 0343 | C| Declare_Subprogram INIT_0340,For_Call
019c 029f 0363 | c| Declare_Subprogram INIT_0360,For_Call
019e 029f 038b | | Declare_Subprogram INIT_0388,For_Call
01a0 029f 03c3 | | Declare_Subprogram INIT_03c0,For_Call
01a2 BODY_0170:
01a2 00cf | | Action Mark_Auxiliary
01a3 840b | | Call 0x2,0xb
01a4 840e | | Call 0x2,0xe
01a5 e407 | | Load 0x2,0x7
01a6 e5ff | | Load 0x2,-0x1
01a7 01dc | | Execute Vector,Last
01a8 027d | } | Execute Discrete,Greater
01a9 7002 |p | Jump_Nonzero 0x1ac
01aa 00c9 | | Action Pop_Auxiliary_Loop
01ab 7ff7 | | Jump 0x1a3
01ac 00ce | | Action Pop_Auxiliary
01ad e406 | | Load 0x2,0x6
01ae 840d | | Call 0x2,0xd
01af 00e9 | | Load_Encached String_Cache
01b0 01c6 | | Execute Vector,Convert_To_Formal
01b1 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
01b2 0000 0000 | | .BLANK 0000[0x6]
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 4603 |F | Jump_Case 0x4
01bc 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x0
01bd 7802 |x | Jump 0x1c0 ; case 0x1
01be 7805 |x | Jump 0x1c4 ; case 0x2
01bf 7809 |x | Jump 0x1c9 ; case 0x3
01c0 e5ff | | Load 0x2,-0x1
01c1 0091 03d9 | | Action Push_String_Extended_Indexed,0x3d9 ; "NIL"
01c3 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01c4 e5fe | | Load 0x2,-0x2
01c5 e5ff | | Load 0x2,-0x1
01c6 00e0 | | Load_Encached Standard_Cache
01c7 181b | | Execute Package,Field_Execute,Field_Number 0x1b
01c8 4202 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x2
01c9 e5ff | | Load 0x2,-0x1
01ca 00e0 | | Load_Encached Standard_Cache
01cb 181c | | Execute Package,Field_Execute,Field_Number 0x1c
01cc 4201 |B | Exit_Subprogram From_Utility,With_Result,New_Top_Offset 0x1
01cd 0000 0000 | | .XXX[0x3]
01cf 0000 | |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01df | | .CONST 0x01df ; Address of begin
01d1 0004 | | .CONST 0x0004 ; Address of exception handler
01d2 0003 | | .CONST 0x0003 ; Number of locals
01d3 INIT_01d0:
01d3 e5ff | | Load 0x2,-0x1
01d4 01dd | | Execute Vector,First
01d5 e5ff | | Load 0x2,-0x1
01d6 01dc | | Execute Vector,Last
01d7 0a14 | | Execute_Immediate Plus,0x14
01d8 0248 | H | Execute Discrete,Check_In_Integer
01d9 00e9 | | Load_Encached String_Cache
01da 0334 | 4 | Declare_Variable Array,With_Constraint
01db 00d8 | | Load_Top At_Offset_0
01dc 01dd | | Execute Vector,First
01dd 00e3 | | Load_Encached Natural_Cache
01de 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
01df BODY_01d0:
01df 00cf | | Action Mark_Auxiliary
01e0 e5ff | | Load 0x2,-0x1
01e1 01dc | | Execute Vector,Last
01e2 e5ff | | Load 0x2,-0x1
01e3 01dd | | Execute Vector,First
01e4 0263 | c | Execute Discrete,Above_Bound
01e5 701d |p | Jump_Nonzero 0x203
01e6 00d8 | | Load_Top At_Offset_0
01e7 e5ff | | Load 0x2,-0x1
01e8 01d7 | | Execute Vector,Field_Read
01e9 0f7e | ~ | Execute_Immediate Equal,0x7e
01ea 700a |p | Jump_Nonzero 0x1f5
01eb 00d8 | | Load_Top At_Offset_0
01ec e5ff | | Load 0x2,-0x1
01ed 01d7 | | Execute Vector,Field_Read
01ee e403 | | Load 0x2,0x3
01ef e402 | | Load 0x2,0x2
01f0 01d6 | | Execute Vector,Field_Write
01f1 e403 | | Load 0x2,0x3
01f2 0a01 | | Execute_Immediate Plus,0x1
01f3 c403 | | Store 0x2,0x3
01f4 780c |x | Jump 0x201
01f5 487e |H~ | Short_Literal 0x7e
01f6 e403 | | Load 0x2,0x3
01f7 e402 | | Load 0x2,0x2
01f8 01d6 | | Execute Vector,Field_Write
01f9 487e |H~ | Short_Literal 0x7e
01fa e403 | | Load 0x2,0x3
01fb 0a01 | | Execute_Immediate Plus,0x1
01fc e402 | | Load 0x2,0x2
01fd 01d6 | | Execute Vector,Field_Write
01fe e403 | | Load 0x2,0x3
01ff 0a02 | | Execute_Immediate Plus,0x2
0200 c403 | | Store 0x2,0x3
0201 00c8 | | Action Pop_Auxiliary_Range
0202 3fe3 |? | Loop_Increasing 0x1e6
0203 00ce | | Action Pop_Auxiliary
0204 e402 | | Load 0x2,0x2
0205 01dd | | Execute Vector,First
0206 e403 | | Load 0x2,0x3
0207 0aff | | Execute_Immediate Plus,-0x1
0208 e402 | | Load 0x2,0x2
0209 01cf | | Execute Vector,Slice_Read
020a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
020b 0000 0000 | | .BLANK 0000[0x5]
0210 ; --------------------------------------------------------------------------------------
0210 ; SUBPROGRAM
0210 ; --------------------------------------------------------------------------------------
0210 021f | | .CONST 0x021f ; Address of begin
0211 0004 | | .CONST 0x0004 ; Address of exception handler
0212 0004 | | .CONST 0x0004 ; Number of locals
0213 INIT_0210:
0213 e5ff | | Load 0x2,-0x1
0214 01da | | Execute Vector,Bounds
0215 00e9 | | Load_Encached String_Cache
0216 0334 | 4 | Declare_Variable Array,With_Constraint
0217 e5ff | | Load 0x2,-0x1
0218 01dd | | Execute Vector,First
0219 00e4 | | Load_Encached Positive_Cache
021a 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
021b e5ff | | Load 0x2,-0x1
021c 01dd | | Execute Vector,First
021d 00e4 | | Load_Encached Positive_Cache
021e 03ec | | Declare_Variable Discrete,With_Value,With_Constraint
021f BODY_0210:
021f 00cf | | Action Mark_Auxiliary
0220 e404 | | Load 0x2,0x4
0221 e5ff | | Load 0x2,-0x1
0222 01dc | | Execute Vector,Last
0223 027d | } | Execute Discrete,Greater
0224 7013 |p | Jump_Nonzero 0x238
0225 e404 | | Load 0x2,0x4
0226 e5ff | | Load 0x2,-0x1
0227 01d7 | | Execute Vector,Field_Read
0228 0e20 | | Execute_Immediate Not_Equal,0x20
0229 6809 |h | Jump_Zero 0x233
022a e404 | | Load 0x2,0x4
022b e5ff | | Load 0x2,-0x1
022c 01d7 | | Execute Vector,Field_Read
022d e403 | | Load 0x2,0x3
022e e402 | | Load 0x2,0x2
022f 01d6 | | Execute Vector,Field_Write
0230 e403 | | Load 0x2,0x3
0231 0a01 | | Execute_Immediate Plus,0x1
0232 c403 | | Store 0x2,0x3
0233 e404 | | Load 0x2,0x4
0234 0a01 | | Execute_Immediate Plus,0x1
0235 c404 | | Store 0x2,0x4
0236 00c9 | | Action Pop_Auxiliary_Loop
0237 7fe8 | | Jump 0x220
0238 00ce | | Action Pop_Auxiliary
0239 e402 | | Load 0x2,0x2
023a 01dd | | Execute Vector,First
023b e403 | | Load 0x2,0x3
023c 0aff | | Execute_Immediate Plus,-0x1
023d e402 | | Load 0x2,0x2
023e 01cf | | Execute Vector,Slice_Read
023f 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0243 | C | .CONST 0x0243 ; Address of begin
0241 0004 | | .CONST 0x0004 ; Address of exception handler
0242 0001 | | .CONST 0x0001 ; Number of locals
0243 BODY_0240:
0243 INIT_0240:
0243 4605 |F | Jump_Case 0x6
0244 7804 |x | Jump 0x249 ; case 0x0
0245 7814 |x | Jump 0x25a ; case 0x1
0246 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0247 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0248 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0249 e7ff | | Load 0x3,-0x1 ; case 0x5
024a 01dc | | Execute Vector,Last
024b e7ff | | Load 0x3,-0x1
024c 01dd | | Execute Vector,First
024d 0263 | c | Execute Discrete,Above_Bound
024e 700a |p | Jump_Nonzero 0x259
024f 00d8 | | Load_Top At_Offset_0
0250 e7ff | | Load 0x3,-0x1
0251 01d5 | | Execute Vector,Field_Reference
0252 0125 | % | Execute Any,Set_Constraint
0253 00d8 | | Load_Top At_Offset_0
0254 e7ff | | Load 0x3,-0x1
0255 01d5 | | Execute Vector,Field_Reference
0256 1c00 | | Execute_Immediate Run_Utility,0x0
0257 0a01 | | Execute_Immediate Plus,0x1
0258 7ff4 | | Jump 0x24d
0259 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
025a e7ff | | Load 0x3,-0x1
025b 01dc | | Execute Vector,Last
025c e7ff | | Load 0x3,-0x1
025d 01dd | | Execute Vector,First
025e 0263 | c | Execute Discrete,Above_Bound
025f 700a |p | Jump_Nonzero 0x26a
0260 00d8 | | Load_Top At_Offset_0
0261 e7ff | | Load 0x3,-0x1
0262 01d5 | | Execute Vector,Field_Reference
0263 0125 | % | Execute Any,Set_Constraint
0264 00d8 | | Load_Top At_Offset_0
0265 e7ff | | Load 0x3,-0x1
0266 01d7 | | Execute Vector,Field_Read
0267 1c00 | | Execute_Immediate Run_Utility,0x0
0268 0a01 | | Execute_Immediate Plus,0x1
0269 7ff4 | | Jump 0x25e
026a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
026b 0000 0000 | | .BLANK 0000[0x5]
0270 ; --------------------------------------------------------------------------------------
0270 ; SUBPROGRAM
0270 ; --------------------------------------------------------------------------------------
0270 0273 | s | .CONST 0x0273 ; Address of begin
0271 0004 | | .CONST 0x0004 ; Address of exception handler
0272 0001 | | .CONST 0x0001 ; Number of locals
0273 BODY_0270:
0273 INIT_0270:
0273 4605 |F | Jump_Case 0x6
0274 7804 |x | Jump 0x279 ; case 0x0
0275 7814 |x | Jump 0x28a ; case 0x1
0276 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
0277 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
0278 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
0279 e7ff | | Load 0x3,-0x1 ; case 0x5
027a 01dc | | Execute Vector,Last
027b e7ff | | Load 0x3,-0x1
027c 01dd | | Execute Vector,First
027d 0263 | c | Execute Discrete,Above_Bound
027e 700a |p | Jump_Nonzero 0x289
027f 00d8 | | Load_Top At_Offset_0
0280 e7ff | | Load 0x3,-0x1
0281 01d5 | | Execute Vector,Field_Reference
0282 0125 | % | Execute Any,Set_Constraint
0283 00d8 | | Load_Top At_Offset_0
0284 e7ff | | Load 0x3,-0x1
0285 01d5 | | Execute Vector,Field_Reference
0286 1c00 | | Execute_Immediate Run_Utility,0x0
0287 0a01 | | Execute_Immediate Plus,0x1
0288 7ff4 | | Jump 0x27d
0289 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
028a e7ff | | Load 0x3,-0x1
028b 01dc | | Execute Vector,Last
028c e7ff | | Load 0x3,-0x1
028d 01dd | | Execute Vector,First
028e 0263 | c | Execute Discrete,Above_Bound
028f 700a |p | Jump_Nonzero 0x29a
0290 00d8 | | Load_Top At_Offset_0
0291 e7ff | | Load 0x3,-0x1
0292 01d5 | | Execute Vector,Field_Reference
0293 0125 | % | Execute Any,Set_Constraint
0294 00d8 | | Load_Top At_Offset_0
0295 e7ff | | Load 0x3,-0x1
0296 01d7 | | Execute Vector,Field_Read
0297 1c00 | | Execute_Immediate Run_Utility,0x0
0298 0a01 | | Execute_Immediate Plus,0x1
0299 7ff4 | | Jump 0x28e
029a 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
029b 0000 0000 | | .BLANK 0000[0x5]
02a0 ; --------------------------------------------------------------------------------------
02a0 ; SUBPROGRAM
02a0 ; --------------------------------------------------------------------------------------
02a0 02a3 | | .CONST 0x02a3 ; Address of begin
02a1 0004 | | .CONST 0x0004 ; Address of exception handler
02a2 0001 | | .CONST 0x0001 ; Number of locals
02a3 BODY_02a0:
02a3 INIT_02a0:
02a3 4605 |F | Jump_Case 0x6
02a4 7804 |x | Jump 0x2a9 ; case 0x0
02a5 7814 |x | Jump 0x2ba ; case 0x1
02a6 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x2
02a7 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x3
02a8 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2 ; case 0x4
02a9 e7ff | | Load 0x3,-0x1 ; case 0x5
02aa 01dc | | Execute Vector,Last
02ab e7ff | | Load 0x3,-0x1
02ac 01dd | | Execute Vector,First
02ad 0263 | c | Execute Discrete,Above_Bound
02ae 700a |p | Jump_Nonzero 0x2b9
02af 00d8 | | Load_Top At_Offset_0
02b0 e7ff | | Load 0x3,-0x1
02b1 01d5 | | Execute Vector,Field_Reference
02b2 0125 | % | Execute Any,Set_Constraint
02b3 00d8 | | Load_Top At_Offset_0
02b4 e7ff | | Load 0x3,-0x1
02b5 01d5 | | Execute Vector,Field_Reference
02b6 1c00 | | Execute_Immediate Run_Utility,0x0
02b7 0a01 | | Execute_Immediate Plus,0x1
02b8 7ff4 | | Jump 0x2ad
02b9 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02ba e7ff | | Load 0x3,-0x1
02bb 01dc | | Execute Vector,Last
02bc e7ff | | Load 0x3,-0x1
02bd 01dd | | Execute Vector,First
02be 0263 | c | Execute Discrete,Above_Bound
02bf 700a |p | Jump_Nonzero 0x2ca
02c0 00d8 | | Load_Top At_Offset_0
02c1 e7ff | | Load 0x3,-0x1
02c2 01d5 | | Execute Vector,Field_Reference
02c3 0125 | % | Execute Any,Set_Constraint
02c4 00d8 | | Load_Top At_Offset_0
02c5 e7ff | | Load 0x3,-0x1
02c6 01d7 | | Execute Vector,Field_Read
02c7 1c00 | | Execute_Immediate Run_Utility,0x0
02c8 0a01 | | Execute_Immediate Plus,0x1
02c9 7ff4 | | Jump 0x2be
02ca 4302 |C | Exit_Subprogram From_Utility,New_Top_Offset 0x2
02cb 0000 0000 | | .BLANK 0000[0x5]
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02db | | .CONST 0x02db ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0003 | | .CONST 0x0003 ; Number of locals
02d3 INIT_02d0:
02d3 4805 |H | Short_Literal 0x5
02d4 e006 | | Load 0x0,0x6
02d5 1b0e | | Execute Package,Field_Read,Field_Number 0xe
02d6 1c08 | | Execute_Immediate Run_Utility,0x8
02d7 00d8 | | Load_Top At_Offset_0
02d8 1c00 | | Execute_Immediate Run_Utility,0x0
02d9 029f 03cb | | Declare_Subprogram INIT_03c8,For_Call
02db BODY_02d0:
02db 00cf | | Action Mark_Auxiliary
02dc e7ff | | Load 0x3,-0x1
02dd 01dc | | Execute Vector,Last
02de e7ff | | Load 0x3,-0x1
02df 01dd | | Execute Vector,First
02e0 0263 | c | Execute Discrete,Above_Bound
02e1 7006 |p | Jump_Nonzero 0x2e8
02e2 00d8 | | Load_Top At_Offset_0
02e3 e7ff | | Load 0x3,-0x1
02e4 01d7 | | Execute Vector,Field_Read
02e5 8603 | | Call 0x3,0x3
02e6 00c8 | | Action Pop_Auxiliary_Range
02e7 3ffa |? | Loop_Increasing 0x2e2
02e8 00c9 | | Action Pop_Auxiliary_Loop
02e9 e7fe | | Load 0x3,-0x2
02ea 01dc | | Execute Vector,Last
02eb e7fe | | Load 0x3,-0x2
02ec 01dd | | Execute Vector,First
02ed 0263 | c | Execute Discrete,Above_Bound
02ee 7006 |p | Jump_Nonzero 0x2f5
02ef 00d8 | | Load_Top At_Offset_0
02f0 e7fe | | Load 0x3,-0x2
02f1 01d7 | | Execute Vector,Field_Read
02f2 8603 | | Call 0x3,0x3
02f3 00c8 | | Action Pop_Auxiliary_Range
02f4 3ffa |? | Loop_Increasing 0x2ef
02f5 00ce | | Action Pop_Auxiliary
02f6 e602 | | Load 0x3,0x2
02f7 e006 | | Load 0x0,0x6
02f8 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02f9 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2
02fa 0000 0000 | | .BLANK 0000[0x6]
0300 ; --------------------------------------------------------------------------------------
0300 ; SUBPROGRAM
0300 ; --------------------------------------------------------------------------------------
0300 0303 | | .CONST 0x0303 ; Address of begin
0301 0004 | | .CONST 0x0004 ; Address of exception handler
0302 0001 | | .CONST 0x0001 ; Number of locals
0303 BODY_0300:
0303 INIT_0300:
0303 00cf | | Action Mark_Auxiliary
0304 e406 | | Load 0x2,0x6
0305 4801 |H | Short_Literal 0x1
0306 0263 | c | Execute Discrete,Above_Bound
0307 701b |p | Jump_Nonzero 0x323
0308 4801 |H | Short_Literal 0x1
0309 e7ff | | Load 0x3,-0x1
030a e604 | | Load 0x3,0x4
030b e403 | | Load 0x2,0x3
030c 01d5 | | Execute Vector,Field_Reference
030d e006 | | Load 0x0,0x6
030e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
030f e005 | | Load 0x0,0x5
0310 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0311 680f |h | Jump_Zero 0x321
0312 00d8 | | Load_Top At_Offset_0
0313 e405 | | Load 0x2,0x5
0314 01d5 | | Execute Vector,Field_Reference
0315 00d8 | | Load_Top At_Offset_0
0316 e7fe | | Load 0x3,-0x2
0317 e604 | | Load 0x3,0x4
0318 e405 | | Load 0x2,0x5
0319 01d5 | | Execute Vector,Field_Reference
031a e006 | | Load 0x0,0x6
031b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
031c 8409 | | Call 0x2,0x9
031d e006 | | Load 0x0,0x6
031e 1810 | | Execute Package,Field_Execute,Field_Number 0x10
031f 00d2 | | Pop_Control Pop_Count_2
0320 4503 |E | Exit_Suprogram New_Top_Offset 0x3
0321 00c8 | | Action Pop_Auxiliary_Range
0322 3fe5 |? | Loop_Increasing 0x308
0323 00ce | | Action Pop_Auxiliary
0324 e7ff | | Load 0x3,-0x1
0325 01db | | Execute Vector,Length
0326 6815 |h | Jump_Zero 0x33c
0327 e406 | | Load 0x2,0x6
0328 0a01 | | Execute_Immediate Plus,0x1
0329 c406 | | Store 0x2,0x6
032a e406 | | Load 0x2,0x6
032b e403 | | Load 0x2,0x3
032c 01d5 | | Execute Vector,Field_Reference
032d 00d8 | | Load_Top At_Offset_0
032e e7ff | | Load 0x3,-0x1
032f e006 | | Load 0x0,0x6
0330 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0331 00d2 | | Pop_Control Pop_Count_2
0332 e406 | | Load 0x2,0x6
0333 e405 | | Load 0x2,0x5
0334 01d5 | | Execute Vector,Field_Reference
0335 00d8 | | Load_Top At_Offset_0
0336 00ea | | Load_Encached Null_String_Cache
0337 e7fe | | Load 0x3,-0x2
0338 8409 | | Call 0x2,0x9
0339 e006 | | Load 0x0,0x6
033a 1810 | | Execute Package,Field_Execute,Field_Number 0x10
033b 00d2 | | Pop_Control Pop_Count_2
033c 4503 |E | Exit_Suprogram New_Top_Offset 0x3
033d 0000 0000 | | .XXX[0x3]
033f 0000 | |
0340 ; --------------------------------------------------------------------------------------
0340 ; SUBPROGRAM
0340 ; --------------------------------------------------------------------------------------
0340 0344 | D | .CONST 0x0344 ; Address of begin
0341 0004 | | .CONST 0x0004 ; Address of exception handler
0342 0002 | | .CONST 0x0002 ; Number of locals
0343 INIT_0340:
0343 00e3 | | Load_Encached Natural_Cache
0344 BODY_0340:
0344 4800 |H | Short_Literal 0x0
0345 e407 | | Load 0x2,0x7
0346 e5ff | | Load 0x2,-0x1
0347 01dc | | Execute Vector,Last
0348 e5ff | | Load 0x2,-0x1
0349 01cf | | Execute Vector,Slice_Read
034a 0092 03f8 | | Action Push_String_Extended,0x3f8 ; "=>"
034c e005 | | Load 0x0,0x5
034d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
034e a408 | | Store_Unchecked 0x2,0x8
034f e407 | | Load 0x2,0x7
0350 a602 | | Store_Unchecked 0x3,0x2
0351 e408 | | Load 0x2,0x8
0352 0a02 | | Execute_Immediate Plus,0x2
0353 c407 | | Store 0x2,0x7
0354 00d8 | | Load_Top At_Offset_0
0355 e408 | | Load 0x2,0x8
0356 0aff | | Execute_Immediate Plus,-0x1
0357 e5ff | | Load 0x2,-0x1
0358 01cf | | Execute Vector,Slice_Read
0359 8218 | | Call 0x1,0x18
035a 00ca | | Action Exit_Nullary_Function
035b 0000 0000 | | .BLANK 0000[0x5]
0360 ; --------------------------------------------------------------------------------------
0360 ; SUBPROGRAM
0360 ; --------------------------------------------------------------------------------------
0360 0364 | d | .CONST 0x0364 ; Address of begin
0361 0004 | | .CONST 0x0004 ; Address of exception handler
0362 0002 | | .CONST 0x0002 ; Number of locals
0363 INIT_0360:
0363 00e3 | | Load_Encached Natural_Cache
0364 BODY_0360:
0364 4800 |H | Short_Literal 0x0
0365 e407 | | Load 0x2,0x7
0366 e5ff | | Load 0x2,-0x1
0367 01dc | | Execute Vector,Last
0368 e5ff | | Load 0x2,-0x1
0369 01cf | | Execute Vector,Slice_Read
036a 0092 03f9 | | Action Push_String_Extended,0x3f9 ; ","
036c e005 | | Load 0x0,0x5
036d 181d | | Execute Package,Field_Execute,Field_Number 0x1d
036e a408 | | Store_Unchecked 0x2,0x8
036f e407 | | Load 0x2,0x7
0370 a602 | | Store_Unchecked 0x3,0x2
0371 e408 | | Load 0x2,0x8
0372 700b |p | Jump_Nonzero 0x37e
0373 e5ff | | Load 0x2,-0x1
0374 01dc | | Execute Vector,Last
0375 0a01 | | Execute_Immediate Plus,0x1
0376 c407 | | Store 0x2,0x7
0377 00d8 | | Load_Top At_Offset_0
0378 e5ff | | Load 0x2,-0x1
0379 01dc | | Execute Vector,Last
037a e5ff | | Load 0x2,-0x1
037b 01cf | | Execute Vector,Slice_Read
037c 8218 | | Call 0x1,0x18
037d 00ca | | Action Exit_Nullary_Function
037e e408 | | Load 0x2,0x8
037f 0a01 | | Execute_Immediate Plus,0x1
0380 c407 | | Store 0x2,0x7
0381 00d8 | | Load_Top At_Offset_0
0382 e408 | | Load 0x2,0x8
0383 0aff | | Execute_Immediate Plus,-0x1
0384 e5ff | | Load 0x2,-0x1
0385 01cf | | Execute Vector,Slice_Read
0386 8218 | | Call 0x1,0x18
0387 00ca | | Action Exit_Nullary_Function
0388 ; --------------------------------------------------------------------------------------
0388 ; SUBPROGRAM
0388 ; --------------------------------------------------------------------------------------
0388 038b | | .CONST 0x038b ; Address of begin
0389 0004 | | .CONST 0x0004 ; Address of exception handler
038a 0001 | | .CONST 0x0001 ; Number of locals
038b BODY_0388:
038b INIT_0388:
038b e7ff | | Load 0x3,-0x1
038c 7002 |p | Jump_Nonzero 0x38f
038d 00ea | | Load_Encached Null_String_Cache
038e 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
038f e7ff | | Load 0x3,-0x1
0390 0f01 | | Execute_Immediate Equal,0x1
0391 680f |h | Jump_Zero 0x3a1
0392 e7ff | | Load 0x3,-0x1
0393 e403 | | Load 0x2,0x3
0394 01d5 | | Execute Vector,Field_Reference
0395 e006 | | Load 0x0,0x6
0396 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0397 0092 03f8 | | Action Push_String_Extended,0x3f8 ; "=>"
0399 01cc | | Execute Vector,Catenate
039a e7ff | | Load 0x3,-0x1
039b e405 | | Load 0x2,0x5
039c 01d5 | | Execute Vector,Field_Reference
039d e006 | | Load 0x0,0x6
039e 1813 | | Execute Package,Field_Execute,Field_Number 0x13
039f 01cc | | Execute Vector,Catenate
03a0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03a1 e7ff | | Load 0x3,-0x1
03a2 0aff | | Execute_Immediate Plus,-0x1
03a3 00e3 | | Load_Encached Natural_Cache
03a4 025b | [ | Execute Discrete,Check_In_Type
03a5 840d | | Call 0x2,0xd
03a6 0092 03f9 | | Action Push_String_Extended,0x3f9 ; ","
03a8 01cc | | Execute Vector,Catenate
03a9 e7ff | | Load 0x3,-0x1
03aa e403 | | Load 0x2,0x3
03ab 01d5 | | Execute Vector,Field_Reference
03ac e006 | | Load 0x0,0x6
03ad 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03ae 01cc | | Execute Vector,Catenate
03af 0092 03f8 | | Action Push_String_Extended,0x3f8 ; "=>"
03b1 01cc | | Execute Vector,Catenate
03b2 e7ff | | Load 0x3,-0x1
03b3 e405 | | Load 0x2,0x5
03b4 01d5 | | Execute Vector,Field_Reference
03b5 e006 | | Load 0x0,0x6
03b6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03b7 01cc | | Execute Vector,Catenate
03b8 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1
03b9 0000 0000 | | .BLANK 0000[0x7]
03c0 ; --------------------------------------------------------------------------------------
03c0 ; SUBPROGRAM
03c0 ; --------------------------------------------------------------------------------------
03c0 03c3 | | .CONST 0x03c3 ; Address of begin
03c1 0004 | | .CONST 0x0004 ; Address of exception handler
03c2 0001 | | .CONST 0x0001 ; Number of locals
03c3 BODY_03c0:
03c3 INIT_03c0:
03c3 840c | | Call 0x2,0xc
03c4 e7ff | | Load 0x3,-0x1
03c5 840a | | Call 0x2,0xa
03c6 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03c7 0000 | | .XXX[0x1]
03c8 ; --------------------------------------------------------------------------------------
03c8 ; SUBPROGRAM
03c8 ; --------------------------------------------------------------------------------------
03c8 03cb | | .CONST 0x03cb ; Address of begin
03c9 0004 | | .CONST 0x0004 ; Address of exception handler
03ca 0001 | | .CONST 0x0001 ; Number of locals
03cb BODY_03c8:
03cb INIT_03c8:
03cb 4801 |H | Short_Literal 0x1
03cc e602 | | Load 0x3,0x2
03cd e006 | | Load 0x0,0x6
03ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13
03cf e9ff | | Load 0x4,-0x1
03d0 e005 | | Load 0x0,0x5
03d1 181e | | Execute Package,Field_Execute,Field_Number 0x1e
03d2 7005 |p | Jump_Nonzero 0x3d8
03d3 e602 | | Load 0x3,0x2
03d4 e9ff | | Load 0x4,-0x1
03d5 e006 | | Load 0x0,0x6
03d6 1819 | | Execute Package,Field_Execute,Field_Number 0x19
03d7 00d1 | | Pop_Control Pop_Count_1
03d8 4502 |E | Exit_Suprogram New_Top_Offset 0x2
03d9 ; --------------------------------------------------------------------------------------
03d9 ; STRING TABLE
03d9 ; --------------------------------------------------------------------------------------
03d9 0044 | D | .STRTAB 0x0044->0x03fb ; "NIL"
03da 0045 | E | .STRTAB 0x0045->0x03fc ; "PUBLIC"
03db 0049 | I | .STRTAB 0x0049->0x03ff ; "NETWORK_PUBLIC"
03dc 0055 | U | .STRTAB 0x0055->0x0406 ; "OPERATOR"
03dd 005b | [ | .STRTAB 0x005b->0x040a ; "SYSTEM"
03de 005f | _ | .STRTAB 0x005f->0x040d ; "others => Unspecified"
03df 0072 | r | .STRTAB 0x0072->0x0418 ; "~right_heading(~>Standard ACL Values for the Predefined Universe~>)"
03e0 00b3 | | .STRTAB 0x00b3->0x0439 ; "~left_heading(~>Standard ACL Values for the Predefined Universe~>)"
03e1 00f3 | | .STRTAB 0x00f3->0x045a ; "~left_footing(~>~>~value(date))"
03e2 0110 | | .STRTAB 0x0110->0x046a ; "~right_footing(~>~>~value(date))"
03e3 012e | . | .STRTAB 0x012e->0x047a ; "~macro(ce=\x22~column_entry(~argument(text))\x22)"
03e4 0157 | W | .STRTAB 0x0157->0x048f ; "~Setup(table_space_after=.15inches)"
03e5 0178 | x | .STRTAB 0x0178->0x04a1 ; "~Setup(table_space_before=.15inches)"
03e6 019a | | .STRTAB 0x019a->0x04b3 ; "~Setup(table_leading=1)"
03e7 01af | | .STRTAB 0x01af->0x04be ; "~Setup(Header_Space_Before=.3inches)"
03e8 01d1 | | .STRTAB 0x01d1->0x04d0 ; "~Setup(Header_Space_after=.3inches)"
03e9 01f2 | | .STRTAB 0x01f2->0x04e2 ; "~Setup(footer_Space_before=.1inches)"
03ea 0214 | | .STRTAB 0x0214->0x04f4 ; "~Setup(footer_point=10.5inches)"
03eb 0231 | 1 | .STRTAB 0x0231->0x0503 ; "~macro(table_size=\x22~environment(point_size=9)\x22)"
03ec 025e | ^ | .STRTAB 0x025e->0x051b ; "~begin(table)"
03ed 0269 | i | .STRTAB 0x0269->0x0521 ; "~table_size()"
03ee 0274 | t | .STRTAB 0x0274->0x0528 ; "~title("
03ef 0279 | y | .STRTAB 0x0279->0x052b ; ": "
03f0 0279 | y | .STRTAB 0x0279->0x052c ; ")"
03f1 0278 | x | .STRTAB 0x0278->0x052d ; "~column_definition(heading_text=\x22Path Name\x22,heading_mode=c,body_mode=l,width=3inches)"
03f2 02cb | | .STRTAB 0x02cb->0x0557 ; "~column_definition(heading_text=\x22"
03f3 02ea | | .STRTAB 0x02ea->0x0568 ; "\x22,heading_mode=c,body_mode=l,width=0inches)"
03f4 0313 | | .STRTAB 0x0313->0x057d ; "~ce("
03f5 0315 | | .STRTAB 0x0315->0x057f ; ") "
03f6 0315 | | .STRTAB 0x0315->0x0580 ; "Illegal option: "
03f7 0323 | # | .STRTAB 0x0323->0x0588 ; "~end(table)"
03f8 032c | , | .STRTAB 0x032c->0x058e ; "=>"
03f9 032c | , | .STRTAB 0x032c->0x058f ; ","
03fa 032b | + | .STREND 0x032b->0x058f
03fb 4e49 4c50 |NILP| .STRTAB_STRINGS
0590 ; --------------------------------------------------------------------------------------
0590 ; Debug Table
0590 ; --------------------------------------------------------------------------------------
0590 0004 000b | | .DEBUG4 0x0004,0x000b,0xbb3a,0x0000,0x0001,0x0000
0596 0000 0000 | | .BLANK 0000[0x5]
059b 0240 000d | @ | .XXX[0x5]
059d 6d00 021d |m |
059f 5c40 |\@ |
05a0 0000 0000 | | .BLANK 0000[0x4]
05a4 010f 4fc0 | O | .XXX[0x10]
05a6 0000 d300 | |
05a8 0021 eaf8 | ! |
05aa 0021 f044 | ! D|
05ac 0000 74f0 | t |
05ae 0042 3628 | B6(|
05b0 0000 0000 | |
05b2 0043 eb20 | C |
05b4 0000 0000 | | .BLANK 0000[0x4]
05b8 0001 8960 | `| .XXX[0x11]
05ba 0800 0074 | t|
05bc d020 6a07 | j |
05be 0002 0000 | |
05c0 0e9a 0000 | |
05c2 0e9e 0008 | |
05c4 46c5 0000 |F |
05c6 0000 0008 | |
05c8 7e64 |~d |
05c9 0000 0000 | | .BLANK 0000[0x5]
05ce 312c 0100 |1, | .XXX[0x15]
05d0 000e 9a04 | |
05d2 0d40 e004 | @ |
05d4 4000 01d3 |@ |
05d6 4000 87de |@ |
05d8 5000 0000 |P |
05da 0000 0000 | |
05dc 2000 0000 | |
05de 0000 0000 | |
05e0 1000 0312 | |
05e2 c000 | |
05e3 0000 0000 | | .BLANK 0000[0x4]
05e7 87ee 5000 | P | .XXX[0xc]
05e9 0000 0000 | |
05eb 0000 2000 | |
05ed 0000 0000 | |
05ef 0000 1000 | |
05f1 0312 c000 | |
05f3 0000 0000 | | .BLANK 0000[0x5]
05f8 9000 00e9 | | .XXX[0x8]
05fa e000 87a3 | |
05fc b000 0000 | |
05fe 0000 8842 | B|