diff options
author | David Robillard <d@drobilla.net> | 2010-12-09 03:54:40 +0000 |
---|---|---|
committer | David Robillard <d@drobilla.net> | 2010-12-09 03:54:40 +0000 |
commit | f8bb745beb481846e715cd1e455b3d688fe34d65 (patch) | |
tree | 5730d1dbf70ed6d42ef2786ea012896e9af28e42 /src/pprint.cpp | |
parent | 39af9fe79809a67c837485d8edcae6b9246c5fa6 (diff) | |
download | resp-f8bb745beb481846e715cd1e455b3d688fe34d65.tar.gz resp-f8bb745beb481846e715cd1e455b3d688fe34d65.tar.bz2 resp-f8bb745beb481846e715cd1e455b3d688fe34d65.zip |
Make environment always referenced by symbols.
Intern symbol strings, but not ASymbol objects themselves, so each symbol can
have a different Cursor. Fixes missing locations in error reporting.
git-svn-id: http://svn.drobilla.net/resp/resp@324 ad02d1e2-f140-0410-9f75-f8b11f17cedd
Diffstat (limited to 'src/pprint.cpp')
-rw-r--r-- | src/pprint.cpp | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/src/pprint.cpp b/src/pprint.cpp index 5d2cd5f..d082b5d 100644 --- a/src/pprint.cpp +++ b/src/pprint.cpp @@ -84,7 +84,7 @@ print_to(ostream& out, const AST* ast, unsigned indent, CEnv* cenv, bool types) if (i != tup->end()) { const ASymbol* sym = (*i)->to_symbol(); if (sym) { - form = sym->cppstr; + form = sym->sym(); } } @@ -155,7 +155,7 @@ print_to(ostream& out, const AST* ast, unsigned indent, CEnv* cenv, bool types) case T_STRING: return out << '"' << ((const AString*)ast)->cppstr << '"'; case T_SYMBOL: - return out << ((const ASymbol*)ast)->cppstr; + return out << ((const ASymbol*)ast)->sym(); } return out << "?"; |