/LispEnvironment.h

https://bitbucket.org/hardtack/resoup · C Header · 33 lines · 24 code · 1 blank · 8 comment · 0 complexity · 70c4c0b9d96f0c027efb544ad10bf2f8 MD5 · raw file

  1. /*
  2. * LispEnvironment.h
  3. * Resoup
  4. *
  5. * Created by ??? on 10. 8. 17..
  6. * Copyright 2010 Unplug. All rights reserved.
  7. *
  8. */
  9. #ifndef _LISP_ENVIRONMENT_H_
  10. #define _LISP_ENVIRONMENT_H_
  11. #include "LispSymbolValuePair.h"
  12. #include "LispSymbol.h"
  13. #include "Exceptions.h"
  14. #include "LispObject.h"
  15. class LispEnvironment{
  16. private:
  17. LispSymbolValuePair **symbols;
  18. LispEnvironment *parent;
  19. int size;
  20. static int stackSize;
  21. void setOperatorsAndEtc(LispEnvironment *env);
  22. LispSymbolValuePair* getSymbolPointer(const char *name)throw (SymbolNotFoundException &);
  23. public:
  24. LispEnvironment(LispEnvironment *parent);
  25. ~LispEnvironment();
  26. void addSymbolValuePair(LispSymbolValuePair *pair);
  27. LispObject* findObject(LispSymbol *symbol)throw (SymbolNotFoundException &);
  28. LispSymbolValuePair** getSymbolValuePairDoublePointer(const char *name)throw (SymbolNotFoundException &);
  29. void show();
  30. void show(const unsigned short indent);
  31. };
  32. #endif