diff options
author | David Robillard <d@drobilla.net> | 2009-03-10 00:58:19 +0000 |
---|---|---|
committer | David Robillard <d@drobilla.net> | 2009-03-10 00:58:19 +0000 |
commit | f8c11845f9440ef29f15445b3f864073bd051db9 (patch) | |
tree | 737e9698a0807aa0f1bd6c7725afa4901a7a34fa | |
parent | 835fa4439303938731517dc56f185f012896e6f4 (diff) | |
download | resp-f8c11845f9440ef29f15445b3f864073bd051db9.tar.gz resp-f8c11845f9440ef29f15445b3f864073bd051db9.tar.bz2 resp-f8c11845f9440ef29f15445b3f864073bd051db9.zip |
Tidy.
git-svn-id: http://svn.drobilla.net/resp/tuplr@79 ad02d1e2-f140-0410-9f75-f8b11f17cedd
-rw-r--r-- | tuplr.hpp | 8 | ||||
-rw-r--r-- | typing.cpp | 6 |
2 files changed, 7 insertions, 7 deletions
@@ -48,7 +48,7 @@ struct Cursor { struct Error { Error(const string& m, Cursor c=Cursor()) : msg(m), loc(c) {} - const string what() const throw() { return (loc ? loc.str() + ": " : "") + "error: " + msg; } + const string what() const { return (loc ? loc.str() + ": " : "") + "error: " + msg; } string msg; Cursor loc; }; @@ -423,7 +423,7 @@ struct TSubst : public map<AType*, AType*> { struct TEnv : public Env<const AST*,AType*> { TEnv(PEnv& p) : penv(p), varID(1) {} struct Constraint : public pair<AType*,AType*> { - Constraint(AType* a, AType* b, Cursor c=Cursor()) : pair<AType*,AType*>(a, b), loc(c) {} + Constraint(AType* a, AType* b, Cursor c) : pair<AType*,AType*>(a, b), loc(c) {} Cursor loc; }; typedef list<Constraint> Constraints; @@ -460,8 +460,8 @@ struct CEnv { CEnv(PEnv& p, TEnv& t, CEngine& e, ostream& os=std::cout, ostream& es=std::cerr); ~CEnv(); - typedef Env<const ASymbol*, AST*> Code; - typedef Env<const AST*, CValue> Vals; + typedef Env<const ASymbol*, AST*> Code; + typedef Env<const AST*, CValue> Vals; string gensym(const char* s="_") { return (format("%s%d") % s % symID++).str(); } void push() { code.push(); vals.push(); } @@ -89,13 +89,13 @@ void APrimitive::constrain(TEnv& tenv) const { const string n = dynamic_cast<ASymbol*>(at(0))->str(); - enum { ARITHMETIC, BINARY, BITWISE, COMPARISON } type; + enum { ARITHMETIC, BINARY, LOGICAL, COMPARISON } type; if (n == "+" || n == "-" || n == "*" || n == "/") type = ARITHMETIC; else if (n == "%") type = BINARY; else if (n == "and" || n == "or" || n == "xor") - type = BITWISE; + type = LOGICAL; else if (n == "=" || n == "!=" || n == ">" || n == ">=" || n == "<" || n == "<=") type = COMPARISON; else @@ -117,7 +117,7 @@ APrimitive::constrain(TEnv& tenv) const tenv.constrain(at(1), tenv.type(this)); tenv.constrain(at(2), tenv.type(this)); break; - case BITWISE: + case LOGICAL: if (size() != 3) throw Error((format("`%1%' requires exactly 2 arguments") % n).str(), loc); tenv.constrain(this, tenv.named("Bool")); |