Mercurial > hg > xemacs-beta

comparison src/lisp.h @ 1590:03009473262a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2003-07-26 14:00:27 by michaels] 2003-07-24 Mike Sperber <mike@xemacs.org> * lisp.h: * data.c: (init_marking_ephemerons): (continue_marking_ephemerons): (finish_marking_ephemerons): (prune_ephemerons): * alloc.c (garbage_collect_1): Rewrite the ephemeron marker once again to allow ephemerons to be used for implementing simple object finalization. * data.c (Fmake_ephemeron): Fix comments
author michaels
date Sat, 26 Jul 2003 14:00:28 +0000
parents e5da225ea2ca
children ac1be85b4a5f
comparison
equal deleted inserted replaced
1589:ea138ff01850 1590:03009473262a
2754 Lisp_Object value; 2754 Lisp_Object value;
2755 }; 2755 };
2756 2756
2757 void prune_ephemerons (void); 2757 void prune_ephemerons (void);
2758 Lisp_Object ephemeron_value(Lisp_Object ephi); 2758 Lisp_Object ephemeron_value(Lisp_Object ephi);
2759 void init_marking_ephemerons(void);
2760 int continue_marking_ephemerons(void);
2759 int finish_marking_ephemerons(void); 2761 int finish_marking_ephemerons(void);
2760 Lisp_Object zap_finalize_list(void); 2762 Lisp_Object zap_finalize_list(void);
2761 Lisp_Object make_ephemeron(Lisp_Object key, Lisp_Object value, Lisp_Object finalizer); 2763 Lisp_Object make_ephemeron(Lisp_Object key, Lisp_Object value, Lisp_Object finalizer);
2762 2764
2763 DECLARE_LRECORD(ephemeron, struct ephemeron); 2765 DECLARE_LRECORD(ephemeron, struct ephemeron);