Mercurial > hg > xemacs-beta

comparison src/tests.c @ 3263:d674024a8674

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[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 6fa9919a9a0b
children abdb33cc1f52
comparison
equal deleted inserted replaced
3262:79d41cfd8e6b 3263:d674024a8674
477 return intern ("PASS"); 477 return intern ("PASS");
478 } 478 }
479 479
480 480
481 481
482 #ifdef MC_ALLOC 482 #ifdef NEW_GC
483 #define TESTS_DEFSUBR(Fname) do { \ 483 #define TESTS_DEFSUBR(Fname) do { \
484 DEFSUBR_MC_ALLOC (Fname); \ 484 DEFSUBR_MC_ALLOC (Fname); \
485 defsubr (S##Fname); \ 485 defsubr (S##Fname); \
486 Vtest_function_list = \ 486 Vtest_function_list = \
487 Fcons (intern (subr_name (S##Fname)), \ 487 Fcons (intern (subr_name (S##Fname)), \
488 Vtest_function_list); \ 488 Vtest_function_list); \
489 } while (0) 489 } while (0)
490 #else /* not MC_ALLOC */ 490 #else /* not NEW_GC */
491 #define TESTS_DEFSUBR(Fname) do { \ 491 #define TESTS_DEFSUBR(Fname) do { \
492 DEFSUBR (Fname); \ 492 DEFSUBR (Fname); \
493 Vtest_function_list = \ 493 Vtest_function_list = \
494 Fcons (intern (subr_name (&S##Fname)), \ 494 Fcons (intern (subr_name (&S##Fname)), \
495 Vtest_function_list); \ 495 Vtest_function_list); \
496 } while (0) 496 } while (0)
497 #endif /* not MC_ALLOC */ 497 #endif /* not NEW_GC */
498 498
499 void 499 void
500 syms_of_tests (void) 500 syms_of_tests (void)
501 { 501 {
502 Vtest_function_list = Qnil; 502 Vtest_function_list = Qnil;