Mercurial > hg > xemacs-beta
comparison src/data.c @ 436:080151679be2 r21-2-26
Import from CVS: tag r21-2-26
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:31:24 +0200 |
parents | 3ecd8885ac67 |
children | 8de8e3f6228a |
comparison
equal
deleted
inserted
replaced
435:53cf74a9db44 | 436:080151679be2 |
---|---|
658 if (EQ (hare, tortoise)) | 658 if (EQ (hare, tortoise)) |
659 return Fsignal (Qcyclic_function_indirection, list1 (object)); | 659 return Fsignal (Qcyclic_function_indirection, list1 (object)); |
660 } | 660 } |
661 | 661 |
662 if (errorp && UNBOUNDP (hare)) | 662 if (errorp && UNBOUNDP (hare)) |
663 signal_void_function_error (object); | 663 return signal_void_function_error (object); |
664 | 664 |
665 return hare; | 665 return hare; |
666 } | 666 } |
667 | 667 |
668 DEFUN ("indirect-function", Findirect_function, 1, 1, 0, /* | 668 DEFUN ("indirect-function", Findirect_function, 1, 1, 0, /* |