From 517e64cf6477e5db0af37eb5a8732e098ef7dec6 Mon Sep 17 00:00:00 2001 From: Mindaugas Kavaliauskas Date: Mon, 14 Feb 2011 21:30:49 +0000 Subject: [PATCH] 2011-02-14 23:30 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt) * harbour/src/vm/classes.c ! fixed typo --- harbour/ChangeLog | 4 ++++ harbour/src/vm/classes.c | 4 ++-- 2 files changed, 6 insertions(+), 2 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 1a44f21121..41233ee59b 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -16,6 +16,10 @@ The license applies to all entries newer than 2009-04-28. */ +2011-02-14 23:30 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt) + * harbour/src/vm/classes.c + ! fixed typo + 2011-02-14 19:48 UTC+0100 Przemyslaw Czerpak (druzus/at/priv.onet.pl) * harbour/include/hbclass.ch + added some class(y) compatible commands for delegated messages diff --git a/harbour/src/vm/classes.c b/harbour/src/vm/classes.c index 305be15c93..7b5090e953 100644 --- a/harbour/src/vm/classes.c +++ b/harbour/src/vm/classes.c @@ -2791,7 +2791,7 @@ static HB_BOOL hb_clsAddMsg( HB_USHORT uiClass, const char * szMessage, if( pNewMeth ) uiIndex = ( HB_USHORT ) ( pNewMeth - pClass->pMethods ); } - fOK = pFunction == NIL || HB_IS_NIL( pFunction ) || uiIndex != 0; + fOK = pFunction == NULL || HB_IS_NIL( pFunction ) || uiIndex != 0; if( fOK ) { pDelegMsg = hb_objGetMsgSym( pInit ); @@ -2801,7 +2801,7 @@ static HB_BOOL hb_clsAddMsg( HB_USHORT uiClass, const char * szMessage, if( pNewMeth ) uiSprClass = ( HB_USHORT ) ( pNewMeth - pClass->pMethods ); } - fOK = ( pInit == NIL || HB_IS_NIL( pInit ) || uiSprClass != 0 ) && + fOK = ( pInit == NULL || HB_IS_NIL( pInit ) || uiSprClass != 0 ) && ( uiIndex != 0 || uiSprClass != 0 ); } break;