From 13b879d8cd03b9a48a4f3afbd331cdd32507db34 Mon Sep 17 00:00:00 2001
From: Paul Tucker <ptucker@sympatico.ca>
Date: Sun, 19 Mar 2000 19:37:34 +0000
Subject: [PATCH] Clear struct on Undef

---
 harbour/ChangeLog          | 4 ++++
 harbour/source/pp/ppcore.c | 2 ++
 2 files changed, 6 insertions(+)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 9805f350f8..fd9f3f316e 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+20000319-01:35 EST Paul Tucker <ptucker@sympatico.ca>
+   * source/pp/ppcore.c
+     from  20000319-01:30 that didn't get posted.
+
 20000319-19:11 GMT+1 Victor Szakats <info@szelvesz.hu>
    * include/hbapigt.h
      source/rtl/gtapi.c
diff --git a/harbour/source/pp/ppcore.c b/harbour/source/pp/ppcore.c
index fe44f1dd71..a22a198881 100644
--- a/harbour/source/pp/ppcore.c
+++ b/harbour/source/pp/ppcore.c
@@ -456,6 +456,8 @@ static int ParseUndef( char * sLine )
        if( stdef->value ) hb_xfree( stdef->value );
        hb_xfree( stdef->name );
     }
+    stdef->pars = NULL;
+    stdef->value = NULL;
     stdef->name = NULL;
   }