diff options
| author | Paulo Cesar Pereira de Andrade <pcpa@mandriva.com.br> | 2008-03-16 20:51:25 -0300 |
|---|---|---|
| committer | Paulo Cesar Pereira de Andrade <pcpa@mandriva.com.br> | 2008-07-02 19:07:45 -0300 |
| commit | 614563884d2b19e514af233089e392127c4f4027 (patch) | |
| tree | 12bf9a1c1de59421d81b920cb99539acc2b3fac1 /lisp | |
| parent | 60643e8f0dcd86e65400160c0a6e264e7a2a081c (diff) | |
Compile warning fixes.
Add parenthesis around a test where after macro expansion it looked like
boolexpr==boolres==boolres.
"Ansifiy" a function without arguments.
Diffstat (limited to 'lisp')
| -rw-r--r-- | lisp/core.c | 4 | ||||
| -rw-r--r-- | lisp/lisp.c | 2 |
2 files changed, 3 insertions, 3 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); } } diff --git a/lisp/lisp.c b/lisp/lisp.c index 720c7df..4b393c1 100644 --- a/lisp/lisp.c +++ b/lisp/lisp.c @@ -5454,7 +5454,7 @@ LispBegin(void) } void -LispEnd() +LispEnd(void) { /* XXX needs to free all used memory, not just close file descriptors */ } |