Planet
navi homePPSaboutscreenshotsdownloaddevelopmentforum

source: code/branches/gui/src/core/TclBind.h @ 2004

Last change on this file since 2004 was 1505, checked in by rgrieder, 16 years ago

f* svn: It doesn't even inform you if you attempt to set a non existing property. It is svn:eol-style and not eol-style when using the command by the way…

  • Property svn:eol-style set to native
File size: 2.0 KB
Line 
1/*
2 *   ORXONOX - the hottest 3D action shooter ever to exist
3 *                    > www.orxonox.net <
4 *
5 *
6 *   License notice:
7 *
8 *   This program is free software; you can redistribute it and/or
9 *   modify it under the terms of the GNU General Public License
10 *   as published by the Free Software Foundation; either version 2
11 *   of the License, or (at your option) any later version.
12 *
13 *   This program is distributed in the hope that it will be useful,
14 *   but WITHOUT ANY WARRANTY; without even the implied warranty of
15 *   MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
16 *   GNU General Public License for more details.
17 *
18 *   You should have received a copy of the GNU General Public License
19 *   along with this program; if not, write to the Free Software
20 *   Foundation, Inc., 51 Franklin Street, Fifth Floor, Boston, MA  02110-1301, USA.
21 *
22 *   Author:
23 *      Fabian 'x3n' Landau
24 *   Co-authors:
25 *      ...
26 *
27 */
28
29#ifndef _TclBind_H__
30#define _TclBind_H__
31
32#include "CorePrereqs.h"
33
34#include "cpptcl/CppTcl.h"
35
36namespace orxonox
37{
38    class _CoreExport TclBind
39    {
40        public:
41            static TclBind& getInstance();
42
43            static std::string tcl(const std::string& tclcode);
44            static void bgerror(std::string error);
45
46            void setDataPath(const std::string& datapath);
47            std::string getTclLibPath() const { return this->tclLibPath_; }
48            void createTclInterpreter();
49            void createNewTclInterpreter();
50            Tcl::interpreter* getTclInterpreter() const { return this->interpreter_; }
51
52            static std::string tcl_query(Tcl::object const &args);
53            static void tcl_execute(Tcl::object const &args);
54
55            static bool eval(const std::string& tclcode);
56
57        private:
58            TclBind();
59            TclBind(const TclBind& other);
60            ~TclBind();
61
62            Tcl::interpreter* interpreter_;
63            std::string tclLibPath_;
64            bool bSetTclLibPath_;
65    };
66}
67
68#endif /* _TclBind_H__ */
Note: See TracBrowser for help on using the repository browser.