0024023: Revamp the OCCT Handle -- ambiguity
[occt.git] / src / AIS / AIS_Line.cdl
old mode 100755 (executable)
new mode 100644 (file)
index e45a69f..02bee35
@@ -1,25 +1,18 @@
 -- Created on: 1997-01-21
 -- Created by: Prestataire Christiane ARMAND
 -- Copyright (c) 1997-1999 Matra Datavision
--- Copyright (c) 1999-2012 OPEN CASCADE SAS
+-- Copyright (c) 1999-2014 OPEN CASCADE SAS
 --
--- The content of this file is subject to the Open CASCADE Technology Public
--- License Version 6.5 (the "License"). You may not use the content of this file
--- except in compliance with the License. Please obtain a copy of the License
--- at http://www.opencascade.org and read it completely before using this file.
+-- This file is part of Open CASCADE Technology software library.
 --
--- The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
--- main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
+-- This library is free software; you can redistribute it and/or modify it under
+-- the terms of the GNU Lesser General Public License version 2.1 as published
+-- by the Free Software Foundation, with special exception defined in the file
+-- OCCT_LGPL_EXCEPTION.txt. Consult the file LICENSE_LGPL_21.txt included in OCCT
+-- distribution for complete text of the license and disclaimer of any warranty.
 --
--- The Original Code and all software distributed under the License is
--- distributed on an "AS IS" basis, without warranty of any kind, and the
--- Initial Developer hereby disclaims all such warranties, including without
--- limitation, any warranties of merchantability, fitness for a particular
--- purpose or non-infringement. Please see the License for the specific terms
--- and conditions governing the rights and limitations under the License.
-
---   GG  :  GER61351 17/11/1999 Change SetColor() with a compatible Quantity_Color instead
---                                    the restricted NameOfColor.
+-- Alternatively, this file may be used under the terms of Open CASCADE
+-- commercial license or contractual agreement.
 
 class Line from AIS inherits InteractiveObject from AIS
 
@@ -36,43 +29,35 @@ uses
     Selection             from SelectMgr,
     Projector             from Prs3d,
     Transformation        from Geom,
-    PresentationManager2d from PrsMgr,
-    GraphicObject         from Graphic2d,    
     Line                  from AIS,
     KindOfInteractive     from AIS
 
 is
     Create(aLine : Line from Geom) 
-    returns mutable Line from AIS;
+    returns Line from AIS;
        ---Purpose: Initializes the line aLine.
         
     Create(aStartPoint : Point from Geom;
           aEndPoint : Point from Geom) 
-    returns mutable Line from AIS;
+    returns Line from AIS;
        ---Purpose: Initializes a starting point aStartPoint
        --   and a finishing point aEndPoint for the line. 
  
     Compute(me            : mutable;
            aPresentationManager: PresentationManager3d from PrsMgr;
-           aPresentation : mutable Presentation from Prs3d;
+           aPresentation : Presentation from Prs3d;
            aMode         : Integer from Standard = 0) 
     is redefined static  private;
     
     Compute(me:mutable;
                aProjector: Projector from Prs3d;
-                aPresentation: mutable Presentation from Prs3d)
-    is redefined static private;     
-
-    Compute(me:mutable;
-           aPresentationManager: PresentationManager2d from PrsMgr;
-            aPresentation: mutable GraphicObject from Graphic2d;
-            aMode: Integer from Standard = 0)
-    is redefined static private;       
+                aPresentation: Presentation from Prs3d)
+    is redefined static private;
 
     Compute(me            : mutable;
             aProjector    : Projector from Prs3d;
             aTrsf         : Transformation from Geom;
-            aPresentation : mutable Presentation from Prs3d)
+            aPresentation : Presentation from Prs3d)
     is redefined;
        ---Purpose: computes the presentation according to a point of view
        --          given by <aProjector>.
@@ -85,7 +70,7 @@ is
 -- Methods from SelectableObject
 
     ComputeSelection(me         : mutable;
-                    aSelection : mutable Selection from SelectMgr;
+                    aSelection : Selection from SelectMgr;
                     aMode      : Integer from Standard)is private;
 
  
@@ -139,19 +124,19 @@ is
 
 
     ComputeInfiniteLine(me: mutable;
-                        aPresentation : mutable Presentation from Prs3d)
+                        aPresentation : Presentation from Prs3d)
     is private;
      
     ComputeSegmentLine(me: mutable;
-                       aPresentation : mutable Presentation from Prs3d)
+                       aPresentation : Presentation from Prs3d)
     is private;
 
     ComputeInfiniteLineSelection(me: mutable;
-                                 aSelection : mutable Selection from SelectMgr)
+                                 aSelection : Selection from SelectMgr)
     is private;
      
     ComputeSegmentLineSelection(me: mutable;
-                                aSelection : mutable Selection from SelectMgr)
+                                aSelection : Selection from SelectMgr)
     is private;
 
 fields