Mercurial > hg > xemacs-beta
diff src/bytecode.c @ 3263:d674024a8674
[xemacs-hg @ 2006-02-27 16:29:00 by crestani]
- Introduce a fancy asynchronous finalization strategy on C level.
- Merge the code conditioned on MC_ALLOC into the code conditioned on
NEW_GC.
- Remove the possibility to free objects manually outside garbage
collections when the new collector is enabled.
| author | crestani |
|---|---|
| date | Mon, 27 Feb 2006 16:29:29 +0000 |
| parents | 141c2920ea48 |
| children | 8f1ee2d15784 |
line wrap: on
line diff
--- a/src/bytecode.c Sun Feb 26 22:51:04 2006 +0000 +++ b/src/bytecode.c Mon Feb 27 16:29:29 2006 +0000 @@ -2247,29 +2247,6 @@ { XD_END } }; -#if defined(MC_ALLOC) && !defined(NEW_GC) -static void -finalize_compiled_function (void *header, int for_disksave) -{ - if (!for_disksave) - { - struct Lisp_Compiled_Function *cf = - (struct Lisp_Compiled_Function *) header; - if (cf->args_in_array) - xfree (cf->args, Lisp_Object *); - } -} - -DEFINE_BASIC_LRECORD_IMPLEMENTATION ("compiled-function", compiled_function, - 1, /*dumpable_flag*/ - mark_compiled_function, - print_compiled_function, - finalize_compiled_function, - compiled_function_equal, - compiled_function_hash, - compiled_function_description, - Lisp_Compiled_Function); -#else /* !MC_ALLOC || NEW_GC */ DEFINE_BASIC_LRECORD_IMPLEMENTATION ("compiled-function", compiled_function, 1, /*dumpable_flag*/ mark_compiled_function, @@ -2278,7 +2255,6 @@ compiled_function_hash, compiled_function_description, Lisp_Compiled_Function); -#endif /* !MC_ALLOC || NEW_GC */ DEFUN ("compiled-function-p", Fcompiled_function_p, 1, 1, 0, /*