DataMuseum.dk

Presents historical artifacts from the history of:

Rational R1000/400

This is an automatic "excavation" of a thematic subset of
artifacts from Datamuseum.dk's BitArchive.

See our Wiki for more about Rational R1000/400

Excavated with: AutoArchaeologist - Free & Open Source Software.


top - download

⟦a87154105⟧

    Length: 2048 (0x800)
    Notes: 00_class, 5800_R1K_CODE, 74_tag, NULL, R1k_Segment, seg_0694fc

Derivation

└─⟦8527c1e9b⟧ Bits:30000544 8mm tape, Rational 1000, Arrival backup of disks in PAM's R1000
    └─ ⟦5a81ac88f⟧ »Space Info Vol 1« 
        └─⟦this⟧ 

Disassembly

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 0308       |    |		.CONST	0x0308								; 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 0033       | 3  |		.CONST	0x0033								; Address of begin
0009 0004       |    |		.CONST	0x0004								; Address of exception handler
000a 000d       |    |		.CONST	0x000d								; 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 e22d       | -  |		Load	0x1,0x2d
001c 0322       | "  |		Declare_Variable	Record
001d 00d8       |    |		Load_Top	At_Offset_0
001e 1c00       |    |		Execute_Immediate	Run_Utility,0x0
001f e051       | Q  |		Load	0x0,0x51
0020 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
0021 02c7       |    |		Declare_Variable	Any
0022 00d8       |    |		Load_Top	At_Offset_0
0023 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0024 e402       |    |		Load	0x2,0x2
0025 0007       |    |		Action	Break_Optional
0026 e00f       |    |		Load	0x0,0xf
0027 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0028 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0029 e22c       | ,  |		Load	0x1,0x2c
002a 0322       | "  |		Declare_Variable	Record
002b 00d8       |    |		Load_Top	At_Offset_0
002c 1c00       |    |		Execute_Immediate	Run_Utility,0x0
002d 029f 009b  |    |		Declare_Subprogram	INIT_0098,For_Call
002f 029f 00c3  |    |		Declare_Subprogram	INIT_00c0,For_Call
0031 029f 00eb  |    |		Declare_Subprogram	INIT_00e8,For_Call
0033			BODY_0008:
0033 e5fb       |    |		Load	0x2,-0x5
0034 e010       |    |		Load	0x0,0x10
0035 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0036 e009       |    |		Load	0x0,0x9
0037 186e       | n  |		Execute	Package,Field_Execute,Field_Number 0x6e
0038 e406       |    |		Load	0x2,0x6
0039 e5ff       |    |		Load	0x2,-0x1
003a e010       |    |		Load	0x0,0x10
003b 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
003c 825b       | [  |		Call	0x1,0x5b
003d 00d1       |    |		Pop_Control	Pop_Count_1
003e e406       |    |		Load	0x2,0x6
003f 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
0040 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0041 6803       |h   |		Jump_Zero	0x45
0042 e04e       | N  |		Load	0x0,0x4e
0043 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0044 0257       | W  |		Execute	Discrete,Raise
0045 4801       |H   |		Short_Literal	0x1
0046 e050       | P  |		Load	0x0,0x50
0047 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0048 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0049 e5ff       |    |		Load	0x2,-0x1
004a e051       | Q  |		Load	0x0,0x51
004b 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
004c c407       |    |		Store	0x2,0x7
004d e407       |    |		Load	0x2,0x7
004e e051       | Q  |		Load	0x0,0x51
004f 181c       |    |		Execute	Package,Field_Execute,Field_Number 0x1c
0050 e402       |    |		Load	0x2,0x2
0051 03b6       |    |		Declare_Variable	Access,By_Allocation,With_Value
0052 a408       |    |		Store_Unchecked	0x2,0x8
0053 e5fc       |    |		Load	0x2,-0x4
0054 e010       |    |		Load	0x0,0x10
0055 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0056 e009       |    |		Load	0x0,0x9
0057 186d       | m  |		Execute	Package,Field_Execute,Field_Number 0x6d
0058 4801       |H   |		Short_Literal	0x1
0059 0092 024f  |   O|		Action	Push_String_Extended,0x24f					; "<DEFAULT>"
005b e5fe       |    |		Load	0x2,-0x2
005c e057       | W  |		Load	0x0,0x57
005d 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
005e 680a       |h   |		Jump_Zero	0x69
005f e404       |    |		Load	0x2,0x4
0060 e408       |    |		Load	0x2,0x8
0061 0227       | '  |		Execute	Access,All_Reference
0062 0092 0250  |   P|		Action	Push_String_Extended,0x250					; "_diagram"
0064 01cc       |    |		Execute	Vector,Catenate
0065 e010       |    |		Load	0x0,0x10
0066 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
0067 00d1       |    |		Pop_Control	Pop_Count_1
0068 7805       |x   |		Jump	0x6e
0069 e404       |    |		Load	0x2,0x4
006a e5fe       |    |		Load	0x2,-0x2
006b e010       |    |		Load	0x0,0x10
006c 1810       |    |		Execute	Package,Field_Execute,Field_Number 0x10
006d 00d1       |    |		Pop_Control	Pop_Count_1
006e e405       |    |		Load	0x2,0x5
006f e404       |    |		Load	0x2,0x4
0070 8252       | R  |		Call	0x1,0x52
0071 00d1       |    |		Pop_Control	Pop_Count_1
0072 e405       |    |		Load	0x2,0x5
0073 3403       |4   |		Execute	Record,Field_Reference,Field_Number 0x3
0074 2c01       |,   |		Execute	Variant_Record,Field_Read,Fixed,Direct,Field_Number 0x1
0075 6803       |h   |		Jump_Zero	0x79
0076 e04e       | N  |		Load	0x0,0x4e
0077 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0078 0257       | W  |		Execute	Discrete,Raise
0079 e405       |    |		Load	0x2,0x5
007a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
007b e010       |    |		Load	0x0,0x10
007c 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
007d 840b       |    |		Call	0x2,0xb
007e a403       |    |		Store_Unchecked	0x2,0x3
007f e403       |    |		Load	0x2,0x3
0080 e5f9       |    |		Load	0x2,-0x7
0081 0f00       |    |		Execute_Immediate	Equal,0x0
0082 0279       | y  |		Execute	Discrete,And
0083 680c       |h   |		Jump_Zero	0x90
0084 e5fa       |    |		Load	0x2,-0x6
0085 6805       |h   |		Jump_Zero	0x8b
0086 e405       |    |		Load	0x2,0x5
0087 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
0088 e009       |    |		Load	0x0,0x9
0089 1853       | S  |		Execute	Package,Field_Execute,Field_Number 0x53
008a 7805       |x   |		Jump	0x90
008b 0092 0251  |   Q|		Action	Push_String_Extended,0x251					; "The Diagram Name specified already exists and Overwrite => False, a new diagram will not be generated"
008d e052       | R  |		Load	0x0,0x52
008e 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
008f 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
0090 840c       |    |		Call	0x2,0xc
0091 e5f9       |    |		Load	0x2,-0x7
0092 7001       |p   |		Jump_Nonzero	0x94
0093 840d       |    |		Call	0x2,0xd
0094 450a       |E   |		Exit_Suprogram	New_Top_Offset 0xa
0095 0000 0000  |    |		.XXX[0x3]
0097 0000       |    |
0098 ; --------------------------------------------------------------------------------------
0098 ; SUBPROGRAM
0098 ; --------------------------------------------------------------------------------------
0098 00a1       |    |		.CONST	0x00a1								; Address of begin
0099 0004       |    |		.CONST	0x0004								; Address of exception handler
009a 0003       |    |		.CONST	0x0003								; Number of locals
009b			INIT_0098:
009b e04f       | O  |		Load	0x0,0x4f
009c 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
009d 02c7       |    |		Declare_Variable	Any
009e 00d8       |    |		Load_Top	At_Offset_0
009f 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00a0 00e1       |    |		Load_Encached	Boolean_Cache
00a1			BODY_0098:
00a1 4801       |H   |		Short_Literal	0x1
00a2 e050       | P  |		Load	0x0,0x50
00a3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00a4 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00a5 e7ff       |    |		Load	0x3,-0x1
00a6 e051       | Q  |		Load	0x0,0x51
00a7 1818       |    |		Execute	Package,Field_Execute,Field_Number 0x18
00a8 c602       |    |		Store	0x3,0x2
00a9 00d9       |    |		Load_Top	At_Offset_1
00aa e04f       | O  |		Load	0x0,0x4f
00ab 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00ac 1848       | H  |		Execute	Package,Field_Execute,Field_Number 0x48
00ad 680e       |h   |		Jump_Zero	0xbc
00ae 00d9       |    |		Load_Top	At_Offset_1
00af e04f       | O  |		Load	0x0,0x4f
00b0 1b0f       |    |		Execute	Package,Field_Read,Field_Number 0xf
00b1 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
00b2 6802       |h   |		Jump_Zero	0xb5
00b3 4801       |H   |		Short_Literal	0x1
00b4 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00b5 0092 0252  |   R|		Action	Push_String_Extended,0x252					; "The Diagram Name refers to a invalid object"
00b7 e052       | R  |		Load	0x0,0x52
00b8 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00b9 e04e       | N  |		Load	0x0,0x4e
00ba 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00bb 0257       | W  |		Execute	Discrete,Raise
00bc 4800       |H   |		Short_Literal	0x0
00bd 4401       |D   |		Exit_Subprogram	With_Value,New_Top_Offset 0x1
00be 0000 0000  |    |		.XXX[0x2]
00c0 ; --------------------------------------------------------------------------------------
00c0 ; SUBPROGRAM
00c0 ; --------------------------------------------------------------------------------------
00c0 00c3       |    |		.CONST	0x00c3								; Address of begin
00c1 00cf       |    |		.CONST	0x00cf								; Address of exception handler
00c2 0001       |    |		.CONST	0x0001								; Number of locals
00c3			BODY_00c0:
00c3			INIT_00c0:
00c3 e00f       |    |		Load	0x0,0xf
00c4 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00c5 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
00c6 e5f9       |    |		Load	0x2,-0x7
00c7 e5ff       |    |		Load	0x2,-0x1
00c8 e010       |    |		Load	0x0,0x10
00c9 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
00ca e009       |    |		Load	0x0,0x9
00cb 187c       | |  |		Execute	Package,Field_Execute,Field_Number 0x7c
00cc e40a       |    |		Load	0x2,0xa
00cd 3800       |8   |		Execute	Record,Field_Write,Field_Number 0x0
00ce 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
00cf			TRAP_00c0:
00cf e04e       | N  |		Load	0x0,0x4e
00d0 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
00d1 010f       |    |		Execute	Exception,Equal
00d2 680e       |h   |		Jump_Zero	0xe1
00d3 e04e       | N  |		Load	0x0,0x4e
00d4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00d5 8226       | &  |		Call	0x1,0x26
00d6 e40a       |    |		Load	0x2,0xa
00d7 3801       |8   |		Execute	Record,Field_Write,Field_Number 0x1
00d8 e40a       |    |		Load	0x2,0xa
00d9 3401       |4   |		Execute	Record,Field_Reference,Field_Number 0x1
00da 2602       |&   |		Execute	Variant_Record,Field_Reference,Variant,Direct,Field_Number 0x2
00db e010       |    |		Load	0x0,0x10
00dc 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
00dd e052       | R  |		Load	0x0,0x52
00de 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
00df 00d8       |    |		Load_Top	At_Offset_0
00e0 0101       |    |		Execute	Exception,Reraise
00e1 0100       |    |		Execute	Exception,Raise
00e2 0000 0000  |    |		.BLANK	0000[0x6]
00e8 ; --------------------------------------------------------------------------------------
00e8 ; SUBPROGRAM
00e8 ; --------------------------------------------------------------------------------------
00e8 0114       |    |		.CONST	0x0114								; Address of begin
00e9 0150       | P  |		.CONST	0x0150								; Address of exception handler
00ea 0010       |    |		.CONST	0x0010								; Number of locals
00eb			INIT_00e8:
00eb 00e9       |    |		Load_Encached	String_Cache
00ec 02a0       |    |		Declare_Subprogram	Null_Subprogram
00ed 4818       |H   |		Short_Literal	0x18
00ee 03d3       |    |		Declare_Type	Access,Defined,Accesses_Protected
00ef e056       | V  |		Load	0x0,0x56
00f0 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00f1 02c7       |    |		Declare_Variable	Any
00f2 00d8       |    |		Load_Top	At_Offset_0
00f3 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00f4 00d9       |    |		Load_Top	At_Offset_1
00f5 0007       |    |		Action	Break_Optional
00f6 e056       | V  |		Load	0x0,0x56
00f7 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00f8 02c7       |    |		Declare_Variable	Any
00f9 00d8       |    |		Load_Top	At_Offset_0
00fa 1c00       |    |		Execute_Immediate	Run_Utility,0x0
00fb 00db       |    |		Load_Top	At_Offset_3
00fc 0007       |    |		Action	Break_Optional
00fd e056       | V  |		Load	0x0,0x56
00fe 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
00ff 02c7       |    |		Declare_Variable	Any
0100 00d8       |    |		Load_Top	At_Offset_0
0101 1c00       |    |		Execute_Immediate	Run_Utility,0x0
0102 e602       |    |		Load	0x3,0x2
0103 0007       |    |		Action	Break_Optional
0104 00d8       |    |		Load_Top	At_Offset_0
0105 0007       |    |		Action	Break_Optional
0106 e05e       | ^  |		Load	0x0,0x5e
0107 1817       |    |		Execute	Package,Field_Execute,Field_Number 0x17
0108 029f 015b  |   [|		Declare_Subprogram	INIT_0158,For_Call
010a 029f 016b  |   k|		Declare_Subprogram	INIT_0168,For_Call
010c 029f 017b  |   {|		Declare_Subprogram	INIT_0178,For_Call
010e 029f 018b  |    |		Declare_Subprogram	INIT_0188,For_Call
0110 029f 01bb  |    |		Declare_Subprogram	INIT_01b8,For_Call
0112 029f 01d3  |    |		Declare_Subprogram	INIT_01d0,For_Call
0114			BODY_00e8:
0114 e40a       |    |		Load	0x2,0xa
0115 3c00       |<   |		Execute	Record,Field_Read,Field_Number 0x0
0116 860f       |    |		Call	0x3,0xf
0117 e061       | a  |		Load	0x0,0x61
0118 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0119 e609       |    |		Load	0x3,0x9
011a 860e       |    |		Call	0x3,0xe
011b c609       |    |		Store	0x3,0x9
011c 0092 0253  |   S|		Action	Push_String_Extended,0x253					; "Calling Illustrator to format diagram"
011e e052       | R  |		Load	0x0,0x52
011f 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0120 e5f7       |    |		Load	0x2,-0x9
0121 e5f8       |    |		Load	0x2,-0x8
0122 0092 024f  |   O|		Action	Push_String_Extended,0x24f					; "<DEFAULT>"
0124 e604       |    |		Load	0x3,0x4
0125 0227       | '  |		Execute	Access,All_Reference
0126 860b       |    |		Call	0x3,0xb
0127 e060       | `  |		Load	0x0,0x60
0128 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0129 e606       |    |		Load	0x3,0x6
012a e605       |    |		Load	0x3,0x5
012b 4801       |H   |		Short_Literal	0x1
012c 860d       |    |		Call	0x3,0xd
012d c605       |    |		Store	0x3,0x5
012e c606       |    |		Store	0x3,0x6
012f e605       |    |		Load	0x3,0x5
0130 e056       | V  |		Load	0x0,0x56
0131 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0132 c605       |    |		Store	0x3,0x5
0133 0092 0254  |   T|		Action	Push_String_Extended,0x254					; "Calling Illustrator to retrieve and delete formatted diagram"
0135 e052       | R  |		Load	0x0,0x52
0136 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
0137 e5f7       |    |		Load	0x2,-0x9
0138 e5f8       |    |		Load	0x2,-0x8
0139 e606       |    |		Load	0x3,0x6
013a 0227       | '  |		Execute	Access,All_Reference
013b 0092 0255  |   U|		Action	Push_String_Extended,0x255					; "<NONE>"
013d 860c       |    |		Call	0x3,0xc
013e e060       | `  |		Load	0x0,0x60
013f 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
0140 e00f       |    |		Load	0x0,0xf
0141 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0142 1b11       |    |		Execute	Package,Field_Read,Field_Number 0x11
0143 e5fd       |    |		Load	0x2,-0x3
0144 e606       |    |		Load	0x3,0x6
0145 0227       | '  |		Execute	Access,All_Reference
0146 8610       |    |		Call	0x3,0x10
0147 c409       |    |		Store	0x2,0x9
0148 e409       |    |		Load	0x2,0x9
0149 e405       |    |		Load	0x2,0x5
014a 3400       |4   |		Execute	Record,Field_Reference,Field_Number 0x0
014b e009       |    |		Load	0x0,0x9
014c 184e       | N  |		Execute	Package,Field_Execute,Field_Number 0x4e
014d e061       | a  |		Load	0x0,0x61
014e 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
014f 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
0150			TRAP_00e8:
0150 0007       |    |		Action	Break_Optional
0151 e061       | a  |		Load	0x0,0x61
0152 180f       |    |		Execute	Package,Field_Execute,Field_Number 0xf
0153 00d8       |    |		Load_Top	At_Offset_0
0154 0101       |    |		Execute	Exception,Reraise
0155 0000 0000  |    |		.XXX[0x3]
0157 0000       |    |
0158 ; --------------------------------------------------------------------------------------
0158 ; SUBPROGRAM
0158 ; --------------------------------------------------------------------------------------
0158 015b       | [  |		.CONST	0x015b								; Address of begin
0159 0004       |    |		.CONST	0x0004								; Address of exception handler
015a 0001       |    |		.CONST	0x0001								; Number of locals
015b			BODY_0158:
015b			INIT_0158:
015b e05e       | ^  |		Load	0x0,0x5e
015c 180e       |    |		Execute	Package,Field_Execute,Field_Number 0xe
015d 0092 0256  |   V|		Action	Push_String_Extended,0x256					; " > "
015f 01cc       |    |		Execute	Vector,Catenate
0160 e609       |    |		Load	0x3,0x9
0161 0227       | '  |		Execute	Access,All_Reference
0162 01cc       |    |		Execute	Vector,Catenate
0163 00ca       |    |		Action	Exit_Nullary_Function
0164 0000 0000  |    |		.BLANK	0000[0x4]
0168 ; --------------------------------------------------------------------------------------
0168 ; SUBPROGRAM
0168 ; --------------------------------------------------------------------------------------
0168 016b       | k  |		.CONST	0x016b								; Address of begin
0169 0004       |    |		.CONST	0x0004								; Address of exception handler
016a 0001       |    |		.CONST	0x0001								; Number of locals
016b			BODY_0168:
016b			INIT_0168:
016b 0092 0257  |   W|		Action	Push_String_Extended,0x257					; "/bin/cat "
016d e609       |    |		Load	0x3,0x9
016e 0227       | '  |		Execute	Access,All_Reference
016f 01cc       |    |		Execute	Vector,Catenate
0170 0092 0258  |   X|		Action	Push_String_Extended,0x258					; "; /bin/rm "
0172 01cc       |    |		Execute	Vector,Catenate
0173 e609       |    |		Load	0x3,0x9
0174 0227       | '  |		Execute	Access,All_Reference
0175 01cc       |    |		Execute	Vector,Catenate
0176 00ca       |    |		Action	Exit_Nullary_Function
0177 0000       |    |		.XXX[0x1]
0178 ; --------------------------------------------------------------------------------------
0178 ; SUBPROGRAM
0178 ; --------------------------------------------------------------------------------------
0178 017d       | }  |		.CONST	0x017d								; Address of begin
0179 0004       |    |		.CONST	0x0004								; Address of exception handler
017a 0002       |    |		.CONST	0x0002								; Number of locals
017b			INIT_0178:
017b 029f 0233  |   3|		Declare_Subprogram	INIT_0230,For_Call
017d			BODY_0178:
017d e9fe       |    |		Load	0x4,-0x2
017e 00ea       |    |		Load_Encached	Null_String_Cache
017f 00ea       |    |		Load_Encached	Null_String_Cache
0180 e9ff       |    |		Load	0x4,-0x1
0181 e056       | V  |		Load	0x0,0x56
0182 1814       |    |		Execute	Package,Field_Execute,Field_Number 0x14
0183 c9fe       |    |		Store	0x4,-0x2
0184 8802       |    |		Call	0x4,0x2
0185 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
0186 0000 0000  |    |		.XXX[0x2]
0188 ; --------------------------------------------------------------------------------------
0188 ; SUBPROGRAM
0188 ; --------------------------------------------------------------------------------------
0188 018d       |    |		.CONST	0x018d								; Address of begin
0189 0004       |    |		.CONST	0x0004								; Address of exception handler
018a 0002       |    |		.CONST	0x0002								; Number of locals
018b			INIT_0188:
018b 029f 0243  |   C|		Declare_Subprogram	INIT_0240,For_Call
018d			BODY_0188:
018d e608       |    |		Load	0x3,0x8
018e e607       |    |		Load	0x3,0x7
018f 4801       |H   |		Short_Literal	0x1
0190 860d       |    |		Call	0x3,0xd
0191 c607       |    |		Store	0x3,0x7
0192 c608       |    |		Store	0x3,0x8
0193 e607       |    |		Load	0x3,0x7
0194 e056       | V  |		Load	0x0,0x56
0195 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0196 c607       |    |		Store	0x3,0x7
0197 0092 0259  |   Y|		Action	Push_String_Extended,0x259					; "Calling Illustrator to get remote temporary filename"
0199 e052       | R  |		Load	0x0,0x52
019a 1813       |    |		Execute	Package,Field_Execute,Field_Number 0x13
019b e5f7       |    |		Load	0x2,-0x9
019c e5f8       |    |		Load	0x2,-0x8
019d e608       |    |		Load	0x3,0x8
019e 0227       | '  |		Execute	Access,All_Reference
019f 0092 024f  |   O|		Action	Push_String_Extended,0x24f					; "<DEFAULT>"
01a1 e60a       |    |		Load	0x3,0xa
01a2 e060       | `  |		Load	0x0,0x60
01a3 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01a4 e607       |    |		Load	0x3,0x7
01a5 00ea       |    |		Load_Encached	Null_String_Cache
01a6 e608       |    |		Load	0x3,0x8
01a7 0227       | '  |		Execute	Access,All_Reference
01a8 4800       |H   |		Short_Literal	0x0
01a9 e056       | V  |		Load	0x0,0x56
01aa 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01ab c607       |    |		Store	0x3,0x7
01ac 8802       |    |		Call	0x4,0x2
01ad e607       |    |		Load	0x3,0x7
01ae e056       | V  |		Load	0x0,0x56
01af 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01b0 c607       |    |		Store	0x3,0x7
01b1 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
01b2 0000 0000  |    |		.BLANK	0000[0x6]
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 e604       |    |		Load	0x3,0x4
01bc e603       |    |		Load	0x3,0x3
01bd 4801       |H   |		Short_Literal	0x1
01be 860d       |    |		Call	0x3,0xd
01bf c603       |    |		Store	0x3,0x3
01c0 c604       |    |		Store	0x3,0x4
01c1 00da       |    |		Load_Top	At_Offset_2
01c2 e00f       |    |		Load	0x0,0xf
01c3 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01c4 1816       |    |		Execute	Package,Field_Execute,Field_Number 0x16
01c5 e603       |    |		Load	0x3,0x3
01c6 e056       | V  |		Load	0x0,0x56
01c7 1863       | c  |		Execute	Package,Field_Execute,Field_Number 0x63
01c8 e603       |    |		Load	0x3,0x3
01c9 e056       | V  |		Load	0x0,0x56
01ca 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
01cb c603       |    |		Store	0x3,0x3
01cc 4502       |E   |		Exit_Suprogram	New_Top_Offset 0x2
01cd 0000 0000  |    |		.XXX[0x3]
01cf 0000       |    |
01d0 ; --------------------------------------------------------------------------------------
01d0 ; SUBPROGRAM
01d0 ; --------------------------------------------------------------------------------------
01d0 01e5       |    |		.CONST	0x01e5								; Address of begin
01d1 021f       |    |		.CONST	0x021f								; Address of exception handler
01d2 0006       |    |		.CONST	0x0006								; Number of locals
01d3			INIT_01d0:
01d3 e056       | V  |		Load	0x0,0x56
01d4 1b0d       |    |		Execute	Package,Field_Read,Field_Number 0xd
01d5 02c7       |    |		Declare_Variable	Any
01d6 00d8       |    |		Load_Top	At_Offset_0
01d7 1c00       |    |		Execute_Immediate	Run_Utility,0x0
01d8 00e8       |    |		Load_Encached	Character_Cache
01d9 e00f       |    |		Load	0x0,0xf
01da 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01db 182b       | +  |		Execute	Package,Field_Execute,Field_Number 0x2b
01dc 00e3       |    |		Load_Encached	Natural_Cache
01dd 4801       |H   |		Short_Literal	0x1
01de 00ea       |    |		Load_Encached	Null_String_Cache
01df e9fe       |    |		Load	0x4,-0x2
01e0 e057       | W  |		Load	0x0,0x57
01e1 1821       | !  |		Execute	Package,Field_Execute,Field_Number 0x21
01e2 0f00       |    |		Execute_Immediate	Equal,0x0
01e3 00e1       |    |		Load_Encached	Boolean_Cache
01e4 03f1       |    |		Declare_Variable	Discrete,With_Value
01e5			BODY_01d0:
01e5 e802       |    |		Load	0x4,0x2
01e6 00ea       |    |		Load_Encached	Null_String_Cache
01e7 e9ff       |    |		Load	0x4,-0x1
01e8 4800       |H   |		Short_Literal	0x0
01e9 e056       | V  |		Load	0x0,0x56
01ea 1815       |    |		Execute	Package,Field_Execute,Field_Number 0x15
01eb c802       |    |		Store	0x4,0x2
01ec 00cf       |    |		Action	Mark_Auxiliary
01ed 7825       |x%  |		Jump	0x213
01ee e802       |    |		Load	0x4,0x2
01ef e056       | V  |		Load	0x0,0x56
01f0 1843       | C  |		Execute	Package,Field_Execute,Field_Number 0x43
01f1 6807       |h   |		Jump_Zero	0x1f9
01f2 00db       |    |		Load_Top	At_Offset_3
01f3 4801       |H   |		Short_Literal	0x1
01f4 480a       |H   |		Short_Literal	0xa
01f5 e00f       |    |		Load	0x0,0xf
01f6 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
01f7 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
01f8 c804       |    |		Store	0x4,0x4
01f9 00e8       |    |		Load_Encached	Character_Cache
01fa e802       |    |		Load	0x4,0x2
01fb e056       | V  |		Load	0x0,0x56
01fc 1857       | W  |		Execute	Package,Field_Execute,Field_Number 0x57
01fd c803       |    |		Store	0x4,0x3
01fe 00db       |    |		Load_Top	At_Offset_3
01ff 4801       |H   |		Short_Literal	0x1
0200 e803       |    |		Load	0x4,0x3
0201 e00f       |    |		Load	0x0,0xf
0202 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0203 181f       |    |		Execute	Package,Field_Execute,Field_Number 0x1f
0204 c804       |    |		Store	0x4,0x4
0205 00d9       |    |		Load_Top	At_Offset_1
0206 680b       |h   |		Jump_Zero	0x212
0207 e803       |    |		Load	0x4,0x3
0208 0f22       | "  |		Execute_Immediate	Equal,0x22
0209 6808       |h   |		Jump_Zero	0x212
020a 4800       |H   |		Short_Literal	0x0
020b 0052       | R  |		Store_Top_Unchecked	Discrete,At_Offset_2
020c 00db       |    |		Load_Top	At_Offset_3
020d e9fe       |    |		Load	0x4,-0x2
020e e00f       |    |		Load	0x0,0xf
020f 1b0e       |    |		Execute	Package,Field_Read,Field_Number 0xe
0210 181d       |    |		Execute	Package,Field_Execute,Field_Number 0x1d
0211 c804       |    |		Store	0x4,0x4
0212 00c9       |    |		Action	Pop_Auxiliary_Loop
0213 e802       |    |		Load	0x4,0x2
0214 e056       | V  |		Load	0x0,0x56
0215 184b       | K  |		Execute	Package,Field_Execute,Field_Number 0x4b
0216 6fd7       |o   |		Jump_Zero	0x1ee
0217 00ce       |    |		Action	Pop_Auxiliary
0218 e802       |    |		Load	0x4,0x2
0219 e056       | V  |		Load	0x0,0x56
021a 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
021b c802       |    |		Store	0x4,0x2
021c 00da       |    |		Load_Top	At_Offset_2
021d a9fd       |    |		Store_Unchecked	0x4,-0x3
021e 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
021f			TRAP_01d0:
021f 00d8       |    |		Load_Top	At_Offset_0
0220 0107       |    |		Execute	Exception,Get_Name
0221 4950       |IP  |		Short_Literal	0x150
0222 495f       |I_  |		Short_Literal	0x15f
0223 0262       | b  |		Execute	Discrete,In_Range
0224 6807       |h   |		Jump_Zero	0x22c
0225 e802       |    |		Load	0x4,0x2
0226 e056       | V  |		Load	0x0,0x56
0227 181b       |    |		Execute	Package,Field_Execute,Field_Number 0x1b
0228 c802       |    |		Store	0x4,0x2
0229 00db       |    |		Load_Top	At_Offset_3
022a a9fd       |    |		Store_Unchecked	0x4,-0x3
022b 4503       |E   |		Exit_Suprogram	New_Top_Offset 0x3
022c 00d8       |    |		Load_Top	At_Offset_0
022d 0101       |    |		Execute	Exception,Reraise
022e 0000 0000  |    |		.XXX[0x2]
0230 ; --------------------------------------------------------------------------------------
0230 ; SUBPROGRAM
0230 ; --------------------------------------------------------------------------------------
0230 0236       | 6  |		.CONST	0x0236								; Address of begin
0231 0004       |    |		.CONST	0x0004								; Address of exception handler
0232 0002       |    |		.CONST	0x0002								; Number of locals
0233			INIT_0230:
0233 e9fe       |    |		Load	0x4,-0x2
0234 e056       | V  |		Load	0x0,0x56
0235 1820       |    |		Execute	Package,Field_Execute,Field_Number 0x20
0236			BODY_0230:
0236 00d8       |    |		Load_Top	At_Offset_0
0237 01da       |    |		Execute	Vector,Bounds
0238 e602       |    |		Load	0x3,0x2
0239 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
023a a9fd       |    |		Store_Unchecked	0x4,-0x3
023b 00d8       |    |		Load_Top	At_Offset_0
023c e9fd       |    |		Load	0x4,-0x3
023d 0228       | (  |		Execute	Access,All_Write
023e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
023f 0000       |    |		.XXX[0x1]
0240 ; --------------------------------------------------------------------------------------
0240 ; SUBPROGRAM
0240 ; --------------------------------------------------------------------------------------
0240 0246       | F  |		.CONST	0x0246								; Address of begin
0241 0004       |    |		.CONST	0x0004								; Address of exception handler
0242 0002       |    |		.CONST	0x0002								; Number of locals
0243			INIT_0240:
0243 e607       |    |		Load	0x3,0x7
0244 e056       | V  |		Load	0x0,0x56
0245 1866       | f  |		Execute	Package,Field_Execute,Field_Number 0x66
0246			BODY_0240:
0246 00d8       |    |		Load_Top	At_Offset_0
0247 01da       |    |		Execute	Vector,Bounds
0248 e602       |    |		Load	0x3,0x2
0249 03ba       |    |		Declare_Variable	Access,By_Allocation,With_Constraint
024a a9ff       |    |		Store_Unchecked	0x4,-0x1
024b 00d8       |    |		Load_Top	At_Offset_0
024c e9ff       |    |		Load	0x4,-0x1
024d 0228       | (  |		Execute	Access,All_Write
024e 4501       |E   |		Exit_Suprogram	New_Top_Offset 0x1
024f ; --------------------------------------------------------------------------------------
024f ; STRING TABLE
024f ; --------------------------------------------------------------------------------------
024f 0018       |    |		.STRTAB	0x0018->0x025b							; "<DEFAULT>"
0250 001f       |    |		.STRTAB	0x001f->0x025f							; "_diagram"
0251 0025       | %  |		.STRTAB	0x0025->0x0263							; "The Diagram Name specified already exists and Overwrite => False, a new diagram will not be generated"
0252 0088       |    |		.STRTAB	0x0088->0x0296							; "The Diagram Name refers to a invalid object"
0253 00b1       |    |		.STRTAB	0x00b1->0x02ab							; "Calling Illustrator to format diagram"
0254 00d4       |    |		.STRTAB	0x00d4->0x02be							; "Calling Illustrator to retrieve and delete formatted diagram"
0255 010e       |    |		.STRTAB	0x010e->0x02dc							; "<NONE>"
0256 0112       |    |		.STRTAB	0x0112->0x02df							; " > "
0257 0113       |    |		.STRTAB	0x0113->0x02e0							; "/bin/cat "
0258 011a       |    |		.STRTAB	0x011a->0x02e5							; "; /bin/rm "
0259 0122       | "  |		.STRTAB	0x0122->0x02ea							; "Calling Illustrator to get remote temporary filename"
025a 0154       | T  |		.STREND 0x0154->0x0304
025b 3c44 4546  |<DEF|		.STRTAB_STRINGS
0304 0000 0000  |    |		.BLANK	0000[0x4]
0308 ; --------------------------------------------------------------------------------------
0308 ; Debug Table
0308 ; --------------------------------------------------------------------------------------
0308 0004 0014  |    |		.DEBUG4	0x0004,0x0014,0x0fc8,0x0000,0x0001,0x0000
030e 35a9 d217  |5   |		.XXX[0xe5]
0310 2253 b200  |"S  |
0312 018c a41a  |    |
0314 d4f1 0b91  |    |
0316 29dd 0000  |)   |
0318 c652 0d6a  | R j|
031a 8685 c894  |    |
031c f080 0063  |   c|
031e 2906 b545  |)  E|
0320 42e4 4a79  |B Jy|
0322 4000 3194  |@ 1 |
0324 835a a3a1  | Z  |
0326 7225 3d20  |r%= |
0328 0018 ca41  |   A|
032a ad52 50b9  | RP |
032c 129e d000  |    |
032e 0c65 20d6  | e  |
0330 a968 5c89  | h\ |
0332 4f88 0006  |O   |
0334 3290 6b54  |2 kT|
0336 d42e 44a7  | .D |
0338 d400 0319  |    |
033a 4836 2cca  |H6, |
033c 1722 5400  | "T |
033e 0001 8ca4  |    |
0340 1ad0 610b  |  a |
0342 912a 0400  | *  |
0344 00c6 520d  |  R |
0346 6836 85c8  |h6  |
0348 9504 0000  |    |
034a 6329 06b4  |c)  |
034c 1d42 e44a  | B J|
034e 8300 0031  |   1|
0350 9483 5a13  |  Z |
0352 a172 2542  | r%B|
0354 0000 18ca  |    |
0356 41ad 0a50  |A  P|
0358 b912 a140  |   @|
035a 000c 6520  |  e |
035c d685 a85c  |   \|
035e 8950 c000  | P  |
0360 0632 906b  | 2 k|
0362 42f4 2e44  |B .D|
0364 a870 0003  | p  |
0366 1948 35a1  | H5 |
0368 8a17 2254  |  "T|
036a 4000 018c  |@   |
036c a41a d0d1  |    |
036e 0b91 2a24  |  *$|
0370 0000 c652  |   R|
0372 0d68 6c85  | hl |
0374 c895 1400  |    |
0376 0063 2906  | c) |
0378 b438 42e4  | 8B |
037a 4a8b 0000  |J   |
037c 3194 835a  |1  Z|
037e 1d21 7225  | !r%|
0380 4600 0018  |F   |
0382 ca41 ad0f  | A  |
0384 90b9 12a3  |    |
0386 4000 0c65  |@  e|
0388 20d6 8808  |    |
038a 5c89 51c0  |\ Q |
038c 0006 3290  |  2 |
038e 6b44 242e  |kD$.|
0390 44a8 f000  |D   |
0392 0319 4835  |  H5|
0394 a222 1722  | " "|
0396 5480 0001  |T   |
0398 8ca4 1aed  |    |
039a 650b 912a  |e  *|
039c 4400 00c6  |D   |
039e 520b dae4  |R   |
03a0 85c8 9558  |   X|
03a2 0000 632b  |  c+|
03a4 004f 8e42  | O B|
03a6 e44a ac00  | J  |
03a8 0031 9580  | 1  |
03aa 27c7 2172  |' !r|
03ac 2556 0000  |%V  |
03ae 18ca c013  |    |
03b0 e390 b912  |    |
03b2 ab00 000c  |    |
03b4 6560 09f1  |e`  |
03b6 c85c 8955  | \ U|
03b8 8000 0632  |   2|
03ba b004 f8e4  |    |
03bc 2e44 aac0  |.D  |
03be 0003 1958  |   X|
03c0 027c 7217  | |r |
03c2 2255 6000  |"U` |
03c4 018c ac01  |    |
03c6 3e39 0b91  |>9  |
03c8 2ab0 0000  |*   |
03ca c656 009f  | V  |
03cc 1c85 c895  |    |
03ce 5800 0063  |X  c|
03d0 2b00 4f8e  |+ O |
03d2 42e4 4aac  |B J |
03d4 0000 3195  |  1 |
03d6 8027 c721  | ' !|
03d8 7225 5600  |r%V |
03da 0018 cac0  |    |
03dc 13e3 90b9  |    |
03de 12ab 0000  |    |
03e0 0c65 6009  | e` |
03e2 f1c8 5c89  |  \ |
03e4 5580 0006  |U   |
03e6 32b0 04f8  |2   |
03e8 e42e 44aa  | .D |
03ea c000 0319  |    |
03ec 5802 7c73  |X |s|
03ee 912a 4800  | *H |
03f0 00d3 80d2  |    |
03f2 ff01       |    |
03f3 0000 0000  |    |		.BLANK	0000[0xd]