Mercurial > hg > xemacs-beta
changeset 4377:751d82f59283
Fix the union build--check that built-in macro function values are nil, not zero.
2008-01-02 Aidan Kehoe <kehoea@parhasard.net>
* doc.c (Fbuilt_in_symbol_file):
Don't check is fun zero in the condition, check that it's not
nil. Fixes the union build; thank you Stephen.
| author | Aidan Kehoe <kehoea@parhasard.net> |
|---|---|
| date | Wed, 02 Jan 2008 11:16:16 +0100 |
| parents | 4939bde48d12 |
| children | 0c089d397c3e |
| files | src/ChangeLog src/doc.c |
| diffstat | 2 files changed, 7 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/src/ChangeLog Tue Jan 01 22:09:51 2008 -0800 +++ b/src/ChangeLog Wed Jan 02 11:16:16 2008 +0100 @@ -1,3 +1,9 @@ +2008-01-02 Aidan Kehoe <kehoea@parhasard.net> + + * doc.c (Fbuilt_in_symbol_file): + Don't check is fun zero in the condition, check that it's not + nil. Fixes the union build; thank you Stephen. + 2007-12-30 Aidan Kehoe <kehoea@parhasard.net> * doc.c (Fbuilt_in_symbol_file):
--- a/src/doc.c Tue Jan 01 22:09:51 2008 -0800 +++ b/src/doc.c Wed Jan 02 11:16:16 2008 +0100 @@ -519,7 +519,7 @@ fun = Findirect_function (symbol); if (SUBRP (fun) || (CONSP(fun) && (EQ (Qmacro, Fcar_safe (fun))) - && (fun = Fcdr_safe (fun)) + && !NILP(fun = Fcdr_safe (fun)) && (SUBRP (fun)))) { if (XSUBR (fun)->doc == 0)