|
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_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 0d70 | p | .CONST 0x0d70 ; 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 0807 | | Action Push_String_Extended,0x807 ; "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 0808 | | Action Push_String_Extended,0x808 ; "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 0809 | | Action Push_String_Extended,0x809 ; "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 080a | | Action Push_String_Extended,0x80a ; "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 6850 |hP | Jump_Zero 0xa7 0057 e5f9 | | Load 0x2,-0x7 0058 e5ff | | Load 0x2,-0x1 0059 e404 | | Load 0x2,0x4 005a 01d5 | | Execute Vector,Field_Reference 005b e001 | | Load 0x0,0x1 005c 180d | | Execute Package,Field_Execute,Field_Number 0xd 005d 4800 |H | Short_Literal 0x0 005e e404 | | Load 0x2,0x4 005f 01d5 | | Execute Vector,Field_Reference 0060 0092 080b | | Action Push_String_Extended,0x80b ; " level" 0062 01cc | | Execute Vector,Catenate 0063 4800 |H | Short_Literal 0x0 0064 4800 |H | Short_Literal 0x0 0065 8405 | | Call 0x2,0x5 0066 01cc | | Execute Vector,Catenate 0067 4801 |H | Short_Literal 0x1 0068 4800 |H | Short_Literal 0x0 0069 4800 |H | Short_Literal 0x0 006a e5fe | | Load 0x2,-0x2 006b 4800 |H | Short_Literal 0x0 006c 8408 | | Call 0x2,0x8 006d 00cf | | Action Mark_Auxiliary 006e 4803 |H | Short_Literal 0x3 006f 4801 |H | Short_Literal 0x1 0070 0007 | | Action Break_Optional 0071 00d8 | | Load_Top At_Offset_0 0072 e404 | | Load 0x2,0x4 0073 01d5 | | Execute Vector,Field_Reference 0074 0092 080b | | Action Push_String_Extended,0x80b ; " level" 0076 01cc | | Execute Vector,Catenate 0077 4800 |H | Short_Literal 0x0 0078 4800 |H | Short_Literal 0x0 0079 8405 | | Call 0x2,0x5 007a 01cc | | Execute Vector,Catenate 007b 4801 |H | Short_Literal 0x1 007c 4800 |H | Short_Literal 0x0 007d 4800 |H | Short_Literal 0x0 007e e5fe | | Load 0x2,-0x2 007f e40b | | Load 0x2,0xb 0080 8408 | | Call 0x2,0x8 0081 00d8 | | Load_Top At_Offset_0 0082 e404 | | Load 0x2,0x4 0083 01d5 | | Execute Vector,Field_Reference 0084 0092 080b | | Action Push_String_Extended,0x80b ; " level" 0086 01cc | | Execute Vector,Catenate 0087 4800 |H | Short_Literal 0x0 0088 4801 |H | Short_Literal 0x1 0089 8405 | | Call 0x2,0x5 008a 01cc | | Execute Vector,Catenate 008b 4801 |H | Short_Literal 0x1 008c 4800 |H | Short_Literal 0x0 008d 4801 |H | Short_Literal 0x1 008e e5fe | | Load 0x2,-0x2 008f e40b | | Load 0x2,0xb 0090 8408 | | Call 0x2,0x8 0091 00d8 | | Load_Top At_Offset_0 0092 e404 | | Load 0x2,0x4 0093 01d5 | | Execute Vector,Field_Reference 0094 0092 080b | | Action Push_String_Extended,0x80b ; " level" 0096 01cc | | Execute Vector,Catenate 0097 4801 |H | Short_Literal 0x1 0098 4801 |H | Short_Literal 0x1 0099 8405 | | Call 0x2,0x5 009a 01cc | | Execute Vector,Catenate 009b 4801 |H | Short_Literal 0x1 009c 4801 |H | Short_Literal 0x1 009d 4801 |H | Short_Literal 0x1 009e e5fe | | Load 0x2,-0x2 009f e40b | | Load 0x2,0xb 00a0 8408 | | Call 0x2,0x8 00a1 00c8 | | Action Pop_Auxiliary_Range 00a2 3fce |? | Loop_Increasing 0x71 00a3 00ce | | Action Pop_Auxiliary 00a4 e001 | | Load 0x0,0x1 00a5 180e | | Execute Package,Field_Execute,Field_Number 0xe 00a6 4508 |E | Exit_Suprogram New_Top_Offset 0x8 00a7 00ea | | Load_Encached Null_String_Cache 00a8 e5fb | | Load 0x2,-0x5 00a9 e5fc | | Load 0x2,-0x4 00aa e5fd | | Load 0x2,-0x3 00ab e5fe | | Load 0x2,-0x2 00ac e5ff | | Load 0x2,-0x1 00ad 8408 | | Call 0x2,0x8 00ae e5fb | | Load 0x2,-0x5 00af 7027 |p' | Jump_Nonzero 0xd7 00b0 0092 080c | | Action Push_String_Extended,0x80c ; "!" 00b2 8406 | | Call 0x2,0x6 00b3 0092 080d | | Action Push_String_Extended,0x80d ; "!commands.@" 00b5 8406 | | Call 0x2,0x6 00b6 0092 080e | | Action Push_String_Extended,0x80e ; "!commands.abbreviations.@" 00b8 8406 | | Call 0x2,0x6 00b9 0092 080f | | Action Push_String_Extended,0x80f ; "!compiler_interface??" 00bb 8406 | | Call 0x2,0x6 00bc 0092 0810 | | Action Push_String_Extended,0x810 ; "!implementation??" 00be 8406 | | Call 0x2,0x6 00bf 0092 0811 | | Action Push_String_Extended,0x811 ; "!io??" 00c1 8406 | | Call 0x2,0x6 00c2 0092 0812 | | Action Push_String_Extended,0x812 ; "!lrm??" 00c4 8406 | | Call 0x2,0x6 00c5 0092 0813 | | Action Push_String_Extended,0x813 ; "!machine@" 00c7 8406 | | Call 0x2,0x6 00c8 0092 0814 | | Action Push_String_Extended,0x814 ; "!model??" 00ca 8406 | | Call 0x2,0x6 00cb 0092 0815 | | Action Push_String_Extended,0x815 ; "!tools.@" 00cd 8406 | | Call 0x2,0x6 00ce 0092 0816 | | Action Push_String_Extended,0x816 ; "!tools.networking.@" 00d0 8406 | | Call 0x2,0x6 00d1 0092 0817 | | Action Push_String_Extended,0x817 ; "!tools.@'c(subsystem)" 00d3 8407 | | Call 0x2,0x7 00d4 0092 0818 | | Action Push_String_Extended,0x818 ; "!tools.@.@'c(load_view, spec_view, comb_view)" 00d6 8407 | | Call 0x2,0x7 00d7 4508 |E | Exit_Suprogram New_Top_Offset 0x8 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 e002 | | Load 0x0,0x2 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 0819 | | Action Push_String_Extended,0x819 ; " 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 081a | | Action Push_String_Extended,0x81a ; " 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 081b | | Action Push_String_Extended,0x81b ; "------- " 0105 e7ff | | Load 0x3,-0x1 0106 01cc | | Execute Vector,Catenate 0107 e003 | | Load 0x0,0x3 0108 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0109 e7ff | | Load 0x3,-0x1 010a e004 | | Load 0x0,0x4 010b 180f | | Execute Package,Field_Execute,Field_Number 0xf 010c 0092 081c | | Action Push_String_Extended,0x81c ; "------- defaults: " 010e e7ff | | Load 0x3,-0x1 010f 01cc | | Execute Vector,Catenate 0110 e003 | | Load 0x0,0x3 0111 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0112 e7ff | | Load 0x3,-0x1 0113 e004 | | Load 0x0,0x4 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 081d | | Action Push_String_Extended,0x81d ; "+++ ++* ***" 011d 4800 |H | Short_Literal 0x0 011e e7ff | | Load 0x3,-0x1 011f 0092 081e | | Action Push_String_Extended,0x81e ; "<ALL>" 0121 e002 | | Load 0x0,0x2 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 01bb | | Declare_Subprogram INIT_01b8,For_Call 0143 029f 01db | | Declare_Subprogram INIT_01d8,For_Call 0145 029f 01f3 | | Declare_Subprogram INIT_01f0,For_Call 0147 029f 0213 | | Declare_Subprogram INIT_0210,For_Call 0149 029f 0223 | #| Declare_Subprogram INIT_0220,For_Call 014b 029f 02d3 | | Declare_Subprogram INIT_02d0,For_Call 014d 029f 044b | K| Declare_Subprogram INIT_0448,For_Call 014f 029f 04db | | Declare_Subprogram INIT_04d8,For_Call 0151 029f 04f3 | | Declare_Subprogram INIT_04f0,For_Call 0153 029f 064b | K| Declare_Subprogram INIT_0648,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 081f | | Action Push_String_Extended,0x81f ; "Illegal value of level parameter. Must be 0..3." 015f e003 | | Load 0x0,0x3 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 07ab | | Declare_Subprogram INIT_07a8,For_Call 019d BODY_0198: 019d e606 | | Load 0x3,0x6 019e 6806 |h | Jump_Zero 0x1a5 019f e9ff | | Load 0x4,-0x1 01a0 0092 0820 | | Action Push_String_Extended,0x820 ; "'c(world)" 01a2 01cc | | Execute Vector,Catenate 01a3 8802 | | Call 0x4,0x2 01a4 7805 |x | Jump 0x1aa 01a5 e9ff | | Load 0x4,-0x1 01a6 0092 0821 | !| Action Push_String_Extended,0x821 ; "'c(~library)" 01a8 01cc | | Execute Vector,Catenate 01a9 8802 | | Call 0x4,0x2 01aa e5fa | | Load 0x2,-0x6 01ab 6804 |h | Jump_Zero 0x1b0 01ac e9fe | | Load 0x4,-0x2 01ad e9ff | | Load 0x4,-0x1 01ae e001 | | Load 0x0,0x1 01af 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01b0 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01b1 0000 0000 | | .BLANK 0000[0x7] 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 e7fb | | Load 0x3,-0x5 01bc 680e |h | Jump_Zero 0x1cb 01bd 0092 0822 | "| Action Push_String_Extended,0x822 ; "Def " 01bf 4823 |H# | Short_Literal 0x23 01c0 e9ff | | Load 0x4,-0x1 01c1 8607 | | Call 0x3,0x7 01c2 01cc | | Execute Vector,Catenate 01c3 0092 0823 | #| Action Push_String_Extended,0x823 ; ": " 01c5 01cc | | Execute Vector,Catenate 01c6 e9fe | | Load 0x4,-0x2 01c7 01cc | | Execute Vector,Catenate 01c8 e003 | | Load 0x0,0x3 01c9 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 01ca 7806 |x | Jump 0x1d1 01cb 0092 0824 | $| Action Push_String_Extended,0x824 ; "<errors>" 01cd e9ff | | Load 0x4,-0x1 01ce e9fe | | Load 0x4,-0x2 01cf e004 | | Load 0x0,0x4 01d0 1812 | | Execute Package,Field_Execute,Field_Number 0x12 01d1 e5fa | | Load 0x2,-0x6 01d2 6804 |h | Jump_Zero 0x1d7 01d3 e9fe | | Load 0x4,-0x2 01d4 e9ff | | Load 0x4,-0x1 01d5 e001 | | Load 0x0,0x1 01d6 1810 | | Execute Package,Field_Execute,Field_Number 0x10 01d7 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01d8 ; -------------------------------------------------------------------------------------- 01d8 ; SUBPROGRAM 01d8 ; -------------------------------------------------------------------------------------- 01d8 01dd | | .CONST 0x01dd ; Address of begin 01d9 0004 | | .CONST 0x0004 ; Address of exception handler 01da 0002 | | .CONST 0x0002 ; Number of locals 01db INIT_01d8: 01db 029f 07c3 | | Declare_Subprogram INIT_07c0,For_Call 01dd BODY_01d8: 01dd e606 | | Load 0x3,0x6 01de 6806 |h | Jump_Zero 0x1e5 01df e9ff | | Load 0x4,-0x1 01e0 0092 0820 | | Action Push_String_Extended,0x820 ; "'c(world)" 01e2 01cc | | Execute Vector,Catenate 01e3 8802 | | Call 0x4,0x2 01e4 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01e5 e9ff | | Load 0x4,-0x1 01e6 0092 0821 | !| Action Push_String_Extended,0x821 ; "'c(~library)" 01e8 01cc | | Execute Vector,Catenate 01e9 8802 | | Call 0x4,0x2 01ea 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01eb 0000 0000 | | .BLANK 0000[0x5] 01f0 ; -------------------------------------------------------------------------------------- 01f0 ; SUBPROGRAM 01f0 ; -------------------------------------------------------------------------------------- 01f0 01f3 | | .CONST 0x01f3 ; Address of begin 01f1 0004 | | .CONST 0x0004 ; Address of exception handler 01f2 0001 | | .CONST 0x0001 ; Number of locals 01f3 BODY_01f0: 01f3 INIT_01f0: 01f3 e7fb | | Load 0x3,-0x5 01f4 680e |h | Jump_Zero 0x203 01f5 0092 0825 | %| Action Push_String_Extended,0x825 ; "Add_Def " 01f7 481f |H | Short_Literal 0x1f 01f8 e9ff | | Load 0x4,-0x1 01f9 8607 | | Call 0x3,0x7 01fa 01cc | | Execute Vector,Catenate 01fb 0092 0823 | #| Action Push_String_Extended,0x823 ; ": " 01fd 01cc | | Execute Vector,Catenate 01fe e9fe | | Load 0x4,-0x2 01ff 01cc | | Execute Vector,Catenate 0200 e003 | | Load 0x0,0x3 0201 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 0202 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0203 0092 0824 | $| Action Push_String_Extended,0x824 ; "<errors>" 0205 e9ff | | Load 0x4,-0x1 0206 e9fe | | Load 0x4,-0x2 0207 e004 | | Load 0x0,0x4 0208 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0209 4503 |E | Exit_Suprogram New_Top_Offset 0x3 020a 0000 0000 | | .BLANK 0000[0x6] 0210 ; -------------------------------------------------------------------------------------- 0210 ; SUBPROGRAM 0210 ; -------------------------------------------------------------------------------------- 0210 0213 | | .CONST 0x0213 ; Address of begin 0211 0004 | | .CONST 0x0004 ; Address of exception handler 0212 0001 | | .CONST 0x0001 ; Number of locals 0213 BODY_0210: 0213 INIT_0210: 0213 487d |H} | Short_Literal 0x7d 0214 487b |H{ | Short_Literal 0x7b 0215 e9ff | | Load 0x4,-0x1 0216 e005 | | Load 0x0,0x5 0217 181a | | Execute Package,Field_Execute,Field_Number 0x1a 0218 e005 | | Load 0x0,0x5 0219 181b | | Execute Package,Field_Execute,Field_Number 0x1b 021a 4401 |D | Exit_Subprogram With_Value,New_Top_Offset 0x1 021b 0000 0000 | | .BLANK 0000[0x5] 0220 ; -------------------------------------------------------------------------------------- 0220 ; SUBPROGRAM 0220 ; -------------------------------------------------------------------------------------- 0220 0231 | 1 | .CONST 0x0231 ; Address of begin 0221 0004 | | .CONST 0x0004 ; Address of exception handler 0222 0006 | | .CONST 0x0006 ; Number of locals 0223 INIT_0220: 0223 48c8 |H | Short_Literal 0xc8 0224 e006 | | Load 0x0,0x6 0225 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0226 1c08 | | Execute_Immediate Run_Utility,0x8 0227 00d8 | | Load_Top At_Offset_0 0228 1c00 | | Execute_Immediate Run_Utility,0x0 0229 00e1 | | Load_Encached Boolean_Cache 022a 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 022b 00e1 | | Load_Encached Boolean_Cache 022c 0600 | | Execute_Immediate Set_Value_Unchecked,0x0 022d 029f 07e3 | | Declare_Subprogram INIT_07e0,For_Call 022f 029f 07fb | | Declare_Subprogram INIT_07f8,For_Call 0231 BODY_0220: 0231 e802 | | Load 0x4,0x2 0232 4820 |H | Short_Literal 0x20 0233 4800 |H | Short_Literal 0x0 0234 e006 | | Load 0x0,0x6 0235 1824 | $ | Execute Package,Field_Execute,Field_Number 0x24 0236 00d1 | | Pop_Control Pop_Count_1 0237 e602 | | Load 0x3,0x2 0238 6825 |h% | Jump_Zero 0x25e 0239 e606 | | Load 0x3,0x6 023a 6807 |h | Jump_Zero 0x242 023b e802 | | Load 0x4,0x2 023c 0092 0826 | &| Action Push_String_Extended,0x826 ; "Network_Public=>RCO" 023e e006 | | Load 0x0,0x6 023f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0240 00d1 | | Pop_Control Pop_Count_1 0241 780f |x | Jump 0x251 0242 e9f9 | | Load 0x4,-0x7 0243 6807 |h | Jump_Zero 0x24b 0244 e802 | | Load 0x4,0x2 0245 0092 0827 | '| Action Push_String_Extended,0x827 ; "Network_Public=>R" 0247 e006 | | Load 0x0,0x6 0248 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0249 00d1 | | Pop_Control Pop_Count_1 024a 7806 |x | Jump 0x251 024b e802 | | Load 0x4,0x2 024c 0092 0828 | (| Action Push_String_Extended,0x828 ; "Network_Public=>RW" 024e e006 | | Load 0x0,0x6 024f 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0250 00d1 | | Pop_Control Pop_Count_1 0251 e9fd | | Load 0x4,-0x3 0252 01db | | Execute Vector,Length 0253 6806 |h | Jump_Zero 0x25a 0254 0092 0829 | )| Action Push_String_Extended,0x829 ; "System=>" 0256 e9fd | | Load 0x4,-0x3 0257 860c | | Call 0x3,0xc 0258 01cc | | Execute Vector,Catenate 0259 8805 | | Call 0x4,0x5 025a e802 | | Load 0x4,0x2 025b e006 | | Load 0x0,0x6 025c 1813 | | Execute Package,Field_Execute,Field_Number 0x13 025d 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8 025e e9ff | | Load 0x4,-0x1 025f 01db | | Execute Vector,Length 0260 6810 |h | Jump_Zero 0x271 0261 e9ff | | Load 0x4,-0x1 0262 01dd | | Execute Vector,First 0263 e9ff | | Load 0x4,-0x1 0264 01d7 | | Execute Vector,Field_Read 0265 0e7b | { | Execute_Immediate Not_Equal,0x7b 0266 7002 |p | Jump_Nonzero 0x269 0267 e605 | | Load 0x3,0x5 0268 7008 |p | Jump_Nonzero 0x271 0269 0092 082a | *| Action Push_String_Extended,0x82a ; "Public=>" 026b e9ff | | Load 0x4,-0x1 026c 860c | | Call 0x3,0xc 026d 01cc | | Execute Vector,Catenate 026e 8805 | | Call 0x4,0x5 026f 4801 |H | Short_Literal 0x1 0270 a803 | | Store_Unchecked 0x4,0x3 0271 e603 | | Load 0x3,0x3 0272 6818 |h | Jump_Zero 0x28b 0273 e9fe | | Load 0x4,-0x2 0274 01db | | Execute Vector,Length 0275 6815 |h | Jump_Zero 0x28b 0276 e9fe | | Load 0x4,-0x2 0277 01dd | | Execute Vector,First 0278 e9fe | | Load 0x4,-0x2 0279 01d7 | | Execute Vector,Field_Read 027a 0e7b | { | Execute_Immediate Not_Equal,0x7b 027b 7002 |p | Jump_Nonzero 0x27e 027c e605 | | Load 0x3,0x5 027d 700d |p | Jump_Nonzero 0x28b 027e e803 | | Load 0x4,0x3 027f 7005 |p | Jump_Nonzero 0x285 0280 0092 082a | *| Action Push_String_Extended,0x82a ; "Public=>" 0282 8805 | | Call 0x4,0x5 0283 4801 |H | Short_Literal 0x1 0284 a803 | | Store_Unchecked 0x4,0x3 0285 e802 | | Load 0x4,0x2 0286 e9fe | | Load 0x4,-0x2 0287 860c | | Call 0x3,0xc 0288 e006 | | Load 0x0,0x6 0289 1818 | | Execute Package,Field_Execute,Field_Number 0x18 028a 00d1 | | Pop_Control Pop_Count_1 028b e9fd | | Load 0x4,-0x3 028c 01db | | Execute Vector,Length 028d 680e |h | Jump_Zero 0x29c 028e e9fd | | Load 0x4,-0x3 028f 01dd | | Execute Vector,First 0290 e9fd | | Load 0x4,-0x3 0291 01d7 | | Execute Vector,Field_Read 0292 0e7b | { | Execute_Immediate Not_Equal,0x7b 0293 7002 |p | Jump_Nonzero 0x296 0294 e605 | | Load 0x3,0x5 0295 7006 |p | Jump_Nonzero 0x29c 0296 0092 0829 | )| Action Push_String_Extended,0x829 ; "System=>" 0298 e9fd | | Load 0x4,-0x3 0299 860c | | Call 0x3,0xc 029a 01cc | | Execute Vector,Catenate 029b 8805 | | Call 0x4,0x5 029c e9fa | | Load 0x4,-0x6 029d 01db | | Execute Vector,Length 029e 6806 |h | Jump_Zero 0x2a5 029f 0092 082b | +| Action Push_String_Extended,0x82b ; "Operator=>" 02a1 e9fa | | Load 0x4,-0x6 02a2 860c | | Call 0x3,0xc 02a3 01cc | | Execute Vector,Catenate 02a4 8805 | | Call 0x4,0x5 02a5 e9f8 | | Load 0x4,-0x8 02a6 01db | | Execute Vector,Length 02a7 6802 |h | Jump_Zero 0x2aa 02a8 e9f8 | | Load 0x4,-0x8 02a9 8806 | | Call 0x4,0x6 02aa e7fd | | Load 0x3,-0x3 02ab 680e |h | Jump_Zero 0x2ba 02ac e9fc | | Load 0x4,-0x4 02ad 01db | | Execute Vector,Length 02ae 680b |h | Jump_Zero 0x2ba 02af e9fc | | Load 0x4,-0x4 02b0 01dd | | Execute Vector,First 02b1 e9fc | | Load 0x4,-0x4 02b2 01d7 | | Execute Vector,Field_Read 02b3 0e7b | { | Execute_Immediate Not_Equal,0x7b 02b4 7002 |p | Jump_Nonzero 0x2b7 02b5 e605 | | Load 0x3,0x5 02b6 7003 |p | Jump_Nonzero 0x2ba 02b7 e9fc | | Load 0x4,-0x4 02b8 860c | | Call 0x3,0xc 02b9 8806 | | Call 0x4,0x6 02ba e7fc | | Load 0x3,-0x4 02bb 680e |h | Jump_Zero 0x2ca 02bc e9fb | | Load 0x4,-0x5 02bd 01db | | Execute Vector,Length 02be 680b |h | Jump_Zero 0x2ca 02bf e9fb | | Load 0x4,-0x5 02c0 01dd | | Execute Vector,First 02c1 e9fb | | Load 0x4,-0x5 02c2 01d7 | | Execute Vector,Field_Read 02c3 0e7b | { | Execute_Immediate Not_Equal,0x7b 02c4 7002 |p | Jump_Nonzero 0x2c7 02c5 e605 | | Load 0x3,0x5 02c6 7003 |p | Jump_Nonzero 0x2ca 02c7 e9fb | | Load 0x4,-0x5 02c8 860c | | Call 0x3,0xc 02c9 8806 | | Call 0x4,0x6 02ca e802 | | Load 0x4,0x2 02cb e006 | | Load 0x0,0x6 02cc 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02cd e001 | | Load 0x0,0x1 02ce 1813 | | Execute Package,Field_Execute,Field_Number 0x13 02cf 4408 |D | Exit_Subprogram With_Value,New_Top_Offset 0x8 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; SUBPROGRAM 02d0 ; -------------------------------------------------------------------------------------- 02d0 02d3 | | .CONST 0x02d3 ; Address of begin 02d1 0004 | | .CONST 0x0004 ; Address of exception handler 02d2 0001 | | .CONST 0x0001 ; Number of locals 02d3 BODY_02d0: 02d3 INIT_02d0: 02d3 4801 |H | Short_Literal 0x1 02d4 a606 | | Store_Unchecked 0x3,0x6 02d5 e5fa | | Load 0x2,-0x6 02d6 6805 |h | Jump_Zero 0x2dc 02d7 e7fa | | Load 0x3,-0x6 02d8 0092 082c | ,| Action Push_String_Extended,0x82c ; "World ACL's" 02da e001 | | Load 0x0,0x1 02db 1812 | | Execute Package,Field_Execute,Field_Number 0x12 02dc 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 02de 4800 |H | Short_Literal 0x0 02df 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 02e1 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 02e3 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 02e5 00ea | | Load_Encached Null_String_Cache 02e6 0092 0830 | 0| Action Push_String_Extended,0x830 ; "CO" 02e8 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 02ea 860d | | Call 0x3,0xd 02eb 0092 080c | | Action Push_String_Extended,0x80c ; "!" 02ed 8608 | | Call 0x3,0x8 02ee 00ea | | Load_Encached Null_String_Cache 02ef 4800 |H | Short_Literal 0x0 02f0 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 02f2 00ea | | Load_Encached Null_String_Cache 02f3 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 02f5 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 02f7 00ea | | Load_Encached Null_String_Cache 02f8 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 02fa 860d | | Call 0x3,0xd 02fb 0092 0831 | 1| Action Push_String_Extended,0x831 ; "![Commands,Io,Lrm,Model??]" 02fd 8608 | | Call 0x3,0x8 02fe 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0300 4800 |H | Short_Literal 0x0 0301 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0303 00ea | | Load_Encached Null_String_Cache 0304 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0306 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 0308 00ea | | Load_Encached Null_String_Cache 0309 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 030b 860d | | Call 0x3,0xd 030c 0092 0832 | 2| Action Push_String_Extended,0x832 ; "!tools" 030e 8608 | | Call 0x3,0x8 030f 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0311 4800 |H | Short_Literal 0x0 0312 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0314 00ea | | Load_Encached Null_String_Cache 0315 00ea | | Load_Encached Null_String_Cache 0316 00ea | | Load_Encached Null_String_Cache 0317 00ea | | Load_Encached Null_String_Cache 0318 00ea | | Load_Encached Null_String_Cache 0319 860d | | Call 0x3,0xd 031a 0092 0833 | 3| Action Push_String_Extended,0x833 ; "!compiler_interface" 031c 8608 | | Call 0x3,0x8 031d 00ea | | Load_Encached Null_String_Cache 031e 4800 |H | Short_Literal 0x0 031f 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0321 00ea | | Load_Encached Null_String_Cache 0322 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0324 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 0326 00ea | | Load_Encached Null_String_Cache 0327 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0329 860d | | Call 0x3,0xd 032a 0092 0834 | 4| Action Push_String_Extended,0x834 ; "!commands.abbreviations" 032c 8608 | | Call 0x3,0x8 032d e7fe | | Load 0x3,-0x2 032e 6810 |h | Jump_Zero 0x33f 032f 00ea | | Load_Encached Null_String_Cache 0330 4801 |H | Short_Literal 0x1 0331 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0333 00ea | | Load_Encached Null_String_Cache 0334 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0336 00ea | | Load_Encached Null_String_Cache 0337 00ea | | Load_Encached Null_String_Cache 0338 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 033a 860d | | Call 0x3,0xd 033b 0092 0835 | 5| Action Push_String_Extended,0x835 ; "!Implementation" 033d 8608 | | Call 0x3,0x8 033e 780d |x | Jump 0x34c 033f 00ea | | Load_Encached Null_String_Cache 0340 4801 |H | Short_Literal 0x1 0341 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0343 00ea | | Load_Encached Null_String_Cache 0344 00ea | | Load_Encached Null_String_Cache 0345 00ea | | Load_Encached Null_String_Cache 0346 00ea | | Load_Encached Null_String_Cache 0347 00ea | | Load_Encached Null_String_Cache 0348 860d | | Call 0x3,0xd 0349 0092 0835 | 5| Action Push_String_Extended,0x835 ; "!Implementation" 034b 8608 | | Call 0x3,0x8 034c 00ea | | Load_Encached Null_String_Cache 034d 4800 |H | Short_Literal 0x0 034e 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0350 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 0352 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0354 00ea | | Load_Encached Null_String_Cache 0355 0092 0830 | 0| Action Push_String_Extended,0x830 ; "CO" 0357 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0359 860d | | Call 0x3,0xd 035a 0092 0836 | 6| Action Push_String_Extended,0x836 ; "!users" 035c 8608 | | Call 0x3,0x8 035d 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 035f 4800 |H | Short_Literal 0x0 0360 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0362 00ea | | Load_Encached Null_String_Cache 0363 00ea | | Load_Encached Null_String_Cache 0364 00ea | | Load_Encached Null_String_Cache 0365 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0367 00ea | | Load_Encached Null_String_Cache 0368 860d | | Call 0x3,0xd 0369 0092 0837 | 7| Action Push_String_Extended,0x837 ; "!machine" 036b 8608 | | Call 0x3,0x8 036c 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 036e 4800 |H | Short_Literal 0x0 036f 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0371 00ea | | Load_Encached Null_String_Cache 0372 00ea | | Load_Encached Null_String_Cache 0373 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 0375 00ea | | Load_Encached Null_String_Cache 0376 00ea | | Load_Encached Null_String_Cache 0377 860d | | Call 0x3,0xd 0378 0092 0838 | 8| Action Push_String_Extended,0x838 ; "!machine.[cg_data,devices,editor_data]" 037a 8608 | | Call 0x3,0x8 037b 00ea | | Load_Encached Null_String_Cache 037c 4800 |H | Short_Literal 0x0 037d 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 037f 0092 0839 | 9| Action Push_String_Extended,0x839 ; "{RC}" 0381 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0383 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 0385 0092 083b | ;| Action Push_String_Extended,0x83b ; "{CO}" 0387 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0389 860d | | Call 0x3,0xd 038a 0092 083c | <| Action Push_String_Extended,0x83c ; "!machine.accounting" 038c 8608 | | Call 0x3,0x8 038d 00ea | | Load_Encached Null_String_Cache 038e 4800 |H | Short_Literal 0x0 038f 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0391 00ea | | Load_Encached Null_String_Cache 0392 00ea | | Load_Encached Null_String_Cache 0393 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 0395 0092 083d | =| Action Push_String_Extended,0x83d ; "{RCO}" 0397 00ea | | Load_Encached Null_String_Cache 0398 860d | | Call 0x3,0xd 0399 0092 083e | >| Action Push_String_Extended,0x83e ; "!machine.[initialization,initialization.[rational,site]]" 039b 8608 | | Call 0x3,0x8 039c 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 039e 4800 |H | Short_Literal 0x0 039f 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 03a1 00ea | | Load_Encached Null_String_Cache 03a2 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 03a4 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 03a6 0092 083d | =| Action Push_String_Extended,0x83d ; "{RCO}" 03a8 00ea | | Load_Encached Null_String_Cache 03a9 860d | | Call 0x3,0xd 03aa 0092 083f | ?| Action Push_String_Extended,0x83f ; "!machine.error_logs" 03ac 8608 | | Call 0x3,0x8 03ad 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 03af 4800 |H | Short_Literal 0x0 03b0 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 03b2 00ea | | Load_Encached Null_String_Cache 03b3 00ea | | Load_Encached Null_String_Cache 03b4 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 03b6 0092 0839 | 9| Action Push_String_Extended,0x839 ; "{RC}" 03b8 00ea | | Load_Encached Null_String_Cache 03b9 860d | | Call 0x3,0xd 03ba 0092 0840 | @| Action Push_String_Extended,0x840 ; "!machine.[groups,users]" 03bc 8608 | | Call 0x3,0x8 03bd 00ea | | Load_Encached Null_String_Cache 03be 4800 |H | Short_Literal 0x0 03bf 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 03c1 0092 0839 | 9| Action Push_String_Extended,0x839 ; "{RC}" 03c3 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 03c5 00ea | | Load_Encached Null_String_Cache 03c6 0092 083b | ;| Action Push_String_Extended,0x83b ; "{CO}" 03c8 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 03ca 860d | | Call 0x3,0xd 03cb 0092 0841 | A| Action Push_String_Extended,0x841 ; "!Machine.[Mail,Transfer].??" 03cd 8608 | | Call 0x3,0x8 03ce 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 03d0 4800 |H | Short_Literal 0x0 03d1 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 03d3 0092 0839 | 9| Action Push_String_Extended,0x839 ; "{RC}" 03d5 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 03d7 00ea | | Load_Encached Null_String_Cache 03d8 0092 083d | =| Action Push_String_Extended,0x83d ; "{RCO}" 03da 00ea | | Load_Encached Null_String_Cache 03db 860d | | Call 0x3,0xd 03dc 0092 0842 | B| Action Push_String_Extended,0x842 ; "!machine.release??" 03de 8608 | | Call 0x3,0x8 03df 00ea | | Load_Encached Null_String_Cache 03e0 4800 |H | Short_Literal 0x0 03e1 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 03e3 0092 0839 | 9| Action Push_String_Extended,0x839 ; "{RC}" 03e5 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 03e7 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 03e9 0092 0843 | C| Action Push_String_Extended,0x843 ; "O" 03eb 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 03ed 860d | | Call 0x3,0xd 03ee 0092 0844 | D| Action Push_String_Extended,0x844 ; "!machine.search_lists" 03f0 8608 | | Call 0x3,0x8 03f1 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 03f3 4800 |H | Short_Literal 0x0 03f4 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 03f6 00ea | | Load_Encached Null_String_Cache 03f7 00ea | | Load_Encached Null_String_Cache 03f8 00ea | | Load_Encached Null_String_Cache 03f9 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 03fb 00ea | | Load_Encached Null_String_Cache 03fc 860d | | Call 0x3,0xd 03fd 0092 0845 | E| Action Push_String_Extended,0x845 ; "!machine.temporary" 03ff 8608 | | Call 0x3,0x8 0400 00ea | | Load_Encached Null_String_Cache 0401 4800 |H | Short_Literal 0x0 0402 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0404 0092 0839 | 9| Action Push_String_Extended,0x839 ; "{RC}" 0406 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0408 00ea | | Load_Encached Null_String_Cache 0409 0092 0843 | C| Action Push_String_Extended,0x843 ; "O" 040b 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 040d 860d | | Call 0x3,0xd 040e 0092 0846 | F| Action Push_String_Extended,0x846 ; "!machine.[sims,sims.master,sims.to_rational]" 0410 8608 | | Call 0x3,0x8 0411 00ea | | Load_Encached Null_String_Cache 0412 4800 |H | Short_Literal 0x0 0413 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0415 0092 0839 | 9| Action Push_String_Extended,0x839 ; "{RC}" 0417 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0419 00ea | | Load_Encached Null_String_Cache 041a 0092 0847 | G| Action Push_String_Extended,0x847 ; "{O}" 041c 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 041e 860d | | Call 0x3,0xd 041f 0092 0848 | H| Action Push_String_Extended,0x848 ; "!machine.sims.[database,detail]??" 0421 8608 | | Call 0x3,0x8 0422 00ea | | Load_Encached Null_String_Cache 0423 4800 |H | Short_Literal 0x0 0424 0092 082e | .| Action Push_String_Extended,0x82e ; "RCO" 0426 0092 0839 | 9| Action Push_String_Extended,0x839 ; "{RC}" 0428 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 042a 00ea | | Load_Encached Null_String_Cache 042b 0092 0847 | G| Action Push_String_Extended,0x847 ; "{O}" 042d 0092 082f | /| Action Push_String_Extended,0x82f ; "RC" 042f 860d | | Call 0x3,0xd 0430 0092 0849 | I| Action Push_String_Extended,0x849 ; "!machine.sims.to_rational??" 0432 8608 | | Call 0x3,0x8 0433 0092 084a | J| Action Push_String_Extended,0x84a ; "Mailer=>RCO" 0435 0092 084b | K| Action Push_String_Extended,0x84b ; "!Machine.[Mail,Transfer]??" 0437 860a | | Call 0x3,0xa 0438 0092 084c | L| Action Push_String_Extended,0x84c ; "Mailer=>R" 043a 0092 084d | M| Action Push_String_Extended,0x84d ; "!Users.@.Mailbox.Main_Set.[$,$^,$^^]" 043c 860a | | Call 0x3,0xa 043d e5fa | | Load 0x2,-0x6 043e 6802 |h | Jump_Zero 0x441 043f e001 | | Load 0x0,0x1 0440 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0441 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0442 0000 0000 | | .BLANK 0000[0x6] 0448 ; -------------------------------------------------------------------------------------- 0448 ; SUBPROGRAM 0448 ; -------------------------------------------------------------------------------------- 0448 044b | K | .CONST 0x044b ; Address of begin 0449 0004 | | .CONST 0x0004 ; Address of exception handler 044a 0001 | | .CONST 0x0001 ; Number of locals 044b BODY_0448: 044b INIT_0448: 044b e602 | | Load 0x3,0x2 044c 6824 |h$ | Jump_Zero 0x471 044d e7fb | | Load 0x3,-0x5 044e 680c |h | Jump_Zero 0x45b 044f 0092 0822 | "| Action Push_String_Extended,0x822 ; "Def " 0451 4823 |H# | Short_Literal 0x23 0452 e9ff | | Load 0x4,-0x1 0453 8607 | | Call 0x3,0x7 0454 01cc | | Execute Vector,Catenate 0455 0092 084e | N| Action Push_String_Extended,0x84e ; ": Network_Public=>OWNER" 0457 01cc | | Execute Vector,Catenate 0458 e003 | | Load 0x0,0x3 0459 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 045a 4506 |E | Exit_Suprogram New_Top_Offset 0x6 045b 0092 084f | O| Action Push_String_Extended,0x84f ; "*** ++*" 045d e9ff | | Load 0x4,-0x1 045e e002 | | Load 0x0,0x2 045f 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0460 0092 084f | O| Action Push_String_Extended,0x84f ; "*** ++*" 0462 e9ff | | Load 0x4,-0x1 0463 0092 081e | | Action Push_String_Extended,0x81e ; "<ALL>" 0465 e002 | | Load 0x0,0x2 0466 180f | | Execute Package,Field_Execute,Field_Number 0xf 0467 0092 0850 | P| Action Push_String_Extended,0x850 ; "++* ***" 0469 4801 |H | Short_Literal 0x1 046a e9ff | | Load 0x4,-0x1 046b 4803 |H | Short_Literal 0x3 046c 0092 0851 | Q| Action Push_String_Extended,0x851 ; "network_public" 046e e002 | | Load 0x0,0x2 046f 180e | | Execute Package,Field_Execute,Field_Number 0xe 0470 4506 |E | Exit_Suprogram New_Top_Offset 0x6 0471 e7fb | | Load 0x3,-0x5 0472 682d |h- | Jump_Zero 0x4a0 0473 0092 0822 | "| Action Push_String_Extended,0x822 ; "Def " 0475 4823 |H# | Short_Literal 0x23 0476 e9ff | | Load 0x4,-0x1 0477 8607 | | Call 0x3,0x7 0478 01cc | | Execute Vector,Catenate 0479 0092 0852 | R| Action Push_String_Extended,0x852 ; ": Public=>" 047b 01cc | | Execute Vector,Catenate 047c e9fe | | Load 0x4,-0x2 047d e002 | | Load 0x0,0x2 047e 1b0d | | Execute Package,Field_Read,Field_Number 0xd 047f 011c | | Execute Any,Convert_Unchecked 0480 1c01 | | Execute_Immediate Run_Utility,0x1 0481 01cc | | Execute Vector,Catenate 0482 0092 0853 | S| Action Push_String_Extended,0x853 ; ", System=>" 0484 01cc | | Execute Vector,Catenate 0485 e9fd | | Load 0x4,-0x3 0486 e002 | | Load 0x0,0x2 0487 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0488 011c | | Execute Any,Convert_Unchecked 0489 1c01 | | Execute_Immediate Run_Utility,0x1 048a 01cc | | Execute Vector,Catenate 048b 0092 0854 | T| Action Push_String_Extended,0x854 ; ", Operator=>" 048d 01cc | | Execute Vector,Catenate 048e e9fc | | Load 0x4,-0x4 048f e002 | | Load 0x0,0x2 0490 1b0d | | Execute Package,Field_Read,Field_Number 0xd 0491 011c | | Execute Any,Convert_Unchecked 0492 1c01 | | Execute_Immediate Run_Utility,0x1 0493 01cc | | Execute Vector,Catenate 0494 0092 0855 | U| Action Push_String_Extended,0x855 ; ", Network_Public=>" 0496 01cc | | Execute Vector,Catenate 0497 e9fb | | Load 0x4,-0x5 0498 e002 | | Load 0x0,0x2 0499 1b0d | | Execute Package,Field_Read,Field_Number 0xd 049a 011c | | Execute Any,Convert_Unchecked 049b 1c01 | | Execute_Immediate Run_Utility,0x1 049c 01cc | | Execute Vector,Catenate 049d e003 | | Load 0x0,0x3 049e 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 049f 4506 |E | Exit_Suprogram New_Top_Offset 0x6 04a0 0092 0850 | P| Action Push_String_Extended,0x850 ; "++* ***" 04a2 e9ff | | Load 0x4,-0x1 04a3 e002 | | Load 0x0,0x2 04a4 1818 | | Execute Package,Field_Execute,Field_Number 0x18 04a5 0092 0856 | V| Action Push_String_Extended,0x856 ; "***" 04a7 e9ff | | Load 0x4,-0x1 04a8 0092 081e | | Action Push_String_Extended,0x81e ; "<ALL>" 04aa e002 | | Load 0x0,0x2 04ab 180f | | Execute Package,Field_Execute,Field_Number 0xf 04ac 0092 0850 | P| Action Push_String_Extended,0x850 ; "++* ***" 04ae 4801 |H | Short_Literal 0x1 04af e9ff | | Load 0x4,-0x1 04b0 e9fe | | Load 0x4,-0x2 04b1 0092 0857 | W| Action Push_String_Extended,0x857 ; "public" 04b3 e002 | | Load 0x0,0x2 04b4 180e | | Execute Package,Field_Execute,Field_Number 0xe 04b5 0092 0850 | P| Action Push_String_Extended,0x850 ; "++* ***" 04b7 4801 |H | Short_Literal 0x1 04b8 e9ff | | Load 0x4,-0x1 04b9 e9fd | | Load 0x4,-0x3 04ba 0092 0858 | X| Action Push_String_Extended,0x858 ; "system" 04bc e002 | | Load 0x0,0x2 04bd 180e | | Execute Package,Field_Execute,Field_Number 0xe 04be 0092 0850 | P| Action Push_String_Extended,0x850 ; "++* ***" 04c0 4801 |H | Short_Literal 0x1 04c1 e9ff | | Load 0x4,-0x1 04c2 e9fc | | Load 0x4,-0x4 04c3 0092 0859 | Y| Action Push_String_Extended,0x859 ; "operator" 04c5 e002 | | Load 0x0,0x2 04c6 180e | | Execute Package,Field_Execute,Field_Number 0xe 04c7 0092 0850 | P| Action Push_String_Extended,0x850 ; "++* ***" 04c9 4801 |H | Short_Literal 0x1 04ca e9ff | | Load 0x4,-0x1 04cb e9fb | | Load 0x4,-0x5 04cc 0092 0851 | Q| Action Push_String_Extended,0x851 ; "network_public" 04ce e002 | | Load 0x0,0x2 04cf 180e | | Execute Package,Field_Execute,Field_Number 0xe 04d0 4506 |E | Exit_Suprogram New_Top_Offset 0x6 04d1 0000 0000 | | .BLANK 0000[0x7] 04d8 ; -------------------------------------------------------------------------------------- 04d8 ; SUBPROGRAM 04d8 ; -------------------------------------------------------------------------------------- 04d8 04db | | .CONST 0x04db ; Address of begin 04d9 0004 | | .CONST 0x0004 ; Address of exception handler 04da 0001 | | .CONST 0x0001 ; Number of locals 04db BODY_04d8: 04db INIT_04d8: 04db 4800 |H | Short_Literal 0x0 04dc 4803 |H | Short_Literal 0x3 04dd 4802 |H | Short_Literal 0x2 04de 4801 |H | Short_Literal 0x1 04df 0092 0817 | | Action Push_String_Extended,0x817 ; "!tools.@'c(subsystem)" 04e1 860f | | Call 0x3,0xf 04e2 4800 |H | Short_Literal 0x0 04e3 4803 |H | Short_Literal 0x3 04e4 4802 |H | Short_Literal 0x2 04e5 4801 |H | Short_Literal 0x1 04e6 0092 0818 | | Action Push_String_Extended,0x818 ; "!tools.@.@'c(load_view, spec_view, comb_view)" 04e8 860f | | Call 0x3,0xf 04e9 4501 |E | Exit_Suprogram New_Top_Offset 0x1 04ea 0000 0000 | | .BLANK 0000[0x6] 04f0 ; -------------------------------------------------------------------------------------- 04f0 ; SUBPROGRAM 04f0 ; -------------------------------------------------------------------------------------- 04f0 04f3 | | .CONST 0x04f3 ; Address of begin 04f1 0004 | | .CONST 0x0004 ; Address of exception handler 04f2 0001 | | .CONST 0x0001 ; Number of locals 04f3 BODY_04f0: 04f3 INIT_04f0: 04f3 4800 |H | Short_Literal 0x0 04f4 a606 | | Store_Unchecked 0x3,0x6 04f5 e5fa | | Load 0x2,-0x6 04f6 6805 |h | Jump_Zero 0x4fc 04f7 e7fa | | Load 0x3,-0x6 04f8 0092 085a | Z| Action Push_String_Extended,0x85a ; "World Default ACL's" 04fa e001 | | Load 0x0,0x1 04fb 1812 | | Execute Package,Field_Execute,Field_Number 0x12 04fc 00ea | | Load_Encached Null_String_Cache 04fd 4800 |H | Short_Literal 0x0 04fe 00ea | | Load_Encached Null_String_Cache 04ff 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0501 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0503 00ea | | Load_Encached Null_String_Cache 0504 00ea | | Load_Encached Null_String_Cache 0505 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0507 860d | | Call 0x3,0xd 0508 0092 080c | | Action Push_String_Extended,0x80c ; "!" 050a 8609 | | Call 0x3,0x9 050b 00ea | | Load_Encached Null_String_Cache 050c 4800 |H | Short_Literal 0x0 050d 00ea | | Load_Encached Null_String_Cache 050e 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0510 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0512 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0514 00ea | | Load_Encached Null_String_Cache 0515 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0517 860d | | Call 0x3,0xd 0518 0092 085c | \| Action Push_String_Extended,0x85c ; "![commands,implementation,io,lrm,tools]" 051a 8609 | | Call 0x3,0x9 051b 00ea | | Load_Encached Null_String_Cache 051c 4800 |H | Short_Literal 0x0 051d 00ea | | Load_Encached Null_String_Cache 051e 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0520 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0522 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0524 00ea | | Load_Encached Null_String_Cache 0525 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0527 860d | | Call 0x3,0xd 0528 0092 0833 | 3| Action Push_String_Extended,0x833 ; "!compiler_interface" 052a 8609 | | Call 0x3,0x9 052b 00ea | | Load_Encached Null_String_Cache 052c 4800 |H | Short_Literal 0x0 052d 00ea | | Load_Encached Null_String_Cache 052e 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0530 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0532 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0534 00ea | | Load_Encached Null_String_Cache 0535 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0537 860d | | Call 0x3,0xd 0538 0092 0834 | 4| Action Push_String_Extended,0x834 ; "!commands.abbreviations" 053a 8609 | | Call 0x3,0x9 053b 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 053d 4800 |H | Short_Literal 0x0 053e 00ea | | Load_Encached Null_String_Cache 053f 00ea | | Load_Encached Null_String_Cache 0540 00ea | | Load_Encached Null_String_Cache 0541 00ea | | Load_Encached Null_String_Cache 0542 00ea | | Load_Encached Null_String_Cache 0543 00ea | | Load_Encached Null_String_Cache 0544 860d | | Call 0x3,0xd 0545 0092 0837 | 7| Action Push_String_Extended,0x837 ; "!machine" 0547 8609 | | Call 0x3,0x9 0548 00ea | | Load_Encached Null_String_Cache 0549 4800 |H | Short_Literal 0x0 054a 00ea | | Load_Encached Null_String_Cache 054b 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 054d 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 054f 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0551 00ea | | Load_Encached Null_String_Cache 0552 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0554 860d | | Call 0x3,0xd 0555 0092 085e | ^| Action Push_String_Extended,0x85e ; "!Machine.accounting" 0557 8609 | | Call 0x3,0x9 0558 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 055a 4800 |H | Short_Literal 0x0 055b 00ea | | Load_Encached Null_String_Cache 055c 00ea | | Load_Encached Null_String_Cache 055d 00ea | | Load_Encached Null_String_Cache 055e 00ea | | Load_Encached Null_String_Cache 055f 00ea | | Load_Encached Null_String_Cache 0560 00ea | | Load_Encached Null_String_Cache 0561 860d | | Call 0x3,0xd 0562 0092 085f | _| Action Push_String_Extended,0x85f ; "!Machine.Error_Logs" 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 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 056a 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 056c 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 056e 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 0570 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0572 860d | | Call 0x3,0xd 0573 0092 0860 | `| Action Push_String_Extended,0x860 ; "!Machine.[initialization,initialization.[site,rational]]" 0575 8609 | | Call 0x3,0x9 0576 00ea | | Load_Encached Null_String_Cache 0577 4800 |H | Short_Literal 0x0 0578 00ea | | Load_Encached Null_String_Cache 0579 00ea | | Load_Encached Null_String_Cache 057a 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 057c 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 057e 00ea | | Load_Encached Null_String_Cache 057f 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0581 860d | | Call 0x3,0xd 0582 0092 0861 | a| Action Push_String_Extended,0x861 ; "!Machine.[cg_data,devices,editor_data]" 0584 8609 | | Call 0x3,0x9 0585 00ea | | Load_Encached Null_String_Cache 0586 4800 |H | Short_Literal 0x0 0587 00ea | | Load_Encached Null_String_Cache 0588 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 058a 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 058c 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 058e 00ea | | Load_Encached Null_String_Cache 058f 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0591 860d | | Call 0x3,0xd 0592 0092 0862 | b| Action Push_String_Extended,0x862 ; "!Machine.[groups,users]" 0594 8609 | | Call 0x3,0x9 0595 00ea | | Load_Encached Null_String_Cache 0596 4800 |H | Short_Literal 0x0 0597 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0599 0092 0863 | c| Action Push_String_Extended,0x863 ; "{W}" 059b 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 059d 00ea | | Load_Encached Null_String_Cache 059e 0092 0863 | c| Action Push_String_Extended,0x863 ; "{W}" 05a0 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 05a2 860d | | Call 0x3,0xd 05a3 0092 0864 | d| Action Push_String_Extended,0x864 ; "!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 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 05aa 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 05ac 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 05ae 00ea | | Load_Encached Null_String_Cache 05af 0092 0863 | c| Action Push_String_Extended,0x863 ; "{W}" 05b1 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 05b3 860d | | Call 0x3,0xd 05b4 0092 0865 | e| Action Push_String_Extended,0x865 ; "!Machine.[Mail,Transfer].Distribute'c(world)" 05b6 8609 | | Call 0x3,0x9 05b7 00ea | | Load_Encached Null_String_Cache 05b8 4800 |H | Short_Literal 0x0 05b9 00ea | | Load_Encached Null_String_Cache 05ba 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 05bc 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 05be 00ea | | Load_Encached Null_String_Cache 05bf 00ea | | Load_Encached Null_String_Cache 05c0 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 05c2 860d | | Call 0x3,0xd 05c3 0092 0866 | f| Action Push_String_Extended,0x866 ; "!Machine.Release??'c(world)" 05c5 8609 | | Call 0x3,0x9 05c6 00ea | | Load_Encached Null_String_Cache 05c7 4800 |H | Short_Literal 0x0 05c8 00ea | | Load_Encached Null_String_Cache 05c9 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 05cb 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 05cd 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 05cf 00ea | | Load_Encached Null_String_Cache 05d0 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 05d2 860d | | Call 0x3,0xd 05d3 0092 0867 | g| Action Push_String_Extended,0x867 ; "!Machine.Search_Lists" 05d5 8609 | | Call 0x3,0x9 05d6 00ea | | Load_Encached Null_String_Cache 05d7 4800 |H | Short_Literal 0x0 05d8 00ea | | Load_Encached Null_String_Cache 05d9 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 05db 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 05dd 00ea | | Load_Encached Null_String_Cache 05de 00ea | | Load_Encached Null_String_Cache 05df 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 05e1 860d | | Call 0x3,0xd 05e2 0092 0868 | h| Action Push_String_Extended,0x868 ; "!machine.sims" 05e4 8609 | | Call 0x3,0x9 05e5 00ea | | Load_Encached Null_String_Cache 05e6 4800 |H | Short_Literal 0x0 05e7 00ea | | Load_Encached Null_String_Cache 05e8 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 05ea 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 05ec 00ea | | Load_Encached Null_String_Cache 05ed 00ea | | Load_Encached Null_String_Cache 05ee 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 05f0 860d | | Call 0x3,0xd 05f1 0092 0869 | i| Action Push_String_Extended,0x869 ; "!machine.sims.master" 05f3 8609 | | Call 0x3,0x9 05f4 00ea | | Load_Encached Null_String_Cache 05f5 4800 |H | Short_Literal 0x0 05f6 00ea | | Load_Encached Null_String_Cache 05f7 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 05f9 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 05fb 00ea | | Load_Encached Null_String_Cache 05fc 00ea | | Load_Encached Null_String_Cache 05fd 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 05ff 860d | | Call 0x3,0xd 0600 0092 086a | j| Action Push_String_Extended,0x86a ; "!Machine.sims.[database,detail]" 0602 8609 | | Call 0x3,0x9 0603 00ea | | Load_Encached Null_String_Cache 0604 4800 |H | Short_Literal 0x0 0605 00ea | | Load_Encached Null_String_Cache 0606 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 0608 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 060a 00ea | | Load_Encached Null_String_Cache 060b 00ea | | Load_Encached Null_String_Cache 060c 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 060e 860d | | Call 0x3,0xd 060f 0092 086b | k| Action Push_String_Extended,0x86b ; "!Machine.sims.to_rational.@'c(world)" 0611 8609 | | Call 0x3,0x9 0612 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0614 4800 |H | Short_Literal 0x0 0615 00ea | | Load_Encached Null_String_Cache 0616 00ea | | Load_Encached Null_String_Cache 0617 00ea | | Load_Encached Null_String_Cache 0618 00ea | | Load_Encached Null_String_Cache 0619 00ea | | Load_Encached Null_String_Cache 061a 00ea | | Load_Encached Null_String_Cache 061b 860d | | Call 0x3,0xd 061c 0092 086c | l| Action Push_String_Extended,0x86c ; "!Machine.Temporary" 061e 8609 | | Call 0x3,0x9 061f 00ea | | Load_Encached Null_String_Cache 0620 4800 |H | Short_Literal 0x0 0621 00ea | | Load_Encached Null_String_Cache 0622 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0624 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0626 00ea | | Load_Encached Null_String_Cache 0627 00ea | | Load_Encached Null_String_Cache 0628 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 062a 860d | | Call 0x3,0xd 062b 0092 086d | m| Action Push_String_Extended,0x86d ; "!model.??'c(world)" 062d 8609 | | Call 0x3,0x9 062e 00ea | | Load_Encached Null_String_Cache 062f 4800 |H | Short_Literal 0x0 0630 00ea | | Load_Encached Null_String_Cache 0631 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 0633 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0635 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0637 00ea | | Load_Encached Null_String_Cache 0638 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 063a 860d | | Call 0x3,0xd 063b 0092 0836 | 6| Action Push_String_Extended,0x836 ; "!users" 063d 8609 | | Call 0x3,0x9 063e 0092 086e | n| Action Push_String_Extended,0x86e ; "Mailer=>RW" 0640 0092 086f | o| Action Push_String_Extended,0x86f ; "!Machine.[Mail,Transfer]??'c(world)" 0642 860b | | Call 0x3,0xb 0643 e5fa | | Load 0x2,-0x6 0644 6802 |h | Jump_Zero 0x647 0645 e001 | | Load 0x0,0x1 0646 1811 | | Execute Package,Field_Execute,Field_Number 0x11 0647 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0648 ; -------------------------------------------------------------------------------------- 0648 ; SUBPROGRAM 0648 ; -------------------------------------------------------------------------------------- 0648 064b | K | .CONST 0x064b ; Address of begin 0649 0004 | | .CONST 0x0004 ; Address of exception handler 064a 0001 | | .CONST 0x0001 ; Number of locals 064b BODY_0648: 064b INIT_0648: 064b 4800 |H | Short_Literal 0x0 064c a606 | | Store_Unchecked 0x3,0x6 064d e5fa | | Load 0x2,-0x6 064e 6805 |h | Jump_Zero 0x654 064f e7fa | | Load 0x3,-0x6 0650 0092 0870 | p| Action Push_String_Extended,0x870 ; "Object ACL (Non-World)" 0652 e001 | | Load 0x0,0x1 0653 1812 | | Execute Package,Field_Execute,Field_Number 0x12 0654 00ea | | Load_Encached Null_String_Cache 0655 4801 |H | Short_Literal 0x1 0656 00ea | | Load_Encached Null_String_Cache 0657 00ea | | Load_Encached Null_String_Cache 0658 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 065a 00ea | | Load_Encached Null_String_Cache 065b 00ea | | Load_Encached Null_String_Cache 065c 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 065e 860d | | Call 0x3,0xd 065f 0092 0871 | q| Action Push_String_Extended,0x871 ; "![commands,io,lrm,tools].?" 0661 8608 | | Call 0x3,0x8 0662 00ea | | Load_Encached Null_String_Cache 0663 4801 |H | Short_Literal 0x1 0664 00ea | | Load_Encached Null_String_Cache 0665 00ea | | Load_Encached Null_String_Cache 0666 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0668 00ea | | Load_Encached Null_String_Cache 0669 00ea | | Load_Encached Null_String_Cache 066a 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 066c 860d | | Call 0x3,0xd 066d 0092 0872 | r| Action Push_String_Extended,0x872 ; "!commands.abbreviations.?" 066f 8608 | | Call 0x3,0x8 0670 00ea | | Load_Encached Null_String_Cache 0671 4801 |H | Short_Literal 0x1 0672 00ea | | Load_Encached Null_String_Cache 0673 00ea | | Load_Encached Null_String_Cache 0674 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0676 00ea | | Load_Encached Null_String_Cache 0677 00ea | | Load_Encached Null_String_Cache 0678 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 067a 860d | | Call 0x3,0xd 067b 0092 0873 | s| Action Push_String_Extended,0x873 ; "![compiler_interface,implementation].?" 067d 8608 | | Call 0x3,0x8 067e 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0680 4800 |H | Short_Literal 0x0 0681 00ea | | Load_Encached Null_String_Cache 0682 00ea | | Load_Encached Null_String_Cache 0683 00ea | | Load_Encached Null_String_Cache 0684 00ea | | Load_Encached Null_String_Cache 0685 00ea | | Load_Encached Null_String_Cache 0686 00ea | | Load_Encached Null_String_Cache 0687 860d | | Call 0x3,0xd 0688 0092 0874 | t| Action Push_String_Extended,0x874 ; "!compiler_interface.subsystem_interface" 068a 8608 | | Call 0x3,0x8 068b 00ea | | Load_Encached Null_String_Cache 068c 4800 |H | Short_Literal 0x0 068d 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 068f 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 0691 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0693 00ea | | Load_Encached Null_String_Cache 0694 00ea | | Load_Encached Null_String_Cache 0695 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0697 860d | | Call 0x3,0xd 0698 0092 0875 | u| Action Push_String_Extended,0x875 ; "!machine.@'c(ada)" 069a 8608 | | Call 0x3,0x8 069b 00ea | | Load_Encached Null_String_Cache 069c 4800 |H | Short_Literal 0x0 069d 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 069f 00ea | | Load_Encached Null_String_Cache 06a0 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 06a2 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06a4 00ea | | Load_Encached Null_String_Cache 06a5 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 06a7 860d | | Call 0x3,0xd 06a8 0092 0876 | v| Action Push_String_Extended,0x876 ; "!machine.[cg_data,editor_data].@" 06aa 8608 | | Call 0x3,0x8 06ab 00ea | | Load_Encached Null_String_Cache 06ac 4800 |H | Short_Literal 0x0 06ad 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06af 00ea | | Load_Encached Null_String_Cache 06b0 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 06b2 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 06b4 00ea | | Load_Encached Null_String_Cache 06b5 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 06b7 860d | | Call 0x3,0xd 06b8 0092 0877 | w| Action Push_String_Extended,0x877 ; "!machine.[initialization,initialization.[site,rational]].?" 06ba 8608 | | Call 0x3,0x8 06bb 00ea | | Load_Encached Null_String_Cache 06bc 4800 |H | Short_Literal 0x0 06bd 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06bf 00ea | | Load_Encached Null_String_Cache 06c0 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 06c2 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06c4 00ea | | Load_Encached Null_String_Cache 06c5 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 06c7 860d | | Call 0x3,0xd 06c8 0092 0878 | x| Action Push_String_Extended,0x878 ; "!Machine.Accounting.@" 06ca 8608 | | Call 0x3,0x8 06cb 00ea | | Load_Encached Null_String_Cache 06cc 4800 |H | Short_Literal 0x0 06cd 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06cf 0092 0863 | c| Action Push_String_Extended,0x863 ; "{W}" 06d1 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 06d3 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06d5 00ea | | Load_Encached Null_String_Cache 06d6 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 06d8 860d | | Call 0x3,0xd 06d9 0092 0879 | y| Action Push_String_Extended,0x879 ; "!Machine.Error_Logs.[@,~Mail_Distribute_Server@]" 06db 8608 | | Call 0x3,0x8 06dc 00ea | | Load_Encached Null_String_Cache 06dd 4800 |H | Short_Literal 0x0 06de 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06e0 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06e2 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06e4 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06e6 00ea | | Load_Encached Null_String_Cache 06e7 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 06e9 860d | | Call 0x3,0xd 06ea 0092 087a | z| Action Push_String_Extended,0x87a ; "!Machine.Error_Logs.Mail_Distribute_Server@" 06ec 8608 | | Call 0x3,0x8 06ed 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 06ef 4800 |H | Short_Literal 0x0 06f0 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 06f2 00ea | | Load_Encached Null_String_Cache 06f3 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 06f5 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 06f7 00ea | | Load_Encached Null_String_Cache 06f8 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 06fa 860d | | Call 0x3,0xd 06fb 0092 087b | {| Action Push_String_Extended,0x87b ; "!Machine.Machine_Name" 06fd 8608 | | Call 0x3,0x8 06fe 00ea | | Load_Encached Null_String_Cache 06ff 4800 |H | Short_Literal 0x0 0700 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0702 0092 0863 | c| Action Push_String_Extended,0x863 ; "{W}" 0704 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0706 00ea | | Load_Encached Null_String_Cache 0707 0092 0863 | c| Action Push_String_Extended,0x863 ; "{W}" 0709 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 070b 860d | | Call 0x3,0xd 070c 0092 087c | || Action Push_String_Extended,0x87c ; "!Machine.[Mail,Transfer].[??,~Distribute.??]" 070e 8608 | | Call 0x3,0x8 070f 00ea | | Load_Encached Null_String_Cache 0710 4800 |H | Short_Literal 0x0 0711 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0713 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0715 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0717 00ea | | Load_Encached Null_String_Cache 0718 0092 0863 | c| Action Push_String_Extended,0x863 ; "{W}" 071a 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 071c 860d | | Call 0x3,0xd 071d 0092 087d | }| Action Push_String_Extended,0x87d ; "!Machine.[Mail,Transfer].Distribute.??" 071f 8608 | | Call 0x3,0x8 0720 0092 082d | -| Action Push_String_Extended,0x82d ; "R" 0722 4800 |H | Short_Literal 0x0 0723 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0725 00ea | | Load_Encached Null_String_Cache 0726 00ea | | Load_Encached Null_String_Cache 0727 00ea | | Load_Encached Null_String_Cache 0728 00ea | | Load_Encached Null_String_Cache 0729 00ea | | Load_Encached Null_String_Cache 072a 860d | | Call 0x3,0xd 072b 0092 087e | ~| Action Push_String_Extended,0x87e ; "!Machine.release.??'c(file,ada)" 072d 8608 | | Call 0x3,0x8 072e 00ea | | Load_Encached Null_String_Cache 072f 4800 |H | Short_Literal 0x0 0730 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0732 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 0734 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0736 00ea | | Load_Encached Null_String_Cache 0737 00ea | | Load_Encached Null_String_Cache 0738 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 073a 860d | | Call 0x3,0xd 073b 0092 087f | | Action Push_String_Extended,0x87f ; "!Machine.Search_lists.@" 073d 8608 | | Call 0x3,0x8 073e 00ea | | Load_Encached Null_String_Cache 073f 4800 |H | Short_Literal 0x0 0740 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0742 00ea | | Load_Encached Null_String_Cache 0743 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0745 00ea | | Load_Encached Null_String_Cache 0746 00ea | | Load_Encached Null_String_Cache 0747 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0749 860d | | Call 0x3,0xd 074a 0092 0880 | | Action Push_String_Extended,0x880 ; "!Machine.sims.@'c(ada,file)" 074c 8608 | | Call 0x3,0x8 074d 00ea | | Load_Encached Null_String_Cache 074e 4800 |H | Short_Literal 0x0 074f 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0751 00ea | | Load_Encached Null_String_Cache 0752 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0754 00ea | | Load_Encached Null_String_Cache 0755 00ea | | Load_Encached Null_String_Cache 0756 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0758 860d | | Call 0x3,0xd 0759 0092 0881 | | Action Push_String_Extended,0x881 ; "!Machine.sims.[master,to_rational].@'c(ada,file)" 075b 8608 | | Call 0x3,0x8 075c 00ea | | Load_Encached Null_String_Cache 075d 4800 |H | Short_Literal 0x0 075e 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0760 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 0762 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0764 00ea | | Load_Encached Null_String_Cache 0765 00ea | | Load_Encached Null_String_Cache 0766 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0768 860d | | Call 0x3,0xd 0769 0092 0882 | | Action Push_String_Extended,0x882 ; "!Machine.sims.[database,detail]@'c(ada,file)" 076b 8608 | | Call 0x3,0x8 076c 00ea | | Load_Encached Null_String_Cache 076d 4800 |H | Short_Literal 0x0 076e 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0770 0092 085d | ]| Action Push_String_Extended,0x85d ; "{RW}" 0772 0092 083a | :| Action Push_String_Extended,0x83a ; "{R}" 0774 00ea | | Load_Encached Null_String_Cache 0775 00ea | | Load_Encached Null_String_Cache 0776 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 0778 860d | | Call 0x3,0xd 0779 0092 0883 | | Action Push_String_Extended,0x883 ; "!Machine.sims.to_rational.@'c(ada,file)" 077b 8608 | | Call 0x3,0x8 077c 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 077e 4800 |H | Short_Literal 0x0 077f 00ea | | Load_Encached Null_String_Cache 0780 00ea | | Load_Encached Null_String_Cache 0781 00ea | | Load_Encached Null_String_Cache 0782 00ea | | Load_Encached Null_String_Cache 0783 00ea | | Load_Encached Null_String_Cache 0784 00ea | | Load_Encached Null_String_Cache 0785 860d | | Call 0x3,0xd 0786 0092 0884 | | Action Push_String_Extended,0x884 ; "!Machine.Switch_Definitions" 0788 8608 | | Call 0x3,0x8 0789 0092 085b | [| Action Push_String_Extended,0x85b ; "RW" 078b 4800 |H | Short_Literal 0x0 078c 00ea | | Load_Encached Null_String_Cache 078d 00ea | | Load_Encached Null_String_Cache 078e 00ea | | Load_Encached Null_String_Cache 078f 00ea | | Load_Encached Null_String_Cache 0790 00ea | | Load_Encached Null_String_Cache 0791 00ea | | Load_Encached Null_String_Cache 0792 860d | | Call 0x3,0xd 0793 0092 0885 | | Action Push_String_Extended,0x885 ; "!machine.temporary.@" 0795 8608 | | Call 0x3,0x8 0796 0092 086e | n| Action Push_String_Extended,0x86e ; "Mailer=>RW" 0798 0092 0841 | A| Action Push_String_Extended,0x841 ; "!Machine.[Mail,Transfer].??" 079a 860a | | Call 0x3,0xa 079b 0092 086e | n| Action Push_String_Extended,0x86e ; "Mailer=>RW" 079d 0092 0886 | | Action Push_String_Extended,0x886 ; "!Users.@.Mailbox.Main_@" 079f 860a | | Call 0x3,0xa 07a0 e5fa | | Load 0x2,-0x6 07a1 6802 |h | Jump_Zero 0x7a4 07a2 e001 | | Load 0x0,0x1 07a3 1811 | | Execute Package,Field_Execute,Field_Number 0x11 07a4 4501 |E | Exit_Suprogram New_Top_Offset 0x1 07a5 0000 0000 | | .XXX[0x3] 07a7 0000 | | 07a8 ; -------------------------------------------------------------------------------------- 07a8 ; SUBPROGRAM 07a8 ; -------------------------------------------------------------------------------------- 07a8 07ab | | .CONST 0x07ab ; Address of begin 07a9 0004 | | .CONST 0x0004 ; Address of exception handler 07aa 0001 | | .CONST 0x0001 ; Number of locals 07ab BODY_07a8: 07ab INIT_07a8: 07ab e7fb | | Load 0x3,-0x5 07ac 680b |h | Jump_Zero 0x7b8 07ad 4823 |H# | Short_Literal 0x23 07ae ebff | | Load 0x5,-0x1 07af 8607 | | Call 0x3,0x7 07b0 0092 0823 | #| Action Push_String_Extended,0x823 ; ": " 07b2 01cc | | Execute Vector,Catenate 07b3 e9fe | | Load 0x4,-0x2 07b4 01cc | | Execute Vector,Catenate 07b5 e003 | | Load 0x0,0x3 07b6 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 07b7 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07b8 0092 0824 | $| Action Push_String_Extended,0x824 ; "<errors>" 07ba ebff | | Load 0x5,-0x1 07bb e9fe | | Load 0x4,-0x2 07bc e004 | | Load 0x0,0x4 07bd 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07be 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07bf 0000 | | .XXX[0x1] 07c0 ; -------------------------------------------------------------------------------------- 07c0 ; SUBPROGRAM 07c0 ; -------------------------------------------------------------------------------------- 07c0 07c3 | | .CONST 0x07c3 ; Address of begin 07c1 0004 | | .CONST 0x0004 ; Address of exception handler 07c2 0001 | | .CONST 0x0001 ; Number of locals 07c3 BODY_07c0: 07c3 INIT_07c0: 07c3 e7fb | | Load 0x3,-0x5 07c4 680e |h | Jump_Zero 0x7d3 07c5 0092 0887 | | Action Push_String_Extended,0x887 ; "Add " 07c7 4823 |H# | Short_Literal 0x23 07c8 ebff | | Load 0x5,-0x1 07c9 8607 | | Call 0x3,0x7 07ca 01cc | | Execute Vector,Catenate 07cb 0092 0823 | #| Action Push_String_Extended,0x823 ; ": " 07cd 01cc | | Execute Vector,Catenate 07ce e9fe | | Load 0x4,-0x2 07cf 01cc | | Execute Vector,Catenate 07d0 e003 | | Load 0x0,0x3 07d1 1864 | d | Execute Package,Field_Execute,Field_Number 0x64 07d2 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07d3 0092 0824 | $| Action Push_String_Extended,0x824 ; "<errors>" 07d5 ebff | | Load 0x5,-0x1 07d6 e9fe | | Load 0x4,-0x2 07d7 e004 | | Load 0x0,0x4 07d8 1813 | | Execute Package,Field_Execute,Field_Number 0x13 07d9 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07da 0000 0000 | | .BLANK 0000[0x6] 07e0 ; -------------------------------------------------------------------------------------- 07e0 ; SUBPROGRAM 07e0 ; -------------------------------------------------------------------------------------- 07e0 07e3 | | .CONST 0x07e3 ; Address of begin 07e1 0004 | | .CONST 0x0004 ; Address of exception handler 07e2 0001 | | .CONST 0x0001 ; Number of locals 07e3 BODY_07e0: 07e3 INIT_07e0: 07e3 e802 | | Load 0x4,0x2 07e4 e006 | | Load 0x0,0x6 07e5 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 07e6 6809 |h | Jump_Zero 0x7f0 07e7 e802 | | Load 0x4,0x2 07e8 0092 0888 | | Action Push_String_Extended,0x888 ; "," 07ea ebff | | Load 0x5,-0x1 07eb 01cc | | Execute Vector,Catenate 07ec e006 | | Load 0x0,0x6 07ed 1818 | | Execute Package,Field_Execute,Field_Number 0x18 07ee 00d1 | | Pop_Control Pop_Count_1 07ef 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07f0 e802 | | Load 0x4,0x2 07f1 ebff | | Load 0x5,-0x1 07f2 e006 | | Load 0x0,0x6 07f3 1810 | | Execute Package,Field_Execute,Field_Number 0x10 07f4 00d1 | | Pop_Control Pop_Count_1 07f5 4502 |E | Exit_Suprogram New_Top_Offset 0x2 07f6 0000 0000 | | .XXX[0x2] 07f8 ; -------------------------------------------------------------------------------------- 07f8 ; SUBPROGRAM 07f8 ; -------------------------------------------------------------------------------------- 07f8 07fb | | .CONST 0x07fb ; Address of begin 07f9 0004 | | .CONST 0x0004 ; Address of exception handler 07fa 0001 | | .CONST 0x0001 ; Number of locals 07fb BODY_07f8: 07fb INIT_07f8: 07fb e804 | | Load 0x4,0x4 07fc 7005 |p | Jump_Nonzero 0x802 07fd 0092 0889 | | Action Push_String_Extended,0x889 ; "Network_Public=>" 07ff 8805 | | Call 0x4,0x5 0800 4801 |H | Short_Literal 0x1 0801 a804 | | Store_Unchecked 0x4,0x4 0802 e802 | | Load 0x4,0x2 0803 ebff | | Load 0x5,-0x1 0804 e006 | | Load 0x0,0x6 0805 1818 | | Execute Package,Field_Execute,Field_Number 0x18 0806 4502 |E | Exit_Suprogram New_Top_Offset 0x2 0807 ; -------------------------------------------------------------------------------------- 0807 ; STRING TABLE 0807 ; -------------------------------------------------------------------------------------- 0807 0108 | | .STRTAB 0x0108->0x088b ; "None " 0808 010c | | .STRTAB 0x010c->0x088e ; "Open " 0809 0110 | | .STRTAB 0x0110->0x0891 ; "Safe " 080a 0114 | | .STRTAB 0x0114->0x0894 ; "Secure" 080b 0118 | | .STRTAB 0x0118->0x0897 ; " level" 080c 011c | | .STRTAB 0x011c->0x089a ; "!" 080d 011b | | .STRTAB 0x011b->0x089a ; "!commands.@" 080e 0124 | $ | .STRTAB 0x0124->0x08a0 ; "!commands.abbreviations.@" 080f 013b | ; | .STRTAB 0x013b->0x08ac ; "!compiler_interface??" 0810 014e | N | .STRTAB 0x014e->0x08b7 ; "!implementation??" 0811 015d | ] | .STRTAB 0x015d->0x08bf ; "!io??" 0812 0160 | ` | .STRTAB 0x0160->0x08c2 ; "!lrm??" 0813 0164 | d | .STRTAB 0x0164->0x08c5 ; "!machine@" 0814 016b | k | .STRTAB 0x016b->0x08c9 ; "!model??" 0815 0171 | q | .STRTAB 0x0171->0x08cd ; "!tools.@" 0816 0177 | w | .STRTAB 0x0177->0x08d1 ; "!tools.networking.@" 0817 0188 | | .STRTAB 0x0188->0x08db ; "!tools.@'c(subsystem)" 0818 019b | | .STRTAB 0x019b->0x08e5 ; "!tools.@.@'c(load_view, spec_view, comb_view)" 0819 01c6 | | .STRTAB 0x01c6->0x08fc ; " with network Read" 081a 01d6 | | .STRTAB 0x01d6->0x0905 ; " with network Read and Write" 081b 01f0 | | .STRTAB 0x01f0->0x0913 ; "------- " 081c 01f6 | | .STRTAB 0x01f6->0x0917 ; "------- defaults: " 081d 0206 | | .STRTAB 0x0206->0x0920 ; "+++ ++* ***" 081e 020f | | .STRTAB 0x020f->0x0925 ; "<ALL>" 081f 0212 | | .STRTAB 0x0212->0x0928 ; "Illegal value of level parameter. Must be 0..3." 0820 0240 | @ | .STRTAB 0x0240->0x0940 ; "'c(world)" 0821 0247 | G | .STRTAB 0x0247->0x0944 ; "'c(~library)" 0822 0251 | Q | .STRTAB 0x0251->0x094a ; "Def " 0823 0253 | S | .STRTAB 0x0253->0x094c ; ": " 0824 0253 | S | .STRTAB 0x0253->0x094d ; "<errors>" 0825 0259 | Y | .STRTAB 0x0259->0x0951 ; "Add_Def " 0826 025f | _ | .STRTAB 0x025f->0x0955 ; "Network_Public=>RCO" 0827 0270 | p | .STRTAB 0x0270->0x095f ; "Network_Public=>R" 0828 027f | | .STRTAB 0x027f->0x0967 ; "Network_Public=>RW" 0829 028f | | .STRTAB 0x028f->0x0970 ; "System=>" 082a 0295 | | .STRTAB 0x0295->0x0974 ; "Public=>" 082b 029b | | .STRTAB 0x029b->0x0978 ; "Operator=>" 082c 02a3 | | .STRTAB 0x02a3->0x097d ; "World ACL's" 082d 02ac | | .STRTAB 0x02ac->0x0983 ; "R" 082e 02ab | | .STRTAB 0x02ab->0x0983 ; "RCO" 082f 02ac | | .STRTAB 0x02ac->0x0985 ; "RC" 0830 02ac | | .STRTAB 0x02ac->0x0986 ; "CO" 0831 02ac | | .STRTAB 0x02ac->0x0987 ; "![Commands,Io,Lrm,Model??]" 0832 02c4 | | .STRTAB 0x02c4->0x0994 ; "!tools" 0833 02c8 | | .STRTAB 0x02c8->0x0997 ; "!compiler_interface" 0834 02d9 | | .STRTAB 0x02d9->0x09a0 ; "!commands.abbreviations" 0835 02ee | | .STRTAB 0x02ee->0x09ac ; "!Implementation" 0836 02fb | | .STRTAB 0x02fb->0x09b3 ; "!users" 0837 02ff | | .STRTAB 0x02ff->0x09b6 ; "!machine" 0838 0305 | | .STRTAB 0x0305->0x09ba ; "!machine.[cg_data,devices,editor_data]" 0839 0329 | ) | .STRTAB 0x0329->0x09cd ; "{RC}" 083a 032b | + | .STRTAB 0x032b->0x09cf ; "{R}" 083b 032c | , | .STRTAB 0x032c->0x09d1 ; "{CO}" 083c 032e | . | .STRTAB 0x032e->0x09d3 ; "!machine.accounting" 083d 033f | ? | .STRTAB 0x033f->0x09dc ; "{RCO}" 083e 0342 | B | .STRTAB 0x0342->0x09df ; "!machine.[initialization,initialization.[rational,site]]" 083f 0378 | x | .STRTAB 0x0378->0x09fb ; "!machine.error_logs" 0840 0389 | | .STRTAB 0x0389->0x0a04 ; "!machine.[groups,users]" 0841 039e | | .STRTAB 0x039e->0x0a10 ; "!Machine.[Mail,Transfer].??" 0842 03b7 | | .STRTAB 0x03b7->0x0a1d ; "!machine.release??" 0843 03c7 | | .STRTAB 0x03c7->0x0a26 ; "O" 0844 03c6 | | .STRTAB 0x03c6->0x0a27 ; "!machine.search_lists" 0845 03d9 | | .STRTAB 0x03d9->0x0a31 ; "!machine.temporary" 0846 03e9 | | .STRTAB 0x03e9->0x0a3a ; "!machine.[sims,sims.master,sims.to_rational]" 0847 0413 | | .STRTAB 0x0413->0x0a50 ; "{O}" 0848 0414 | | .STRTAB 0x0414->0x0a52 ; "!machine.sims.[database,detail]??" 0849 0433 | 3 | .STRTAB 0x0433->0x0a62 ; "!machine.sims.to_rational??" 084a 044c | L | .STRTAB 0x044c->0x0a70 ; "Mailer=>RCO" 084b 0455 | U | .STRTAB 0x0455->0x0a75 ; "!Machine.[Mail,Transfer]??" 084c 046d | m | .STRTAB 0x046d->0x0a82 ; "Mailer=>R" 084d 0474 | t | .STRTAB 0x0474->0x0a87 ; "!Users.@.Mailbox.Main_Set.[$,$^,$^^]" 084e 0496 | | .STRTAB 0x0496->0x0a99 ; ": Network_Public=>OWNER" 084f 04ab | | .STRTAB 0x04ab->0x0aa4 ; "*** ++*" 0850 04b0 | | .STRTAB 0x04b0->0x0aa8 ; "++* ***" 0851 04b5 | | .STRTAB 0x04b5->0x0aab ; "network_public" 0852 04c1 | | .STRTAB 0x04c1->0x0ab2 ; ": Public=>" 0853 04c9 | | .STRTAB 0x04c9->0x0ab7 ; ", System=>" 0854 04d1 | | .STRTAB 0x04d1->0x0abc ; ", Operator=>" 0855 04db | | .STRTAB 0x04db->0x0ac2 ; ", Network_Public=>" 0856 04eb | | .STRTAB 0x04eb->0x0acb ; "***" 0857 04ec | | .STRTAB 0x04ec->0x0acd ; "public" 0858 04f0 | | .STRTAB 0x04f0->0x0ad0 ; "system" 0859 04f4 | | .STRTAB 0x04f4->0x0ad3 ; "operator" 085a 04fa | | .STRTAB 0x04fa->0x0ad7 ; "World Default ACL's" 085b 050b | | .STRTAB 0x050b->0x0ae0 ; "RW" 085c 050b | | .STRTAB 0x050b->0x0ae1 ; "![commands,implementation,io,lrm,tools]" 085d 0530 | 0 | .STRTAB 0x0530->0x0af5 ; "{RW}" 085e 0532 | 2 | .STRTAB 0x0532->0x0af7 ; "!Machine.accounting" 085f 0543 | C | .STRTAB 0x0543->0x0b00 ; "!Machine.Error_Logs" 0860 0554 | T | .STRTAB 0x0554->0x0b0a ; "!Machine.[initialization,initialization.[site,rational]]" 0861 058a | | .STRTAB 0x058a->0x0b26 ; "!Machine.[cg_data,devices,editor_data]" 0862 05ae | | .STRTAB 0x05ae->0x0b39 ; "!Machine.[groups,users]" 0863 05c3 | | .STRTAB 0x05c3->0x0b44 ; "{W}" 0864 05c4 | | .STRTAB 0x05c4->0x0b46 ; "!Machine.[Mail,Transfer].[??,~Distribute]'c(world)" 0865 05f4 | | .STRTAB 0x05f4->0x0b5f ; "!Machine.[Mail,Transfer].Distribute'c(world)" 0866 061e | | .STRTAB 0x061e->0x0b75 ; "!Machine.Release??'c(world)" 0867 0637 | 7 | .STRTAB 0x0637->0x0b82 ; "!Machine.Search_Lists" 0868 064a | J | .STRTAB 0x064a->0x0b8d ; "!machine.sims" 0869 0655 | U | .STRTAB 0x0655->0x0b93 ; "!machine.sims.master" 086a 0667 | g | .STRTAB 0x0667->0x0b9d ; "!Machine.sims.[database,detail]" 086b 0684 | | .STRTAB 0x0684->0x0bad ; "!Machine.sims.to_rational.@'c(world)" 086c 06a6 | | .STRTAB 0x06a6->0x0bbf ; "!Machine.Temporary" 086d 06b6 | | .STRTAB 0x06b6->0x0bc8 ; "!model.??'c(world)" 086e 06c6 | | .STRTAB 0x06c6->0x0bd1 ; "Mailer=>RW" 086f 06ce | | .STRTAB 0x06ce->0x0bd6 ; "!Machine.[Mail,Transfer]??'c(world)" 0870 06ef | | .STRTAB 0x06ef->0x0be7 ; "Object ACL (Non-World)" 0871 0703 | | .STRTAB 0x0703->0x0bf2 ; "![commands,io,lrm,tools].?" 0872 071b | | .STRTAB 0x071b->0x0bff ; "!commands.abbreviations.?" 0873 0732 | 2 | .STRTAB 0x0732->0x0c0c ; "![compiler_interface,implementation].?" 0874 0756 | V | .STRTAB 0x0756->0x0c1f ; "!compiler_interface.subsystem_interface" 0875 077b | { | .STRTAB 0x077b->0x0c32 ; "!machine.@'c(ada)" 0876 078a | | .STRTAB 0x078a->0x0c3b ; "!machine.[cg_data,editor_data].@" 0877 07a8 | | .STRTAB 0x07a8->0x0c4b ; "!machine.[initialization,initialization.[site,rational]].?" 0878 07e0 | | .STRTAB 0x07e0->0x0c68 ; "!Machine.Accounting.@" 0879 07f3 | | .STRTAB 0x07f3->0x0c72 ; "!Machine.Error_Logs.[@,~Mail_Distribute_Server@]" 087a 0821 | ! | .STRTAB 0x0821->0x0c8a ; "!Machine.Error_Logs.Mail_Distribute_Server@" 087b 084a | J | .STRTAB 0x084a->0x0ca0 ; "!Machine.Machine_Name" 087c 085d | ] | .STRTAB 0x085d->0x0caa ; "!Machine.[Mail,Transfer].[??,~Distribute.??]" 087d 0887 | | .STRTAB 0x0887->0x0cc0 ; "!Machine.[Mail,Transfer].Distribute.??" 087e 08ab | | .STRTAB 0x08ab->0x0cd3 ; "!Machine.release.??'c(file,ada)" 087f 08c8 | | .STRTAB 0x08c8->0x0ce3 ; "!Machine.Search_lists.@" 0880 08dd | | .STRTAB 0x08dd->0x0cee ; "!Machine.sims.@'c(ada,file)" 0881 08f6 | | .STRTAB 0x08f6->0x0cfc ; "!Machine.sims.[master,to_rational].@'c(ada,file)" 0882 0924 | $ | .STRTAB 0x0924->0x0d14 ; "!Machine.sims.[database,detail]@'c(ada,file)" 0883 094e | N | .STRTAB 0x094e->0x0d2a ; "!Machine.sims.to_rational.@'c(ada,file)" 0884 0973 | s | .STRTAB 0x0973->0x0d3d ; "!Machine.Switch_Definitions" 0885 098c | | .STRTAB 0x098c->0x0d4b ; "!machine.temporary.@" 0886 099e | | .STRTAB 0x099e->0x0d55 ; "!Users.@.Mailbox.Main_@" 0887 09b3 | | .STRTAB 0x09b3->0x0d60 ; "Add " 0888 09b5 | | .STRTAB 0x09b5->0x0d62 ; "," 0889 09b4 | | .STRTAB 0x09b4->0x0d63 ; "Network_Public=>" 088a 09c2 | | .STREND 0x09c2->0x0d6b 088b 4e6f 6e65 |None| .STRTAB_STRINGS 0d6b 0000 0000 | | .BLANK 0000[0x5] 0d70 ; -------------------------------------------------------------------------------------- 0d70 ; Debug Table 0d70 ; -------------------------------------------------------------------------------------- 0d70 0004 000d | | .DEBUG4 0x0004,0x000d,0xe986,0x0000,0x0001,0x0000 0d76 0000 06a0 | | .XXX[0x6] 0d78 0001 0404 | | 0d7a 0800 0888 | | 0d7c 0000 0000 | | .BLANK 0000[0xa] 0d86 004e e8b5 | N | .XXX[0x2] 0d88 0000 0000 | | .BLANK 0000[0x7] 0d8f 0048 | H | .XXX[0x1] 0d90 0000 0000 | | .BLANK 0000[0x8] 0d98 0014 a4fe | | .XXX[0x5] 0d9a 0800 0480 | | 0d9c 8000 | | 0d9d 0000 0000 | | .BLANK 0000[0x9] 0da6 004e e8b5 | N | .XXX[0x2] 0da8 0000 0000 | | .BLANK 0000[0x7] 0daf 0054 | T | .XXX[0x1] 0db0 0000 0000 | | .BLANK 0000[0x8] 0db8 0014 a4fe | | .XXX[0x5] 0dba 0800 0600 | | 0dbc 8000 | | 0dbd 0000 0000 | | .BLANK 0000[0x9] 0dc6 004e e8b5 | N | .XXX[0x2] 0dc8 0000 0000 | | .BLANK 0000[0x7] 0dcf 0060 | ` | .XXX[0x1] 0dd0 0000 0000 | | .BLANK 0000[0x8] 0dd8 0001 0404 | | .XXX[0x5] 0dda 0000 0280 | | 0ddc 8000 | | 0ddd 0000 0000 | | .BLANK 0000[0x9] 0de6 004e e8b5 | N | .XXX[0x2] 0de8 0000 0000 | | .BLANK 0000[0x7] 0def 006c | l | .XXX[0x1] 0df0 0000 0000 | | .BLANK 0000[0x8] 0df8 0001 0404 | | .XXX[0x8] 0dfa 0000 0700 | | 0dfc 8000 0000 | | 0dfe 0000 0000 | |