comparison src/eval.c @ 400:a86b2b5e0111 r21-2-30

Import from CVS: tag r21-2-30
author cvs
date Mon, 13 Aug 2007 11:14:34 +0200
parents 74fd4e045ea6
children 2f8bb876ab1d
comparison
equal deleted inserted replaced
399:376370fb5946 400:a86b2b5e0111
298 { XD_DOC_STRING, offsetof (Lisp_Subr, doc) }, 298 { XD_DOC_STRING, offsetof (Lisp_Subr, doc) },
299 { XD_END } 299 { XD_END }
300 }; 300 };
301 301
302 DEFINE_BASIC_LRECORD_IMPLEMENTATION ("subr", subr, 302 DEFINE_BASIC_LRECORD_IMPLEMENTATION ("subr", subr,
303 this_one_is_unmarkable, print_subr, 0, 0, 0, 303 0, print_subr, 0, 0, 0,
304 subr_description, 304 subr_description,
305 Lisp_Subr); 305 Lisp_Subr);
306 306
307 /************************************************************************/ 307 /************************************************************************/
308 /* Entering the debugger */ 308 /* Entering the debugger */
4958 /************************************************************************/ 4958 /************************************************************************/
4959 4959
4960 void 4960 void
4961 syms_of_eval (void) 4961 syms_of_eval (void)
4962 { 4962 {
4963 INIT_LRECORD_IMPLEMENTATION (subr);
4964
4963 defsymbol (&Qinhibit_quit, "inhibit-quit"); 4965 defsymbol (&Qinhibit_quit, "inhibit-quit");
4964 defsymbol (&Qautoload, "autoload"); 4966 defsymbol (&Qautoload, "autoload");
4965 defsymbol (&Qdebug_on_error, "debug-on-error"); 4967 defsymbol (&Qdebug_on_error, "debug-on-error");
4966 defsymbol (&Qstack_trace_on_error, "stack-trace-on-error"); 4968 defsymbol (&Qstack_trace_on_error, "stack-trace-on-error");
4967 defsymbol (&Qdebug_on_signal, "debug-on-signal"); 4969 defsymbol (&Qdebug_on_signal, "debug-on-signal");