diff options
Diffstat (limited to 'src/libexpr/primops.cc')
-rw-r--r-- | src/libexpr/primops.cc | 8 |
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)); } |