From 671835e5455cdfe1247530be08c13ca2805b33e3 Mon Sep 17 00:00:00 2001
From: Stephen Adams <edu/mit/csail/zurich/adams>
Date: Thu, 27 Jul 1995 00:20:04 +0000
Subject: [PATCH] Use EMPTY_WEAK_CHAIN.

---
 v7/src/microcode/purify.c | 4 ++--
 1 file changed, 2 insertions(+), 2 deletions(-)

diff --git a/v7/src/microcode/purify.c b/v7/src/microcode/purify.c
index c639bf0a3..e9f80e2db 100644
--- a/v7/src/microcode/purify.c
+++ b/v7/src/microcode/purify.c
@@ -1,6 +1,6 @@
 /* -*-C-*-
 
-$Id: purify.c,v 9.54 1993/12/07 20:36:03 gjr Exp $
+$Id: purify.c,v 9.55 1995/07/27 00:20:04 adams Exp $
 
 Copyright (c) 1988-1993 Massachusetts Institute of Technology
 
@@ -423,7 +423,7 @@ DEFUN (purify, (object, purify_mode),
 
   run_pre_gc_hooks ();
   STACK_SANITY_CHECK ("PURIFY");
-  Weak_Chain = EMPTY_LIST;
+  Weak_Chain = EMPTY_WEAK_CHAIN;
   Constant_Top = Free_Constant; 
   new_object = Free_Constant;
   *Free_Constant++ = SHARP_F;	/* Will hold pure space header */
-- 
2.25.1