0024830: Remove redundant keyword 'mutable' in CDL declarations
[occt.git] / src / IGESSelect / IGESSelect_DispPerDrawing.cdl
CommitLineData
b311480e 1-- Created on: 1994-05-31
2-- Created by: Christian CAILLET
3-- Copyright (c) 1994-1999 Matra Datavision
973c2be1 4-- Copyright (c) 1999-2014 OPEN CASCADE SAS
b311480e 5--
973c2be1 6-- This file is part of Open CASCADE Technology software library.
b311480e 7--
d5f74e42 8-- This library is free software; you can redistribute it and/or modify it under
9-- the terms of the GNU Lesser General Public License version 2.1 as published
973c2be1 10-- by the Free Software Foundation, with special exception defined in the file
11-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
12-- distribution for complete text of the license and disclaimer of any warranty.
b311480e 13--
973c2be1 14-- Alternatively, this file may be used under the terms of Open CASCADE
15-- commercial license or contractual agreement.
7fd59977 16
17class DispPerDrawing from IGESSelect inherits Dispatch
18
19 ---Purpose : This type of dispatch defines sets of entities attached to
20 -- distinct drawings. This information is taken from attached
21 -- views which appear in the Directory Part. Also Drawing Frames
22 -- are considered when Drawings are part of input list.
23 --
24 -- Remaining data concern entities not attached to a drawing.
25
26uses AsciiString from TCollection, EntityIterator, Graph, SubPartsIterator,
27 ViewSorter
28
29is
30
6e33d3ce 31 Create returns DispPerDrawing;
7fd59977 32 ---Purpose : Creates a DispPerDrawing
33
34 Label (me) returns AsciiString from TCollection;
35 ---Purpose : Returns as Label, "One File per Drawing"
36
37 -- -- Evaluation -- --
38
39 Packets (me; G : Graph; packs : in out SubPartsIterator);
40 ---Purpose : Computes the list of produced Packets. Packets are computed
41 -- by a ViewSorter (SortDrawings with also frames).
42
43 CanHaveRemainder (me) returns Boolean is redefined;
44 ---Purpose : Returns True, because of entities attached to no view.
45
46 Remainder (me; G : Graph) returns EntityIterator is redefined;
47 ---Purpose : Returns Remainder which is a set of Entities.
48 -- It is supposed to be called once Packets has been called.
49
50fields
51
52 thesorter : ViewSorter;
53
54end DispPerDrawing;