Subversion Repositories Kolibri OS

 *  Storage of globals in a associated hash

 *

 */

#define __lispglobals_h__

#include "lispobject.h"

#include "lisphash.h"

/// The only special feature of this class is the attribute

/// #iEvalBeforeReturn, which defaults to #LispFalse. If this

/// attribute is set to #LispTrue, the value in #iValue needs to be

/// evaluated to get the value of the Lisp variable.

/// \sa LispEnvironment::GetVariable()

{

public:

    inline LispGlobalVariable(const LispGlobalVariable& aOther);

    LispGlobalVariable(LispPtr& aValue): iValue(aValue), iEvalBeforeReturn(LispFalse) {}

    inline LispGlobalVariable& operator=(const LispGlobalVariable& aOther);

    LispPtr iValue;

    LispBoolean iEvalBeforeReturn;

};

{

};

{

}

{

  iEvalBeforeReturn = aEval;

}

{

  iValue = (aOther.iValue);

  return *this;

}