|
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: 7168 (0x1c00) Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_03bcfe
└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000 └─ ⟦cfc2e13cd⟧ »Space Info Vol 2« └─⟦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 0d60 | ` | .CONST 0x0d60 ; 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 8007 | | .CONST 0x8007 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 0010 | | .CONST 0x0010 ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 0001 | | .CONST 0x0001 ; Number of locals 000b INIT_0008: 000b 029a 001b | | Declare_Subprogram INIT_0018,For_Outer_Call,Visible,Unelaborated 000d 00bf | | Action Accept_Activation 000e 1d0d | | Execute_Immediate Reference_Lex_1,0xd 000f 00c7 | | Action Elaborate_Subprogram 0010 BODY_0008: 0010 00bc | | Action Signal_Activated 0011 00bb | | Action Signal_Completion 0012 0000 0000 | | .BLANK 0000[0x6] 0018 ; -------------------------------------------------------------------------------------- 0018 ; SUBPROGRAM 0018 ; -------------------------------------------------------------------------------------- 0018 0055 | U | .CONST 0x0055 ; Address of begin 0019 0004 | | .CONST 0x0004 ; Address of exception handler 001a 0008 | | .CONST 0x0008 ; Number of locals 001b INIT_0018: 001b 029f 00db | | Declare_Subprogram INIT_00d8,For_Call 001d 4800 |H | Short_Literal 0x0 001e 4803 |H | Short_Literal 0x3 001f 4801 |H | Short_Literal 0x1 0020 4806 |H | Short_Literal 0x6 0021 00e9 | | Load_Encached String_Cache 0022 035b | [ | Declare_Type Array,Constrained 0023 02a0 | | Declare_Subprogram Null_Subprogram 0024 4801 |H | Short_Literal 0x1 0025 035d | ] | Declare_Type Array,Defined 0026 00d8 | | Load_Top At_Offset_0 0027 0337 | 7 | Declare_Variable Array 0028 00d8 | | Load_Top At_Offset_0 0029 0335 | 5 | Declare_Variable Array,Duplicate 002a 00cd | | Action Spare6_Action 002b 0092 07f7 | | Action Push_String_Extended,0x7f7 ; "None " 002d e404 | | Load 0x2,0x4 002e 01d8 | | Execute Vector,Element_Type 002f 0119 | | Execute Any,Check_In_Formal_Type 0030 4800 |H | Short_Literal 0x0 0031 e405 | | Load 0x2,0x5 0032 01d6 | | Execute Vector,Field_Write 0033 0092 07f8 | | Action Push_String_Extended,0x7f8 ; "Open " 0035 e404 | | Load 0x2,0x4 0036 01d8 | | Execute Vector,Element_Type 0037 0119 | | Execute Any,Check_In_Formal_Type 0038 4801 |H | Short_Literal 0x1 0039 e405 | | Load 0x2,0x5 003a 01d6 | | Execute Vector,Field_Write 003b 0092 07f9 | | Action Push_String_Extended,0x7f9 ; "Safe " 003d e404 | | Load 0x2,0x4 003e 01d8 | | Execute Vector,Element_Type 003f 0119 | | Execute Any,Check_In_Formal_Type 0040 4802 |H | Short_Literal 0x2 0041 e405 | | Load 0x2,0x5 0042 01d6 | | Execute Vector,Field_Write 0043 0092 07fa | | Action Push_String_Extended,0x7fa ; "Secure" 0045 e404 | | Load 0x2,0x4 0046 01d8 | | Execute Vector,Element_Type 0047 0119 | | Execute Any,Check_In_Formal_Type 0048 4803 |H | Short_Literal 0x3 0049 e405 | | Load 0x2,0x5 004a 01d6 | | Execute Vector,Field_Write 004b e404 | | Load 0x2,0x4 004c 01d4 | | Execute Vector,Structure_Write 004d 029f 00eb | | Declare_Subprogram INIT_00e8,For_Call 004f 029f 0103 | | Declare_Subprogram INIT_0100,For_Call 0051 029f 011b | | Declare_Subprogram INIT_0118,For_Call 0053 029f 012b | +| Declare_Subprogram INIT_0128,For_Call 0055 BODY_0018: 0055 e5fa | | Load 0x2,-0x6 0056 684e |hN | Jump_Zero 0xa5 0057 e5f9 | | Load 0x2,-0x7 0058 e5ff | | Load 0x2,-0x1 0059 e404 | | Load 0x2,0x4 005a 01d5 | | Execute Vector,Field_Reference 005b 8002 | | Call 0x0,0x2 005c 4800 |H | Short_Literal 0x0 005d e404 | | Load 0x2,0x4 005e 01d5 | | Execute Vector,Field_Reference 005f 0092 07fb | | Action Push_String_Extended,0x7fb ; " level" 0061 01cc | | Execute Vector,Catenate 0062 4800 |H | Short_Literal 0x0 0063 4800 |H | Short_Literal 0x0 0064 8405 | | Call 0x2,0x5 0065 01cc | | Execute Vector,Catenate 0066 4801 |H | Short_Literal 0x1 0067 4800 |H | Short_Literal 0x0 0068 4800 |H | Short_Literal 0x0 0069 e5fe | | Load 0x2,-0x2 006a 4800 |H | Short_Literal 0x0 006b 8408 | | Call 0x2,0x8 006c 00cf | | Action Mark_Auxiliary 006d 4803 |H | Short_Literal 0x3 006e 4801 |H | Short_Literal 0x1 006f 0007 | | Action Break_Optional 0070 00d8 | | Load_Top At_Offset_0 0071 e404 | | Load 0x2,0x4 0072 01d5 | | Execute Vector,Field_Reference 0073 0092 07fb | | Action Push_String_Extended,0x7fb ; " level" 0075 01cc | | Execute Vector,Catenate 0076 4800 |H | Short_Literal 0x0 0077 4800 |H | Short_Literal 0x0 0078 8405 | | Call 0x2,0x5 0079 01cc | | Execute Vector,Catenate 007a 4801 |H | Short_Literal 0x1 007b 4800 |H | Short_Literal 0x0 007c 4800 |H | Short_Literal 0x0 007d e5fe | | Load 0x2,-0x2 007e e40b | | Load 0x2,0xb 007f 8408 | | Call 0x2,0x8 0080 00d8 | | Load_Top At_Offset_0 0081 e404 | | Load 0x2,0x4 0082 01d5 | | Execute Vector,Field_Reference 0083 0092 07fb | | Action Push_String_Extended,0x7fb ; " level" 0085 01cc | | Execute Vector,Catenate 0086 4800 |H | Short_Literal 0x0 0087 4801 |H | Short_Literal 0x1 0088 8405 | | Call 0x2,0x5 0089 01cc | | Execute Vector,Catenate 008a 4801 |H | Short_Literal 0x1 008b 4800 |H | Short_Literal 0x0 008c 4801 |H | Short_Literal 0x1 008d e5fe | | Load 0x2,-0x2 008e e40b | | Load 0x2,0xb 008f 8408 | | Call 0x2,0x8 0090 00d8 | | Load_Top At_Offset_0 0091 e404 | | Load 0x2,0x4 0092 01d5 | | Execute Vector,Field_Reference 0093 0092 07fb | | Action Push_String_Extended,0x7fb ; " level" 0095 01cc | | Execute Vector,Catenate 0096 4801 |H | Short_Literal 0x1 0097 4801 |H | Short_Literal 0x1 0098 8405 | | Call 0x2,0x5 0099 01cc | | Execute Vector,Catenate 009a 4801 |H | Short_Literal 0x1 009b 4801 |H | Short_Literal 0x1 009c 4801 |H | Short_Literal 0x1 009d e5fe | | Load 0x2,-0x2 009e e40b | | Load 0x2,0xb 009f 8408 | | Call 0x2,0x8 00a0 00c8 | | Action Pop_Auxiliary_Range 00a1 3fce |? | Loop_Increasing 0x70 00a2 00ce | | Action Pop_Auxiliary 00a3 8003 | | Call 0x0,0x3 00a4 4508 |E | Exit_Suprogram New_Top_Offset 0x8 00a5 00ea | | Load_Encached Null_String_Cache 00a6 e5fb | | Load 0x2,-0x5 00a7 e5fc | | Load 0x2,-0x4 00a8 e5fd | | Load 0x2,-0x3 00a9 e5fe | | Load 0x2,-0x2 00aa e5ff | | Load 0x2,-0x1 00ab 8408 | | Call 0x2,0x8 00ac e5fb | | Load 0x2,-0x5 00ad 7027 |p' | Jump_Nonzero 0xd5 00ae 0092 07fc | | Action Push_String_Extended,0x7fc ; "!" 00b0 8406 | | Call 0x2,0x6 00b1 0092 07fd | | Action Push_String_Extended,0x7fd ; "!commands.@" 00b3 8406 | | Call 0x2,0x6 00b4 0092 07fe | | Action Push_String_Extended,0x7fe ; "!commands.abbreviations.@" 00b6 8406 | | Call 0x2,0x6 00b7 0092 07ff | | Action Push_String_Extended,0x7ff ; "!compiler_interface??" 00b9 8406 | | Call 0x2,0x6 00ba 0092 0800 | | Action Push_String_Extended,0x800 ; "!implementation??" 00bc 8406 | | Call 0x2,0x6 00bd 0092 0801 | | Action Push_String_Extended,0x801 ; "!io??" 00bf 8406 | | Call 0x2,0x6 00c0 0092 0802 | | Action Push_String_Extended,0x802 ; "!lrm??" 00c2 8406 | | Call 0x2,0x6 00c3 0092 0803 | | Action Push_String_Extended,0x803 ; "!machine@" 00c5 8406 | | Call 0x2,0x6 00c6 0092 0804 | | Action Push_String_Extended,0x804 ; "!model??" 00c8 8406 | | Call 0x2,0x6 00c9 0092 0805 | | Action Push_String_Extended,0x805 ; "!tools.@" 00cb 8406 | | Call 0x2,0x6 00cc 0092 0806 | | Action Push_String_Extended,0x806 ; "!tools.networking.@" 00ce 8406 | | Call 0x2,0x6 00cf 0092 0807 | | Action Push_String_Extended,0x807 ; "!tools.@'c(subsystem)" 00d1 8407 | | Call 0x2,0x7 00d2 0092 0808 | | Action Push_String_Extended,0x808 ; "!tools.@.@'c(load_view, spec_view, comb_view)" 00d4 8407 | | Call 0x2,0x7 00d5 4508 |E | Exit_Suprogram New_Top_Offset 0x8 00d6 0000 0000 | | .XXX[0x2] 00d8 ; -------------------------------------------------------------------------------------- 00d8 ; SUBPROGRAM 00d8 ; -------------------------------------------------------------------------------------- 00d8 00db | | .CONST 0x00db ; Address of begin 00d9 0004 | | .CONST 0x0004 ; Address of exception handler 00da 0001 | | .CONST 0x0001 ; Number of locals 00db BODY_00d8: 00db INIT_00d8: 00db e7ff | | Load 0x3,-0x1 00dc e004 | | Load 0x0,0x4 00dd 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00de 011c | | Execute Any,Convert_Unchecked 00df 1c01 | | Execute_Immediate Run_Utility,0x1 00e0 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 00e1 0000 0000 | | .BLANK 0000[0x7] 00e8 ; -------------------------------------------------------------------------------------- 00e8 ; SUBPROGRAM 00e8 ; -------------------------------------------------------------------------------------- 00e8 00eb | | .CONST 0x00eb ; Address of begin 00e9 0004 | | .CONST 0x0004 ; Address of exception handler 00ea 0001 | | .CONST 0x0001 ; Number of locals 00eb BODY_00e8: 00eb INIT_00e8: 00eb e7ff | | Load 0x3,-0x1 00ec 6805 |h | Jump_Zero 0xf2 00ed e7fe | | Load 0x3,-0x2 00ee 7003 |p | Jump_Nonzero 0xf2 00ef 0092 0809 | | Action Push_String_Extended,0x809 ; " with network Read" 00f1 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f2 e7ff | | Load 0x3,-0x1 00f3 e7fe | | Load 0x3,-0x2 00f4 0279 | y | Execute Discrete,And 00f5 6803 |h | Jump_Zero 0xf9 00f6 0092 080a | | Action Push_String_Extended,0x80a ; " with network Read and Write" 00f8 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00f9 00ea | | Load_Encached Null_String_Cache 00fa 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 00fb 0000 0000 | | .BLANK 0000[0x5] 0100 ; -------------------------------------------------------------------------------------- 0100 ; SUBPROGRAM 0100 ; -------------------------------------------------------------------------------------- 0100 0103 | | .CONST 0x0103 ; Address of begin 0101 0004 | | .CONST 0x0004 ; Address of exception handler 0102 0001 | | .CONST 0x0001 ; Number of locals 0103 BODY_0100: 0103 INIT_0100: 0103 0092 080b | | Action Push_String_Extended,0x80b ; "------- " 0105 e7ff | | Load 0x3,-0x1 0106 01cc | | Execute Vector,Catenate 0107 e005 | | Load 0x0,0x5 0108 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0109 e7ff | | Load 0x3,-0x1 010a e006 | | Load 0x0,0x6 010b 180f | | Execute Package,Field_Execute,Field_Number 0xf 010c 0092 080c | | Action Push_String_Extended,0x80c ; "------- defaults: " 010e e7ff | | Load 0x3,-0x1 010f 01cc | | Execute Vector,Catenate 0110 e005 | | Load 0x0,0x5 0111 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0112 e7ff | | Load 0x3,-0x1 0113 e006 | | Load 0x0,0x6 0114 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0115 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0116 0000 0000 | | .XXX[0x2] 0118 ; -------------------------------------------------------------------------------------- 0118 ; SUBPROGRAM 0118 ; -------------------------------------------------------------------------------------- 0118 011b | | .CONST 0x011b ; Address of begin 0119 0004 | | .CONST 0x0004 ; Address of exception handler 011a 0001 | | .CONST 0x0001 ; Number of locals 011b BODY_0118: 011b INIT_0118: 011b 0092 080d | | Action Push_String_Extended,0x80d ; "+++ ++* ***" 011d 4800 |H | Short_Literal 0x0 011e e7ff | | Load 0x3,-0x1 011f 0092 080e | | Action Push_String_Extended,0x80e ; "<ALL>" 0121 e004 | | Load 0x0,0x4 0122 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0123 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0124 0000 0000 | | .BLANK 0000[0x4] 0128 ; -------------------------------------------------------------------------------------- 0128 ; SUBPROGRAM 0128 ; -------------------------------------------------------------------------------------- 0128 0155 | U | .CONST 0x0155 ; Address of begin 0129 0004 | | .CONST 0x0004 ; Address of exception handler 012a 0012 | | .CONST 0x0012 ; Number of locals 012b INIT_0128: 012b e7ff | | Load 0x3,-0x1 012c 0f00 | | Execute_Immediate Equal,0x0 012d 00e1 | | Load_Encached Boolean_Cache 012e 03f1 | | Declare_Variable Discrete,With_Value 012f e7ff | | Load 0x3,-0x1 0130 0f01 | | Execute_Immediate Equal,0x1 0131 00e1 | | Load_Encached Boolean_Cache 0132 03f1 | | Declare_Variable Discrete,With_Value 0133 e7ff | | Load 0x3,-0x1 0134 0f02 | | Execute_Immediate Equal,0x2 0135 00e1 | | Load_Encached Boolean_Cache 0136 03f1 | | Declare_Variable Discrete,With_Value 0137 e7ff | | Load 0x3,-0x1 0138 0f03 | | Execute_Immediate Equal,0x3 0139 00e1 | | Load_Encached Boolean_Cache 013a 03f1 | | Declare_Variable Discrete,With_Value 013b 00e1 | | Load_Encached Boolean_Cache 013c 0601 | | Execute_Immediate Set_Value_Unchecked,0x1 013d 029f 016b | k| Declare_Subprogram INIT_0168,For_Call 013f 029f 019b | | Declare_Subprogram INIT_0198,For_Call 0141 029f 01b3 | | Declare_Subprogram INIT_01b0,For_Call 0143 029f 01d3 | | Declare_Subprogram INIT_01d0,For_Call 0145 029f 01eb | | Declare_Subprogram INIT_01e8,For_Call 0147 029f 020b | | Declare_Subprogram INIT_0208,For_Call 0149 029f 021b | | Declare_Subprogram INIT_0218,For_Call 014b 029f 02cb | | Declare_Subprogram INIT_02c8,For_Call 014d 029f 043b | ;| Declare_Subprogram INIT_0438,For_Call 014f 029f 04cb | | Declare_Subprogram INIT_04c8,For_Call 0151 029f 04e3 | | Declare_Subprogram INIT_04e0,For_Call 0153 029f 063b | ;| Declare_Subprogram INIT_0638,For_Call 0155 BODY_0128: 0155 e602 | | Load 0x3,0x2 0156 e603 | | Load 0x3,0x3 0157 e604 | | Load 0x3,0x4 0158 e605 | | Load 0x3,0x5 0159 0278 | x | Execute Discrete,Or 015a 0278 | x | Execute Discrete,Or 015b 0278 | x | Execute Discrete,Or 015c 7005 |p | Jump_Nonzero 0x162 015d 0092 080f | | Action Push_String_Extended,0x80f ; "Illegal value of level parameter. Must be 0..3." 015f e005 | | Load 0x0,0x5 0160 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0161 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0162 860e | | Call 0x3,0xe 0163 8611 | | Call 0x3,0x11 0164 8610 | | Call 0x3,0x10 0165 8612 | | Call 0x3,0x12 0166 4507 |E | Exit_Suprogram New_Top_Offset 0x7 0167 0000 | | .XXX[0x1] 0168 ; -------------------------------------------------------------------------------------- 0168 ; SUBPROGRAM 0168 ; -------------------------------------------------------------------------------------- 0168 0186 | | .CONST 0x0186 ; Address of begin 0169 0004 | | .CONST 0x0004 ; Address of exception handler 016a 0002 | | .CONST 0x0002 ; Number of locals 016b INIT_0168: 016b 4801 |H | Short_Literal 0x1 016c e9fe | | Load 0x4,-0x2 016d e9ff | | Load 0x4,-0x1 016e 01db | | Execute Vector,Length 016f 0272 | r | Execute Discrete,Minus 0170 00d8 | | Load_Top At_Offset_0 0171 00e2 | | Load_Encached Integer_Cache 0172 0260 | ` | Execute Discrete,In_Type 0173 7001 |p | Jump_Nonzero 0x175 0174 0801 | | Execute_Immediate Raise,0x1 0175 00e9 | | Load_Encached String_Cache 0176 035b | [ | Declare_Type Array,Constrained 0177 0337 | 7 | Declare_Variable Array 0178 00d8 | | Load_Top At_Offset_0 0179 0335 | 5 | Declare_Variable Array,Duplicate 017a 00cd | | Action Spare6_Action 017b e802 | | Load 0x4,0x2 017c 01d9 | | Execute Vector,Reverse_Bounds 017d 0263 | c | Execute Discrete,Above_Bound 017e 7005 |p | Jump_Nonzero 0x184 017f 4820 |H | Short_Literal 0x20 0180 e805 | | Load 0x4,0x5 0181 e803 | | Load 0x4,0x3 0182 01d6 | | Execute Vector,Field_Write 0183 3ffb |? | Loop_Increasing 0x17f 0184 e802 | | Load 0x4,0x2 0185 01d4 | | Execute Vector,Structure_Write 0186 BODY_0168: 0186 e9ff | | Load 0x4,-0x1 0187 01db | | Execute Vector,Length 0188 e9fe | | Load 0x4,-0x2 0189 027d | } | Execute Discrete,Greater 018a 6802 |h | Jump_Zero 0x18d 018b e9ff | | Load 0x4,-0x1 018c 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 018d e9ff | | Load 0x4,-0x1 018e e802 | | Load 0x4,0x2 018f 01cc | | Execute Vector,Catenate 0190 00e9 | | Load_Encached String_Cache 0191 01c6 | | Execute Vector,Convert_To_Formal 0192 4402 |D | Exit_Subprogram With_Value,New_Top_Offset 0x2 0193 0000 0000 | | .BLANK 0000[0x5] 0198 ; -------------------------------------------------------------------------------------- 0198 ; SUBPROGRAM 0198 ; -------------------------------------------------------------------------------------- 0198 019d | | .CONST 0x019d ; Address of begin 0199 0004 | | .CONST 0x0004 ; Address of exception handler 019a 0002 | | .CONST 0x0002 ; Number of locals 019b INIT_0198: 019b 029f 079b | | Declare_Subprogram INIT_0798,For_Call 019d BODY_0198: 019d e606 | | Load 0x3,0x6 019e 6806 |h | Jump_Zero 0x1a5 019f e9ff | | Load 0x4,-0x1 01a0 0092 0810 | | Action Push_String_Extended,0x810 ; "'c(world)" 01a2 01cc | | Execute Vector,Catenate 01a3 8802 | | Call 0x4,0x2 01a4 7805 |x | Jump 0x1aa 01a5 e9ff | | Load 0x4,-0x1 01a6 0092 0811 | | Action Push_String_Extended,0x811 ; "'c(~library)" 01a8 01cc | | Execute Vector,Catenate 01a9 8802 | | Call 0x4,0x2 01aa e5fa | | Load 0x2,-0x6 01ab 6803 |h | Jump_Zero 0x1af 01ac e9fe | | Load 0x4,-0x2 01ad e9ff | | Load 0x4,-0x1 01ae 8007 | | Call 0x0,0x7 01af 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01b0 ; -------------------------------------------------------------------------------------- 01b0 ; SUBPROGRAM 01b0 ; -------------------------------------------------------------------------------------- 01b0 01b3 | | .CONST 0x01b3 ; Address of begin 01b1 0004 | | .CONST 0x0004 ; Address of exception handler 01b2 0001 | | .CONST 0x0001 ; Number of locals 01b3 BODY_01b0: 01b3 INIT_01b0: 01b3 e7fb | | Load 0x3,-0x5 01b4 680e |h | Jump_Zero 0x1c3 01b5 0092 0812 | | Action Push_String_Extended,0x812 ; "Def " 01b7 4823 |H# | Short_Literal 0x23 01b8 e9ff | | Load 0x4,-0x1 01b9 8607 | | Call 0x3,0x7 01ba 01cc | | Execute Vector,Catenate 01bb 0092 0813 | | Action Push_String_Extended,0x813 ; ": " 01bd 01cc | | Execute Vector,Catenate 01be e9fe | | Load 0x4,-0x2 01bf 01cc | | Execute Vector,Catenate 01c0 e005 | | Load 0x0,0x5 01c1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01c2 7806 |x | Jump 0x1c9 01c3 0092 0814 | | Action Push_String_Extended,0x814 ; "<errors>" 01c5 e9ff | | Load 0x4,-0x1 01c6 e9fe | | Load 0x4,-0x2 01c7 e006 | | Load 0x0,0x6 01c8 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01c9 e5fa | | Load 0x2,-0x6 01ca 6803 |h | Jump_Zero 0x1ce 01cb e9fe | | Load 0x4,-0x2 01cc e9ff | | Load 0x4,-0x1 01cd 8007 | | Call 0x0,0x7 01ce 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01cf 0000 | | .XXX[0x1] 01d0 ; -------------------------------------------------------------------------------------- 01d0 ; SUBPROGRAM 01d0 ; -------------------------------------------------------------------------------------- 01d0 01d5 | | .CONST 0x01d5 ; Address of begin 01d1 0004 | | .CONST 0x0004 ; Address of exception handler 01d2 0002 | | .CONST 0x0002 ; Number of locals 01d3 INIT_01d0: 01d3 029f 07b3 | | Declare_Subprogram INIT_07b0,For_Call 01d5 BODY_01d0: 01d5 e606 | | Load 0x3,0x6 01d6 6806 |h | Jump_Zero 0x1dd 01d7 e9ff | | Load 0x4,-0x1 01d8 0092 0810 | | Action Push_String_Extended,0x810 ; "'c(world)" 01da 01cc | | Execute Vector,Catenate 01db 8802 | | Call 0x4,0x2 01dc 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01dd e9ff | | Load 0x4,-0x1 01de 0092 0811 | | Action Push_String_Extended,0x811 ; "'c(~library)" 01e0 01cc | | Execute Vector,Catenate 01e1 8802 | | Call 0x4,0x2 01e2 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01e3 0000 0000 | | .BLANK 0000[0x5] 01e8 ; -------------------------------------------------------------------------------------- 01e8 ; SUBPROGRAM 01e8 ; -------------------------------------------------------------------------------------- 01e8 01eb | | .CONST 0x01eb ; Address of begin 01e9 0004 | | .CONST 0x0004 ; Address of exception handler 01ea 0001 | | .CONST 0x0001 ; Number of locals 01eb BODY_01e8: 01eb INIT_01e8: 01eb e7fb | | Load 0x3,-0x5 01ec 680e |h | Jump_Zero 0x1fb 01ed 0092 0815 | | Action Push_String_Extended,0x815 ; "Add_Def " 01ef 481f |H | Short_Literal 0x1f 01f0 e9ff | | Load 0x4,-0x1 01f1 8607 | | Call 0x3,0x7 01f2 01cc | | Execute Vector,Catenate 01f3 0092 0813 | | Action Push_String_Extended,0x813 ; ": " 01f5 01cc | | Execute Vector,Catenate 01f6 e9fe | | Load 0x4,-0x2 01f7 01cc | | Execute Vector,Catenate 01f8 e005 | | Load 0x0,0x5 01f9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01fa 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01fb 0092 0814 | | Action Push_String_Extended,0x814 ; "<errors>" 01fd e9ff | | Load 0x4,-0x1 01fe e9fe | | Load 0x4,-0x2 01ff e006 | | Load 0x0,0x6 0200 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0201 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0202 0000 0000 | | .BLANK 0000[0x6] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020b | | .CONST 0x020b ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0001 | | .CONST 0x0001 ; Number of locals 020b BODY_0208: 020b INIT_0208: 020b 487d |H} | Short_Literal 0x7d 020c 487b |H{ | Short_Literal 0x7b 020d e9ff | | Load 0x4,-0x1 020e e008 | | Load 0x0,0x8 020f 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0210 e008 | | Load 0x0,0x8 0211 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0212 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 0213 0000 0000 | | .BLANK 0000[0x5] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 0229 | ) | .CONST 0x0229 ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0006 | | .CONST 0x0006 ; Number of locals 021b INIT_0218: 021b 48c8 |H | Short_Literal 0xc8 021c e009 | | Load 0x0,0x9 021d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 021e 1c08 | | Execute_Immediate Run_Utility,0x8 021f 00d8 | | Load_Top At_Offset_0 0220 1c00 | | Execute_Immediate Run_Utility,0x0 0221 00e1 | | Load_Encached Boolean_Cache 0222 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0223 00e1 | | Load_Encached Boolean_Cache 0224 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 0225 029f 07d3 | | Declare_Subprogram INIT_07d0,For_Call 0227 029f 07eb | | Declare_Subprogram INIT_07e8,For_Call 0229 BODY_0218: 0229 e802 | | Load 0x4,0x2 022a 4820 |H | Short_Literal 0x20 022b 4800 |H | Short_Literal 0x0 022c e009 | | Load 0x0,0x9 022d 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 022e 00d1 | | Pop_Control Pop_Count_1 022f e602 | | Load 0x3,0x2 0230 6825 |h% | Jump_Zero 0x256 0231 e606 | | Load 0x3,0x6 0232 6807 |h | Jump_Zero 0x23a 0233 e802 | | Load 0x4,0x2 0234 0092 0816 | | Action Push_String_Extended,0x816 ; "Network_Public=>RCO" 0236 e009 | | Load 0x0,0x9 0237 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0238 00d1 | | Pop_Control Pop_Count_1 0239 780f |x | Jump 0x249 023a e9f9 | | Load 0x4,-0x7 023b 6807 |h | Jump_Zero 0x243 023c e802 | | Load 0x4,0x2 023d 0092 0817 | | Action Push_String_Extended,0x817 ; "Network_Public=>R" 023f e009 | | Load 0x0,0x9 0240 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0241 00d1 | | Pop_Control Pop_Count_1 0242 7806 |x | Jump 0x249 0243 e802 | | Load 0x4,0x2 0244 0092 0818 | | Action Push_String_Extended,0x818 ; "Network_Public=>RW" 0246 e009 | | Load 0x0,0x9 0247 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0248 00d1 | | Pop_Control Pop_Count_1 0249 e9fd | | Load 0x4,-0x3 024a 01db | | Execute Vector,Length 024b 6806 |h | Jump_Zero 0x252 024c 0092 0819 | | Action Push_String_Extended,0x819 ; "System=>" 024e e9fd | | Load 0x4,-0x3 024f 860c | | Call 0x3,0xc 0250 01cc | | Execute Vector,Catenate 0251 8805 | | Call 0x4,0x5 0252 e802 | | Load 0x4,0x2 0253 e009 | | Load 0x0,0x9 0254 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0255 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8 0256 e9ff | | Load 0x4,-0x1 0257 01db | | Execute Vector,Length 0258 6810 |h | Jump_Zero 0x269 0259 e9ff | | Load 0x4,-0x1 025a 01dd | | Execute Vector,First 025b e9ff | | Load 0x4,-0x1 025c 01d7 | | Execute Vector,Field_Read 025d 0e7b | { | Execute_Immediate Not_Equal,0x7b 025e 7002 |p | Jump_Nonzero 0x261 025f e605 | | Load 0x3,0x5 0260 7008 |p | Jump_Nonzero 0x269 0261 0092 081a | | Action Push_String_Extended,0x81a ; "Public=>" 0263 e9ff | | Load 0x4,-0x1 0264 860c | | Call 0x3,0xc 0265 01cc | | Execute Vector,Catenate 0266 8805 | | Call 0x4,0x5 0267 4801 |H | Short_Literal 0x1 0268 a803 | | Store_Unchecked 0x4,0x3 0269 e603 | | Load 0x3,0x3 026a 6818 |h | Jump_Zero 0x283 026b e9fe | | Load 0x4,-0x2 026c 01db | | Execute Vector,Length 026d 6815 |h | Jump_Zero 0x283 026e e9fe | | Load 0x4,-0x2 026f 01dd | | Execute Vector,First 0270 e9fe | | Load 0x4,-0x2 0271 01d7 | | Execute Vector,Field_Read 0272 0e7b | { | Execute_Immediate Not_Equal,0x7b 0273 7002 |p | Jump_Nonzero 0x276 0274 e605 | | Load 0x3,0x5 0275 700d |p | Jump_Nonzero 0x283 0276 e803 | | Load 0x4,0x3 0277 7005 |p | Jump_Nonzero 0x27d 0278 0092 081a | | Action Push_String_Extended,0x81a ; "Public=>" 027a 8805 | | Call 0x4,0x5 027b 4801 |H | Short_Literal 0x1 027c a803 | | Store_Unchecked 0x4,0x3 027d e802 | | Load 0x4,0x2 027e e9fe | | Load 0x4,-0x2 027f 860c | | Call 0x3,0xc 0280 e009 | | Load 0x0,0x9 0281 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0282 00d1 | | Pop_Control Pop_Count_1 0283 e9fd | | Load 0x4,-0x3 0284 01db | | Execute Vector,Length 0285 680e |h | Jump_Zero 0x294 0286 e9fd | | Load 0x4,-0x3 0287 01dd | | Execute Vector,First 0288 e9fd | | Load 0x4,-0x3 0289 01d7 | | Execute Vector,Field_Read 028a 0e7b | { | Execute_Immediate Not_Equal,0x7b 028b 7002 |p | Jump_Nonzero 0x28e 028c e605 | | Load 0x3,0x5 028d 7006 |p | Jump_Nonzero 0x294 028e 0092 0819 | | Action Push_String_Extended,0x819 ; "System=>" 0290 e9fd | | Load 0x4,-0x3 0291 860c | | Call 0x3,0xc 0292 01cc | | Execute Vector,Catenate 0293 8805 | | Call 0x4,0x5 0294 e9fa | | Load 0x4,-0x6 0295 01db | | Execute Vector,Length 0296 6806 |h | Jump_Zero 0x29d 0297 0092 081b | | Action Push_String_Extended,0x81b ; "Operator=>" 0299 e9fa | | Load 0x4,-0x6 029a 860c | | Call 0x3,0xc 029b 01cc | | Execute Vector,Catenate 029c 8805 | | Call 0x4,0x5 029d e9f8 | | Load 0x4,-0x8 029e 01db | | Execute Vector,Length 029f 6802 |h | Jump_Zero 0x2a2 02a0 e9f8 | | Load 0x4,-0x8 02a1 8806 | | Call 0x4,0x6 02a2 e7fd | | Load 0x3,-0x3 02a3 680e |h | Jump_Zero 0x2b2 02a4 e9fc | | Load 0x4,-0x4 02a5 01db | | Execute Vector,Length 02a6 680b |h | Jump_Zero 0x2b2 02a7 e9fc | | Load 0x4,-0x4 02a8 01dd | | Execute Vector,First 02a9 e9fc | | Load 0x4,-0x4 02aa 01d7 | | Execute Vector,Field_Read 02ab 0e7b | { | Execute_Immediate Not_Equal,0x7b 02ac 7002 |p | Jump_Nonzero 0x2af 02ad e605 | | Load 0x3,0x5 02ae 7003 |p | Jump_Nonzero 0x2b2 02af e9fc | | Load 0x4,-0x4 02b0 860c | | Call 0x3,0xc 02b1 8806 | | Call 0x4,0x6 02b2 e7fc | | Load 0x3,-0x4 02b3 680e |h | Jump_Zero 0x2c2 02b4 e9fb | | Load 0x4,-0x5 02b5 01db | | Execute Vector,Length 02b6 680b |h | Jump_Zero 0x2c2 02b7 e9fb | | Load 0x4,-0x5 02b8 01dd | | Execute Vector,First 02b9 e9fb | | Load 0x4,-0x5 02ba 01d7 | | Execute Vector,Field_Read 02bb 0e7b | { | Execute_Immediate Not_Equal,0x7b 02bc 7002 |p | Jump_Nonzero 0x2bf 02bd e605 | | Load 0x3,0x5 02be 7003 |p | Jump_Nonzero 0x2c2 02bf e9fb | | Load 0x4,-0x5 02c0 860c | | Call 0x3,0xc 02c1 8806 | | Call 0x4,0x6 02c2 e802 | | Load 0x4,0x2 02c3 e009 | | Load 0x0,0x9 02c4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02c5 800a | | Call 0x0,0xa 02c6 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8 02c7 0000 | | .XXX[0x1] 02c8 ; -------------------------------------------------------------------------------------- 02c8 ; SUBPROGRAM 02c8 ; -------------------------------------------------------------------------------------- 02c8 02cb | | .CONST 0x02cb ; Address of begin 02c9 0004 | | .CONST 0x0004 ; Address of exception handler 02ca 0001 | | .CONST 0x0001 ; Number of locals 02cb BODY_02c8: 02cb INIT_02c8: 02cb 4801 |H | Short_Literal 0x1 02cc a606 | | Store_Unchecked 0x3,0x6 02cd e5fa | | Load 0x2,-0x6 02ce 6804 |h | Jump_Zero 0x2d3 02cf e7fa | | Load 0x3,-0x6 02d0 0092 081c | | Action Push_String_Extended,0x81c ; "World ACL's" 02d2 800b | | Call 0x0,0xb 02d3 0092 081d | | Action Push_String_Extended,0x81d ; "R" 02d5 4800 |H | Short_Literal 0x0 02d6 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 02d8 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 02da 0092 081d | | Action Push_String_Extended,0x81d ; "R" 02dc 00ea | | Load_Encached Null_String_Cache 02dd 0092 0820 | | Action Push_String_Extended,0x820 ; "CO" 02df 0092 081d | | Action Push_String_Extended,0x81d ; "R" 02e1 860d | | Call 0x3,0xd 02e2 0092 07fc | | Action Push_String_Extended,0x7fc ; "!" 02e4 8608 | | Call 0x3,0x8 02e5 00ea | | Load_Encached Null_String_Cache 02e6 4800 |H | Short_Literal 0x0 02e7 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 02e9 00ea | | Load_Encached Null_String_Cache 02ea 0092 081d | | Action Push_String_Extended,0x81d ; "R" 02ec 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 02ee 00ea | | Load_Encached Null_String_Cache 02ef 0092 081d | | Action Push_String_Extended,0x81d ; "R" 02f1 860d | | Call 0x3,0xd 02f2 0092 0821 | !| Action Push_String_Extended,0x821 ; "![Commands,Io,Lrm,Model??]" 02f4 8608 | | Call 0x3,0x8 02f5 0092 081d | | Action Push_String_Extended,0x81d ; "R" 02f7 4800 |H | Short_Literal 0x0 02f8 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 02fa 00ea | | Load_Encached Null_String_Cache 02fb 0092 081d | | Action Push_String_Extended,0x81d ; "R" 02fd 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 02ff 00ea | | Load_Encached Null_String_Cache 0300 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0302 860d | | Call 0x3,0xd 0303 0092 0822 | "| Action Push_String_Extended,0x822 ; "!tools" 0305 8608 | | Call 0x3,0x8 0306 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0308 4800 |H | Short_Literal 0x0 0309 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 030b 00ea | | Load_Encached Null_String_Cache 030c 00ea | | Load_Encached Null_String_Cache 030d 00ea | | Load_Encached Null_String_Cache 030e 00ea | | Load_Encached Null_String_Cache 030f 00ea | | Load_Encached Null_String_Cache 0310 860d | | Call 0x3,0xd 0311 0092 0823 | #| Action Push_String_Extended,0x823 ; "!compiler_interface" 0313 8608 | | Call 0x3,0x8 0314 00ea | | Load_Encached Null_String_Cache 0315 4800 |H | Short_Literal 0x0 0316 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 0318 00ea | | Load_Encached Null_String_Cache 0319 0092 081d | | Action Push_String_Extended,0x81d ; "R" 031b 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 031d 00ea | | Load_Encached Null_String_Cache 031e 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0320 860d | | Call 0x3,0xd 0321 0092 0824 | $| Action Push_String_Extended,0x824 ; "!commands.abbreviations" 0323 8608 | | Call 0x3,0x8 0324 e7fe | | Load 0x3,-0x2 0325 6810 |h | Jump_Zero 0x336 0326 00ea | | Load_Encached Null_String_Cache 0327 4801 |H | Short_Literal 0x1 0328 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 032a 00ea | | Load_Encached Null_String_Cache 032b 0092 081d | | Action Push_String_Extended,0x81d ; "R" 032d 00ea | | Load_Encached Null_String_Cache 032e 00ea | | Load_Encached Null_String_Cache 032f 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0331 860d | | Call 0x3,0xd 0332 0092 0825 | %| Action Push_String_Extended,0x825 ; "!Implementation" 0334 8608 | | Call 0x3,0x8 0335 780d |x | Jump 0x343 0336 00ea | | Load_Encached Null_String_Cache 0337 4801 |H | Short_Literal 0x1 0338 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 033a 00ea | | Load_Encached Null_String_Cache 033b 00ea | | Load_Encached Null_String_Cache 033c 00ea | | Load_Encached Null_String_Cache 033d 00ea | | Load_Encached Null_String_Cache 033e 00ea | | Load_Encached Null_String_Cache 033f 860d | | Call 0x3,0xd 0340 0092 0825 | %| Action Push_String_Extended,0x825 ; "!Implementation" 0342 8608 | | Call 0x3,0x8 0343 00ea | | Load_Encached Null_String_Cache 0344 4800 |H | Short_Literal 0x0 0345 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 0347 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 0349 0092 081d | | Action Push_String_Extended,0x81d ; "R" 034b 00ea | | Load_Encached Null_String_Cache 034c 0092 0820 | | Action Push_String_Extended,0x820 ; "CO" 034e 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0350 860d | | Call 0x3,0xd 0351 0092 0826 | &| Action Push_String_Extended,0x826 ; "!users" 0353 8608 | | Call 0x3,0x8 0354 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 0356 4800 |H | Short_Literal 0x0 0357 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 0359 00ea | | Load_Encached Null_String_Cache 035a 00ea | | Load_Encached Null_String_Cache 035b 00ea | | Load_Encached Null_String_Cache 035c 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 035e 00ea | | Load_Encached Null_String_Cache 035f 860d | | Call 0x3,0xd 0360 0092 0827 | '| Action Push_String_Extended,0x827 ; "!machine" 0362 8608 | | Call 0x3,0x8 0363 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0365 4800 |H | Short_Literal 0x0 0366 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 0368 00ea | | Load_Encached Null_String_Cache 0369 00ea | | Load_Encached Null_String_Cache 036a 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 036c 00ea | | Load_Encached Null_String_Cache 036d 00ea | | Load_Encached Null_String_Cache 036e 860d | | Call 0x3,0xd 036f 0092 0828 | (| Action Push_String_Extended,0x828 ; "!machine.[cg_data,devices,editor_data]" 0371 8608 | | Call 0x3,0x8 0372 00ea | | Load_Encached Null_String_Cache 0373 4800 |H | Short_Literal 0x0 0374 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 0376 0092 0829 | )| Action Push_String_Extended,0x829 ; "{RC}" 0378 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 037a 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 037c 0092 082b | +| Action Push_String_Extended,0x82b ; "{CO}" 037e 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0380 860d | | Call 0x3,0xd 0381 0092 082c | ,| Action Push_String_Extended,0x82c ; "!machine.accounting" 0383 8608 | | Call 0x3,0x8 0384 00ea | | Load_Encached Null_String_Cache 0385 4800 |H | Short_Literal 0x0 0386 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 0388 00ea | | Load_Encached Null_String_Cache 0389 00ea | | Load_Encached Null_String_Cache 038a 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 038c 0092 082d | -| Action Push_String_Extended,0x82d ; "{RCO}" 038e 00ea | | Load_Encached Null_String_Cache 038f 860d | | Call 0x3,0xd 0390 0092 082e | .| Action Push_String_Extended,0x82e ; "!machine.[initialization,initialization.[rational,site]]" 0392 8608 | | Call 0x3,0x8 0393 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 0395 4800 |H | Short_Literal 0x0 0396 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 0398 00ea | | Load_Encached Null_String_Cache 0399 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 039b 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 039d 0092 082d | -| Action Push_String_Extended,0x82d ; "{RCO}" 039f 00ea | | Load_Encached Null_String_Cache 03a0 860d | | Call 0x3,0xd 03a1 0092 082f | /| Action Push_String_Extended,0x82f ; "!machine.error_logs" 03a3 8608 | | Call 0x3,0x8 03a4 0092 081d | | Action Push_String_Extended,0x81d ; "R" 03a6 4800 |H | Short_Literal 0x0 03a7 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 03a9 00ea | | Load_Encached Null_String_Cache 03aa 00ea | | Load_Encached Null_String_Cache 03ab 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 03ad 0092 0829 | )| Action Push_String_Extended,0x829 ; "{RC}" 03af 00ea | | Load_Encached Null_String_Cache 03b0 860d | | Call 0x3,0xd 03b1 0092 0830 | 0| Action Push_String_Extended,0x830 ; "!machine.[groups,users]" 03b3 8608 | | Call 0x3,0x8 03b4 00ea | | Load_Encached Null_String_Cache 03b5 4800 |H | Short_Literal 0x0 03b6 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 03b8 0092 0829 | )| Action Push_String_Extended,0x829 ; "{RC}" 03ba 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 03bc 00ea | | Load_Encached Null_String_Cache 03bd 0092 082b | +| Action Push_String_Extended,0x82b ; "{CO}" 03bf 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 03c1 860d | | Call 0x3,0xd 03c2 0092 0831 | 1| Action Push_String_Extended,0x831 ; "!Machine.[Mail,Transfer].??" 03c4 8608 | | Call 0x3,0x8 03c5 0092 081d | | Action Push_String_Extended,0x81d ; "R" 03c7 4800 |H | Short_Literal 0x0 03c8 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 03ca 0092 0829 | )| Action Push_String_Extended,0x829 ; "{RC}" 03cc 0092 081d | | Action Push_String_Extended,0x81d ; "R" 03ce 00ea | | Load_Encached Null_String_Cache 03cf 0092 082d | -| Action Push_String_Extended,0x82d ; "{RCO}" 03d1 00ea | | Load_Encached Null_String_Cache 03d2 860d | | Call 0x3,0xd 03d3 0092 0832 | 2| Action Push_String_Extended,0x832 ; "!machine.release??" 03d5 8608 | | Call 0x3,0x8 03d6 00ea | | Load_Encached Null_String_Cache 03d7 4800 |H | Short_Literal 0x0 03d8 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 03da 0092 0829 | )| Action Push_String_Extended,0x829 ; "{RC}" 03dc 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 03de 0092 081d | | Action Push_String_Extended,0x81d ; "R" 03e0 0092 0833 | 3| Action Push_String_Extended,0x833 ; "O" 03e2 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 03e4 860d | | Call 0x3,0xd 03e5 0092 0834 | 4| Action Push_String_Extended,0x834 ; "!machine.search_lists" 03e7 8608 | | Call 0x3,0x8 03e8 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 03ea 4800 |H | Short_Literal 0x0 03eb 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 03ed 00ea | | Load_Encached Null_String_Cache 03ee 00ea | | Load_Encached Null_String_Cache 03ef 00ea | | Load_Encached Null_String_Cache 03f0 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 03f2 00ea | | Load_Encached Null_String_Cache 03f3 860d | | Call 0x3,0xd 03f4 0092 0835 | 5| Action Push_String_Extended,0x835 ; "!machine.temporary" 03f6 8608 | | Call 0x3,0x8 03f7 00ea | | Load_Encached Null_String_Cache 03f8 4800 |H | Short_Literal 0x0 03f9 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 03fb 0092 0829 | )| Action Push_String_Extended,0x829 ; "{RC}" 03fd 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 03ff 00ea | | Load_Encached Null_String_Cache 0400 0092 0833 | 3| Action Push_String_Extended,0x833 ; "O" 0402 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 0404 860d | | Call 0x3,0xd 0405 0092 0836 | 6| Action Push_String_Extended,0x836 ; "!machine.[sims,sims.master,sims.to_rational]" 0407 8608 | | Call 0x3,0x8 0408 00ea | | Load_Encached Null_String_Cache 0409 4800 |H | Short_Literal 0x0 040a 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 040c 0092 0829 | )| Action Push_String_Extended,0x829 ; "{RC}" 040e 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0410 00ea | | Load_Encached Null_String_Cache 0411 0092 0837 | 7| Action Push_String_Extended,0x837 ; "{O}" 0413 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 0415 860d | | Call 0x3,0xd 0416 0092 0838 | 8| Action Push_String_Extended,0x838 ; "!machine.sims.[database,detail]??" 0418 8608 | | Call 0x3,0x8 0419 00ea | | Load_Encached Null_String_Cache 041a 4800 |H | Short_Literal 0x0 041b 0092 081e | | Action Push_String_Extended,0x81e ; "RCO" 041d 0092 0829 | )| Action Push_String_Extended,0x829 ; "{RC}" 041f 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0421 00ea | | Load_Encached Null_String_Cache 0422 0092 0837 | 7| Action Push_String_Extended,0x837 ; "{O}" 0424 0092 081f | | Action Push_String_Extended,0x81f ; "RC" 0426 860d | | Call 0x3,0xd 0427 0092 0839 | 9| Action Push_String_Extended,0x839 ; "!machine.sims.to_rational??" 0429 8608 | | Call 0x3,0x8 042a 0092 083a | :| Action Push_String_Extended,0x83a ; "Mailer=>RCO" 042c 0092 083b | ;| Action Push_String_Extended,0x83b ; "!Machine.[Mail,Transfer]??" 042e 860a | | Call 0x3,0xa 042f 0092 083c | <| Action Push_String_Extended,0x83c ; "Mailer=>R" 0431 0092 083d | =| Action Push_String_Extended,0x83d ; "!Users.@.Mailbox.Main_Set.[$,$^,$^^]" 0433 860a | | Call 0x3,0xa 0434 e5fa | | Load 0x2,-0x6 0435 6801 |h | Jump_Zero 0x437 0436 800c | | Call 0x0,0xc 0437 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0438 ; -------------------------------------------------------------------------------------- 0438 ; SUBPROGRAM 0438 ; -------------------------------------------------------------------------------------- 0438 043b | ; | .CONST 0x043b ; Address of begin 0439 0004 | | .CONST 0x0004 ; Address of exception handler 043a 0001 | | .CONST 0x0001 ; Number of locals 043b BODY_0438: 043b INIT_0438: 043b e602 | | Load 0x3,0x2 043c 6824 |h$ | Jump_Zero 0x461 043d e7fb | | Load 0x3,-0x5 043e 680c |h | Jump_Zero 0x44b 043f 0092 0812 | | Action Push_String_Extended,0x812 ; "Def " 0441 4823 |H# | Short_Literal 0x23 0442 e9ff | | Load 0x4,-0x1 0443 8607 | | Call 0x3,0x7 0444 01cc | | Execute Vector,Catenate 0445 0092 083e | >| Action Push_String_Extended,0x83e ; ": Network_Public=>OWNER" 0447 01cc | | Execute Vector,Catenate 0448 e005 | | Load 0x0,0x5 0449 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 044a 4506 |E | Exit_Suprogram New_Top_Offset 0x6 044b 0092 083f | ?| Action Push_String_Extended,0x83f ; "*** ++*" 044d e9ff | | Load 0x4,-0x1 044e e004 | | Load 0x0,0x4 044f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0450 0092 083f | ?| Action Push_String_Extended,0x83f ; "*** ++*" 0452 e9ff | | Load 0x4,-0x1 0453 0092 080e | | Action Push_String_Extended,0x80e ; "<ALL>" 0455 e004 | | Load 0x0,0x4 0456 180f | | Execute Package,Field_Execute,Field_Number 0xf 0457 0092 0840 | @| Action Push_String_Extended,0x840 ; "++* ***" 0459 4801 |H | Short_Literal 0x1 045a e9ff | | Load 0x4,-0x1 045b 4803 |H | Short_Literal 0x3 045c 0092 0841 | A| Action Push_String_Extended,0x841 ; "network_public" 045e e004 | | Load 0x0,0x4 045f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0460 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0461 e7fb | | Load 0x3,-0x5 0462 682d |h- | Jump_Zero 0x490 0463 0092 0812 | | Action Push_String_Extended,0x812 ; "Def " 0465 4823 |H# | Short_Literal 0x23 0466 e9ff | | Load 0x4,-0x1 0467 8607 | | Call 0x3,0x7 0468 01cc | | Execute Vector,Catenate 0469 0092 0842 | B| Action Push_String_Extended,0x842 ; ": Public=>" 046b 01cc | | Execute Vector,Catenate 046c e9fe | | Load 0x4,-0x2 046d e004 | | Load 0x0,0x4 046e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 046f 011c | | Execute Any,Convert_Unchecked 0470 1c01 | | Execute_Immediate Run_Utility,0x1 0471 01cc | | Execute Vector,Catenate 0472 0092 0843 | C| Action Push_String_Extended,0x843 ; ", System=>" 0474 01cc | | Execute Vector,Catenate 0475 e9fd | | Load 0x4,-0x3 0476 e004 | | Load 0x0,0x4 0477 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0478 011c | | Execute Any,Convert_Unchecked 0479 1c01 | | Execute_Immediate Run_Utility,0x1 047a 01cc | | Execute Vector,Catenate 047b 0092 0844 | D| Action Push_String_Extended,0x844 ; ", Operator=>" 047d 01cc | | Execute Vector,Catenate 047e e9fc | | Load 0x4,-0x4 047f e004 | | Load 0x0,0x4 0480 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0481 011c | | Execute Any,Convert_Unchecked 0482 1c01 | | Execute_Immediate Run_Utility,0x1 0483 01cc | | Execute Vector,Catenate 0484 0092 0845 | E| Action Push_String_Extended,0x845 ; ", Network_Public=>" 0486 01cc | | Execute Vector,Catenate 0487 e9fb | | Load 0x4,-0x5 0488 e004 | | Load 0x0,0x4 0489 1b0d | | Execute Package,Field_Read,Field_Number 0xd 048a 011c | | Execute Any,Convert_Unchecked 048b 1c01 | | Execute_Immediate Run_Utility,0x1 048c 01cc | | Execute Vector,Catenate 048d e005 | | Load 0x0,0x5 048e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 048f 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0490 0092 0840 | @| Action Push_String_Extended,0x840 ; "++* ***" 0492 e9ff | | Load 0x4,-0x1 0493 e004 | | Load 0x0,0x4 0494 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0495 0092 0846 | F| Action Push_String_Extended,0x846 ; "***" 0497 e9ff | | Load 0x4,-0x1 0498 0092 080e | | Action Push_String_Extended,0x80e ; "<ALL>" 049a e004 | | Load 0x0,0x4 049b 180f | | Execute Package,Field_Execute,Field_Number 0xf 049c 0092 0840 | @| Action Push_String_Extended,0x840 ; "++* ***" 049e 4801 |H | Short_Literal 0x1 049f e9ff | | Load 0x4,-0x1 04a0 e9fe | | Load 0x4,-0x2 04a1 0092 0847 | G| Action Push_String_Extended,0x847 ; "public" 04a3 e004 | | Load 0x0,0x4 04a4 180e | | Execute Package,Field_Execute,Field_Number 0xe 04a5 0092 0840 | @| Action Push_String_Extended,0x840 ; "++* ***" 04a7 4801 |H | Short_Literal 0x1 04a8 e9ff | | Load 0x4,-0x1 04a9 e9fd | | Load 0x4,-0x3 04aa 0092 0848 | H| Action Push_String_Extended,0x848 ; "system" 04ac e004 | | Load 0x0,0x4 04ad 180e | | Execute Package,Field_Execute,Field_Number 0xe 04ae 0092 0840 | @| Action Push_String_Extended,0x840 ; "++* ***" 04b0 4801 |H | Short_Literal 0x1 04b1 e9ff | | Load 0x4,-0x1 04b2 e9fc | | Load 0x4,-0x4 04b3 0092 0849 | I| Action Push_String_Extended,0x849 ; "operator" 04b5 e004 | | Load 0x0,0x4 04b6 180e | | Execute Package,Field_Execute,Field_Number 0xe 04b7 0092 0840 | @| Action Push_String_Extended,0x840 ; "++* ***" 04b9 4801 |H | Short_Literal 0x1 04ba e9ff | | Load 0x4,-0x1 04bb e9fb | | Load 0x4,-0x5 04bc 0092 0841 | A| Action Push_String_Extended,0x841 ; "network_public" 04be e004 | | Load 0x0,0x4 04bf 180e | | Execute Package,Field_Execute,Field_Number 0xe 04c0 4506 |E | Exit_Suprogram New_Top_Offset 0x6 04c1 0000 0000 | | .BLANK 0000[0x7] 04c8 ; -------------------------------------------------------------------------------------- 04c8 ; SUBPROGRAM 04c8 ; -------------------------------------------------------------------------------------- 04c8 04cb | | .CONST 0x04cb ; Address of begin 04c9 0004 | | .CONST 0x0004 ; Address of exception handler 04ca 0001 | | .CONST 0x0001 ; Number of locals 04cb BODY_04c8: 04cb INIT_04c8: 04cb 4800 |H | Short_Literal 0x0 04cc 4803 |H | Short_Literal 0x3 04cd 4802 |H | Short_Literal 0x2 04ce 4801 |H | Short_Literal 0x1 04cf 0092 0807 | | Action Push_String_Extended,0x807 ; "!tools.@'c(subsystem)" 04d1 860f | | Call 0x3,0xf 04d2 4800 |H | Short_Literal 0x0 04d3 4803 |H | Short_Literal 0x3 04d4 4802 |H | Short_Literal 0x2 04d5 4801 |H | Short_Literal 0x1 04d6 0092 0808 | | Action Push_String_Extended,0x808 ; "!tools.@.@'c(load_view, spec_view, comb_view)" 04d8 860f | | Call 0x3,0xf 04d9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04da 0000 0000 | | .BLANK 0000[0x6] 04e0 ; -------------------------------------------------------------------------------------- 04e0 ; SUBPROGRAM 04e0 ; -------------------------------------------------------------------------------------- 04e0 04e3 | | .CONST 0x04e3 ; Address of begin 04e1 0004 | | .CONST 0x0004 ; Address of exception handler 04e2 0001 | | .CONST 0x0001 ; Number of locals 04e3 BODY_04e0: 04e3 INIT_04e0: 04e3 4800 |H | Short_Literal 0x0 04e4 a606 | | Store_Unchecked 0x3,0x6 04e5 e5fa | | Load 0x2,-0x6 04e6 6804 |h | Jump_Zero 0x4eb 04e7 e7fa | | Load 0x3,-0x6 04e8 0092 084a | J| Action Push_String_Extended,0x84a ; "World Default ACL's" 04ea 800b | | Call 0x0,0xb 04eb 00ea | | Load_Encached Null_String_Cache 04ec 4800 |H | Short_Literal 0x0 04ed 00ea | | Load_Encached Null_String_Cache 04ee 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 04f0 0092 081d | | Action Push_String_Extended,0x81d ; "R" 04f2 00ea | | Load_Encached Null_String_Cache 04f3 00ea | | Load_Encached Null_String_Cache 04f4 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 04f6 860d | | Call 0x3,0xd 04f7 0092 07fc | | Action Push_String_Extended,0x7fc ; "!" 04f9 8609 | | Call 0x3,0x9 04fa 00ea | | Load_Encached Null_String_Cache 04fb 4800 |H | Short_Literal 0x0 04fc 00ea | | Load_Encached Null_String_Cache 04fd 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 04ff 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0501 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0503 00ea | | Load_Encached Null_String_Cache 0504 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0506 860d | | Call 0x3,0xd 0507 0092 084c | L| Action Push_String_Extended,0x84c ; "![commands,implementation,io,lrm,tools]" 0509 8609 | | Call 0x3,0x9 050a 00ea | | Load_Encached Null_String_Cache 050b 4800 |H | Short_Literal 0x0 050c 00ea | | Load_Encached Null_String_Cache 050d 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 050f 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0511 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0513 00ea | | Load_Encached Null_String_Cache 0514 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0516 860d | | Call 0x3,0xd 0517 0092 0823 | #| Action Push_String_Extended,0x823 ; "!compiler_interface" 0519 8609 | | Call 0x3,0x9 051a 00ea | | Load_Encached Null_String_Cache 051b 4800 |H | Short_Literal 0x0 051c 00ea | | Load_Encached Null_String_Cache 051d 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 051f 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0521 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0523 00ea | | Load_Encached Null_String_Cache 0524 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0526 860d | | Call 0x3,0xd 0527 0092 0824 | $| Action Push_String_Extended,0x824 ; "!commands.abbreviations" 0529 8609 | | Call 0x3,0x9 052a 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 052c 4800 |H | Short_Literal 0x0 052d 00ea | | Load_Encached Null_String_Cache 052e 00ea | | Load_Encached Null_String_Cache 052f 00ea | | Load_Encached Null_String_Cache 0530 00ea | | Load_Encached Null_String_Cache 0531 00ea | | Load_Encached Null_String_Cache 0532 00ea | | Load_Encached Null_String_Cache 0533 860d | | Call 0x3,0xd 0534 0092 0827 | '| Action Push_String_Extended,0x827 ; "!machine" 0536 8609 | | Call 0x3,0x9 0537 00ea | | Load_Encached Null_String_Cache 0538 4800 |H | Short_Literal 0x0 0539 00ea | | Load_Encached Null_String_Cache 053a 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 053c 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 053e 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0540 00ea | | Load_Encached Null_String_Cache 0541 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0543 860d | | Call 0x3,0xd 0544 0092 084e | N| Action Push_String_Extended,0x84e ; "!Machine.accounting" 0546 8609 | | Call 0x3,0x9 0547 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0549 4800 |H | Short_Literal 0x0 054a 00ea | | Load_Encached Null_String_Cache 054b 00ea | | Load_Encached Null_String_Cache 054c 00ea | | Load_Encached Null_String_Cache 054d 00ea | | Load_Encached Null_String_Cache 054e 00ea | | Load_Encached Null_String_Cache 054f 00ea | | Load_Encached Null_String_Cache 0550 860d | | Call 0x3,0xd 0551 0092 084f | O| Action Push_String_Extended,0x84f ; "!Machine.Error_Logs" 0553 8609 | | Call 0x3,0x9 0554 00ea | | Load_Encached Null_String_Cache 0555 4800 |H | Short_Literal 0x0 0556 00ea | | Load_Encached Null_String_Cache 0557 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 0559 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 055b 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 055d 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 055f 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0561 860d | | Call 0x3,0xd 0562 0092 0850 | P| Action Push_String_Extended,0x850 ; "!Machine.[initialization,initialization.[site,rational]]" 0564 8609 | | Call 0x3,0x9 0565 00ea | | Load_Encached Null_String_Cache 0566 4800 |H | Short_Literal 0x0 0567 00ea | | Load_Encached Null_String_Cache 0568 00ea | | Load_Encached Null_String_Cache 0569 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 056b 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 056d 00ea | | Load_Encached Null_String_Cache 056e 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0570 860d | | Call 0x3,0xd 0571 0092 0851 | Q| Action Push_String_Extended,0x851 ; "!Machine.[cg_data,devices,editor_data]" 0573 8609 | | Call 0x3,0x9 0574 00ea | | Load_Encached Null_String_Cache 0575 4800 |H | Short_Literal 0x0 0576 00ea | | Load_Encached Null_String_Cache 0577 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0579 0092 081d | | Action Push_String_Extended,0x81d ; "R" 057b 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 057d 00ea | | Load_Encached Null_String_Cache 057e 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0580 860d | | Call 0x3,0xd 0581 0092 0852 | R| Action Push_String_Extended,0x852 ; "!Machine.[groups,users]" 0583 8609 | | Call 0x3,0x9 0584 00ea | | Load_Encached Null_String_Cache 0585 4800 |H | Short_Literal 0x0 0586 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0588 0092 0853 | S| Action Push_String_Extended,0x853 ; "{W}" 058a 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 058c 00ea | | Load_Encached Null_String_Cache 058d 0092 0853 | S| Action Push_String_Extended,0x853 ; "{W}" 058f 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0591 860d | | Call 0x3,0xd 0592 0092 0854 | T| Action Push_String_Extended,0x854 ; "!Machine.[Mail,Transfer].[??,~Distribute]'c(world)" 0594 8609 | | Call 0x3,0x9 0595 00ea | | Load_Encached Null_String_Cache 0596 4800 |H | Short_Literal 0x0 0597 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0599 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 059b 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 059d 00ea | | Load_Encached Null_String_Cache 059e 0092 0853 | S| Action Push_String_Extended,0x853 ; "{W}" 05a0 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 05a2 860d | | Call 0x3,0xd 05a3 0092 0855 | U| Action Push_String_Extended,0x855 ; "!Machine.[Mail,Transfer].Distribute'c(world)" 05a5 8609 | | Call 0x3,0x9 05a6 00ea | | Load_Encached Null_String_Cache 05a7 4800 |H | Short_Literal 0x0 05a8 00ea | | Load_Encached Null_String_Cache 05a9 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 05ab 0092 081d | | Action Push_String_Extended,0x81d ; "R" 05ad 00ea | | Load_Encached Null_String_Cache 05ae 00ea | | Load_Encached Null_String_Cache 05af 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 05b1 860d | | Call 0x3,0xd 05b2 0092 0856 | V| Action Push_String_Extended,0x856 ; "!Machine.Release??'c(world)" 05b4 8609 | | Call 0x3,0x9 05b5 00ea | | Load_Encached Null_String_Cache 05b6 4800 |H | Short_Literal 0x0 05b7 00ea | | Load_Encached Null_String_Cache 05b8 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 05ba 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 05bc 0092 081d | | Action Push_String_Extended,0x81d ; "R" 05be 00ea | | Load_Encached Null_String_Cache 05bf 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 05c1 860d | | Call 0x3,0xd 05c2 0092 0857 | W| Action Push_String_Extended,0x857 ; "!Machine.Search_Lists" 05c4 8609 | | Call 0x3,0x9 05c5 00ea | | Load_Encached Null_String_Cache 05c6 4800 |H | Short_Literal 0x0 05c7 00ea | | Load_Encached Null_String_Cache 05c8 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 05ca 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 05cc 00ea | | Load_Encached Null_String_Cache 05cd 00ea | | Load_Encached Null_String_Cache 05ce 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 05d0 860d | | Call 0x3,0xd 05d1 0092 0858 | X| Action Push_String_Extended,0x858 ; "!machine.sims" 05d3 8609 | | Call 0x3,0x9 05d4 00ea | | Load_Encached Null_String_Cache 05d5 4800 |H | Short_Literal 0x0 05d6 00ea | | Load_Encached Null_String_Cache 05d7 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 05d9 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 05db 00ea | | Load_Encached Null_String_Cache 05dc 00ea | | Load_Encached Null_String_Cache 05dd 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 05df 860d | | Call 0x3,0xd 05e0 0092 0859 | Y| Action Push_String_Extended,0x859 ; "!machine.sims.master" 05e2 8609 | | Call 0x3,0x9 05e3 00ea | | Load_Encached Null_String_Cache 05e4 4800 |H | Short_Literal 0x0 05e5 00ea | | Load_Encached Null_String_Cache 05e6 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 05e8 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 05ea 00ea | | Load_Encached Null_String_Cache 05eb 00ea | | Load_Encached Null_String_Cache 05ec 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 05ee 860d | | Call 0x3,0xd 05ef 0092 085a | Z| Action Push_String_Extended,0x85a ; "!Machine.sims.[database,detail]" 05f1 8609 | | Call 0x3,0x9 05f2 00ea | | Load_Encached Null_String_Cache 05f3 4800 |H | Short_Literal 0x0 05f4 00ea | | Load_Encached Null_String_Cache 05f5 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 05f7 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 05f9 00ea | | Load_Encached Null_String_Cache 05fa 00ea | | Load_Encached Null_String_Cache 05fb 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 05fd 860d | | Call 0x3,0xd 05fe 0092 085b | [| Action Push_String_Extended,0x85b ; "!Machine.sims.to_rational.@'c(world)" 0600 8609 | | Call 0x3,0x9 0601 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0603 4800 |H | Short_Literal 0x0 0604 00ea | | Load_Encached Null_String_Cache 0605 00ea | | Load_Encached Null_String_Cache 0606 00ea | | Load_Encached Null_String_Cache 0607 00ea | | Load_Encached Null_String_Cache 0608 00ea | | Load_Encached Null_String_Cache 0609 00ea | | Load_Encached Null_String_Cache 060a 860d | | Call 0x3,0xd 060b 0092 085c | \| Action Push_String_Extended,0x85c ; "!Machine.Temporary" 060d 8609 | | Call 0x3,0x9 060e 00ea | | Load_Encached Null_String_Cache 060f 4800 |H | Short_Literal 0x0 0610 00ea | | Load_Encached Null_String_Cache 0611 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0613 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0615 00ea | | Load_Encached Null_String_Cache 0616 00ea | | Load_Encached Null_String_Cache 0617 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0619 860d | | Call 0x3,0xd 061a 0092 085d | ]| Action Push_String_Extended,0x85d ; "!model.??'c(world)" 061c 8609 | | Call 0x3,0x9 061d 00ea | | Load_Encached Null_String_Cache 061e 4800 |H | Short_Literal 0x0 061f 00ea | | Load_Encached Null_String_Cache 0620 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 0622 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0624 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0626 00ea | | Load_Encached Null_String_Cache 0627 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0629 860d | | Call 0x3,0xd 062a 0092 0826 | &| Action Push_String_Extended,0x826 ; "!users" 062c 8609 | | Call 0x3,0x9 062d 0092 085e | ^| Action Push_String_Extended,0x85e ; "Mailer=>RW" 062f 0092 085f | _| Action Push_String_Extended,0x85f ; "!Machine.[Mail,Transfer]??'c(world)" 0631 860b | | Call 0x3,0xb 0632 e5fa | | Load 0x2,-0x6 0633 6801 |h | Jump_Zero 0x635 0634 800c | | Call 0x0,0xc 0635 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0636 0000 0000 | | .XXX[0x2] 0638 ; -------------------------------------------------------------------------------------- 0638 ; SUBPROGRAM 0638 ; -------------------------------------------------------------------------------------- 0638 063b | ; | .CONST 0x063b ; Address of begin 0639 0004 | | .CONST 0x0004 ; Address of exception handler 063a 0001 | | .CONST 0x0001 ; Number of locals 063b BODY_0638: 063b INIT_0638: 063b 4800 |H | Short_Literal 0x0 063c a606 | | Store_Unchecked 0x3,0x6 063d e5fa | | Load 0x2,-0x6 063e 6804 |h | Jump_Zero 0x643 063f e7fa | | Load 0x3,-0x6 0640 0092 0860 | `| Action Push_String_Extended,0x860 ; "Object ACL (Non-World)" 0642 800b | | Call 0x0,0xb 0643 00ea | | Load_Encached Null_String_Cache 0644 4801 |H | Short_Literal 0x1 0645 00ea | | Load_Encached Null_String_Cache 0646 00ea | | Load_Encached Null_String_Cache 0647 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0649 00ea | | Load_Encached Null_String_Cache 064a 00ea | | Load_Encached Null_String_Cache 064b 0092 081d | | Action Push_String_Extended,0x81d ; "R" 064d 860d | | Call 0x3,0xd 064e 0092 0861 | a| Action Push_String_Extended,0x861 ; "![commands,io,lrm,tools].?" 0650 8608 | | Call 0x3,0x8 0651 00ea | | Load_Encached Null_String_Cache 0652 4801 |H | Short_Literal 0x1 0653 00ea | | Load_Encached Null_String_Cache 0654 00ea | | Load_Encached Null_String_Cache 0655 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0657 00ea | | Load_Encached Null_String_Cache 0658 00ea | | Load_Encached Null_String_Cache 0659 0092 081d | | Action Push_String_Extended,0x81d ; "R" 065b 860d | | Call 0x3,0xd 065c 0092 0862 | b| Action Push_String_Extended,0x862 ; "!commands.abbreviations.?" 065e 8608 | | Call 0x3,0x8 065f 00ea | | Load_Encached Null_String_Cache 0660 4801 |H | Short_Literal 0x1 0661 00ea | | Load_Encached Null_String_Cache 0662 00ea | | Load_Encached Null_String_Cache 0663 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0665 00ea | | Load_Encached Null_String_Cache 0666 00ea | | Load_Encached Null_String_Cache 0667 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0669 860d | | Call 0x3,0xd 066a 0092 0863 | c| Action Push_String_Extended,0x863 ; "![compiler_interface,implementation].?" 066c 8608 | | Call 0x3,0x8 066d 0092 081d | | Action Push_String_Extended,0x81d ; "R" 066f 4800 |H | Short_Literal 0x0 0670 00ea | | Load_Encached Null_String_Cache 0671 00ea | | Load_Encached Null_String_Cache 0672 00ea | | Load_Encached Null_String_Cache 0673 00ea | | Load_Encached Null_String_Cache 0674 00ea | | Load_Encached Null_String_Cache 0675 00ea | | Load_Encached Null_String_Cache 0676 860d | | Call 0x3,0xd 0677 0092 0864 | d| Action Push_String_Extended,0x864 ; "!compiler_interface.subsystem_interface" 0679 8608 | | Call 0x3,0x8 067a 00ea | | Load_Encached Null_String_Cache 067b 4800 |H | Short_Literal 0x0 067c 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 067e 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 0680 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0682 00ea | | Load_Encached Null_String_Cache 0683 00ea | | Load_Encached Null_String_Cache 0684 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0686 860d | | Call 0x3,0xd 0687 0092 0865 | e| Action Push_String_Extended,0x865 ; "!machine.@'c(ada)" 0689 8608 | | Call 0x3,0x8 068a 00ea | | Load_Encached Null_String_Cache 068b 4800 |H | Short_Literal 0x0 068c 0092 081d | | Action Push_String_Extended,0x81d ; "R" 068e 00ea | | Load_Encached Null_String_Cache 068f 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0691 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0693 00ea | | Load_Encached Null_String_Cache 0694 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0696 860d | | Call 0x3,0xd 0697 0092 0866 | f| Action Push_String_Extended,0x866 ; "!machine.[cg_data,editor_data].@" 0699 8608 | | Call 0x3,0x8 069a 00ea | | Load_Encached Null_String_Cache 069b 4800 |H | Short_Literal 0x0 069c 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 069e 00ea | | Load_Encached Null_String_Cache 069f 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06a1 0092 081d | | Action Push_String_Extended,0x81d ; "R" 06a3 00ea | | Load_Encached Null_String_Cache 06a4 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06a6 860d | | Call 0x3,0xd 06a7 0092 0867 | g| Action Push_String_Extended,0x867 ; "!machine.[initialization,initialization.[site,rational]].?" 06a9 8608 | | Call 0x3,0x8 06aa 00ea | | Load_Encached Null_String_Cache 06ab 4800 |H | Short_Literal 0x0 06ac 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06ae 00ea | | Load_Encached Null_String_Cache 06af 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06b1 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06b3 00ea | | Load_Encached Null_String_Cache 06b4 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06b6 860d | | Call 0x3,0xd 06b7 0092 0868 | h| Action Push_String_Extended,0x868 ; "!Machine.Accounting.@" 06b9 8608 | | Call 0x3,0x8 06ba 00ea | | Load_Encached Null_String_Cache 06bb 4800 |H | Short_Literal 0x0 06bc 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06be 0092 0853 | S| Action Push_String_Extended,0x853 ; "{W}" 06c0 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06c2 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06c4 00ea | | Load_Encached Null_String_Cache 06c5 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06c7 860d | | Call 0x3,0xd 06c8 0092 0869 | i| Action Push_String_Extended,0x869 ; "!Machine.Error_Logs.[@,~Mail_Distribute_Server@]" 06ca 8608 | | Call 0x3,0x8 06cb 00ea | | Load_Encached Null_String_Cache 06cc 4800 |H | Short_Literal 0x0 06cd 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06cf 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06d1 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06d3 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06d5 00ea | | Load_Encached Null_String_Cache 06d6 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06d8 860d | | Call 0x3,0xd 06d9 0092 086a | j| Action Push_String_Extended,0x86a ; "!Machine.Error_Logs.Mail_Distribute_Server@" 06db 8608 | | Call 0x3,0x8 06dc 0092 081d | | Action Push_String_Extended,0x81d ; "R" 06de 4800 |H | Short_Literal 0x0 06df 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06e1 00ea | | Load_Encached Null_String_Cache 06e2 0092 081d | | Action Push_String_Extended,0x81d ; "R" 06e4 0092 081d | | Action Push_String_Extended,0x81d ; "R" 06e6 00ea | | Load_Encached Null_String_Cache 06e7 0092 081d | | Action Push_String_Extended,0x81d ; "R" 06e9 860d | | Call 0x3,0xd 06ea 0092 086b | k| Action Push_String_Extended,0x86b ; "!Machine.Machine_Name" 06ec 8608 | | Call 0x3,0x8 06ed 00ea | | Load_Encached Null_String_Cache 06ee 4800 |H | Short_Literal 0x0 06ef 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 06f1 0092 0853 | S| Action Push_String_Extended,0x853 ; "{W}" 06f3 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06f5 00ea | | Load_Encached Null_String_Cache 06f6 0092 0853 | S| Action Push_String_Extended,0x853 ; "{W}" 06f8 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 06fa 860d | | Call 0x3,0xd 06fb 0092 086c | l| Action Push_String_Extended,0x86c ; "!Machine.[Mail,Transfer].[??,~Distribute.??]" 06fd 8608 | | Call 0x3,0x8 06fe 00ea | | Load_Encached Null_String_Cache 06ff 4800 |H | Short_Literal 0x0 0700 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0702 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0704 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0706 00ea | | Load_Encached Null_String_Cache 0707 0092 0853 | S| Action Push_String_Extended,0x853 ; "{W}" 0709 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 070b 860d | | Call 0x3,0xd 070c 0092 086d | m| Action Push_String_Extended,0x86d ; "!Machine.[Mail,Transfer].Distribute.??" 070e 8608 | | Call 0x3,0x8 070f 0092 081d | | Action Push_String_Extended,0x81d ; "R" 0711 4800 |H | Short_Literal 0x0 0712 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0714 00ea | | Load_Encached Null_String_Cache 0715 00ea | | Load_Encached Null_String_Cache 0716 00ea | | Load_Encached Null_String_Cache 0717 00ea | | Load_Encached Null_String_Cache 0718 00ea | | Load_Encached Null_String_Cache 0719 860d | | Call 0x3,0xd 071a 0092 086e | n| Action Push_String_Extended,0x86e ; "!Machine.release.??'c(file,ada)" 071c 8608 | | Call 0x3,0x8 071d 00ea | | Load_Encached Null_String_Cache 071e 4800 |H | Short_Literal 0x0 071f 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0721 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 0723 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0725 00ea | | Load_Encached Null_String_Cache 0726 00ea | | Load_Encached Null_String_Cache 0727 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0729 860d | | Call 0x3,0xd 072a 0092 086f | o| Action Push_String_Extended,0x86f ; "!Machine.Search_lists.@" 072c 8608 | | Call 0x3,0x8 072d 00ea | | Load_Encached Null_String_Cache 072e 4800 |H | Short_Literal 0x0 072f 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0731 00ea | | Load_Encached Null_String_Cache 0732 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0734 00ea | | Load_Encached Null_String_Cache 0735 00ea | | Load_Encached Null_String_Cache 0736 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0738 860d | | Call 0x3,0xd 0739 0092 0870 | p| Action Push_String_Extended,0x870 ; "!Machine.sims.@'c(ada,file)" 073b 8608 | | Call 0x3,0x8 073c 00ea | | Load_Encached Null_String_Cache 073d 4800 |H | Short_Literal 0x0 073e 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0740 00ea | | Load_Encached Null_String_Cache 0741 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0743 00ea | | Load_Encached Null_String_Cache 0744 00ea | | Load_Encached Null_String_Cache 0745 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0747 860d | | Call 0x3,0xd 0748 0092 0871 | q| Action Push_String_Extended,0x871 ; "!Machine.sims.[master,to_rational].@'c(ada,file)" 074a 8608 | | Call 0x3,0x8 074b 00ea | | Load_Encached Null_String_Cache 074c 4800 |H | Short_Literal 0x0 074d 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 074f 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 0751 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0753 00ea | | Load_Encached Null_String_Cache 0754 00ea | | Load_Encached Null_String_Cache 0755 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0757 860d | | Call 0x3,0xd 0758 0092 0872 | r| Action Push_String_Extended,0x872 ; "!Machine.sims.[database,detail]@'c(ada,file)" 075a 8608 | | Call 0x3,0x8 075b 00ea | | Load_Encached Null_String_Cache 075c 4800 |H | Short_Literal 0x0 075d 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 075f 0092 084d | M| Action Push_String_Extended,0x84d ; "{RW}" 0761 0092 082a | *| Action Push_String_Extended,0x82a ; "{R}" 0763 00ea | | Load_Encached Null_String_Cache 0764 00ea | | Load_Encached Null_String_Cache 0765 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 0767 860d | | Call 0x3,0xd 0768 0092 0873 | s| Action Push_String_Extended,0x873 ; "!Machine.sims.to_rational.@'c(ada,file)" 076a 8608 | | Call 0x3,0x8 076b 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 076d 4800 |H | Short_Literal 0x0 076e 00ea | | Load_Encached Null_String_Cache 076f 00ea | | Load_Encached Null_String_Cache 0770 00ea | | Load_Encached Null_String_Cache 0771 00ea | | Load_Encached Null_String_Cache 0772 00ea | | Load_Encached Null_String_Cache 0773 00ea | | Load_Encached Null_String_Cache 0774 860d | | Call 0x3,0xd 0775 0092 0874 | t| Action Push_String_Extended,0x874 ; "!Machine.Switch_Definitions" 0777 8608 | | Call 0x3,0x8 0778 0092 084b | K| Action Push_String_Extended,0x84b ; "RW" 077a 4800 |H | Short_Literal 0x0 077b 00ea | | Load_Encached Null_String_Cache 077c 00ea | | Load_Encached Null_String_Cache 077d 00ea | | Load_Encached Null_String_Cache 077e 00ea | | Load_Encached Null_String_Cache 077f 00ea | | Load_Encached Null_String_Cache 0780 00ea | | Load_Encached Null_String_Cache 0781 860d | | Call 0x3,0xd 0782 0092 0875 | u| Action Push_String_Extended,0x875 ; "!machine.temporary.@" 0784 8608 | | Call 0x3,0x8 0785 0092 085e | ^| Action Push_String_Extended,0x85e ; "Mailer=>RW" 0787 0092 0831 | 1| Action Push_String_Extended,0x831 ; "!Machine.[Mail,Transfer].??" 0789 860a | | Call 0x3,0xa 078a 0092 085e | ^| Action Push_String_Extended,0x85e ; "Mailer=>RW" 078c 0092 0876 | v| Action Push_String_Extended,0x876 ; "!Users.@.Mailbox.Main_@" 078e 860a | | Call 0x3,0xa 078f e5fa | | Load 0x2,-0x6 0790 6801 |h | Jump_Zero 0x792 0791 800c | | Call 0x0,0xc 0792 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0793 0000 0000 | | .BLANK 0000[0x5] 0798 ; -------------------------------------------------------------------------------------- 0798 ; SUBPROGRAM 0798 ; -------------------------------------------------------------------------------------- 0798 079b | | .CONST 0x079b ; Address of begin 0799 0004 | | .CONST 0x0004 ; Address of exception handler 079a 0001 | | .CONST 0x0001 ; Number of locals 079b BODY_0798: 079b INIT_0798: 079b e7fb | | Load 0x3,-0x5 079c 680b |h | Jump_Zero 0x7a8 079d 4823 |H# | Short_Literal 0x23 079e ebff | | Load 0x5,-0x1 079f 8607 | | Call 0x3,0x7 07a0 0092 0813 | | Action Push_String_Extended,0x813 ; ": " 07a2 01cc | | Execute Vector,Catenate 07a3 e9fe | | Load 0x4,-0x2 07a4 01cc | | Execute Vector,Catenate 07a5 e005 | | Load 0x0,0x5 07a6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 07a7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07a8 0092 0814 | | Action Push_String_Extended,0x814 ; "<errors>" 07aa ebff | | Load 0x5,-0x1 07ab e9fe | | Load 0x4,-0x2 07ac e006 | | Load 0x0,0x6 07ad 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07ae 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07af 0000 | | .XXX[0x1] 07b0 ; -------------------------------------------------------------------------------------- 07b0 ; SUBPROGRAM 07b0 ; -------------------------------------------------------------------------------------- 07b0 07b3 | | .CONST 0x07b3 ; Address of begin 07b1 0004 | | .CONST 0x0004 ; Address of exception handler 07b2 0001 | | .CONST 0x0001 ; Number of locals 07b3 BODY_07b0: 07b3 INIT_07b0: 07b3 e7fb | | Load 0x3,-0x5 07b4 680e |h | Jump_Zero 0x7c3 07b5 0092 0877 | w| Action Push_String_Extended,0x877 ; "Add " 07b7 4823 |H# | Short_Literal 0x23 07b8 ebff | | Load 0x5,-0x1 07b9 8607 | | Call 0x3,0x7 07ba 01cc | | Execute Vector,Catenate 07bb 0092 0813 | | Action Push_String_Extended,0x813 ; ": " 07bd 01cc | | Execute Vector,Catenate 07be e9fe | | Load 0x4,-0x2 07bf 01cc | | Execute Vector,Catenate 07c0 e005 | | Load 0x0,0x5 07c1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 07c2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07c3 0092 0814 | | Action Push_String_Extended,0x814 ; "<errors>" 07c5 ebff | | Load 0x5,-0x1 07c6 e9fe | | Load 0x4,-0x2 07c7 e006 | | Load 0x0,0x6 07c8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07c9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07ca 0000 0000 | | .BLANK 0000[0x6] 07d0 ; -------------------------------------------------------------------------------------- 07d0 ; SUBPROGRAM 07d0 ; -------------------------------------------------------------------------------------- 07d0 07d3 | | .CONST 0x07d3 ; Address of begin 07d1 0004 | | .CONST 0x0004 ; Address of exception handler 07d2 0001 | | .CONST 0x0001 ; Number of locals 07d3 BODY_07d0: 07d3 INIT_07d0: 07d3 e802 | | Load 0x4,0x2 07d4 e009 | | Load 0x0,0x9 07d5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 07d6 6809 |h | Jump_Zero 0x7e0 07d7 e802 | | Load 0x4,0x2 07d8 0092 0878 | x| Action Push_String_Extended,0x878 ; "," 07da ebff | | Load 0x5,-0x1 07db 01cc | | Execute Vector,Catenate 07dc e009 | | Load 0x0,0x9 07dd 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07de 00d1 | | Pop_Control Pop_Count_1 07df 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07e0 e802 | | Load 0x4,0x2 07e1 ebff | | Load 0x5,-0x1 07e2 e009 | | Load 0x0,0x9 07e3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07e4 00d1 | | Pop_Control Pop_Count_1 07e5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07e6 0000 0000 | | .XXX[0x2] 07e8 ; -------------------------------------------------------------------------------------- 07e8 ; SUBPROGRAM 07e8 ; -------------------------------------------------------------------------------------- 07e8 07eb | | .CONST 0x07eb ; Address of begin 07e9 0004 | | .CONST 0x0004 ; Address of exception handler 07ea 0001 | | .CONST 0x0001 ; Number of locals 07eb BODY_07e8: 07eb INIT_07e8: 07eb e804 | | Load 0x4,0x4 07ec 7005 |p | Jump_Nonzero 0x7f2 07ed 0092 0879 | y| Action Push_String_Extended,0x879 ; "Network_Public=>" 07ef 8805 | | Call 0x4,0x5 07f0 4801 |H | Short_Literal 0x1 07f1 a804 | | Store_Unchecked 0x4,0x4 07f2 e802 | | Load 0x4,0x2 07f3 ebff | | Load 0x5,-0x1 07f4 e009 | | Load 0x0,0x9 07f5 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07f6 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07f7 ; -------------------------------------------------------------------------------------- 07f7 ; STRING TABLE 07f7 ; -------------------------------------------------------------------------------------- 07f7 0108 | | .STRTAB 0x0108->0x087b ; "None " 07f8 010c | | .STRTAB 0x010c->0x087e ; "Open " 07f9 0110 | | .STRTAB 0x0110->0x0881 ; "Safe " 07fa 0114 | | .STRTAB 0x0114->0x0884 ; "Secure" 07fb 0118 | | .STRTAB 0x0118->0x0887 ; " level" 07fc 011c | | .STRTAB 0x011c->0x088a ; "!" 07fd 011b | | .STRTAB 0x011b->0x088a ; "!commands.@" 07fe 0124 | $ | .STRTAB 0x0124->0x0890 ; "!commands.abbreviations.@" 07ff 013b | ; | .STRTAB 0x013b->0x089c ; "!compiler_interface??" 0800 014e | N | .STRTAB 0x014e->0x08a7 ; "!implementation??" 0801 015d | ] | .STRTAB 0x015d->0x08af ; "!io??" 0802 0160 | ` | .STRTAB 0x0160->0x08b2 ; "!lrm??" 0803 0164 | d | .STRTAB 0x0164->0x08b5 ; "!machine@" 0804 016b | k | .STRTAB 0x016b->0x08b9 ; "!model??" 0805 0171 | q | .STRTAB 0x0171->0x08bd ; "!tools.@" 0806 0177 | w | .STRTAB 0x0177->0x08c1 ; "!tools.networking.@" 0807 0188 | | .STRTAB 0x0188->0x08cb ; "!tools.@'c(subsystem)" 0808 019b | | .STRTAB 0x019b->0x08d5 ; "!tools.@.@'c(load_view, spec_view, comb_view)" 0809 01c6 | | .STRTAB 0x01c6->0x08ec ; " with network Read" 080a 01d6 | | .STRTAB 0x01d6->0x08f5 ; " with network Read and Write" 080b 01f0 | | .STRTAB 0x01f0->0x0903 ; "------- " 080c 01f6 | | .STRTAB 0x01f6->0x0907 ; "------- defaults: " 080d 0206 | | .STRTAB 0x0206->0x0910 ; "+++ ++* ***" 080e 020f | | .STRTAB 0x020f->0x0915 ; "<ALL>" 080f 0212 | | .STRTAB 0x0212->0x0918 ; "Illegal value of level parameter. Must be 0..3." 0810 0240 | @ | .STRTAB 0x0240->0x0930 ; "'c(world)" 0811 0247 | G | .STRTAB 0x0247->0x0934 ; "'c(~library)" 0812 0251 | Q | .STRTAB 0x0251->0x093a ; "Def " 0813 0253 | S | .STRTAB 0x0253->0x093c ; ": " 0814 0253 | S | .STRTAB 0x0253->0x093d ; "<errors>" 0815 0259 | Y | .STRTAB 0x0259->0x0941 ; "Add_Def " 0816 025f | _ | .STRTAB 0x025f->0x0945 ; "Network_Public=>RCO" 0817 0270 | p | .STRTAB 0x0270->0x094f ; "Network_Public=>R" 0818 027f | | .STRTAB 0x027f->0x0957 ; "Network_Public=>RW" 0819 028f | | .STRTAB 0x028f->0x0960 ; "System=>" 081a 0295 | | .STRTAB 0x0295->0x0964 ; "Public=>" 081b 029b | | .STRTAB 0x029b->0x0968 ; "Operator=>" 081c 02a3 | | .STRTAB 0x02a3->0x096d ; "World ACL's" 081d 02ac | | .STRTAB 0x02ac->0x0973 ; "R" 081e 02ab | | .STRTAB 0x02ab->0x0973 ; "RCO" 081f 02ac | | .STRTAB 0x02ac->0x0975 ; "RC" 0820 02ac | | .STRTAB 0x02ac->0x0976 ; "CO" 0821 02ac | | .STRTAB 0x02ac->0x0977 ; "![Commands,Io,Lrm,Model??]" 0822 02c4 | | .STRTAB 0x02c4->0x0984 ; "!tools" 0823 02c8 | | .STRTAB 0x02c8->0x0987 ; "!compiler_interface" 0824 02d9 | | .STRTAB 0x02d9->0x0990 ; "!commands.abbreviations" 0825 02ee | | .STRTAB 0x02ee->0x099c ; "!Implementation" 0826 02fb | | .STRTAB 0x02fb->0x09a3 ; "!users" 0827 02ff | | .STRTAB 0x02ff->0x09a6 ; "!machine" 0828 0305 | | .STRTAB 0x0305->0x09aa ; "!machine.[cg_data,devices,editor_data]" 0829 0329 | ) | .STRTAB 0x0329->0x09bd ; "{RC}" 082a 032b | + | .STRTAB 0x032b->0x09bf ; "{R}" 082b 032c | , | .STRTAB 0x032c->0x09c1 ; "{CO}" 082c 032e | . | .STRTAB 0x032e->0x09c3 ; "!machine.accounting" 082d 033f | ? | .STRTAB 0x033f->0x09cc ; "{RCO}" 082e 0342 | B | .STRTAB 0x0342->0x09cf ; "!machine.[initialization,initialization.[rational,site]]" 082f 0378 | x | .STRTAB 0x0378->0x09eb ; "!machine.error_logs" 0830 0389 | | .STRTAB 0x0389->0x09f4 ; "!machine.[groups,users]" 0831 039e | | .STRTAB 0x039e->0x0a00 ; "!Machine.[Mail,Transfer].??" 0832 03b7 | | .STRTAB 0x03b7->0x0a0d ; "!machine.release??" 0833 03c7 | | .STRTAB 0x03c7->0x0a16 ; "O" 0834 03c6 | | .STRTAB 0x03c6->0x0a17 ; "!machine.search_lists" 0835 03d9 | | .STRTAB 0x03d9->0x0a21 ; "!machine.temporary" 0836 03e9 | | .STRTAB 0x03e9->0x0a2a ; "!machine.[sims,sims.master,sims.to_rational]" 0837 0413 | | .STRTAB 0x0413->0x0a40 ; "{O}" 0838 0414 | | .STRTAB 0x0414->0x0a42 ; "!machine.sims.[database,detail]??" 0839 0433 | 3 | .STRTAB 0x0433->0x0a52 ; "!machine.sims.to_rational??" 083a 044c | L | .STRTAB 0x044c->0x0a60 ; "Mailer=>RCO" 083b 0455 | U | .STRTAB 0x0455->0x0a65 ; "!Machine.[Mail,Transfer]??" 083c 046d | m | .STRTAB 0x046d->0x0a72 ; "Mailer=>R" 083d 0474 | t | .STRTAB 0x0474->0x0a77 ; "!Users.@.Mailbox.Main_Set.[$,$^,$^^]" 083e 0496 | | .STRTAB 0x0496->0x0a89 ; ": Network_Public=>OWNER" 083f 04ab | | .STRTAB 0x04ab->0x0a94 ; "*** ++*" 0840 04b0 | | .STRTAB 0x04b0->0x0a98 ; "++* ***" 0841 04b5 | | .STRTAB 0x04b5->0x0a9b ; "network_public" 0842 04c1 | | .STRTAB 0x04c1->0x0aa2 ; ": Public=>" 0843 04c9 | | .STRTAB 0x04c9->0x0aa7 ; ", System=>" 0844 04d1 | | .STRTAB 0x04d1->0x0aac ; ", Operator=>" 0845 04db | | .STRTAB 0x04db->0x0ab2 ; ", Network_Public=>" 0846 04eb | | .STRTAB 0x04eb->0x0abb ; "***" 0847 04ec | | .STRTAB 0x04ec->0x0abd ; "public" 0848 04f0 | | .STRTAB 0x04f0->0x0ac0 ; "system" 0849 04f4 | | .STRTAB 0x04f4->0x0ac3 ; "operator" 084a 04fa | | .STRTAB 0x04fa->0x0ac7 ; "World Default ACL's" 084b 050b | | .STRTAB 0x050b->0x0ad0 ; "RW" 084c 050b | | .STRTAB 0x050b->0x0ad1 ; "![commands,implementation,io,lrm,tools]" 084d 0530 | 0 | .STRTAB 0x0530->0x0ae5 ; "{RW}" 084e 0532 | 2 | .STRTAB 0x0532->0x0ae7 ; "!Machine.accounting" 084f 0543 | C | .STRTAB 0x0543->0x0af0 ; "!Machine.Error_Logs" 0850 0554 | T | .STRTAB 0x0554->0x0afa ; "!Machine.[initialization,initialization.[site,rational]]" 0851 058a | | .STRTAB 0x058a->0x0b16 ; "!Machine.[cg_data,devices,editor_data]" 0852 05ae | | .STRTAB 0x05ae->0x0b29 ; "!Machine.[groups,users]" 0853 05c3 | | .STRTAB 0x05c3->0x0b34 ; "{W}" 0854 05c4 | | .STRTAB 0x05c4->0x0b36 ; "!Machine.[Mail,Transfer].[??,~Distribute]'c(world)" 0855 05f4 | | .STRTAB 0x05f4->0x0b4f ; "!Machine.[Mail,Transfer].Distribute'c(world)" 0856 061e | | .STRTAB 0x061e->0x0b65 ; "!Machine.Release??'c(world)" 0857 0637 | 7 | .STRTAB 0x0637->0x0b72 ; "!Machine.Search_Lists" 0858 064a | J | .STRTAB 0x064a->0x0b7d ; "!machine.sims" 0859 0655 | U | .STRTAB 0x0655->0x0b83 ; "!machine.sims.master" 085a 0667 | g | .STRTAB 0x0667->0x0b8d ; "!Machine.sims.[database,detail]" 085b 0684 | | .STRTAB 0x0684->0x0b9d ; "!Machine.sims.to_rational.@'c(world)" 085c 06a6 | | .STRTAB 0x06a6->0x0baf ; "!Machine.Temporary" 085d 06b6 | | .STRTAB 0x06b6->0x0bb8 ; "!model.??'c(world)" 085e 06c6 | | .STRTAB 0x06c6->0x0bc1 ; "Mailer=>RW" 085f 06ce | | .STRTAB 0x06ce->0x0bc6 ; "!Machine.[Mail,Transfer]??'c(world)" 0860 06ef | | .STRTAB 0x06ef->0x0bd7 ; "Object ACL (Non-World)" 0861 0703 | | .STRTAB 0x0703->0x0be2 ; "![commands,io,lrm,tools].?" 0862 071b | | .STRTAB 0x071b->0x0bef ; "!commands.abbreviations.?" 0863 0732 | 2 | .STRTAB 0x0732->0x0bfc ; "![compiler_interface,implementation].?" 0864 0756 | V | .STRTAB 0x0756->0x0c0f ; "!compiler_interface.subsystem_interface" 0865 077b | { | .STRTAB 0x077b->0x0c22 ; "!machine.@'c(ada)" 0866 078a | | .STRTAB 0x078a->0x0c2b ; "!machine.[cg_data,editor_data].@" 0867 07a8 | | .STRTAB 0x07a8->0x0c3b ; "!machine.[initialization,initialization.[site,rational]].?" 0868 07e0 | | .STRTAB 0x07e0->0x0c58 ; "!Machine.Accounting.@" 0869 07f3 | | .STRTAB 0x07f3->0x0c62 ; "!Machine.Error_Logs.[@,~Mail_Distribute_Server@]" 086a 0821 | ! | .STRTAB 0x0821->0x0c7a ; "!Machine.Error_Logs.Mail_Distribute_Server@" 086b 084a | J | .STRTAB 0x084a->0x0c90 ; "!Machine.Machine_Name" 086c 085d | ] | .STRTAB 0x085d->0x0c9a ; "!Machine.[Mail,Transfer].[??,~Distribute.??]" 086d 0887 | | .STRTAB 0x0887->0x0cb0 ; "!Machine.[Mail,Transfer].Distribute.??" 086e 08ab | | .STRTAB 0x08ab->0x0cc3 ; "!Machine.release.??'c(file,ada)" 086f 08c8 | | .STRTAB 0x08c8->0x0cd3 ; "!Machine.Search_lists.@" 0870 08dd | | .STRTAB 0x08dd->0x0cde ; "!Machine.sims.@'c(ada,file)" 0871 08f6 | | .STRTAB 0x08f6->0x0cec ; "!Machine.sims.[master,to_rational].@'c(ada,file)" 0872 0924 | $ | .STRTAB 0x0924->0x0d04 ; "!Machine.sims.[database,detail]@'c(ada,file)" 0873 094e | N | .STRTAB 0x094e->0x0d1a ; "!Machine.sims.to_rational.@'c(ada,file)" 0874 0973 | s | .STRTAB 0x0973->0x0d2d ; "!Machine.Switch_Definitions" 0875 098c | | .STRTAB 0x098c->0x0d3b ; "!machine.temporary.@" 0876 099e | | .STRTAB 0x099e->0x0d45 ; "!Users.@.Mailbox.Main_@" 0877 09b3 | | .STRTAB 0x09b3->0x0d50 ; "Add " 0878 09b5 | | .STRTAB 0x09b5->0x0d52 ; "," 0879 09b4 | | .STRTAB 0x09b4->0x0d53 ; "Network_Public=>" 087a 09c2 | | .STREND 0x09c2->0x0d5b 087b 4e6f 6e65 |None| .STRTAB_STRINGS 0d5b 0000 0000 | | .BLANK 0000[0x5] 0d60 ; -------------------------------------------------------------------------------------- 0d60 ; Debug Table 0d60 ; -------------------------------------------------------------------------------------- 0d60 0004 0010 | | .DEBUG4 0x0004,0x0010,0xd8e7,0x0000,0x0001,0x0000 0d66 01cf e40f | | .XXX[0x74] 0d68 e40e 1813 | | 0d6a a602 e602 | | 0d6c e414 01d7 | | 0d6e 682b 4801 |h+H | 0d70 e420 e41f | | 0d72 01cf e7ff | | 0d74 e009 1863 | c| 0d76 00cf 781d | x | 0d78 4801 e41f |H | 0d7a 01d7 0f2f | /| 0d7c 701b 4801 |p H | 0d7e e420 e41f | | 0d80 01cf 0092 | | 0d82 0e5b 01df | [ | 0d84 6803 00ce |h | 0d86 00ce 7827 | x'| 0d88 4801 e41f |H | 0d8a 01d7 0e25 | %| 0d8c 6807 4801 |h H | 0d8e e420 e41f | | 0d90 01cf e7ff | | 0d92 e009 1863 | c| 0d94 00c9 e418 | | 0d96 842c 77e0 | ,w | 0d98 00ce 7802 | x | 0d9a e418 842b | +| 0d9c 00c9 4801 | H | 0d9e e41f 01d7 | | 0da0 0f2f 77bc | /w | 0da2 00ce 4801 | H | 0da4 e420 e41f | | 0da6 01cf 0092 | | 0da8 0e5b 01df | [ | 0daa 7004 00c9 |p | 0dac e418 842c | ,| 0dae 77ad 00ce |w | 0db0 0092 0e60 | `| 0db2 e7ff e009 | | 0db4 1863 4502 | cE | 0db6 0000 0000 | | 0db8 09c3 0004 | | 0dba 0002 e7ff | | 0dbc 01da 00e9 | | 0dbe 035b 0337 | [ 7| 0dc0 e7ff e602 | | 0dc2 01d4 00cf | | 0dc4 e602 01d9 | | 0dc6 0263 700d | cp | 0dc8 00d8 e602 | | 0dca 01d7 4800 | H | 0dcc 481f 0262 |H b| 0dce 6804 4820 |h H | 0dd0 e605 e602 | | 0dd2 01d6 00c8 | | 0dd4 3ff3 00ce |? | 0dd6 00d8 00e9 | | 0dd8 01c6 4401 | D | 0dda 0000 0000 | | .BLANK 0000[0x6] 0de0 09e3 0004 | | .XXX[0x20] 0de2 0001 e7ff | | 0de4 4800 8428 |H (| 0de6 c7ff 00cf | | 0de8 783e 4803 |x>H | 0dea e420 e41f | | 0dec 01cf e425 | %| 0dee 0227 01df | ' | 0df0 680b e7fe |h | 0df2 e422 0272 | " r| 0df4 00d8 00e2 | | 0df6 0260 7001 | `p | 0df8 0801 e7ff | | 0dfa 8427 782a | 'x*| 0dfc e420 0c08 | | 0dfe 6815 4801 |h H |