From 65ee0494a4e73be24e07eccedf77213e1790996c Mon Sep 17 00:00:00 2001
From: Ryszard Glab <rglab@imid.med.pl>
Date: Thu, 9 Sep 1999 14:13:06 +0000
Subject: [PATCH] ChangeLog 19990909-16:05 GMT+2

---
 harbour/ChangeLog               | 5 +++++
 harbour/source/rtl/memvarbl.prg | 2 +-
 2 files changed, 6 insertions(+), 1 deletion(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index 13928b86af..bba6c6188c 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,8 @@
+19990909-16:05 GMT+2 Ryszard Glab <rglab@imid.med.pl>
+
+    *source/rtl/memvarbl.prg
+	+ corrected to allow setings of NIL value
+	
 19990909-13:00 GMT+2 Ryszard Glab <rglab@imid.med.pl>
 
     *source/runner/stdalone/external.prg
diff --git a/harbour/source/rtl/memvarbl.prg b/harbour/source/rtl/memvarbl.prg
index 3f1c9fc82f..41e4995cce 100644
--- a/harbour/source/rtl/memvarbl.prg
+++ b/harbour/source/rtl/memvarbl.prg
@@ -77,4 +77,4 @@
  */
 
 FUNCTION MEMVARBLOCK( cMemvar )
-RETURN { |x| IIF( x==NIL, __mvGET(cMemvar), __mvPUT(cMemvar,x) ) }
+RETURN { |x| IIF( PCOUNT()==0, __mvGET(cMemvar), __mvPUT(cMemvar,x) ) }