b311480e |
1 | // Created on: 1994-07-25 |
2 | // Created by: Remi LEQUETTE |
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. |
b311480e |
16 | |
7fd59977 |
17 | #include <GeometryTest.hxx> |
18 | #include <GeomliteTest.hxx> |
19 | #include <Standard_Boolean.hxx> |
20 | #include <Draw_Interpretor.hxx> |
21 | |
22 | void GeometryTest::AllCommands(Draw_Interpretor& theCommands) |
23 | { |
24 | static Standard_Boolean done = Standard_False; |
25 | if (done) return; |
26 | done = Standard_True; |
27 | |
28 | GeomliteTest::AllCommands(theCommands); |
29 | GeometryTest::CurveCommands(theCommands); |
9294c8f7 |
30 | GeometryTest::CurveTanCommands(theCommands); |
7fd59977 |
31 | GeometryTest::FairCurveCommands(theCommands); |
32 | GeometryTest::SurfaceCommands(theCommands); |
33 | GeometryTest::ConstraintCommands(theCommands); |
7fd59977 |
34 | GeometryTest::APICommands(theCommands); |
35 | GeometryTest::ContinuityCommands(theCommands); |
38f33510 |
36 | GeometryTest::TestProjCommands(theCommands); |
5fe14d0f |
37 | GeometryTest::PolyCommands(theCommands); |
38 | |
7fd59977 |
39 | // define the TCL variable Draw_GEOMETRY |
40 | //char* com = "set Draw_GEOMETRY 1"; |
41 | //theCommands.Eval(com); |
42 | //char* com2 = "source $env(CASROOT)/src/DrawResources/CURVES.tcl"; |
43 | //theCommands.Eval(com2); |
44 | //char* com3 = "source $env(CASROOT)/src/DrawResources/SURFACES.tcl"; |
45 | //theCommands.Eval(com3); |
46 | } |