From cbd60bfca0704ef1094b99207e75d4b23641351b Mon Sep 17 00:00:00 2001
From: =?UTF-8?q?Fredrik=20H=C3=BCbinette=20=28Hubbe=29?= <hubbe@hubbe.net>
Date: Wed, 4 Dec 1996 17:51:22 -0800
Subject: [PATCH] modified cleanup routines to allow more purify..
Rev: src/array.c:1.5
Rev: src/main.c:1.13
Rev: src/mapping.c:1.9
---
src/array.c | 2 +-
src/main.c | 3 ++-
src/mapping.c | 4 ++--
3 files changed, 5 insertions(+), 4 deletions(-)
diff --git a/src/array.c b/src/array.c
index 7cdcc0ed46..d36e1ba56e 100644
--- a/src/array.c
+++ b/src/array.c
@@ -1530,7 +1530,7 @@ void zap_all_arrays()
if(!(next=a->next))
fatal("Null pointer in array list.\n");
- free_array(a);
+ /* free_array(a); */
a=next;
} while (a != & empty_array);
}
diff --git a/src/main.c b/src/main.c
index 0938c231df..0d377a4ec2 100644
--- a/src/main.c
+++ b/src/main.c
@@ -4,7 +4,7 @@
||| See the files COPYING and DISCLAIMER for more information.
\*/
#include "global.h"
-RCSID("$Id: main.c,v 1.12 1996/12/03 21:41:19 hubbe Exp $");
+RCSID("$Id: main.c,v 1.13 1996/12/05 01:51:21 hubbe Exp $");
#include "types.h"
#include "backend.h"
#include "module.h"
@@ -288,6 +288,7 @@ void exit_main()
cleanup_callbacks();
zap_all_arrays();
+ zap_all_mappings();
cleanup_shared_string_table();
}
diff --git a/src/mapping.c b/src/mapping.c
index 38ef53c929..8aaa8ed6b9 100644
--- a/src/mapping.c
+++ b/src/mapping.c
@@ -4,7 +4,7 @@
||| See the files COPYING and DISCLAIMER for more information.
\*/
#include "global.h"
-RCSID("$Id: mapping.c,v 1.8 1996/12/05 00:47:15 hubbe Exp $");
+RCSID("$Id: mapping.c,v 1.9 1996/12/05 01:51:22 hubbe Exp $");
#include "main.h"
#include "types.h"
#include "object.h"
@@ -1044,7 +1044,7 @@ void zap_all_mappings()
next=m->next;
- free_mapping(m);
+ /* free_mapping(m); */
}
}
--
GitLab