aboutsummaryrefslogtreecommitdiff
path: root/src/libexpr/primops.cc
diff options
context:
space:
mode:
Diffstat (limited to 'src/libexpr/primops.cc')
-rw-r--r--src/libexpr/primops.cc8
1 files changed, 3 insertions, 5 deletions
diff --git a/src/libexpr/primops.cc b/src/libexpr/primops.cc
index c747f46c4..50a641670 100644
--- a/src/libexpr/primops.cc
+++ b/src/libexpr/primops.cc
@@ -120,11 +120,9 @@ static Expr prim_isNull(EvalState & state, const ATermVector & args)
static Expr prim_isFunction(EvalState & state, const ATermVector & args)
{
Expr e = evalExpr(state, args[0]);
- ATermList formals;
- ATerm name, body, pos;
- return makeBool(
- matchFunction(e, formals, body, pos) ||
- matchFunction1(e, name, body, pos));
+ Pattern pat;
+ ATerm body, pos;
+ return makeBool(matchFunction(e, pat, body, pos));
}