From 6b71fb1a3adc0b8eb3db01c199422f7aea2c4500 Mon Sep 17 00:00:00 2001 From: David Robillard Date: Thu, 19 Aug 2010 15:40:25 +0000 Subject: Add quote to syntax (currently only a lexeme is quotable, no lists...) git-svn-id: http://svn.drobilla.net/resp/resp@262 ad02d1e2-f140-0410-9f75-f8b11f17cedd --- src/resp.hpp | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) (limited to 'src/resp.hpp') diff --git a/src/resp.hpp b/src/resp.hpp index a76aed7..4be28bd 100644 --- a/src/resp.hpp +++ b/src/resp.hpp @@ -329,7 +329,7 @@ struct ATuple : public AST { AST* lift(CEnv& cenv, Code& code) throw(); AST* depoly(CEnv& cenv, Code& code) throw(); - CVal compile(CEnv& cenv) throw() { return NULL; } + CVal compile(CEnv& cenv) throw(); private: size_t _len; @@ -473,6 +473,13 @@ struct APrimitive : public ACall { CVal compile(CEnv& cenv) throw(); }; +struct AQuote : public ACall { + AQuote(const ATuple* exp) : ACall(exp) {} + void constrain(TEnv& tenv, Constraints& c) const throw(Error); + AST* lift(CEnv& cenv, Code& code) throw(); + CVal compile(CEnv& cenv) throw(); +}; + /*************************************************************************** * Parser: S-Expressions (SExp) -> AST Nodes (AST) * -- cgit v1.2.1