From 81e77761a8eef1265c32c68af459a3f9cf7334be Mon Sep 17 00:00:00 2001 From: Przemyslaw Czerpak Date: Wed, 26 Sep 2007 03:37:08 +0000 Subject: [PATCH] 2007-09-26 05:37 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/ChangeLog ! fixed typo in function names in previous commit description * harbour/contrib/xhb/xhbfunc.c + added HB_QSELF() --- harbour/ChangeLog | 9 ++++++++- harbour/contrib/xhb/xhbfunc.c | 7 +++++++ 2 files changed, 15 insertions(+), 1 deletion(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index bb0d2779f3..1684626a31 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,10 +8,17 @@ 2002-12-01 13:30 UTC+0100 Foo Bar */ +2007-09-26 05:37 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) + * harbour/ChangeLog + ! fixed typo in function names in previous commit description + + * harbour/contrib/xhb/xhbfunc.c + + added HB_QSELF() + 2007-09-26 05:00 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/contrib/xhb/Makefile + harbour/contrib/xhb/xhbwith.c - + added HB_QWith( [] ), HB_QWithObjectCounter(), HB_QResetWith() + + added HB_QWith( [] ), HB_WithObjectCounter(), HB_ResetWith() 2007-09-26 02:30 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/include/hbclass.ch diff --git a/harbour/contrib/xhb/xhbfunc.c b/harbour/contrib/xhb/xhbfunc.c index f5a97182ee..01805597ca 100644 --- a/harbour/contrib/xhb/xhbfunc.c +++ b/harbour/contrib/xhb/xhbfunc.c @@ -258,3 +258,10 @@ HB_FUNC( XHB_ADEL ) hb_itemReturn( pArray ); /* ADel() returns the array itself */ } } + +HB_FUNC_EXTERN( __SENDER ); + +HB_FUNC( HB_QSELF ) +{ + HB_FUNC_EXEC( __SENDER ) +}