From 227bf4e7e4f42d315fe6c2077dbca156ac41d635 Mon Sep 17 00:00:00 2001
From: Leslee Griffith <les.griffith@vantagesystems.ca>
Date: Thu, 27 May 1999 04:00:02 +0000
Subject: [PATCH] 199905-26-22: Les Griffith changelog

---
 harbour/ChangeLog                 |   5 +++++
 harbour/obj/symbols.obj           | Bin 303 -> 303 bytes
 harbour/tests/working/passref.prg |  14 ++++++++++----
 3 files changed, 15 insertions(+), 4 deletions(-)

diff --git a/harbour/ChangeLog b/harbour/ChangeLog
index b2fc0ebd18..b13d1dbf2f 100644
--- a/harbour/ChangeLog
+++ b/harbour/ChangeLog
@@ -1,3 +1,8 @@
+19990526-22:53 Les Griffith
+    * added Bil Simser's gtapi.h to include
+      and the c files to source\rtl
+    * added to doc Bil's documentation re gtapi
+
 19990526-20:45 EST David G. Holm <dholm@jsd-llc.com>
   * ChangeLog
     - Removed excess whitespace from previous ChangeLog entry
diff --git a/harbour/obj/symbols.obj b/harbour/obj/symbols.obj
index e922fdf2ef5244bed898d738768a764e0c100bca..7fb9362bc2365378b2ee923a566e22720915ade9 100644
GIT binary patch
delta 24
gcmZ3_w4P~#Bd5{y4rK<1mrGqIddV?bPs}_90BD;Cxc~qF

delta 24
gcmZ3_w4P~#Bd5X44rK<1mrF}0ddV?zPs}_90BMN`xc~qF

diff --git a/harbour/tests/working/passref.prg b/harbour/tests/working/passref.prg
index 8bee5842bf..715392cdfd 100644
--- a/harbour/tests/working/passref.prg
+++ b/harbour/tests/working/passref.prg
@@ -2,16 +2,22 @@
 
 function main
 local a := 10
+local b := "X"
 
 qout('a := 10',a)
-testfun(@a)
-qout('return of reference should = 20',a,iif(a == 20,"worked","failed"))
+qout('b := "X"',b)
+
+testfun(@a, @b)
+qout('return of "a" should = 20',a,iif(a == 20,"worked","failed"))
+qout('return of "b" should = A',b,iif(b == "A","worked","failed"))
 
 return nil
 
-function testfun(b)
+function testfun(b,c)
 b := b + 10
-qout('pointer+10 =',b)
+c := "A"
+qout('a pointer+10 =',b)
+qout('b pointer := "A" =',c)
 
 return nil