0025266: Debug statements in the source are getting flushed on to the console
[occt.git] / src / IFSelect / IFSelect_SelectFlag.cxx
1 // Copyright (c) 1999-2014 OPEN CASCADE SAS
2 //
3 // This file is part of Open CASCADE Technology software library.
4 //
5 // This library is free software; you can redistribute it and/or modify it under
6 // the terms of the GNU Lesser General Public License version 2.1 as published
7 // by the Free Software Foundation, with special exception defined in the file
8 // OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
9 // distribution for complete text of the license and disclaimer of any warranty.
10 //
11 // Alternatively, this file may be used under the terms of Open CASCADE
12 // commercial license or contractual agreement.
13
14 #include <IFSelect_SelectFlag.ixx>
15
16
17 IFSelect_SelectFlag::IFSelect_SelectFlag (const Standard_CString flagname)
18     : thename (flagname)    {  }
19
20     Standard_CString  IFSelect_SelectFlag::FlagName () const
21       {  return thename.ToCString();  }
22
23
24     Interface_EntityIterator  IFSelect_SelectFlag::RootResult
25   (const Interface_Graph& G) const
26 {
27   Standard_Boolean direct = IsDirect();
28   Interface_EntityIterator res;
29   const Interface_BitMap& bm = G.BitMap();
30   Standard_Integer flag = bm.FlagNumber (thename.ToCString());
31   if (flag == 0) return res;
32   Interface_EntityIterator inp = InputResult(G);
33
34   for (inp.Start(); inp.More(); inp.Next()) {
35     Standard_Integer num = G.EntityNumber(inp.Value());
36     if (num == 0) continue;
37     if (direct == bm.Value(num,flag)) res.AddItem (G.Entity(num));
38   }
39   return res;
40 }
41
42     Standard_Boolean  IFSelect_SelectFlag::Sort
43   (const Standard_Integer ,
44    const Handle(Standard_Transient)&,
45    const Handle(Interface_InterfaceModel)& ) const
46       {  return Standard_False;  }
47
48     TCollection_AsciiString  IFSelect_SelectFlag::ExtractLabel () const
49 {
50   TCollection_AsciiString lab ("Entities Flagged by ");
51   lab.AssignCat (thename);
52   return lab;
53 }