|
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: 2048 (0x800)
Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_1060f5
└─⟦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 02d0 | | .CONST 0x02d0 ; Offset of debug table 0004 0100 | | .CONST 0x0100 ; Default exception handler - raise instruction 0005 00bb | | .CONST 0x00bb ; Module termination instruction - signal completion 0006 0000 | | .CONST 0x0000 ; Offset to segment table (only in elab segments) 0007 8001 | | .CONST 0x8001 ; 0, wired, #pages in seg - 1) 0008 ; -------------------------------------------------------------------------------------- 0008 ; SUBPROGRAM 0008 ; -------------------------------------------------------------------------------------- 0008 002c | , | .CONST 0x002c ; Address of begin 0009 0004 | | .CONST 0x0004 ; Address of exception handler 000a 000a | | .CONST 0x000a ; Number of locals 000b INIT_0008: 000b e051 | Q | Load 0x0,0x51 000c 1b0f | | Execute Package,Field_Read,Field_Number 0xf 000d 02a0 | | Declare_Subprogram Null_Subprogram 000e 4818 |H | Short_Literal 0x18 000f 03d3 | | Declare_Type Access,Defined,Accesses_Protected 0010 00e1 | | Load_Encached Boolean_Cache 0011 4900 |I | Short_Literal 0x100 0012 e010 | | Load 0x0,0x10 0013 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0014 1c08 | | Execute_Immediate Run_Utility,0x8 0015 00d8 | | Load_Top At_Offset_0 0016 1c00 | | Execute_Immediate Run_Utility,0x0 0017 e230 | 0 | Load 0x1,0x30 0018 0322 | " | Declare_Variable Record 0019 00d8 | | Load_Top At_Offset_0 001a 1c00 | | Execute_Immediate Run_Utility,0x0 001b 4900 |I | Short_Literal 0x100 001c e010 | | Load 0x0,0x10 001d 1b0e | | Execute Package,Field_Read,Field_Number 0xe 001e 1c08 | | Execute_Immediate Run_Utility,0x8 001f 00d8 | | Load_Top At_Offset_0 0020 1c00 | | Execute_Immediate Run_Utility,0x0 0021 e00f | | Load 0x0,0xf 0022 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0023 1b11 | | Execute Package,Field_Read,Field_Number 0x11 0024 e22c | , | Load 0x1,0x2c 0025 0322 | " | Declare_Variable Record 0026 00d8 | | Load_Top At_Offset_0 0027 1c00 | | Execute_Immediate Run_Utility,0x0 0028 029f 009b | | Declare_Subprogram INIT_0098,For_Call 002a 029f 00c3 | | Declare_Subprogram INIT_00c0,For_Call 002c BODY_0008: 002c e5fb | | Load 0x2,-0x5 002d e010 | | Load 0x0,0x10 002e 1814 | | Execute Package,Field_Execute,Field_Number 0x14 002f e009 | | Load 0x0,0x9 0030 186e | n | Execute Package,Field_Execute,Field_Number 0x6e 0031 e5fc | | Load 0x2,-0x4 0032 e010 | | Load 0x0,0x10 0033 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0034 e009 | | Load 0x0,0x9 0035 186d | m | Execute Package,Field_Execute,Field_Number 0x6d 0036 4801 |H | Short_Literal 0x1 0037 0092 0227 | '| Action Push_String_Extended,0x227 ; ">>FILE NAME<<" 0039 e5fe | | Load 0x2,-0x2 003a e057 | W | Load 0x0,0x57 003b 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 003c 6807 |h | Jump_Zero 0x44 003d 4801 |H | Short_Literal 0x1 003e e5fe | | Load 0x2,-0x2 003f 0092 0228 | (| Action Push_String_Extended,0x228 ; "library" 0041 e05f | _ | Load 0x0,0x5f 0042 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36 0043 7805 |x | Jump 0x49 0044 e404 | | Load 0x2,0x4 0045 e5fe | | Load 0x2,-0x2 0046 e010 | | Load 0x0,0x10 0047 1810 | | Execute Package,Field_Execute,Field_Number 0x10 0048 00d1 | | Pop_Control Pop_Count_1 0049 e405 | | Load 0x2,0x5 004a e404 | | Load 0x2,0x4 004b 8252 | R | Call 0x1,0x52 004c 00d1 | | Pop_Control Pop_Count_1 004d e405 | | Load 0x2,0x5 004e 3403 |4 | Execute Record,Field_Reference,Field_Number 0x3 004f 2c01 |, | Execute Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1 0050 6803 |h | Jump_Zero 0x54 0051 e04e | N | Load 0x0,0x4e 0052 1b0e | | Execute Package,Field_Read,Field_Number 0xe 0053 0257 | W | Execute Discrete,Raise 0054 e405 | | Load 0x2,0x5 0055 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0056 e010 | | Load 0x0,0x10 0057 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0058 834f | O | Call 0x1,0x14f 0059 a403 | | Store_Unchecked 0x2,0x3 005a e405 | | Load 0x2,0x5 005b 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 005c e406 | | Load 0x2,0x6 005d 016d | m | Execute Variant_Record,Structure_Write 005e 4801 |H | Short_Literal 0x1 005f e406 | | Load 0x2,0x6 0060 e010 | | Load 0x0,0x10 0061 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0062 0f21 | ! | Execute_Immediate Equal,0x21 0063 6806 |h | Jump_Zero 0x6a 0064 e406 | | Load 0x2,0x6 0065 4801 |H | Short_Literal 0x1 0066 4801 |H | Short_Literal 0x1 0067 e010 | | Load 0x0,0x10 0068 181f | | Execute Package,Field_Execute,Field_Number 0x1f 0069 00d1 | | Pop_Control Pop_Count_1 006a 00cf | | Action Mark_Auxiliary 006b 4801 |H | Short_Literal 0x1 006c e406 | | Load 0x2,0x6 006d e010 | | Load 0x0,0x10 006e 1825 | % | Execute Package,Field_Execute,Field_Number 0x25 006f 0264 | d | Execute Discrete,Below_Bound 0070 700f |p | Jump_Nonzero 0x80 0071 00d8 | | Load_Top At_Offset_0 0072 e406 | | Load 0x2,0x6 0073 e010 | | Load 0x0,0x10 0074 1826 | & | Execute Package,Field_Execute,Field_Number 0x26 0075 0f2e | . | Execute_Immediate Equal,0x2e 0076 6807 |h | Jump_Zero 0x7e 0077 e406 | | Load 0x2,0x6 0078 00d9 | | Load_Top At_Offset_1 0079 4801 |H | Short_Literal 0x1 007a e010 | | Load 0x0,0x10 007b 181f | | Execute Package,Field_Execute,Field_Number 0x1f 007c 00d3 | | Pop_Control Pop_Count_3 007d 7802 |x | Jump 0x80 007e 00c8 | | Action Pop_Auxiliary_Range 007f 37f1 |7 | Loop_Decreasing 0x71 0080 00ce | | Action Pop_Auxiliary 0081 e403 | | Load 0x2,0x3 0082 e5f9 | | Load 0x2,-0x7 0083 0f00 | | Execute_Immediate Equal,0x0 0084 0279 | y | Execute Discrete,And 0085 680c |h | Jump_Zero 0x92 0086 e5fa | | Load 0x2,-0x6 0087 6805 |h | Jump_Zero 0x8d 0088 e405 | | Load 0x2,0x5 0089 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 008a e009 | | Load 0x0,0x9 008b 1853 | S | Execute Package,Field_Execute,Field_Number 0x53 008c 7805 |x | Jump 0x92 008d 0092 0229 | )| Action Push_String_Extended,0x229 ; "The Diagram Name specified already exists and Overwrite => False, a new diagram will not be generated" 008f e052 | R | Load 0x0,0x52 0090 1814 | | Execute Package,Field_Execute,Field_Number 0x14 0091 450a |E | Exit_Suprogram New_Top_Offset 0xa 0092 8409 | | Call 0x2,0x9 0093 e5f9 | | Load 0x2,-0x7 0094 7001 |p | Jump_Nonzero 0x96 0095 840a | | Call 0x2,0xa 0096 450a |E | Exit_Suprogram New_Top_Offset 0xa 0097 0000 | | .XXX[0x1] 0098 ; -------------------------------------------------------------------------------------- 0098 ; SUBPROGRAM 0098 ; -------------------------------------------------------------------------------------- 0098 009b | | .CONST 0x009b ; Address of begin 0099 00a7 | | .CONST 0x00a7 ; Address of exception handler 009a 0001 | | .CONST 0x0001 ; Number of locals 009b BODY_0098: 009b INIT_0098: 009b e00f | | Load 0x0,0xf 009c 1b0e | | Execute Package,Field_Read,Field_Number 0xe 009d 1b11 | | Execute Package,Field_Read,Field_Number 0x11 009e e5f9 | | Load 0x2,-0x7 009f e5ff | | Load 0x2,-0x1 00a0 e010 | | Load 0x0,0x10 00a1 1814 | | Execute Package,Field_Execute,Field_Number 0x14 00a2 e009 | | Load 0x0,0x9 00a3 187d | } | Execute Package,Field_Execute,Field_Number 0x7d 00a4 e408 | | Load 0x2,0x8 00a5 3800 |8 | Execute Record,Field_Write,Field_Number 0x0 00a6 4501 |E | Exit_Suprogram New_Top_Offset 0x1 00a7 TRAP_0098: 00a7 e04e | N | Load 0x0,0x4e 00a8 1b0e | | Execute Package,Field_Read,Field_Number 0xe 00a9 010f | | Execute Exception,Equal 00aa 680e |h | Jump_Zero 0xb9 00ab e04e | N | Load 0x0,0x4e 00ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00ad 8226 | & | Call 0x1,0x26 00ae e408 | | Load 0x2,0x8 00af 3801 |8 | Execute Record,Field_Write,Field_Number 0x1 00b0 e408 | | Load 0x2,0x8 00b1 3401 |4 | Execute Record,Field_Reference,Field_Number 0x1 00b2 2602 |& | Execute Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2 00b3 e010 | | Load 0x0,0x10 00b4 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00b5 e052 | R | Load 0x0,0x52 00b6 1815 | | Execute Package,Field_Execute,Field_Number 0x15 00b7 00d8 | | Load_Top At_Offset_0 00b8 0101 | | Execute Exception,Reraise 00b9 0100 | | Execute Exception,Raise 00ba 0000 0000 | | .BLANK 0000[0x6] 00c0 ; -------------------------------------------------------------------------------------- 00c0 ; SUBPROGRAM 00c0 ; -------------------------------------------------------------------------------------- 00c0 00ec | | .CONST 0x00ec ; Address of begin 00c1 0128 | ( | .CONST 0x0128 ; Address of exception handler 00c2 0010 | | .CONST 0x0010 ; Number of locals 00c3 INIT_00c0: 00c3 00e9 | | Load_Encached String_Cache 00c4 02a0 | | Declare_Subprogram Null_Subprogram 00c5 4818 |H | Short_Literal 0x18 00c6 03d3 | | Declare_Type Access,Defined,Accesses_Protected 00c7 e056 | V | Load 0x0,0x56 00c8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00c9 02c7 | | Declare_Variable Any 00ca 00d8 | | Load_Top At_Offset_0 00cb 1c00 | | Execute_Immediate Run_Utility,0x0 00cc 00d9 | | Load_Top At_Offset_1 00cd 0007 | | Action Break_Optional 00ce e056 | V | Load 0x0,0x56 00cf 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00d0 02c7 | | Declare_Variable Any 00d1 00d8 | | Load_Top At_Offset_0 00d2 1c00 | | Execute_Immediate Run_Utility,0x0 00d3 00db | | Load_Top At_Offset_3 00d4 0007 | | Action Break_Optional 00d5 e05e | ^ | Load 0x0,0x5e 00d6 1817 | | Execute Package,Field_Execute,Field_Number 0x17 00d7 e056 | V | Load 0x0,0x56 00d8 1b0d | | Execute Package,Field_Read,Field_Number 0xd 00d9 02c7 | | Declare_Variable Any 00da 00d8 | | Load_Top At_Offset_0 00db 1c00 | | Execute_Immediate Run_Utility,0x0 00dc e602 | | Load 0x3,0x2 00dd 0007 | | Action Break_Optional 00de 00d8 | | Load_Top At_Offset_0 00df 0007 | | Action Break_Optional 00e0 029f 0133 | 3| Declare_Subprogram INIT_0130,For_Call 00e2 029f 0143 | C| Declare_Subprogram INIT_0140,For_Call 00e4 029f 0153 | S| Declare_Subprogram INIT_0150,For_Call 00e6 029f 0163 | c| Declare_Subprogram INIT_0160,For_Call 00e8 029f 0193 | | Declare_Subprogram INIT_0190,For_Call 00ea 029f 01ab | | Declare_Subprogram INIT_01a8,For_Call 00ec BODY_00c0: 00ec e408 | | Load 0x2,0x8 00ed 3c00 |< | Execute Record,Field_Read,Field_Number 0x0 00ee 860f | | Call 0x3,0xf 00ef e061 | a | Load 0x0,0x61 00f0 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00f1 e60a | | Load 0x3,0xa 00f2 860e | | Call 0x3,0xe 00f3 c60a | | Store 0x3,0xa 00f4 0092 022a | *| Action Push_String_Extended,0x22a ; "Calling Illustrator to layout diagram" 00f6 e052 | R | Load 0x0,0x52 00f7 1813 | | Execute Package,Field_Execute,Field_Number 0x13 00f8 e5f7 | | Load 0x2,-0x9 00f9 e5f8 | | Load 0x2,-0x8 00fa 0092 022b | +| Action Push_String_Extended,0x22b ; "<DEFAULT>" 00fc e604 | | Load 0x3,0x4 00fd 0227 | ' | Execute Access,All_Reference 00fe 860b | | Call 0x3,0xb 00ff e060 | ` | Load 0x0,0x60 0100 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0101 e606 | | Load 0x3,0x6 0102 e605 | | Load 0x3,0x5 0103 4801 |H | Short_Literal 0x1 0104 860d | | Call 0x3,0xd 0105 c605 | | Store 0x3,0x5 0106 c606 | | Store 0x3,0x6 0107 e605 | | Load 0x3,0x5 0108 e056 | V | Load 0x0,0x56 0109 181b | | Execute Package,Field_Execute,Field_Number 0x1b 010a c605 | | Store 0x3,0x5 010b 0092 022c | ,| Action Push_String_Extended,0x22c ; "Calling Illustrator to retrieve and delete formatted diagram" 010d e052 | R | Load 0x0,0x52 010e 1813 | | Execute Package,Field_Execute,Field_Number 0x13 010f e5f7 | | Load 0x2,-0x9 0110 e5f8 | | Load 0x2,-0x8 0111 e606 | | Load 0x3,0x6 0112 0227 | ' | Execute Access,All_Reference 0113 0092 022d | -| Action Push_String_Extended,0x22d ; "<NONE>" 0115 860c | | Call 0x3,0xc 0116 e060 | ` | Load 0x0,0x60 0117 1816 | | Execute Package,Field_Execute,Field_Number 0x16 0118 e00f | | Load 0x0,0xf 0119 1b0e | | Execute Package,Field_Read,Field_Number 0xe 011a 1b11 | | Execute Package,Field_Read,Field_Number 0x11 011b e5fd | | Load 0x2,-0x3 011c e606 | | Load 0x3,0x6 011d 0227 | ' | Execute Access,All_Reference 011e 8610 | | Call 0x3,0x10 011f c407 | | Store 0x2,0x7 0120 e407 | | Load 0x2,0x7 0121 e405 | | Load 0x2,0x5 0122 3400 |4 | Execute Record,Field_Reference,Field_Number 0x0 0123 e009 | | Load 0x0,0x9 0124 184e | N | Execute Package,Field_Execute,Field_Number 0x4e 0125 e061 | a | Load 0x0,0x61 0126 180f | | Execute Package,Field_Execute,Field_Number 0xf 0127 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0128 TRAP_00c0: 0128 0007 | | Action Break_Optional 0129 e061 | a | Load 0x0,0x61 012a 180f | | Execute Package,Field_Execute,Field_Number 0xf 012b 00d8 | | Load_Top At_Offset_0 012c 0101 | | Execute Exception,Reraise 012d 0000 0000 | | .XXX[0x3] 012f 0000 | | 0130 ; -------------------------------------------------------------------------------------- 0130 ; SUBPROGRAM 0130 ; -------------------------------------------------------------------------------------- 0130 0133 | 3 | .CONST 0x0133 ; Address of begin 0131 0004 | | .CONST 0x0004 ; Address of exception handler 0132 0001 | | .CONST 0x0001 ; Number of locals 0133 BODY_0130: 0133 INIT_0130: 0133 e05e | ^ | Load 0x0,0x5e 0134 180e | | Execute Package,Field_Execute,Field_Number 0xe 0135 0092 022e | .| Action Push_String_Extended,0x22e ; " > " 0137 01cc | | Execute Vector,Catenate 0138 e60a | | Load 0x3,0xa 0139 0227 | ' | Execute Access,All_Reference 013a 01cc | | Execute Vector,Catenate 013b 00ca | | Action Exit_Nullary_Function 013c 0000 0000 | | .BLANK 0000[0x4] 0140 ; -------------------------------------------------------------------------------------- 0140 ; SUBPROGRAM 0140 ; -------------------------------------------------------------------------------------- 0140 0143 | C | .CONST 0x0143 ; Address of begin 0141 0004 | | .CONST 0x0004 ; Address of exception handler 0142 0001 | | .CONST 0x0001 ; Number of locals 0143 BODY_0140: 0143 INIT_0140: 0143 0092 022f | /| Action Push_String_Extended,0x22f ; "/bin/cat " 0145 e60a | | Load 0x3,0xa 0146 0227 | ' | Execute Access,All_Reference 0147 01cc | | Execute Vector,Catenate 0148 0092 0230 | 0| Action Push_String_Extended,0x230 ; "; /bin/rm " 014a 01cc | | Execute Vector,Catenate 014b e60a | | Load 0x3,0xa 014c 0227 | ' | Execute Access,All_Reference 014d 01cc | | Execute Vector,Catenate 014e 00ca | | Action Exit_Nullary_Function 014f 0000 | | .XXX[0x1] 0150 ; -------------------------------------------------------------------------------------- 0150 ; SUBPROGRAM 0150 ; -------------------------------------------------------------------------------------- 0150 0155 | U | .CONST 0x0155 ; Address of begin 0151 0004 | | .CONST 0x0004 ; Address of exception handler 0152 0002 | | .CONST 0x0002 ; Number of locals 0153 INIT_0150: 0153 029f 020b | | Declare_Subprogram INIT_0208,For_Call 0155 BODY_0150: 0155 e9fe | | Load 0x4,-0x2 0156 00ea | | Load_Encached Null_String_Cache 0157 00ea | | Load_Encached Null_String_Cache 0158 e9ff | | Load 0x4,-0x1 0159 e056 | V | Load 0x0,0x56 015a 1814 | | Execute Package,Field_Execute,Field_Number 0x14 015b c9fe | | Store 0x4,-0x2 015c 8802 | | Call 0x4,0x2 015d 4502 |E | Exit_Suprogram New_Top_Offset 0x2 015e 0000 0000 | | .XXX[0x2] 0160 ; -------------------------------------------------------------------------------------- 0160 ; SUBPROGRAM 0160 ; -------------------------------------------------------------------------------------- 0160 0165 | e | .CONST 0x0165 ; Address of begin 0161 0004 | | .CONST 0x0004 ; Address of exception handler 0162 0002 | | .CONST 0x0002 ; Number of locals 0163 INIT_0160: 0163 029f 021b | | Declare_Subprogram INIT_0218,For_Call 0165 BODY_0160: 0165 e609 | | Load 0x3,0x9 0166 e608 | | Load 0x3,0x8 0167 4801 |H | Short_Literal 0x1 0168 860d | | Call 0x3,0xd 0169 c608 | | Store 0x3,0x8 016a c609 | | Store 0x3,0x9 016b e608 | | Load 0x3,0x8 016c e056 | V | Load 0x0,0x56 016d 181b | | Execute Package,Field_Execute,Field_Number 0x1b 016e c608 | | Store 0x3,0x8 016f 0092 0231 | 1| Action Push_String_Extended,0x231 ; "Calling Illustrator to get remote temporary filename" 0171 e052 | R | Load 0x0,0x52 0172 1813 | | Execute Package,Field_Execute,Field_Number 0x13 0173 e5f7 | | Load 0x2,-0x9 0174 e5f8 | | Load 0x2,-0x8 0175 e609 | | Load 0x3,0x9 0176 0227 | ' | Execute Access,All_Reference 0177 0092 022b | +| Action Push_String_Extended,0x22b ; "<DEFAULT>" 0179 e607 | | Load 0x3,0x7 017a e060 | ` | Load 0x0,0x60 017b 1816 | | Execute Package,Field_Execute,Field_Number 0x16 017c e608 | | Load 0x3,0x8 017d 00ea | | Load_Encached Null_String_Cache 017e e609 | | Load 0x3,0x9 017f 0227 | ' | Execute Access,All_Reference 0180 4800 |H | Short_Literal 0x0 0181 e056 | V | Load 0x0,0x56 0182 1815 | | Execute Package,Field_Execute,Field_Number 0x15 0183 c608 | | Store 0x3,0x8 0184 8802 | | Call 0x4,0x2 0185 e608 | | Load 0x3,0x8 0186 e056 | V | Load 0x0,0x56 0187 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0188 c608 | | Store 0x3,0x8 0189 4501 |E | Exit_Suprogram New_Top_Offset 0x1 018a 0000 0000 | | .BLANK 0000[0x6] 0190 ; -------------------------------------------------------------------------------------- 0190 ; SUBPROGRAM 0190 ; -------------------------------------------------------------------------------------- 0190 0193 | | .CONST 0x0193 ; Address of begin 0191 0004 | | .CONST 0x0004 ; Address of exception handler 0192 0001 | | .CONST 0x0001 ; Number of locals 0193 BODY_0190: 0193 INIT_0190: 0193 e604 | | Load 0x3,0x4 0194 e603 | | Load 0x3,0x3 0195 4801 |H | Short_Literal 0x1 0196 860d | | Call 0x3,0xd 0197 c603 | | Store 0x3,0x3 0198 c604 | | Store 0x3,0x4 0199 00da | | Load_Top At_Offset_2 019a e00f | | Load 0x0,0xf 019b 1b0e | | Execute Package,Field_Read,Field_Number 0xe 019c 1816 | | Execute Package,Field_Execute,Field_Number 0x16 019d e603 | | Load 0x3,0x3 019e e056 | V | Load 0x0,0x56 019f 1863 | c | Execute Package,Field_Execute,Field_Number 0x63 01a0 e603 | | Load 0x3,0x3 01a1 e056 | V | Load 0x0,0x56 01a2 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01a3 c603 | | Store 0x3,0x3 01a4 4502 |E | Exit_Suprogram New_Top_Offset 0x2 01a5 0000 0000 | | .XXX[0x3] 01a7 0000 | | 01a8 ; -------------------------------------------------------------------------------------- 01a8 ; SUBPROGRAM 01a8 ; -------------------------------------------------------------------------------------- 01a8 01bd | | .CONST 0x01bd ; Address of begin 01a9 01f7 | | .CONST 0x01f7 ; Address of exception handler 01aa 0006 | | .CONST 0x0006 ; Number of locals 01ab INIT_01a8: 01ab e056 | V | Load 0x0,0x56 01ac 1b0d | | Execute Package,Field_Read,Field_Number 0xd 01ad 02c7 | | Declare_Variable Any 01ae 00d8 | | Load_Top At_Offset_0 01af 1c00 | | Execute_Immediate Run_Utility,0x0 01b0 00e8 | | Load_Encached Character_Cache 01b1 e00f | | Load 0x0,0xf 01b2 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01b3 182b | + | Execute Package,Field_Execute,Field_Number 0x2b 01b4 00e3 | | Load_Encached Natural_Cache 01b5 4801 |H | Short_Literal 0x1 01b6 00ea | | Load_Encached Null_String_Cache 01b7 e9fe | | Load 0x4,-0x2 01b8 e057 | W | Load 0x0,0x57 01b9 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21 01ba 0f00 | | Execute_Immediate Equal,0x0 01bb 00e1 | | Load_Encached Boolean_Cache 01bc 03f1 | | Declare_Variable Discrete,With_Value 01bd BODY_01a8: 01bd e802 | | Load 0x4,0x2 01be 00ea | | Load_Encached Null_String_Cache 01bf e9ff | | Load 0x4,-0x1 01c0 4800 |H | Short_Literal 0x0 01c1 e056 | V | Load 0x0,0x56 01c2 1815 | | Execute Package,Field_Execute,Field_Number 0x15 01c3 c802 | | Store 0x4,0x2 01c4 00cf | | Action Mark_Auxiliary 01c5 7825 |x% | Jump 0x1eb 01c6 e802 | | Load 0x4,0x2 01c7 e056 | V | Load 0x0,0x56 01c8 1843 | C | Execute Package,Field_Execute,Field_Number 0x43 01c9 6807 |h | Jump_Zero 0x1d1 01ca 00db | | Load_Top At_Offset_3 01cb 4801 |H | Short_Literal 0x1 01cc 480a |H | Short_Literal 0xa 01cd e00f | | Load 0x0,0xf 01ce 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01cf 181f | | Execute Package,Field_Execute,Field_Number 0x1f 01d0 c804 | | Store 0x4,0x4 01d1 00e8 | | Load_Encached Character_Cache 01d2 e802 | | Load 0x4,0x2 01d3 e056 | V | Load 0x0,0x56 01d4 1857 | W | Execute Package,Field_Execute,Field_Number 0x57 01d5 c803 | | Store 0x4,0x3 01d6 00db | | Load_Top At_Offset_3 01d7 4801 |H | Short_Literal 0x1 01d8 e803 | | Load 0x4,0x3 01d9 e00f | | Load 0x0,0xf 01da 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01db 181f | | Execute Package,Field_Execute,Field_Number 0x1f 01dc c804 | | Store 0x4,0x4 01dd 00d9 | | Load_Top At_Offset_1 01de 680b |h | Jump_Zero 0x1ea 01df e803 | | Load 0x4,0x3 01e0 0f22 | " | Execute_Immediate Equal,0x22 01e1 6808 |h | Jump_Zero 0x1ea 01e2 4800 |H | Short_Literal 0x0 01e3 0052 | R | Store_Top_Unchecked Discrete,At_Offset_2 01e4 00db | | Load_Top At_Offset_3 01e5 e9fe | | Load 0x4,-0x2 01e6 e00f | | Load 0x0,0xf 01e7 1b0e | | Execute Package,Field_Read,Field_Number 0xe 01e8 181d | | Execute Package,Field_Execute,Field_Number 0x1d 01e9 c804 | | Store 0x4,0x4 01ea 00c9 | | Action Pop_Auxiliary_Loop 01eb e802 | | Load 0x4,0x2 01ec e056 | V | Load 0x0,0x56 01ed 184b | K | Execute Package,Field_Execute,Field_Number 0x4b 01ee 6fd7 |o | Jump_Zero 0x1c6 01ef 00ce | | Action Pop_Auxiliary 01f0 e802 | | Load 0x4,0x2 01f1 e056 | V | Load 0x0,0x56 01f2 181b | | Execute Package,Field_Execute,Field_Number 0x1b 01f3 c802 | | Store 0x4,0x2 01f4 00da | | Load_Top At_Offset_2 01f5 a9fd | | Store_Unchecked 0x4,-0x3 01f6 4503 |E | Exit_Suprogram New_Top_Offset 0x3 01f7 TRAP_01a8: 01f7 00d8 | | Load_Top At_Offset_0 01f8 0107 | | Execute Exception,Get_Name 01f9 4950 |IP | Short_Literal 0x150 01fa 495f |I_ | Short_Literal 0x15f 01fb 0262 | b | Execute Discrete,In_Range 01fc 6807 |h | Jump_Zero 0x204 01fd e802 | | Load 0x4,0x2 01fe e056 | V | Load 0x0,0x56 01ff 181b | | Execute Package,Field_Execute,Field_Number 0x1b 0200 c802 | | Store 0x4,0x2 0201 00db | | Load_Top At_Offset_3 0202 a9fd | | Store_Unchecked 0x4,-0x3 0203 4503 |E | Exit_Suprogram New_Top_Offset 0x3 0204 00d8 | | Load_Top At_Offset_0 0205 0101 | | Execute Exception,Reraise 0206 0000 0000 | | .XXX[0x2] 0208 ; -------------------------------------------------------------------------------------- 0208 ; SUBPROGRAM 0208 ; -------------------------------------------------------------------------------------- 0208 020e | | .CONST 0x020e ; Address of begin 0209 0004 | | .CONST 0x0004 ; Address of exception handler 020a 0002 | | .CONST 0x0002 ; Number of locals 020b INIT_0208: 020b e9fe | | Load 0x4,-0x2 020c e056 | V | Load 0x0,0x56 020d 1820 | | Execute Package,Field_Execute,Field_Number 0x20 020e BODY_0208: 020e 00d8 | | Load_Top At_Offset_0 020f 01da | | Execute Vector,Bounds 0210 e602 | | Load 0x3,0x2 0211 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0212 a9fd | | Store_Unchecked 0x4,-0x3 0213 00d8 | | Load_Top At_Offset_0 0214 e9fd | | Load 0x4,-0x3 0215 0228 | ( | Execute Access,All_Write 0216 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0217 0000 | | .XXX[0x1] 0218 ; -------------------------------------------------------------------------------------- 0218 ; SUBPROGRAM 0218 ; -------------------------------------------------------------------------------------- 0218 021e | | .CONST 0x021e ; Address of begin 0219 0004 | | .CONST 0x0004 ; Address of exception handler 021a 0002 | | .CONST 0x0002 ; Number of locals 021b INIT_0218: 021b e608 | | Load 0x3,0x8 021c e056 | V | Load 0x0,0x56 021d 1866 | f | Execute Package,Field_Execute,Field_Number 0x66 021e BODY_0218: 021e 00d8 | | Load_Top At_Offset_0 021f 01da | | Execute Vector,Bounds 0220 e602 | | Load 0x3,0x2 0221 03ba | | Declare_Variable Access,By_Allocation,With_Constraint 0222 a9ff | | Store_Unchecked 0x4,-0x1 0223 00d8 | | Load_Top At_Offset_0 0224 e9ff | | Load 0x4,-0x1 0225 0228 | ( | Execute Access,All_Write 0226 4501 |E | Exit_Suprogram New_Top_Offset 0x1 0227 ; -------------------------------------------------------------------------------------- 0227 ; STRING TABLE 0227 ; -------------------------------------------------------------------------------------- 0227 0018 | | .STRTAB 0x0018->0x0233 ; ">>FILE NAME<<" 0228 0023 | # | .STRTAB 0x0023->0x0239 ; "library" 0229 0028 | ( | .STRTAB 0x0028->0x023d ; "The Diagram Name specified already exists and Overwrite => False, a new diagram will not be generated" 022a 008b | | .STRTAB 0x008b->0x026f ; "Calling Illustrator to layout diagram" 022b 00ae | | .STRTAB 0x00ae->0x0282 ; "<DEFAULT>" 022c 00b5 | | .STRTAB 0x00b5->0x0286 ; "Calling Illustrator to retrieve and delete formatted diagram" 022d 00ef | | .STRTAB 0x00ef->0x02a4 ; "<NONE>" 022e 00f3 | | .STRTAB 0x00f3->0x02a7 ; " > " 022f 00f4 | | .STRTAB 0x00f4->0x02a9 ; "/bin/cat " 0230 00fb | | .STRTAB 0x00fb->0x02ad ; "; /bin/rm " 0231 0103 | | .STRTAB 0x0103->0x02b2 ; "Calling Illustrator to get remote temporary filename" 0232 0135 | 5 | .STREND 0x0135->0x02cc 0233 3e3e 4649 |>>FI| .STRTAB_STRINGS 02cd 0000 0000 | | .XXX[0x3] 02cf 0000 | | 02d0 ; -------------------------------------------------------------------------------------- 02d0 ; Debug Table 02d0 ; -------------------------------------------------------------------------------------- 02d0 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0fc9,0x0000,0x0001,0x0000 02d6 d0cc c30f | | .XXX[0x12a] 02d8 57f4 4a00 |W J | 02da cc01 00bf | | 02dc 4339 038f |C9 | 02de d500 fc0d | | 02e0 fe5c 13f4 | \ | 02e2 3102 5e9f |1 ^ | 02e4 d0cc 435c | C\| 02e6 fc0d 5ddf | ] | 02e8 a3f0 31b1 | 1 | 02ea 9890 d0d0 | | 02ec 80a6 1f3b | ;| 02ee 4300 5978 |C Yx| 02f0 d20f f801 | | 02f2 2828 3435 |((45| 02f4 0356 a4cc | V | 02f6 d140 727f | @r | 02f8 3f43 0324 |?C $| 02fa ac05 100f | | 02fc 59d7 a870 |Y p| 02fe 3572 aecb |5r | 0300 feba 95ce | | 0302 1f3b d28c | ; | 0304 a8b4 3741 | 7A| 0306 892a f4d1 | * | 0308 01d5 2c0c | , | 030a 71df a8b0 |q | 030c 34d3 d44b |4 K| 030e 00d3 c022 | "| 0310 9f3b 4f01 | ;O | 0312 cd7f f0cf | | 0314 779c ccd4 |w | 0316 0378 dffd | x | 0318 0db3 a930 | 0| 031a 3743 755e |7Cu^| 031c c4a9 7435 | t5| 031e 4377 5503 |CwU | 0320 b1f0 fadd | | 0322 6aaa d0d5 |j | 0324 0106 1f43 | C| 0326 5b03 a87c |[ || 0328 e97c 0f3f | | ?| 032a ffe2 7f95 | | 032c 7c0d e7d7 || | 032e e5f0 3543 | 5C| 0330 e760 0088 | ` | 0332 b004 c318 | | 0334 4adc 1240 |J @| 0336 3443 4764 |4CGd| 0338 03a9 fcf9 | | 033a 9c0d ef04 | | 033c 4674 3612 |Ft6 | 033e 1066 dcd9 | f | 0340 41c9 ac0c |A | 0342 6214 8e68 |b h| 0344 d901 b880 | | 0346 0010 3cd7 | < | 0348 46d8 054a |F J| 034a 5d8d 00b5 |] | 034c 01e6 d835 | 5| 034e 23c2 173a |# :| 0350 d806 1ad5 | | 0352 0f68 d983 | h | 0354 5e88 0190 |^ | 0356 00db 5971 | Yq| 0358 fb6c 0323 | l #| 035a 6be4 b344 |k D| 035c 03d1 ec01 | | 035e 2972 919f |)r | 0360 6c03 1c78 |l x| 0362 6a34 6c03 |j4l | 0364 40ef edc4 |@ | 0366 0c99 5f9c | _ | 0368 cdbb 0272 | r| 036a 980b a0fb | | 036c 8c1b b345 | E| 036e 4a02 c49c |J | 0370 5983 a230 |Y 0| 0372 6c81 222e |l ".| 0374 7f97 18a9 | | 0376 9a1e d1b9 | | 0378 019b 2647 | &G| 037a 5835 4182 |X5A | 037c d752 e806 | R | 037e 6c9a 6168 |l ah| 0380 df03 c888 | | 0382 0e50 01d0 | P | 0384 0f09 4674 | Ft| 0386 d1bd 00fb | | 0388 9a07 9837 | 7| 038a 0385 2342 | #B| 038c f004 da85 | | 038e 4e68 dc02 |Nh | 0390 b9d8 fbcc | | 0392 1941 6cd1 | Al | 0394 a378 035f | x _| 0396 7cdd 82bb || | 0398 d836 e35e | 6 ^| 039a 4342 f805 |CB | 039c 96fb 5064 | Pd| 039e e003 cf55 | U| 03a0 500c 1df3 |P | 03a2 f890 0382 | | 03a4 00b0 7ce2 | | | 03a6 03e4 5ce8 | \ | 03a8 0c1f e259 | Y| 03aa 09a3 8203 | | 03ac 814b abb0 | K | 03ae f699 282c | (,| 03b0 1f92 ef9a | | 03b2 0098 d1c7 | | 03b4 01ba a1d8 | | 03b6 9838 c18b | 8 | 03b8 c006 7d41 | }A| 03ba 34d1 c400 |4 | 03bc a118 6743 | gC| 03be 5a44 0220 |ZD | 03c0 0c91 d39c | | 03c2 cdc7 02b7 | | 03c4 b240 d839 | @ 9| 03c6 430c 400a |C @ | 03c8 559f 8e02 |U | 03ca fe2e 75b5 | .u | 03cc 621f cc6c |b l| 03ce 1d73 db41 | s A| 03d0 a38c 0187 | | 03d2 6fd9 b073 |o s| 03d4 c1b3 0a7a | z| 03d6 340c 21f6 |4 ! | 03d8 6d03 a864 |m d| 03da 98c3 aa97 | | 03dc 3c6c 1fd3 |<l | 03de f109 9f8c | | 03e0 010d 6fa9 | o | 03e2 b071 0388 | q | 03e4 46d6 340e |F 4 | 03e6 a195 9efd | | 03e8 c500 dcad | | 03ea d518 3a61 | :a| 03ec 50f0 0b75 |P u| 03ee 9f90 00c8 | | 03f0 54b7 43c9 |T C | 03f2 c82c 3276 | ,2v| 03f4 440c 6193 |D a | 03f6 9ccd cb00 | | 03f8 57a6 4158 |W AX| 03fa 39e1 b0e7 |9 | 03fc 4b28 06e6 |K( | 03fe fa59 68e4 | Yh |