src/SWDRAW/SWDRAW_ShapeProcess.cdl


1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20

-- File:	SWDRAW_ShapeProcess.cdl
-- Created:	Sat Jun 19 15:26:38 1999
-- Author:	data exchange team
--		<det@doomox.nnov.matra-dtv.fr>
---Copyright:	 Matra Datavision 1999


class ShapeProcess from SWDRAW

	---Purpose: Contains commands to activate package ShapeProcess
	
uses
    Interpretor from Draw

is

    InitCommands (myclass; theCommands: in out Interpretor from Draw);
    	---Purpose: Loads commands defined in ShapeProc

end ShapeProcess;