b311480e |
1 | // Created on: 1993-12-14 |
2 | // Created by: Arnaud BOUZY |
3 | // Copyright (c) 1993-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. |
7fd59977 |
16 | |
17 | #include <string.h> |
18 | #include <ExprIntrp_yaccintrf.hxx> |
19 | |
2a54ebbf |
20 | static TCollection_AsciiString ExprIntrp_curres; |
7fd59977 |
21 | static int ExprIntrp_degree; |
22 | |
57c28b61 |
23 | #ifndef _WIN32 |
7fd59977 |
24 | extern char* ExprIntrptext; |
25 | #else |
26 | extern "C" char* ExprIntrptext; |
57c28b61 |
27 | #endif // _WIN32 |
7fd59977 |
28 | |
29 | |
30 | extern "C" void ExprIntrp_SetResult() |
31 | { |
2a54ebbf |
32 | ExprIntrp_curres = ExprIntrptext; |
7fd59977 |
33 | } |
34 | |
35 | extern "C" void ExprIntrp_SetDegree() |
36 | { |
105aae76 |
37 | ExprIntrp_degree = (int)strlen(ExprIntrptext); |
7fd59977 |
38 | } |
39 | |
40 | int ExprIntrp_GetDegree() |
41 | { |
42 | return ExprIntrp_degree; |
43 | } |
44 | |
2a54ebbf |
45 | const TCollection_AsciiString& ExprIntrp_GetResult () |
7fd59977 |
46 | { |
2a54ebbf |
47 | return ExprIntrp_curres; |
7fd59977 |
48 | } |