|
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_0694fc
└─⟦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 da00 0030 | 0| .XXX[0x4] 02d8 32f8 f000 |2 | 02da 0000 0000 | | .BLANK 0000[0x17] 02f1 0018 001e | | .XXX[0x3] 02f3 4c08 |L | 02f4 0000 0000 | | .BLANK 0000[0xd] 0301 0020 0500 | | .XXX[0xc] 0303 0000 0000 | | 0305 0000 4000 | @ | 0307 0002 2000 | | 0309 0000 0100 | | 030b 0000 0a00 | | 030d 0000 0000 | | .BLANK 0000[0x2d] 033a 0004 00a0 | | .XXX[0xc] 033c 0000 0000 | | 033e 0000 0800 | | 0340 0000 4400 | D | 0342 0000 0020 | | 0344 0000 0140 | @| 0346 0000 0000 | | .BLANK 0000[0x2e] 0374 8014 0000 | | .XXX[0xb] 0376 0000 0000 | | 0378 0100 0000 | | 037a 0880 0000 | | 037c 0004 0000 | | 037e 0028 | ( | 037f 0000 0000 | | .BLANK 0000[0x2e] 03ad 1002 8000 | | .XXX[0xb] 03af 0000 0000 | | 03b1 0020 0000 | | 03b3 0110 0000 | | 03b5 0000 8000 | | 03b7 0005 | | 03b8 0000 0000 | | .BLANK 0000[0x48]