|
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 03f8 | | .CONST 0x03f8 ; 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 8002 | | .CONST 0x8002 ; 0, wired, #pages in seg - 1)
0008 ; --------------------------------------------------------------------------------------
0008 ; SUBPROGRAM
0008 ; --------------------------------------------------------------------------------------
0008 0048 | H | .CONST 0x0048 ; Address of begin
0009 0004 | | .CONST 0x0004 ; Address of exception handler
000a 0012 | | .CONST 0x0012 ; Number of locals
000b INIT_0008:
000b 00e9 | | Load_Encached String_Cache
000c 02a0 | | Declare_Subprogram Null_Subprogram
000d 4818 |H | Short_Literal 0x18
000e 03d3 | | Declare_Type Access,Defined,Accesses_Protected
000f 58dc |X | Indirect_Literal Float,0xec,1.0
0010 00e6 | | Load_Encached Float_Cache
0011 03df | | Declare_Variable Float,With_Value
0012 e00f | | Load 0x0,0xf
0013 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0014 1b11 | | Execute Package,Field_Read,Field_Number 0x11
0015 e04f | O | Load 0x0,0x4f
0016 1b0d | | Execute Package,Field_Read,Field_Number 0xd
0017 02c7 | | Declare_Variable Any
0018 00d8 | | Load_Top At_Offset_0
0019 1c00 | | Execute_Immediate Run_Utility,0x0
001a e230 | 0 | Load 0x1,0x30
001b 0322 | " | Declare_Variable Record
001c 00d8 | | Load_Top At_Offset_0
001d 1c00 | | Execute_Immediate Run_Utility,0x0
001e 00e1 | | Load_Encached Boolean_Cache
001f 4900 |I | Short_Literal 0x100
0020 e010 | | Load 0x0,0x10
0021 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0022 1c08 | | Execute_Immediate Run_Utility,0x8
0023 00d8 | | Load_Top At_Offset_0
0024 1c00 | | Execute_Immediate Run_Utility,0x0
0025 4900 |I | Short_Literal 0x100
0026 e010 | | Load 0x0,0x10
0027 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0028 1c08 | | Execute_Immediate Run_Utility,0x8
0029 00d8 | | Load_Top At_Offset_0
002a 1c00 | | Execute_Immediate Run_Utility,0x0
002b e056 | V | Load 0x0,0x56
002c 1b0d | | Execute Package,Field_Read,Field_Number 0xd
002d 02c7 | | Declare_Variable Any
002e 00d8 | | Load_Top At_Offset_0
002f 1c00 | | Execute_Immediate Run_Utility,0x0
0030 e402 | | Load 0x2,0x2
0031 0007 | | Action Break_Optional
0032 00d8 | | Load_Top At_Offset_0
0033 0007 | | Action Break_Optional
0034 e05e | ^ | Load 0x0,0x5e
0035 1817 | | Execute Package,Field_Execute,Field_Number 0x17
0036 4900 |I | Short_Literal 0x100
0037 e010 | | Load 0x0,0x10
0038 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0039 1c08 | | Execute_Immediate Run_Utility,0x8
003a 00d8 | | Load_Top At_Offset_0
003b 1c00 | | Execute_Immediate Run_Utility,0x0
003c 4900 |I | Short_Literal 0x100
003d e010 | | Load 0x0,0x10
003e 1b0e | | Execute Package,Field_Read,Field_Number 0xe
003f 1c08 | | Execute_Immediate Run_Utility,0x8
0040 00d8 | | Load_Top At_Offset_0
0041 1c00 | | Execute_Immediate Run_Utility,0x0
0042 029f 00f3 | | Declare_Subprogram INIT_00f0,For_Call
0044 029f 0103 | | Declare_Subprogram INIT_0100,For_Call
0046 029f 0133 | 3| Declare_Subprogram INIT_0130,For_Call
0048 BODY_0008:
0048 0092 02ff | | Action Push_String_Extended,0x2ff ; "$"
004a e010 | | Load 0x0,0x10
004b 1814 | | Execute Package,Field_Execute,Field_Number 0x14
004c e009 | | Load 0x0,0x9
004d 186e | n | Execute Package,Field_Execute,Field_Number 0x6e
004e e5ff | | Load 0x2,-0x1
004f e010 | | Load 0x0,0x10
0050 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0051 e009 | | Load 0x0,0x9
0052 186d | m | Execute Package,Field_Execute,Field_Number 0x6d
0053 4801 |H | Short_Literal 0x1
0054 0092 0300 | | Action Push_String_Extended,0x300 ; ">>DIAGRAM NAME<<"
0056 e5fe | | Load 0x2,-0x2
0057 e057 | W | Load 0x0,0x57
0058 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0059 6806 |h | Jump_Zero 0x60
005a 4801 |H | Short_Literal 0x1
005b e5fe | | Load 0x2,-0x2
005c 0092 0301 | | Action Push_String_Extended,0x301 ; "library"
005e e05f | _ | Load 0x0,0x5f
005f 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0060 00e1 | | Load_Encached Boolean_Cache
0061 e409 | | Load 0x2,0x9
0062 e408 | | Load 0x2,0x8
0063 e5fe | | Load 0x2,-0x2
0064 e010 | | Load 0x0,0x10
0065 1814 | | Execute Package,Field_Execute,Field_Number 0x14
0066 e009 | | Load 0x0,0x9
0067 184b | K | Execute Package,Field_Execute,Field_Number 0x4b
0068 00d2 | | Pop_Control Pop_Count_2
0069 c407 | | Store 0x2,0x7
006a e407 | | Load 0x2,0x7
006b 7006 |p | Jump_Nonzero 0x72
006c 4801 |H | Short_Literal 0x1
006d e5fe | | Load 0x2,-0x2
006e 0092 0301 | | Action Push_String_Extended,0x301 ; "library"
0070 e05f | _ | Load 0x0,0x5f
0071 1836 | 6 | Execute Package,Field_Execute,Field_Number 0x36
0072 4801 |H | Short_Literal 0x1
0073 0092 0302 | | Action Push_String_Extended,0x302 ; "<DEFAULT>"
0075 e5fd | | Load 0x2,-0x3
0076 e057 | W | Load 0x0,0x57
0077 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0078 6815 |h | Jump_Zero 0x8e
0079 4801 |H | Short_Literal 0x1
007a e050 | P | Load 0x0,0x50
007b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
007c 1813 | | Execute Package,Field_Execute,Field_Number 0x13
007d e408 | | Load 0x2,0x8
007e e010 | | Load 0x0,0x10
007f 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0080 e051 | Q | Load 0x0,0x51
0081 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0082 c405 | | Store 0x2,0x5
0083 e40e | | Load 0x2,0xe
0084 e405 | | Load 0x2,0x5
0085 e051 | Q | Load 0x0,0x51
0086 181c | | Execute Package,Field_Execute,Field_Number 0x1c
0087 0092 0303 | | Action Push_String_Extended,0x303 ; "_ps"
0089 01cc | | Execute Vector,Catenate
008a e010 | | Load 0x0,0x10
008b 1810 | | Execute Package,Field_Execute,Field_Number 0x10
008c 00d1 | | Pop_Control Pop_Count_1
008d 7805 |x | Jump 0x93
008e e40e | | Load 0x2,0xe
008f e5fd | | Load 0x2,-0x3
0090 e010 | | Load 0x0,0x10
0091 1810 | | Execute Package,Field_Execute,Field_Number 0x10
0092 00d1 | | Pop_Control Pop_Count_1
0093 4801 |H | Short_Literal 0x1
0094 e40e | | Load 0x2,0xe
0095 e010 | | Load 0x0,0x10
0096 1826 | & | Execute Package,Field_Execute,Field_Number 0x26
0097 0f21 | ! | Execute_Immediate Equal,0x21
0098 6806 |h | Jump_Zero 0x9f
0099 00db | | Load_Top At_Offset_3
009a e40e | | Load 0x2,0xe
009b e010 | | Load 0x0,0x10
009c 180f | | Execute Package,Field_Execute,Field_Number 0xf
009d 00d1 | | Pop_Control Pop_Count_1
009e 780f |x | Jump 0xae
009f 00db | | Load_Top At_Offset_3
00a0 e009 | | Load 0x0,0x9
00a1 1873 | s | Execute Package,Field_Execute,Field_Number 0x73
00a2 00d1 | | Pop_Control Pop_Count_1
00a3 00db | | Load_Top At_Offset_3
00a4 482e |H. | Short_Literal 0x2e
00a5 e40e | | Load 0x2,0xe
00a6 e010 | | Load 0x0,0x10
00a7 1813 | | Execute Package,Field_Execute,Field_Number 0x13
00a8 01ca | | Execute Vector,Prepend
00a9 e010 | | Load 0x0,0x10
00aa 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00ab e010 | | Load 0x0,0x10
00ac 1817 | | Execute Package,Field_Execute,Field_Number 0x17
00ad 00d1 | | Pop_Control Pop_Count_1
00ae 4801 |H | Short_Literal 0x1
00af 0092 0304 | | Action Push_String_Extended,0x304 ; "inches"
00b1 e5f2 | | Load 0x2,-0xe
00b2 e057 | W | Load 0x0,0x57
00b3 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00b4 6803 |h | Jump_Zero 0xb8
00b5 5836 |X6 | Indirect_Literal Float,0xec,1.0
00b6 a403 | | Store_Unchecked 0x2,0x3
00b7 7821 |x! | Jump 0xd9
00b8 4801 |H | Short_Literal 0x1
00b9 0092 0305 | | Action Push_String_Extended,0x305 ; "centimeters"
00bb e5f2 | | Load 0x2,-0xe
00bc e057 | W | Load 0x0,0x57
00bd 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00be 6803 |h | Jump_Zero 0xc2
00bf 5828 |X( | Indirect_Literal Float,0xe8,2.5399999999999996
00c0 a403 | | Store_Unchecked 0x2,0x3
00c1 7817 |x | Jump 0xd9
00c2 4801 |H | Short_Literal 0x1
00c3 0092 0306 | | Action Push_String_Extended,0x306 ; "picas"
00c5 e5f2 | | Load 0x2,-0xe
00c6 e057 | W | Load 0x0,0x57
00c7 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00c8 6803 |h | Jump_Zero 0xcc
00c9 581a |X | Indirect_Literal Float,0xe4,6.0
00ca a403 | | Store_Unchecked 0x2,0x3
00cb 780d |x | Jump 0xd9
00cc 4801 |H | Short_Literal 0x1
00cd 0092 0307 | | Action Push_String_Extended,0x307 ; "points"
00cf e5f2 | | Load 0x2,-0xe
00d0 e057 | W | Load 0x0,0x57
00d1 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
00d2 6803 |h | Jump_Zero 0xd6
00d3 580c |X | Indirect_Literal Float,0xe0,72.0
00d4 a403 | | Store_Unchecked 0x2,0x3
00d5 7803 |x | Jump 0xd9
00d6 e04e | N | Load 0x0,0x4e
00d7 1b0e | | Execute Package,Field_Read,Field_Number 0xe
00d8 0257 | W | Execute Discrete,Raise
00d9 e5fa | | Load 0x2,-0x6
00da 7001 |p | Jump_Nonzero 0xdc
00db 8412 | | Call 0x2,0x12
00dc 451d |E | Exit_Suprogram New_Top_Offset 0x1d
00dd 0000 0000 | | .XXX[0x3]
00df 0000 | |
00e0 4052 0000 |@R | .DBL 72.0
00e2 0000 0000 | |
00e4 4018 0000 |@ | .DBL 6.0
00e6 0000 0000 | |
00e8 4004 51eb |@ Q | .DBL 2.5399999999999996
00ea 851e b851 | Q|
00ec 3ff0 0000 |? | .DBL 1.0
00ee 0000 0000 | |
00f0 ; --------------------------------------------------------------------------------------
00f0 ; SUBPROGRAM
00f0 ; --------------------------------------------------------------------------------------
00f0 00f5 | | .CONST 0x00f5 ; Address of begin
00f1 0004 | | .CONST 0x0004 ; Address of exception handler
00f2 0002 | | .CONST 0x0002 ; Number of locals
00f3 INIT_00f0:
00f3 029f 02d3 | | Declare_Subprogram INIT_02d0,For_Call
00f5 BODY_00f0:
00f5 e7fe | | Load 0x3,-0x2
00f6 00ea | | Load_Encached Null_String_Cache
00f7 00ea | | Load_Encached Null_String_Cache
00f8 e7ff | | Load 0x3,-0x1
00f9 e056 | V | Load 0x0,0x56
00fa 1814 | | Execute Package,Field_Execute,Field_Number 0x14
00fb c7fe | | Store 0x3,-0x2
00fc 8602 | | Call 0x3,0x2
00fd 4502 |E | Exit_Suprogram New_Top_Offset 0x2
00fe 0000 0000 | | .XXX[0x2]
0100 ; --------------------------------------------------------------------------------------
0100 ; SUBPROGRAM
0100 ; --------------------------------------------------------------------------------------
0100 0105 | | .CONST 0x0105 ; Address of begin
0101 0004 | | .CONST 0x0004 ; Address of exception handler
0102 0002 | | .CONST 0x0002 ; Number of locals
0103 INIT_0100:
0103 029f 02e3 | | Declare_Subprogram INIT_02e0,For_Call
0105 BODY_0100:
0105 e40b | | Load 0x2,0xb
0106 e40a | | Load 0x2,0xa
0107 4801 |H | Short_Literal 0x1
0108 8410 | | Call 0x2,0x10
0109 c40a | | Store 0x2,0xa
010a c40b | | Store 0x2,0xb
010b e40a | | Load 0x2,0xa
010c e056 | V | Load 0x0,0x56
010d 181b | | Execute Package,Field_Execute,Field_Number 0x1b
010e c40a | | Store 0x2,0xa
010f 0092 0308 | | Action Push_String_Extended,0x308 ; "Calling Illustrator to get remote temporary filename"
0111 e052 | R | Load 0x0,0x52
0112 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0113 e5fb | | Load 0x2,-0x5
0114 e5fc | | Load 0x2,-0x4
0115 e40b | | Load 0x2,0xb
0116 0227 | ' | Execute Access,All_Reference
0117 0092 0302 | | Action Push_String_Extended,0x302 ; "<DEFAULT>"
0119 e40d | | Load 0x2,0xd
011a e060 | ` | Load 0x0,0x60
011b 1816 | | Execute Package,Field_Execute,Field_Number 0x16
011c e40a | | Load 0x2,0xa
011d 00ea | | Load_Encached Null_String_Cache
011e e40b | | Load 0x2,0xb
011f 0227 | ' | Execute Access,All_Reference
0120 4800 |H | Short_Literal 0x0
0121 e056 | V | Load 0x0,0x56
0122 1815 | | Execute Package,Field_Execute,Field_Number 0x15
0123 c40a | | Store 0x2,0xa
0124 8602 | | Call 0x3,0x2
0125 e40a | | Load 0x2,0xa
0126 e056 | V | Load 0x0,0x56
0127 181b | | Execute Package,Field_Execute,Field_Number 0x1b
0128 c40a | | Store 0x2,0xa
0129 4501 |E | Exit_Suprogram New_Top_Offset 0x1
012a 0000 0000 | | .BLANK 0000[0x6]
0130 ; --------------------------------------------------------------------------------------
0130 ; SUBPROGRAM
0130 ; --------------------------------------------------------------------------------------
0130 0140 | @ | .CONST 0x0140 ; Address of begin
0131 02c6 | | .CONST 0x02c6 ; Address of exception handler
0132 0006 | | .CONST 0x0006 ; Number of locals
0133 INIT_0130:
0133 e058 | X | Load 0x0,0x58
0134 1b1b | | Execute Package,Field_Read,Field_Number 0x1b
0135 0337 | 7 | Declare_Variable Array
0136 49f4 |I | Short_Literal 0x1f4
0137 e010 | | Load 0x0,0x10
0138 1b0e | | Execute Package,Field_Read,Field_Number 0xe
0139 1c08 | | Execute_Immediate Run_Utility,0x8
013a 00d8 | | Load_Top At_Offset_0
013b 1c00 | | Execute_Immediate Run_Utility,0x0
013c 00e2 | | Load_Encached Integer_Cache
013d 00e2 | | Load_Encached Integer_Cache
013e 029f 02f3 | | Declare_Subprogram INIT_02f0,For_Call
0140 BODY_0130:
0140 e061 | a | Load 0x0,0x61
0141 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0142 e40c | | Load 0x2,0xc
0143 8411 | | Call 0x2,0x11
0144 c40c | | Store 0x2,0xc
0145 00db | | Load_Top At_Offset_3
0146 e05e | ^ | Load 0x0,0x5e
0147 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0148 0092 0309 | | Action Push_String_Extended,0x309 ; "/diagram2ps"
014a 01cc | | Execute Vector,Catenate
014b e010 | | Load 0x0,0x10
014c 1814 | | Execute Package,Field_Execute,Field_Number 0x14
014d e010 | | Load 0x0,0x10
014e 180f | | Execute Package,Field_Execute,Field_Number 0xf
014f 00d1 | | Pop_Control Pop_Count_1
0150 4801 |H | Short_Literal 0x1
0151 0092 030a | | Action Push_String_Extended,0x30a ; "best"
0153 e5f9 | | Load 0x2,-0x7
0154 e057 | W | Load 0x0,0x57
0155 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0156 6807 |h | Jump_Zero 0x15e
0157 00db | | Load_Top At_Offset_3
0158 0092 030b | | Action Push_String_Extended,0x30b ; " -o"
015a e010 | | Load 0x0,0x10
015b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
015c 00d1 | | Pop_Control Pop_Count_1
015d 781f |x | Jump 0x17d
015e 4801 |H | Short_Literal 0x1
015f 0092 030c | | Action Push_String_Extended,0x30c ; "portrait"
0161 e5f9 | | Load 0x2,-0x7
0162 e057 | W | Load 0x0,0x57
0163 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0164 6807 |h | Jump_Zero 0x16c
0165 00db | | Load_Top At_Offset_3
0166 0092 030d | | Action Push_String_Extended,0x30d ; " -p"
0168 e010 | | Load 0x0,0x10
0169 1818 | | Execute Package,Field_Execute,Field_Number 0x18
016a 00d1 | | Pop_Control Pop_Count_1
016b 7811 |x | Jump 0x17d
016c 4801 |H | Short_Literal 0x1
016d 0092 030e | | Action Push_String_Extended,0x30e ; "landscape"
016f e5f9 | | Load 0x2,-0x7
0170 e057 | W | Load 0x0,0x57
0171 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
0172 6807 |h | Jump_Zero 0x17a
0173 00db | | Load_Top At_Offset_3
0174 0092 030f | | Action Push_String_Extended,0x30f ; " -l"
0176 e010 | | Load 0x0,0x10
0177 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0178 00d1 | | Pop_Control Pop_Count_1
0179 7803 |x | Jump 0x17d
017a e04e | N | Load 0x0,0x4e
017b 1b0e | | Execute Package,Field_Read,Field_Number 0xe
017c 0257 | W | Execute Discrete,Raise
017d e5f8 | | Load 0x2,-0x8
017e 6806 |h | Jump_Zero 0x185
017f 00db | | Load_Top At_Offset_3
0180 0092 0310 | | Action Push_String_Extended,0x310 ; "B"
0182 e010 | | Load 0x0,0x10
0183 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0184 00d1 | | Pop_Control Pop_Count_1
0185 e5f7 | | Load 0x2,-0x9
0186 6806 |h | Jump_Zero 0x18d
0187 00db | | Load_Top At_Offset_3
0188 0092 0311 | | Action Push_String_Extended,0x311 ; "e"
018a e010 | | Load 0x0,0x10
018b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
018c 00d1 | | Pop_Control Pop_Count_1
018d e5f6 | | Load 0x2,-0xa
018e 6806 |h | Jump_Zero 0x195
018f 00db | | Load_Top At_Offset_3
0190 0092 0312 | | Action Push_String_Extended,0x312 ; "E"
0192 e010 | | Load 0x0,0x10
0193 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0194 00d1 | | Pop_Control Pop_Count_1
0195 e5f5 | | Load 0x2,-0xb
0196 6806 |h | Jump_Zero 0x19d
0197 00db | | Load_Top At_Offset_3
0198 0092 0313 | | Action Push_String_Extended,0x313 ; "i"
019a e010 | | Load 0x0,0x10
019b 1818 | | Execute Package,Field_Execute,Field_Number 0x18
019c 00d1 | | Pop_Control Pop_Count_1
019d 00db | | Load_Top At_Offset_3
019e 0092 0314 | | Action Push_String_Extended,0x314 ; " -n \x5c"
01a0 e408 | | Load 0x2,0x8
01a1 e010 | | Load 0x0,0x10
01a2 1813 | | Execute Package,Field_Execute,Field_Number 0x13
01a3 01cc | | Execute Vector,Catenate
01a4 e010 | | Load 0x0,0x10
01a5 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01a6 00d1 | | Pop_Control Pop_Count_1
01a7 00db | | Load_Top At_Offset_3
01a8 0092 0315 | | Action Push_String_Extended,0x315 ; " -s"
01aa e5f4 | | Load 0x2,-0xc
01ab 480a |H | Short_Literal 0xa
01ac 0271 | q | Execute Discrete,Times
01ad 00d8 | | Load_Top At_Offset_0
01ae 00e2 | | Load_Encached Integer_Cache
01af 0260 | ` | Execute Discrete,In_Type
01b0 7001 |p | Jump_Nonzero 0x1b2
01b1 0801 | | Execute_Immediate Raise,0x1
01b2 00e0 | | Load_Encached Standard_Cache
01b3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01b4 01cc | | Execute Vector,Catenate
01b5 e010 | | Load 0x0,0x10
01b6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01b7 00d1 | | Pop_Control Pop_Count_1
01b8 00db | | Load_Top At_Offset_3
01b9 0092 0316 | | Action Push_String_Extended,0x316 ; " -S"
01bb e5f3 | | Load 0x2,-0xd
01bc 480a |H | Short_Literal 0xa
01bd 0271 | q | Execute Discrete,Times
01be 00d8 | | Load_Top At_Offset_0
01bf 00e2 | | Load_Encached Integer_Cache
01c0 0260 | ` | Execute Discrete,In_Type
01c1 7001 |p | Jump_Nonzero 0x1c3
01c2 0801 | | Execute_Immediate Raise,0x1
01c3 00e0 | | Load_Encached Standard_Cache
01c4 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01c5 01cc | | Execute Vector,Catenate
01c6 e010 | | Load 0x0,0x10
01c7 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01c8 00d1 | | Pop_Control Pop_Count_1
01c9 00db | | Load_Top At_Offset_3
01ca 0092 0317 | | Action Push_String_Extended,0x317 ; " -T"
01cc e5e7 | | Load 0x2,-0x19
01cd 01cc | | Execute Vector,Catenate
01ce e010 | | Load 0x0,0x10
01cf 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01d0 00d1 | | Pop_Control Pop_Count_1
01d1 00db | | Load_Top At_Offset_3
01d2 0092 0318 | | Action Push_String_Extended,0x318 ; " -W"
01d4 e5e6 | | Load 0x2,-0x1a
01d5 00e0 | | Load_Encached Standard_Cache
01d6 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01d7 01cc | | Execute Vector,Catenate
01d8 e010 | | Load 0x0,0x10
01d9 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01da 00d1 | | Pop_Control Pop_Count_1
01db 00db | | Load_Top At_Offset_3
01dc 0092 0319 | | Action Push_String_Extended,0x319 ; " -L"
01de e5eb | | Load 0x2,-0x15
01df 01cc | | Execute Vector,Catenate
01e0 e010 | | Load 0x0,0x10
01e1 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01e2 00d1 | | Pop_Control Pop_Count_1
01e3 00db | | Load_Top At_Offset_3
01e4 0092 031a | | Action Push_String_Extended,0x31a ; " -X"
01e6 e5ea | | Load 0x2,-0x16
01e7 00e0 | | Load_Encached Standard_Cache
01e8 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01e9 01cc | | Execute Vector,Catenate
01ea e010 | | Load 0x0,0x10
01eb 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01ec 00d1 | | Pop_Control Pop_Count_1
01ed 00db | | Load_Top At_Offset_3
01ee 0092 031b | | Action Push_String_Extended,0x31b ; " -M"
01f0 e5e9 | | Load 0x2,-0x17
01f1 01cc | | Execute Vector,Catenate
01f2 e010 | | Load 0x0,0x10
01f3 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01f4 00d1 | | Pop_Control Pop_Count_1
01f5 00db | | Load_Top At_Offset_3
01f6 0092 031c | | Action Push_String_Extended,0x31c ; " -Y"
01f8 e5e8 | | Load 0x2,-0x18
01f9 00e0 | | Load_Encached Standard_Cache
01fa 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01fb 01cc | | Execute Vector,Catenate
01fc e010 | | Load 0x0,0x10
01fd 1818 | | Execute Package,Field_Execute,Field_Number 0x18
01fe 00d1 | | Pop_Control Pop_Count_1
01ff 00db | | Load_Top At_Offset_3
0200 0092 031d | | Action Push_String_Extended,0x31d ; " -N"
0202 e5e5 | | Load 0x2,-0x1b
0203 01cc | | Execute Vector,Catenate
0204 e010 | | Load 0x0,0x10
0205 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0206 00d1 | | Pop_Control Pop_Count_1
0207 00db | | Load_Top At_Offset_3
0208 0092 031e | | Action Push_String_Extended,0x31e ; " -Z"
020a e5e4 | | Load 0x2,-0x1c
020b 00e0 | | Load_Encached Standard_Cache
020c 1818 | | Execute Package,Field_Execute,Field_Number 0x18
020d 01cc | | Execute Vector,Catenate
020e e010 | | Load 0x0,0x10
020f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0210 00d1 | | Pop_Control Pop_Count_1
0211 00db | | Load_Top At_Offset_3
0212 0092 031f | | Action Push_String_Extended,0x31f ; " -h "
0214 e5f0 | | Load 0x2,-0x10
0215 e403 | | Load 0x2,0x3
0216 023a | : | Execute Float,Divide
0217 58b4 |X | Indirect_Literal Float,0x2cc,72.0
0218 023b | ; | Execute Float,Times
0219 0235 | 5 | Execute Float,Round_To_Discrete
021a 00e2 | | Load_Encached Integer_Cache
021b 025e | ^ | Execute Discrete,Convert
021c 00e0 | | Load_Encached Standard_Cache
021d 1818 | | Execute Package,Field_Execute,Field_Number 0x18
021e 01cc | | Execute Vector,Catenate
021f e010 | | Load 0x0,0x10
0220 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0221 00d1 | | Pop_Control Pop_Count_1
0222 00db | | Load_Top At_Offset_3
0223 0092 0320 | | Action Push_String_Extended,0x320 ; " -w "
0225 e5f1 | | Load 0x2,-0xf
0226 e403 | | Load 0x2,0x3
0227 023a | : | Execute Float,Divide
0228 58a3 |X | Indirect_Literal Float,0x2cc,72.0
0229 023b | ; | Execute Float,Times
022a 0235 | 5 | Execute Float,Round_To_Discrete
022b 00e2 | | Load_Encached Integer_Cache
022c 025e | ^ | Execute Discrete,Convert
022d 00e0 | | Load_Encached Standard_Cache
022e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
022f 01cc | | Execute Vector,Catenate
0230 e010 | | Load 0x0,0x10
0231 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0232 00d1 | | Pop_Control Pop_Count_1
0233 00db | | Load_Top At_Offset_3
0234 0092 0321 | !| Action Push_String_Extended,0x321 ; " -b "
0236 e5ec | | Load 0x2,-0x14
0237 e403 | | Load 0x2,0x3
0238 023a | : | Execute Float,Divide
0239 5892 |X | Indirect_Literal Float,0x2cc,72.0
023a 023b | ; | Execute Float,Times
023b 0235 | 5 | Execute Float,Round_To_Discrete
023c 00e2 | | Load_Encached Integer_Cache
023d 025e | ^ | Execute Discrete,Convert
023e 00e0 | | Load_Encached Standard_Cache
023f 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0240 01cc | | Execute Vector,Catenate
0241 e010 | | Load 0x0,0x10
0242 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0243 00d1 | | Pop_Control Pop_Count_1
0244 00db | | Load_Top At_Offset_3
0245 0092 0322 | "| Action Push_String_Extended,0x322 ; " -t "
0247 e5ef | | Load 0x2,-0x11
0248 e403 | | Load 0x2,0x3
0249 023a | : | Execute Float,Divide
024a 5881 |X | Indirect_Literal Float,0x2cc,72.0
024b 023b | ; | Execute Float,Times
024c 0235 | 5 | Execute Float,Round_To_Discrete
024d 00e2 | | Load_Encached Integer_Cache
024e 025e | ^ | Execute Discrete,Convert
024f 00e0 | | Load_Encached Standard_Cache
0250 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0251 01cc | | Execute Vector,Catenate
0252 e010 | | Load 0x0,0x10
0253 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0254 00d1 | | Pop_Control Pop_Count_1
0255 00db | | Load_Top At_Offset_3
0256 0092 0323 | #| Action Push_String_Extended,0x323 ; " -m "
0258 e5ee | | Load 0x2,-0x12
0259 e403 | | Load 0x2,0x3
025a 023a | : | Execute Float,Divide
025b 5870 |Xp | Indirect_Literal Float,0x2cc,72.0
025c 023b | ; | Execute Float,Times
025d 0235 | 5 | Execute Float,Round_To_Discrete
025e 00e2 | | Load_Encached Integer_Cache
025f 025e | ^ | Execute Discrete,Convert
0260 00e0 | | Load_Encached Standard_Cache
0261 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0262 01cc | | Execute Vector,Catenate
0263 e010 | | Load 0x0,0x10
0264 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0265 00d1 | | Pop_Control Pop_Count_1
0266 00db | | Load_Top At_Offset_3
0267 0092 0324 | $| Action Push_String_Extended,0x324 ; " -r "
0269 e5ed | | Load 0x2,-0x13
026a e403 | | Load 0x2,0x3
026b 023a | : | Execute Float,Divide
026c 585f |X_ | Indirect_Literal Float,0x2cc,72.0
026d 023b | ; | Execute Float,Times
026e 0235 | 5 | Execute Float,Round_To_Discrete
026f 00e2 | | Load_Encached Integer_Cache
0270 025e | ^ | Execute Discrete,Convert
0271 00e0 | | Load_Encached Standard_Cache
0272 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0273 01cc | | Execute Vector,Catenate
0274 e010 | | Load 0x0,0x10
0275 1818 | | Execute Package,Field_Execute,Field_Number 0x18
0276 00d1 | | Pop_Control Pop_Count_1
0277 00db | | Load_Top At_Offset_3
0278 0092 0325 | %| Action Push_String_Extended,0x325 ; " > "
027a e40c | | Load 0x2,0xc
027b 0227 | ' | Execute Access,All_Reference
027c 01cc | | Execute Vector,Catenate
027d e010 | | Load 0x0,0x10
027e 1818 | | Execute Package,Field_Execute,Field_Number 0x18
027f 00d1 | | Pop_Control Pop_Count_1
0280 0092 0326 | &| Action Push_String_Extended,0x326 ; "Calling Illustrator to generate Postscript"
0282 e052 | R | Load 0x0,0x52
0283 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0284 0092 0327 | '| Action Push_String_Extended,0x327 ; "Remote Shell Command is "
0286 e603 | | Load 0x3,0x3
0287 e010 | | Load 0x0,0x10
0288 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0289 01cc | | Execute Vector,Catenate
028a e052 | R | Load 0x0,0x52
028b 1820 | | Execute Package,Field_Execute,Field_Number 0x20
028c e5fb | | Load 0x2,-0x5
028d e5fc | | Load 0x2,-0x4
028e 0092 0302 | | Action Push_String_Extended,0x302 ; "<DEFAULT>"
0290 e408 | | Load 0x2,0x8
0291 e010 | | Load 0x0,0x10
0292 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0293 e603 | | Load 0x3,0x3
0294 e010 | | Load 0x0,0x10
0295 1813 | | Execute Package,Field_Execute,Field_Number 0x13
0296 e060 | ` | Load 0x0,0x60
0297 1816 | | Execute Package,Field_Execute,Field_Number 0x16
0298 0092 0328 | (| Action Push_String_Extended,0x328 ; "Calling Illustrator to retrieve and delete Postscript"
029a e052 | R | Load 0x0,0x52
029b 1813 | | Execute Package,Field_Execute,Field_Number 0x13
029c e5fb | | Load 0x2,-0x5
029d e5fc | | Load 0x2,-0x4
029e e40f | | Load 0x2,0xf
029f e010 | | Load 0x0,0x10
02a0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02a1 0092 0329 | )| Action Push_String_Extended,0x329 ; "<NONE>"
02a3 8606 | | Call 0x3,0x6
02a4 e060 | ` | Load 0x0,0x60
02a5 1816 | | Execute Package,Field_Execute,Field_Number 0x16
02a6 e058 | X | Load 0x0,0x58
02a7 180e | | Execute Package,Field_Execute,Field_Number 0xe
02a8 e058 | X | Load 0x0,0x58
02a9 1822 | " | Execute Package,Field_Execute,Field_Number 0x22
02aa e602 | | Load 0x3,0x2
02ab 01d4 | | Execute Vector,Structure_Write
02ac 4801 |H | Short_Literal 0x1
02ad e602 | | Load 0x3,0x2
02ae 01d7 | | Execute Vector,Field_Read
02af 680a |h | Jump_Zero 0x2ba
02b0 0092 032a | *| Action Push_String_Extended,0x32a ; "<PROFILE>"
02b2 0092 032b | +| Action Push_String_Extended,0x32b ; "POSTSCRIPT"
02b4 e40f | | Load 0x2,0xf
02b5 e010 | | Load 0x0,0x10
02b6 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02b7 e05a | Z | Load 0x0,0x5a
02b8 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02b9 7809 |x | Jump 0x2c3
02ba 0092 032c | ,| Action Push_String_Extended,0x32c ; "<QUIET>"
02bc 0092 032b | +| Action Push_String_Extended,0x32b ; "POSTSCRIPT"
02be e40f | | Load 0x2,0xf
02bf e010 | | Load 0x0,0x10
02c0 1813 | | Execute Package,Field_Execute,Field_Number 0x13
02c1 e05a | Z | Load 0x0,0x5a
02c2 1821 | ! | Execute Package,Field_Execute,Field_Number 0x21
02c3 e061 | a | Load 0x0,0x61
02c4 180f | | Execute Package,Field_Execute,Field_Number 0xf
02c5 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02c6 TRAP_0130:
02c6 0007 | | Action Break_Optional
02c7 e061 | a | Load 0x0,0x61
02c8 180f | | Execute Package,Field_Execute,Field_Number 0xf
02c9 00d8 | | Load_Top At_Offset_0
02ca 0101 | | Execute Exception,Reraise
02cb 0000 | | .XXX[0x1]
02cc 4052 0000 |@R | .DBL 72.0
02ce 0000 0000 | |
02d0 ; --------------------------------------------------------------------------------------
02d0 ; SUBPROGRAM
02d0 ; --------------------------------------------------------------------------------------
02d0 02d6 | | .CONST 0x02d6 ; Address of begin
02d1 0004 | | .CONST 0x0004 ; Address of exception handler
02d2 0002 | | .CONST 0x0002 ; Number of locals
02d3 INIT_02d0:
02d3 e7fe | | Load 0x3,-0x2
02d4 e056 | V | Load 0x0,0x56
02d5 1820 | | Execute Package,Field_Execute,Field_Number 0x20
02d6 BODY_02d0:
02d6 00d8 | | Load_Top At_Offset_0
02d7 01da | | Execute Vector,Bounds
02d8 e402 | | Load 0x2,0x2
02d9 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
02da a7fd | | Store_Unchecked 0x3,-0x3
02db 00d8 | | Load_Top At_Offset_0
02dc e7fd | | Load 0x3,-0x3
02dd 0228 | ( | Execute Access,All_Write
02de 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02df 0000 | | .XXX[0x1]
02e0 ; --------------------------------------------------------------------------------------
02e0 ; SUBPROGRAM
02e0 ; --------------------------------------------------------------------------------------
02e0 02e6 | | .CONST 0x02e6 ; Address of begin
02e1 0004 | | .CONST 0x0004 ; Address of exception handler
02e2 0002 | | .CONST 0x0002 ; Number of locals
02e3 INIT_02e0:
02e3 e40a | | Load 0x2,0xa
02e4 e056 | V | Load 0x0,0x56
02e5 1866 | f | Execute Package,Field_Execute,Field_Number 0x66
02e6 BODY_02e0:
02e6 00d8 | | Load_Top At_Offset_0
02e7 01da | | Execute Vector,Bounds
02e8 e402 | | Load 0x2,0x2
02e9 03ba | | Declare_Variable Access,By_Allocation,With_Constraint
02ea a7ff | | Store_Unchecked 0x3,-0x1
02eb 00d8 | | Load_Top At_Offset_0
02ec e7ff | | Load 0x3,-0x1
02ed 0228 | ( | Execute Access,All_Write
02ee 4501 |E | Exit_Suprogram New_Top_Offset 0x1
02ef 0000 | | .XXX[0x1]
02f0 ; --------------------------------------------------------------------------------------
02f0 ; SUBPROGRAM
02f0 ; --------------------------------------------------------------------------------------
02f0 02f3 | | .CONST 0x02f3 ; Address of begin
02f1 0004 | | .CONST 0x0004 ; Address of exception handler
02f2 0001 | | .CONST 0x0001 ; Number of locals
02f3 BODY_02f0:
02f3 INIT_02f0:
02f3 0092 032d | -| Action Push_String_Extended,0x32d ; "/bin/cat "
02f5 e40c | | Load 0x2,0xc
02f6 0227 | ' | Execute Access,All_Reference
02f7 01cc | | Execute Vector,Catenate
02f8 0092 032e | .| Action Push_String_Extended,0x32e ; "; /bin/rm "
02fa 01cc | | Execute Vector,Catenate
02fb e40c | | Load 0x2,0xc
02fc 0227 | ' | Execute Access,All_Reference
02fd 01cc | | Execute Vector,Catenate
02fe 00ca | | Action Exit_Nullary_Function
02ff ; --------------------------------------------------------------------------------------
02ff ; STRING TABLE
02ff ; --------------------------------------------------------------------------------------
02ff 0062 | b | .STRTAB 0x0062->0x0330 ; "$"
0300 0061 | a | .STRTAB 0x0061->0x0330 ; ">>DIAGRAM NAME<<"
0301 006f | o | .STRTAB 0x006f->0x0338 ; "library"
0302 0074 | t | .STRTAB 0x0074->0x033c ; "<DEFAULT>"
0303 007b | { | .STRTAB 0x007b->0x0340 ; "_ps"
0304 007c | | | .STRTAB 0x007c->0x0342 ; "inches"
0305 0080 | | .STRTAB 0x0080->0x0345 ; "centimeters"
0306 0089 | | .STRTAB 0x0089->0x034a ; "picas"
0307 008c | | .STRTAB 0x008c->0x034d ; "points"
0308 0090 | | .STRTAB 0x0090->0x0350 ; "Calling Illustrator to get remote temporary filename"
0309 00c2 | | .STRTAB 0x00c2->0x036a ; "/diagram2ps"
030a 00cb | | .STRTAB 0x00cb->0x036f ; "best"
030b 00cd | | .STRTAB 0x00cd->0x0371 ; " -o"
030c 00ce | | .STRTAB 0x00ce->0x0373 ; "portrait"
030d 00d4 | | .STRTAB 0x00d4->0x0377 ; " -p"
030e 00d5 | | .STRTAB 0x00d5->0x0378 ; "landscape"
030f 00dc | | .STRTAB 0x00dc->0x037d ; " -l"
0310 00dd | | .STRTAB 0x00dd->0x037e ; "B"
0311 00dc | | .STRTAB 0x00dc->0x037f ; "e"
0312 00db | | .STRTAB 0x00db->0x037f ; "E"
0313 00da | | .STRTAB 0x00da->0x0380 ; "i"
0314 00d9 | | .STRTAB 0x00d9->0x0380 ; " -n \x5c"
0315 00dc | | .STRTAB 0x00dc->0x0383 ; " -s"
0316 00dd | | .STRTAB 0x00dd->0x0384 ; " -S"
0317 00de | | .STRTAB 0x00de->0x0386 ; " -T"
0318 00df | | .STRTAB 0x00df->0x0387 ; " -W"
0319 00e0 | | .STRTAB 0x00e0->0x0389 ; " -L"
031a 00e1 | | .STRTAB 0x00e1->0x038a ; " -X"
031b 00e2 | | .STRTAB 0x00e2->0x038c ; " -M"
031c 00e3 | | .STRTAB 0x00e3->0x038d ; " -Y"
031d 00e4 | | .STRTAB 0x00e4->0x038f ; " -N"
031e 00e5 | | .STRTAB 0x00e5->0x0390 ; " -Z"
031f 00e6 | | .STRTAB 0x00e6->0x0392 ; " -h "
0320 00e8 | | .STRTAB 0x00e8->0x0394 ; " -w "
0321 00ea | | .STRTAB 0x00ea->0x0396 ; " -b "
0322 00ec | | .STRTAB 0x00ec->0x0398 ; " -t "
0323 00ee | | .STRTAB 0x00ee->0x039a ; " -m "
0324 00f0 | | .STRTAB 0x00f0->0x039c ; " -r "
0325 00f2 | | .STRTAB 0x00f2->0x039e ; " > "
0326 00f3 | | .STRTAB 0x00f3->0x039f ; "Calling Illustrator to generate Postscript"
0327 011b | | .STRTAB 0x011b->0x03b4 ; "Remote Shell Command is "
0328 0131 | 1 | .STRTAB 0x0131->0x03c0 ; "Calling Illustrator to retrieve and delete Postscript"
0329 0164 | d | .STRTAB 0x0164->0x03db ; "<NONE>"
032a 0168 | h | .STRTAB 0x0168->0x03de ; "<PROFILE>"
032b 016f | o | .STRTAB 0x016f->0x03e2 ; "POSTSCRIPT"
032c 0177 | w | .STRTAB 0x0177->0x03e7 ; "<QUIET>"
032d 017c | | | .STRTAB 0x017c->0x03eb ; "/bin/cat "
032e 0183 | | .STRTAB 0x0183->0x03ef ; "; /bin/rm "
032f 018b | | .STREND 0x018b->0x03f4
0330 243e 3e44 |$>>D| .STRTAB_STRINGS
03f5 0000 0000 | | .XXX[0x3]
03f7 0000 | |
03f8 ; --------------------------------------------------------------------------------------
03f8 ; Debug Table
03f8 ; --------------------------------------------------------------------------------------
03f8 0004 0014 | | .DEBUG4 0x0004,0x0014,0x0fcb,0x0000,0x0001,0x0000
03fe 8280 02bc | | .XXX[0x2]