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