0023403: Crash when parsing an expression with lexical error
[occt.git] / src / STEPCAFControl / STEPCAFControl_Controller.cxx
CommitLineData
b311480e 1// Created on: 2000-10-05
2// Created by: Andrey BETENEV
3// Copyright (c) 2000-2012 OPEN CASCADE SAS
4//
5// The content of this file is subject to the Open CASCADE Technology Public
6// License Version 6.5 (the "License"). You may not use the content of this file
7// except in compliance with the License. Please obtain a copy of the License
8// at http://www.opencascade.org and read it completely before using this file.
9//
10// The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
11// main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
12//
13// The Original Code and all software distributed under the License is
14// distributed on an "AS IS" basis, without warranty of any kind, and the
15// Initial Developer hereby disclaims all such warranties, including without
16// limitation, any warranties of merchantability, fitness for a particular
17// purpose or non-infringement. Please see the License for the specific terms
18// and conditions governing the rights and limitations under the License.
19
7fd59977 20
21#include <STEPCAFControl_Controller.ixx>
22#include <STEPCAFControl_ActorWrite.hxx>
23#include <XSAlgo.hxx>
24
25//=======================================================================
26//function : STEPCAFControl_Controller
27//purpose :
28//=======================================================================
29
30STEPCAFControl_Controller::STEPCAFControl_Controller ()
31{
32 Handle(STEPCAFControl_ActorWrite) ActWrite = new STEPCAFControl_ActorWrite;
33 theAdaptorWrite = ActWrite;
34}
35
36//=======================================================================
37//function : Init
38//purpose :
39//=======================================================================
40
41Standard_Boolean STEPCAFControl_Controller::Init ()
42{
43 static Standard_Boolean inic = Standard_False;
44 if (inic) return Standard_True;
45 inic = Standard_True;
46 // self-registering
47 Handle(STEPCAFControl_Controller) STEPCTL = new STEPCAFControl_Controller;
48// do XSAlgo::Init, cause it does not called before.
49 XSAlgo::Init();
50 // do something to avoid warnings...
51 STEPCTL->AutoRecord();
52 return Standard_True;
53}