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

2008-10-15 00:31 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/include/hbxvm.h
  * harbour/source/vm/hvm.c
    - removed to unused functions

  * harbour/source/vm/thread.c
    - removed unnecessary casting
This commit is contained in:
Przemyslaw Czerpak
2008-10-14 22:32:03 +00:00
parent fe54bdf114
commit b0a88e24ff
4 changed files with 11 additions and 14 deletions
Download Patch File Download Diff File Expand all files Collapse all files

8
harbour/ChangeLog
View File

@@ -8,6 +8,14 @@
2008-12-31 13:59 UTC+0100 Foo Bar (foo.bar foobar.org)
*/
2008-10-15 00:31 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/include/hbxvm.h
* harbour/source/vm/hvm.c
- removed to unused functions
* harbour/source/vm/thread.c
- removed unnecessary casting
2008-10-14 20:36 UTC+0200 Viktor Szakats (harbour.01 syenar hu)
* source/rtl/dbedit.prg
* source/rtl/tgetint.prg

2
harbour/include/hbxvm.h
View File

@@ -254,8 +254,6 @@ extern HB_EXPORT BOOL hb_xvmLocalAdd( int iLocal );
extern HB_EXPORT BOOL hb_xvmStaticAdd( USHORT uiStatic );
extern HB_EXPORT BOOL hb_xvmMemvarAdd( PHB_SYMB pSymbol );
extern HB_EXPORT PHB_ITEM hb_xvmStaticPtr( int iStatic );
extern HB_EXPORT PHB_ITEM hb_xvmLocalPtr( int iLocal );
extern HB_EXPORT void hb_xvmCopyLocals( int iDest, int iSource );
HB_EXTERN_END

11
harbour/source/vm/hvm.c
View File

@@ -8479,7 +8479,7 @@ HB_EXPORT void hb_xvmPopLocal( SHORT iLocal )
hb_vmPopLocal( iLocal );
}
HB_EXPORT PHB_ITEM hb_xvmLocalPtr( int iLocal )
static PHB_ITEM hb_xvmLocalPtr( int iLocal )
{
HB_STACK_TLS_PRELOAD
@@ -8499,15 +8499,6 @@ HB_EXPORT PHB_ITEM hb_xvmLocalPtr( int iLocal )
}
}
HB_EXPORT PHB_ITEM hb_xvmStaticPtr( int iStatic )
{
HB_STACK_TLS_PRELOAD
HB_TRACE(HB_TR_DEBUG, ("hb_xvmStaticPtr(%d)", iStatic));
return s_aStatics.item.asArray.value->pItems + hb_stackGetStaticsBase() + iStatic - 1;
}
HB_EXPORT void hb_xvmCopyLocals( int iDest, int iSource )
{
PHB_ITEM pDest;

4
harbour/source/vm/thread.c
View File

@@ -729,13 +729,13 @@ HB_FUNC( HB_THREADID )
{
pThread = hb_thParam( 1, 0 );
if( pThread )
hb_retnint( ( HB_PTRDIFF ) pThread->th_no );
hb_retnint( pThread->th_no );
}
else
{
pThread = ( PHB_THREADSTATE ) hb_vmThreadState();
if( pThread )
hb_retnint( ( HB_PTRDIFF ) pThread->th_no );
hb_retnint( pThread->th_no );
else
hb_retnint( 0 );
}