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

2007-10-22 21:04 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)

Browse Source 
* harbour/source/rdd/wacore.c
  * harbour/source/rdd/dbcmd.c
    ! fixed registering workareas with numbers from 65280 to 65534
This commit is contained in:
Przemyslaw Czerpak
2007-10-22 19:04:33 +00:00
parent 6b02f11cb8
commit 6209da531a
3 changed files with 14 additions and 6 deletions
Download Patch File Download Diff File Expand all files Collapse all files

5
harbour/ChangeLog
View File

@@ -8,6 +8,11 @@
2002-12-01 13:30 UTC+0100 Foo Bar <foo.bar@foobar.org>
*/
2007-10-22 21:04 UTC+0200 Przemyslaw Czerpak (druzus/at/priv.onet.pl)
* harbour/source/rdd/wacore.c
* harbour/source/rdd/dbcmd.c
! fixed registering workareas with numbers from 65280 to 65534
2007-10-21 11:21 UTC+0100 Viktor Szakats (harbour.01 syenar.hu)
- contrib/directx/media
- contrib/directx/samples

10
harbour/source/rdd/dbcmd.c
View File

@@ -175,11 +175,11 @@ HB_FUNC( AFIELDS )
HB_FUNC( ALIAS )
{
USHORT uiArea;
int iArea;
AREAP pArea;
uiArea = hb_parni( 1 );
pArea = ( AREAP ) hb_rddGetWorkAreaPointer( uiArea );
iArea = hb_parni( 1 );
pArea = ( AREAP ) hb_rddGetWorkAreaPointer( iArea );
if( pArea )
{
char szAlias[ HARBOUR_MAX_RDD_ALIAS_LENGTH + 1 ];
@@ -2102,13 +2102,13 @@ HB_FUNC( DBSETRELATION )
}
else
{
USHORT uiArea = hb_rddGetCurrentWorkAreaNumber();
int iArea = hb_rddGetCurrentWorkAreaNumber();
hb_rddSelectWorkAreaAlias( hb_parcx( 1 ) );
if( hb_vmRequestQuery() )
return;
uiChildArea = hb_rddGetCurrentWorkAreaNumber();
hb_rddSelectWorkAreaNumber( uiArea );
hb_rddSelectWorkAreaNumber( iArea );
}
pChildArea = uiChildArea ? ( AREAP ) hb_rddGetWorkAreaPointer( uiChildArea ) : NULL;

5
harbour/source/rdd/wacore.c
View File

@@ -133,7 +133,10 @@ HB_EXPORT USHORT hb_rddInsertAreaNode( const char *szDriver )
if( s_uiCurrArea >= s_uiWaNumMax )
{
int iSize = ( ( s_uiCurrArea + 256 ) >> 8 ) << 8;
int iSize = ( ( ( int ) s_uiCurrArea + 256 ) >> 8 ) << 8;
if( iSize > HARBOUR_MAX_RDD_AREA_NUM )
iSize = HARBOUR_MAX_RDD_AREA_NUM;
if( s_uiWaNumMax == 0 )
{