diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 9dc44903f8..786cf74ba4 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -8,6 +8,10 @@ 2009-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org) */ +2009-02-11 18:30 UTC+0200 Mindaugas Kavaliauskas (dbtopas/at/dbtopas.lt) + * harbour/source/vm/proc.c + * hb_procname() support for symbol evaluation + 2009-02-11 16:30 UTC+0100 Viktor Szakats (harbour.01 syenar hu) * contrib/gtwvg/wvgutils.c ! Applied fixes done to WIN_APPENDMENU() to the exact diff --git a/harbour/source/vm/proc.c b/harbour/source/vm/proc.c index 48cc86cc3b..3a5d054f67 100644 --- a/harbour/source/vm/proc.c +++ b/harbour/source/vm/proc.c @@ -195,6 +195,8 @@ char * hb_procname( int iLevel, char * szName, BOOL fMethodName ) else if( HB_IS_BLOCK( pSelf ) ) hb_strncat( szName, pSelf->item.asBlock.value->pDefSymb->szName, HB_PROCBUF_LEN ); + else if( HB_IS_SYMBOL( pSelf ) ) + hb_strncpy( szName, pSelf->item.asSymbol.value->szName, HB_PROCBUF_LEN ); else hb_strncat( szName, pBase->item.asSymbol.value->szName, HB_PROCBUF_LEN ); }