1 /* "CodeWorker":	a scripting language for parsing and generating text.
2 
3 Copyright (C) 1996-1997, 1999-2003 C�dric Lemaire
4 
5 This library is free software; you can redistribute it and/or
6 modify it under the terms of the GNU Lesser General Public
7 License as published by the Free Software Foundation; either
8 version 2.1 of the License, or (at your option) any later version.
9 
10 This library is distributed in the hope that it will be useful,
11 but WITHOUT ANY WARRANTY; without even the implied warranty of
12 MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
13 Lesser General Public License for more details.
14 
15 You should have received a copy of the GNU Lesser General Public
16 License along with this library; if not, write to the Free Software
17 Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA  02111-1307  USA
18 
19 To contact the author: codeworker@free.fr
20 */
21 
22 #ifdef WIN32
23 #pragma warning (disable : 4786)
24 #endif
25 
26 #include "ScpStream.h"
27 #include "CppCompilerEnvironment.h"
28 #include "CGRuntime.h"
29 
30 #include "DtaBNFScript.h"
31 #include "DtaVisitor.h"
32 #include "BNFRatchet.h"
33 
34 namespace CodeWorker {
BNFRatchet(DtaBNFScript * pBNFScript,GrfBlock * pParent)35 	BNFRatchet::BNFRatchet(DtaBNFScript* pBNFScript, GrfBlock* pParent) : _pBNFScript(pBNFScript), GrfBlock(pParent) {}
36 
~BNFRatchet()37 	BNFRatchet::~BNFRatchet() {}
38 
accept(DtaVisitor & visitor,DtaVisitorEnvironment & env)39 	void BNFRatchet::accept(DtaVisitor& visitor, DtaVisitorEnvironment& env) {
40 		visitor.visitBNFRatchet(*this, env);
41 	}
42 
isABNFCommand() const43 	bool BNFRatchet::isABNFCommand() const { return true; }
44 
executeInternal(DtaScriptVariable & visibility)45 	SEQUENCE_INTERRUPTION_LIST BNFRatchet::executeInternal(DtaScriptVariable& visibility) {
46 		_pBNFScript->setRatchetPosition(CGRuntime::getInputLocation());
47 		return GrfBlock::executeInternal(visibility);
48 	}
49 
toString() const50 	std::string BNFRatchet::toString() const {
51 		return "#ratchet";
52 	}
53 
compileCpp(CppCompilerEnvironment & theCompilerEnvironment) const54 	void BNFRatchet::compileCpp(CppCompilerEnvironment& theCompilerEnvironment) const {
55 		CW_BODY_INDENT << "<#ratchet not implemented yet>// " << toString();
56 		CW_BODY_ENDL;
57 	}
58 }
59