Mercurial > hg > xemacs-beta

diff src/eval.c @ 5117:3742ea8250b5 ben-lisp-object ben-lisp-object-final-ws-year-2005

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Checking in final CVS version of workspace 'ben-lisp-object'
author Ben Wing <ben@xemacs.org>
date Sat, 26 Dec 2009 00:20:27 -0600
parents facf3239ba30
children e0db3c197671
line wrap: on
line diff
--- a/src/eval.c	Sat Dec 26 00:20:16 2009 -0600
+++ b/src/eval.c	Sat Dec 26 00:20:27 2009 -0600
@@ -433,8 +433,7 @@
   { XD_END }
 };
 
-DEFINE_BASIC_LRECORD_IMPLEMENTATION ("subr", subr,
-				     1, /*dumpable-flag*/
+DEFINE_BASIC_LISP_OBJECT ("subr", subr,
 				     0, print_subr, 0, 0, 0,
 				     subr_description,
 				     Lisp_Subr);
@@ -6439,7 +6438,7 @@
 void
 syms_of_eval (void)
 {
-  INIT_LRECORD_IMPLEMENTATION (subr);
+  INIT_LISP_OBJECT (subr);
 
   DEFSYMBOL (Qinhibit_quit);
   DEFSYMBOL (Qautoload);