diff options
Diffstat (limited to 'lisp/core.c')
| -rw-r--r-- | lisp/core.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/core.c b/lisp/core.c index 9077dc5..89f5d5c 100644 --- a/lisp/core.c +++ b/lisp/core.c @@ -3242,7 +3242,7 @@ Lisp_Member(LispBuiltin *builtin) } else { for (; CONSP(list); list = CDR(list)) - if (FCOMPARE(lambda, item, CAR(list), code) == expect) + if ((FCOMPARE(lambda, item, CAR(list), code)) == expect) return (list); } } @@ -3255,7 +3255,7 @@ Lisp_Member(LispBuiltin *builtin) else { for (; CONSP(list); list = CDR(list)) { compare = APPLY1(key, CAR(list)); - if (FCOMPARE(lambda, item, compare, code) == expect) + if ((FCOMPARE(lambda, item, compare, code)) == expect) return (list); } } |