0024947: Redesign OCCT legacy type system -- automatic
[occt.git] / src / Expr / Expr_RelationIterator.cxx
CommitLineData
b311480e 1// Created on: 1991-06-13
2// Created by: Arnaud BOUZY
3// Copyright (c) 1991-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
17#include <Expr_RelationIterator.ixx>
18#include <Standard_NoMoreObject.hxx>
19#include <Standard_NoSuchObject.hxx>
20#include <Expr_SystemRelation.hxx>
ec357c5c 21#include <Expr_SingleRelation.hxx>
7fd59977 22
23Expr_RelationIterator::Expr_RelationIterator (const Handle(Expr_GeneralRelation)& rel):myRelation(1,rel->NbOfSingleRelations())
24{
25 if (rel->IsKind(STANDARD_TYPE(Expr_SingleRelation))) {
26 myRelation(1) = Handle(Expr_SingleRelation)::DownCast(rel);
27 }
28 else {
29 Standard_Integer nbcur = 1;
30 Handle(Expr_GeneralRelation) currel;
31 for (Standard_Integer i =1; i<= rel->NbOfSubRelations(); i++) {
32 currel = rel->SubRelation(i);
33 if (currel->IsKind(STANDARD_TYPE(Expr_SingleRelation))) {
34 myRelation(nbcur) = Handle(Expr_SingleRelation)::DownCast(currel);
35 nbcur++;
36 }
37 else {
38 Expr_RelationIterator subit(currel);
39 while (subit.More()) {
40 myRelation(nbcur) = subit.Value();
41 subit.Next();
42 nbcur++;
43 }
44 }
45 }
46 }
47 current = 1;
48}
49
50Standard_Boolean Expr_RelationIterator::More () const
51{
52 return (current <= myRelation.Length());
53}
54
55void Expr_RelationIterator::Next ()
56{
57 if (!More()) {
58 Standard_NoMoreObject::Raise();
59 }
60 current++;
61}
62
63Handle(Expr_SingleRelation) Expr_RelationIterator::Value () const
64{
65 if (!More()) {
66 Standard_NoSuchObject::Raise();
67 }
68 return myRelation(current);
69}
70