From bd6012111490cde92247a8c012fd7d4a7dbfc1c6 Mon Sep 17 00:00:00 2001
From: Jean-Francois Lefebvre <jfl@mafact.com>
Date: Tue, 11 Dec 2001 22:34:51 +0000
Subject: [PATCH] 2001-12-11 23:40 UTC+0100 JFL (Mafact) <jfl@mafact.com>

---
 harbour/ChangeLog          | 6 ++++++
 harbour/makefile.vc        | 7 ++++---
 harbour/source/pp/ppcore.c | 4 +++-
 3 files changed, 13 insertions(+), 4 deletions(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index bd4d2c58b2..23915c3d70 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -8,6 +8,12 @@
    2002-12-01 23:12 UTC+0100 Foo Bar <foo.bar@foobar.org>
 */
 
+2001-12-11 23:40 UTC+0100 JFL (Mafact) <jfl@mafact.com>
+  * makefile.vc  added missing hbgete.c to LIB
+  * source/pp/ppcore.c
+    * Modif to Workmarkers() so as expression like  test{,,3} are correctly
+      (x)translated to test():new(,,3) as clipper does.
+
 2001-12-11 19:20 UTC-0300 Luiz Rafael Culik <culik@sl.conex.net>
   * contrib/hbzlib/zipnew.cpp
     contrib/hbzlib/zipcomp.cpp
diff --git a/harbour/makefile.vc b/harbour/makefile.vc
index 7641c5375f..af491639e3 100644
--- a/harbour/makefile.vc
+++ b/harbour/makefile.vc
@@ -7,8 +7,8 @@
 #
 
 # ---------------------------------------------------------------
-# If you need to set additional compiler/linker options use the 
-# environment variables below, but please DON'T MODIFY THIS FILE 
+# If you need to set additional compiler/linker options use the
+# environment variables below, but please DON'T MODIFY THIS FILE
 # for this purpose.
 # ---------------------------------------------------------------
 
@@ -605,9 +605,10 @@ DEBUG_LIB_OBJS = \
    $(CC) $(CLIBFLAGS) -Fo$(OBJ_DIR)\  $<
 
 COMMON_LIB_OBJS = \
-   $(OBJ_DIR)\hbhash.obj \
    $(OBJ_DIR)\hbfhnd.obj \
    $(OBJ_DIR)\hbfsapi.obj \
+   $(OBJ_DIR)\hbgete.obj \
+   $(OBJ_DIR)\hbhash.obj \
    $(OBJ_DIR)\hbstr.obj \
    $(OBJ_DIR)\hbtrace.obj \
    $(OBJ_DIR)\hbver.obj \
diff --git a/harbour/source/pp/ppcore.c b/harbour/source/pp/ppcore.c
index 7cdfe7a90d..eb688cf634 100644
--- a/harbour/source/pp/ppcore.c
+++ b/harbour/source/pp/ppcore.c
@@ -1718,13 +1718,15 @@ static int WorkMarkers( char ** ptrmp, char ** ptri, char * ptro, int * lenres,
 
   HB_SKIPTABSPACES( *ptrmp );
 
+  /* JFL removed 12/11/2001 to allow param like (,,3) as allowed by clipper */
+  /*
   if( **ptri == ',' )
   {
      if( s_numBrackets )
      {
         return 0;
      }
-  }
+  }*/
 
   ptrtemp = *ptrmp;