fivedev/harbour-core
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

2010-05-14 18:33 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/include/hbapi.h
  * harbour/src/vm/dynsym.c
    + added new function hb_dynsymIsMemvar()
This commit is contained in:
Przemyslaw Czerpak
2010-05-14 16:33:56 +00:00
parent 0d35f1c42b
commit 477a505359
3 changed files with 13 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -17,6 +17,11 @@
past entries belonging to author(s): Viktor Szakats.
*/
2010-05-14 18:33 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbapi.h
* harbour/src/vm/dynsym.c
+ added new function hb_dynsymIsMemvar()
2010-15:14 07:01 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com)
* contrib/hbide/resources/curlinehilight.png
! Some refinement though not sufficient yet.

1
harbour/include/hbapi.h
View File

@@ -984,6 +984,7 @@ extern HB_EXPORT PHB_SYMB hb_dynsymFindSymbol( const char * szName ); /* finds
extern HB_EXPORT PHB_SYMB hb_dynsymSymbol( PHB_DYNS pDynSym );
extern HB_EXPORT const char * hb_dynsymName( PHB_DYNS pDynSym ); /* return dynamic symbol name */
extern HB_EXPORT HB_BOOL hb_dynsymIsFunction( PHB_DYNS pDynSym );
extern HB_EXPORT HB_BOOL hb_dynsymIsMemvar( PHB_DYNS pDynSym );
extern HB_EXPORT int hb_dynsymAreaHandle( PHB_DYNS pDynSym ); /* return work area number bound with given dynamic symbol */
extern HB_EXPORT void hb_dynsymSetAreaHandle( PHB_DYNS pDynSym, int iArea ); /* set work area number for a given dynamic symbol */
#ifdef _HB_API_INTERNAL_

7
harbour/src/vm/dynsym.c
View File

@@ -472,6 +472,13 @@ HB_BOOL hb_dynsymIsFunction( PHB_DYNS pDynSym )
return pDynSym->pSymbol->value.pFunPtr != NULL;
}
HB_BOOL hb_dynsymIsMemvar( PHB_DYNS pDynSym )
{
HB_TRACE(HB_TR_DEBUG, ("hb_dynsymIsMemvar(%p)", pDynSym));
return hb_dynsymHandles( pDynSym )->pMemvar != NULL;
}
PHB_ITEM hb_dynsymGetMemvar( PHB_DYNS pDynSym )
{
HB_TRACE(HB_TR_DEBUG, ("hb_dynsymGetMemvar(%p)", pDynSym));