From dcdd551ae9f30a798b6ff262eca30c5ccb5b1d44 Mon Sep 17 00:00:00 2001
From: Paul Tucker <ptucker@sympatico.ca>
Date: Mon, 19 Jul 1999 04:23:43 +0000
Subject: [PATCH] *** empty log message ***

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

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index b48aa0f0f8..f2d86f6f39 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,7 @@
+19990719-00:12 EDT Paul Tucker <ptucker@sympatico.ca>
+  * corrected new parameter check
+    added {"SET",1,3}
+
 19990718-22:25 EDT Paul Tucker <ptucker@sympatico.ca>
   * source/rtl/gtapi.c
     * corrected returned color strings so pair ordering is
diff --git a/harbour/source/compiler/harbour.y b/harbour/source/compiler/harbour.y
index 84c7d26863..cb6ea8473c 100644
--- a/harbour/source/compiler/harbour.y
+++ b/harbour/source/compiler/harbour.y
@@ -4997,6 +4997,7 @@ static FUNCINFO _StdFun[] = {
 { "RTRIM"     , 1, 1 },
 { "SECONDS"   , 0, 0 },
 { "SELECT"    , 1, 1 },
+{ "SET"       , 1, 3 },
 { "SETPOS"    , 2, 2 },
 { "SPACE"     , 1, 1 },
 { "SQRT"      , 1, 1 },