diff options
Diffstat (limited to 'src/c.cpp')
| -rw-r--r-- | src/c.cpp | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -107,7 +107,7 @@ CEngine::llType(const AST* t) *ret += ")"; return ret; - } else if (AType::is_expr(t) && isupper(t->as_tuple()->head()->str()[0])) { + } else if (AType::is_expr(t) && isupper(t->as_tuple()->fst()->str()[0])) { Type* ret = new Type("struct { void* me; "); for (ATuple::const_iterator i = t->as_tuple()->iter_at(1); i != t->as_tuple()->end(); ++i) { const Type* lt = llType(*i); @@ -271,7 +271,7 @@ CEngine::compilePrimitive(CEnv& cenv, const ATuple* prim) Value* a = llVal(resp_compile(cenv, *i++)); Value* b = llVal(resp_compile(cenv, *i++)); - const string n = prim->head()->to_symbol()->str(); + const string n = prim->fst()->to_symbol()->str(); string op = n; // Convert operator to C operator if they don't match |