0024830: Remove redundant keyword 'mutable' in CDL declarations
[occt.git] / src / DDocStd / DDocStd_DrawDocument.cdl
CommitLineData
b311480e 1-- Created on: 2000-03-01
2-- Created by: Denis PASCAL
973c2be1 3-- Copyright (c) 2000-2014 OPEN CASCADE SAS
b311480e 4--
973c2be1 5-- This file is part of Open CASCADE Technology software library.
b311480e 6--
d5f74e42 7-- This library is free software; you can redistribute it and/or modify it under
8-- the terms of the GNU Lesser General Public License version 2.1 as published
973c2be1 9-- by the Free Software Foundation, with special exception defined in the file
10-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
11-- distribution for complete text of the license and disclaimer of any warranty.
b311480e 12--
973c2be1 13-- Alternatively, this file may be used under the terms of Open CASCADE
14-- commercial license or contractual agreement.
7fd59977 15
16class DrawDocument from DDocStd inherits Data from DDF
17
18 ---Purpose: draw variable for TDocStd_Document.
19 -- ==================================
20
21uses Document from TDocStd,
22 Drawable3D from Draw,
23 Interpretor from Draw,
24 Display from Draw
25
26is
27
28
29 Find (myclass; Doc : Document from TDocStd)
30 returns DrawDocument from DDocStd;
31
32 Create (Doc : Document from TDocStd)
6e33d3ce 33 returns DrawDocument from DDocStd;
7fd59977 34
35 GetDocument(me) returns Document from TDocStd;
36
37 DrawOn (me; dis : in out Display from Draw);
38
39 Copy (me)
6e33d3ce 40 returns Drawable3D from Draw
7fd59977 41 is redefined;
42
43 Dump (me; S : in out OStream)
44 is redefined;
45
46 Whatis (me; I : in out Interpretor from Draw)
47 is redefined;
48
49fields
50
51 myDocument : Document from TDocStd;
52
53end DrawDocument;