From b7caed6e5b76b800381c0595761352b873d89e88 Mon Sep 17 00:00:00 2001
From: Bruno Cantero <bruno@issnet.net>
Date: Wed, 21 Jul 1999 16:48:13 +0000
Subject: [PATCH] ChangeLogTag:19990721-18:39 GMT+1 Paul Tucker / Bruno Cantero
 <bruno@issnet.net>

---
 harbour/ChangeLog                 | 4 ++++
 harbour/source/compiler/harbour.y | 1 +
 2 files changed, 5 insertions(+)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index c2cc91a5d9..733fea3431 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+19990721-18:39 GMT+1 Paul Tucker / Bruno Cantero <bruno@issnet.net>
+  * source/compiler/harbour.y
+    Added support for empty arguments in functions.
+
 19990721-15:50 CET Eddie Runia <eddie@runia.com>
   * source/rtl/classes.c; source/rtl/transfrm.c
     Clean-up of source
diff --git a/harbour/source/compiler/harbour.y b/harbour/source/compiler/harbour.y
index a74b33c5f6..106308a566 100644
--- a/harbour/source/compiler/harbour.y
+++ b/harbour/source/compiler/harbour.y
@@ -621,6 +621,7 @@ ArgList    : ','                               { PushNil(); PushNil(); $$ = 2; }
            | Argument                          { $$ = 1; }
            | ArgList ','                       { PushNil(); $$++; }
            | ArgList ',' Argument              { $$++; }
+           | ','                               { PushNil(); } Argument { $$ = 2; }
            ;
 
 Argument   : Expression                        {}