0024830: Remove redundant keyword 'mutable' in CDL declarations
[occt.git] / src / TNaming / TNaming_IteratorOnShapesSet.cdl
CommitLineData
b311480e 1-- Created on: 1997-05-06
2-- Created by: Yves FRICAUD
3-- Copyright (c) 1997-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
17private class IteratorOnShapesSet from TNaming
18
19 ---Purpose:
20
21uses
22 ShapesSet from TNaming,
23 Shape from TopoDS,
24 MapIteratorOfMapOfShape from TopTools
25
26raises
27 NoMoreObject from Standard,
28 NoSuchObject from Standard
29
30is
31 Create returns IteratorOnShapesSet;
32 ---C++: inline
33
34 Create (S : ShapesSet from TNaming) returns IteratorOnShapesSet;
35 ---C++: inline
36
37 Init (me : in out; S : ShapesSet from TNaming);
38 ---Purpose: Initialize the iteration
39 ---C++: inline
40
41 More (me) returns Boolean;
42 ---Purpose: Returns True if there is a current Item in
43 -- the iteration.
44 ---C++: inline
45
46 Next (me : in out)
47 ---Purpose: Move to the next Item
48 ---C++: inline
49 raises
50 NoMoreObject from Standard;
51
52 Value(me) returns Shape from TopoDS
53 ---C++: return const&
54 raises
55 NoSuchObject from Standard;
56
57
58fields
59 myIt : MapIteratorOfMapOfShape from TopTools;
60
61end IteratorOnShapesSet;