X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Fpurify.c;h=59acf19032ae4bd5e6c4d5117f718e4c65327398;hb=c0578d9893429c9c0da80ea5920360e4621fddab;hp=e033c7d2c2b52189c6911b24ffb1a5da5040fc27;hpb=4872fcdd02e103a47f48b406d452b0c726951c91;p=sbcl.git

diff --git a/src/runtime/purify.c b/src/runtime/purify.c
index e033c7d..59acf19 100644
--- a/src/runtime/purify.c
+++ b/src/runtime/purify.c
@@ -27,7 +27,6 @@
 #include "interrupt.h"
 #include "purify.h"
 #include "interr.h"
-#include "fixnump.h"
 #include "gc.h"
 #include "gc-internal.h"
 #include "thread.h"
@@ -1023,6 +1022,9 @@ purify(lispobj static_roots, lispobj read_only_roots)
     printf(" cleanup");
     fflush(stdout);
 #endif
+#ifdef LISP_FEATURE_HPUX
+    clear_auto_gc_trigger(); /* restore mmap as it was given by os */
+#endif
 
     os_zero((os_vm_address_t) current_dynamic_space,
             (os_vm_size_t) dynamic_space_size);