/* "CodeWorker": a scripting language for parsing and generating text. Copyright (C) 1996-1997, 1999-2002 Cédric Lemaire This library is free software; you can redistribute it and/or modify it under the terms of the GNU Lesser General Public License as published by the Free Software Foundation; either version 2.1 of the License, or (at your option) any later version. This library is distributed in the hope that it will be useful, but WITHOUT ANY WARRANTY; without even the implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU Lesser General Public License for more details. You should have received a copy of the GNU Lesser General Public License along with this library; if not, write to the Free Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307 USA To contact the author: codeworker@free.fr */ #ifdef WIN32 #pragma warning (disable : 4786) #endif #include "UtlException.h" #include "DtaProject.h" #include "ExprScriptVariable.h" #include "GrfBlock.h" #include "ScpStream.h" #include "CppCompilerEnvironment.h" #include "GrfGlobalVariable.h" namespace CodeWorker { GrfGlobalVariable::~GrfGlobalVariable() { if (_pValue != NULL) delete _pValue; } void GrfGlobalVariable::setVariable(const std::string& sVariable, EXPRESSION_TYPE varType) { _sVariable = sVariable; DtaProject::getInstance().setGlobalVariableType(sVariable, varType); } SEQUENCE_INTERRUPTION_LIST GrfGlobalVariable::executeInternal(DtaScriptVariable& visibility) { DtaScriptVariable* pGlobalVariable = DtaProject::getInstance().setGlobalVariable(_sVariable); pGlobalVariable->clearContent(); if (_pValue != NULL) { ExprScriptConstantTree* pConstantTree = dynamic_cast(_pValue); if (pConstantTree != NULL) { pConstantTree->setTree(visibility, *pGlobalVariable); } else { std::string sValue = _pValue->getValue(visibility); pGlobalVariable->setValue(sValue.c_str()); } } return NO_INTERRUPTION; } void GrfGlobalVariable::compileCpp(CppCompilerEnvironment& theCompilerEnvironment) const { theCompilerEnvironment.addGlobalVariable(_sVariable); CW_BODY_INDENT << _sVariable << ".clearNode();";CW_BODY_ENDL; if (_pValue != NULL) { ExprScriptConstantTree* pConstantTree = dynamic_cast(_pValue); if (pConstantTree != NULL) { pConstantTree->compileCppInit(theCompilerEnvironment, _sVariable); } else { // a classical value type CW_BODY_INDENT << _sVariable << ".setValue("; _pValue->compileCpp(theCompilerEnvironment); CW_BODY_STREAM << ");"; CW_BODY_ENDL; } } } }