From 81df782cba422300b4034ccd5e48145c09cd0f69 Mon Sep 17 00:00:00 2001 From: David Robillard Date: Wed, 14 Oct 2009 03:00:53 +0000 Subject: Fix compilation (oops). git-svn-id: http://svn.drobilla.net/resp/tuplr@221 ad02d1e2-f140-0410-9f75-f8b11f17cedd --- src/constrain.cpp | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/src/constrain.cpp b/src/constrain.cpp index 8d44487..de07f77 100644 --- a/src/constrain.cpp +++ b/src/constrain.cpp @@ -128,7 +128,7 @@ ACall::constrain(TEnv& tenv, Constraints& c) const const AType* fnType = tenv.var(at(0)); if (fnType->kind != AType::VAR) { - if (fnType == AType::PRIM + if (fnType->kind == AType::PRIM || fnType->size() < 2 || !fnType->at(0)->to() || fnType->at(0)->to()->cppstr != "Fn") -- cgit v1.2.1