0023024: Update headers of OCCT files
[occt.git] / src / AdvApp2Var / AdvApp2Var_SysBase_baseinit.cxx
1 // Created on: 1996-05-21
2 // Created by: Philippe MANGIN
3 // Copyright (c) 1996-1999 Matra Datavision
4 // Copyright (c) 1999-2012 OPEN CASCADE SAS
5 //
6 // The content of this file is subject to the Open CASCADE Technology Public
7 // License Version 6.5 (the "License"). You may not use the content of this file
8 // except in compliance with the License. Please obtain a copy of the License
9 // at http://www.opencascade.org and read it completely before using this file.
10 //
11 // The Initial Developer of the Original Code is Open CASCADE S.A.S., having its
12 // main offices at: 1, place des Freres Montgolfier, 78280 Guyancourt, France.
13 //
14 // The Original Code and all software distributed under the License is
15 // distributed on an "AS IS" basis, without warranty of any kind, and the
16 // Initial Developer hereby disclaims all such warranties, including without
17 // limitation, any warranties of merchantability, fitness for a particular
18 // purpose or non-infringement. Please see the License for the specific terms
19 // and conditions governing the rights and limitations under the License.
20
21
22 #include <AdvApp2Var_SysBase.hxx>
23
24
25 static int init_STBAS(void)
26 {
27   int ICODE = 0;
28   // Init du Tableau des allocs
29   AdvApp2Var_SysBase::mainial_();
30   // Init de LEC IBB IMP
31   AdvApp2Var_SysBase::macinit_(&ICODE, &ICODE);
32   //
33   return 1;
34 }
35 //
36 class STBASLibInit
37 {
38   static int var_STBASLibINIT;
39 };
40
41 int STBASLibInit::var_STBASLibINIT = init_STBAS();
42