Index: src/alloc.c =================================================================== RCS file: /usr/CVSroot/XEmacs/xemacs/src/alloc.c,v retrieving revision 1.42.2.30 diff -u -r1.42.2.30 alloc.c --- alloc.c 1999/10/30 04:47:04 1.42.2.30 +++ alloc.c 1999/11/02 03:00:41 @@ -3922,9 +3922,6 @@ reinit_alloc_once_early (void) { gc_generation_number[0] = 0; - /* purify_flag 1 is correct even if CANNOT_DUMP. - * loadup.el will set to nil at end. */ - purify_flag = 1; breathing_space = 0; XSETINT (all_bit_vectors, 0); /* Qzero may not be set yet. */ XSETINT (Vgc_message, 0); Index: src/emacs.c =================================================================== RCS file: /usr/CVSroot/XEmacs/xemacs/src/emacs.c,v retrieving revision 1.82.2.32 diff -u -r1.82.2.32 emacs.c --- emacs.c 1999/11/02 02:41:45 1.82.2.32 +++ emacs.c 1999/11/02 03:00:44 @@ -856,8 +856,20 @@ We try to do things in an order that minimizes the non-obvious dependencies between functions. */ + /* purify_flag 1 is correct even if CANNOT_DUMP. + * loadup.el will set to nil at end. */ + + purify_flag = 0; #ifdef PDUMP - initialized = restart || pdump_load (); + if (restart) + initialized = 1; + else { + initialized = pdump_load (); + purify_flag = !initialized; + } +#else + if (!initialized) + purify_flag = 1; #endif if (!initialized)