c4b7883334a64fe678d68f9e0cb2befd0dee960c
[occt.git] / src / ExprIntrp / ExprIntrp_yacclex.cxx
1 // Created on: 1993-12-14
2 // Created by: Arnaud BOUZY
3 // Copyright (c) 1993-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 <string.h>
23 #include <ExprIntrp_yaccintrf.hxx>
24
25 static char ExprIntrp_curres[255];
26 static int ExprIntrp_degree;
27
28 #ifndef WNT
29 extern char* ExprIntrptext;
30 #else
31 extern "C" char* ExprIntrptext;
32 #endif  // WNT
33
34
35 extern "C" void ExprIntrp_SetResult()
36 {
37   strcpy(ExprIntrp_curres,ExprIntrptext);
38 }
39
40 extern "C" void ExprIntrp_SetDegree()
41 {
42   ExprIntrp_degree = strlen(ExprIntrptext);
43 }
44
45 int ExprIntrp_GetDegree()
46 {
47   return ExprIntrp_degree;
48 }
49
50 int ExprIntrp_GetResult(char *s) 
51 {
52   strcpy(s,ExprIntrp_curres);
53   return strlen(ExprIntrp_curres);
54 }