Mercurial > hg > xemacs-beta
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"); |