diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index e7fe35a03b..41aad8a0c0 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+2001-06-04 16:55 GMT+3 Alexander Kresin <alex@belacy.belgorod.su>
+   * source/pp/pplib.c
+     * __PreProcess() works now.
+
 2001-06-03 23:50 UTC-0800 Ron Pinkas <ron@profit-master.com>
    * contrib/dot/pp.prg
      + Added #ifdef WIN to support using Windows MessageBox() instead of Alert(), use BLD pp -dWIN to activate.
diff --git a/harbour/source/pp/pplib.c b/harbour/source/pp/pplib.c
index 8e3509f150..f5414aa626 100644
--- a/harbour/source/pp/pplib.c
+++ b/harbour/source/pp/pplib.c
@@ -121,6 +121,8 @@ HB_FUNC( __PREPROCESS )
 
          HB_SKIPTABSPACES( ptr );
 
+         if( !hb_pp_topDefine )
+            hb_pp_Table();
          if( hb_pp_ParseExpression( ptr, pOut ) > 0 )
          {
             /* Some error here? */