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

19991025-15:20 GMT+1 Victor Szel <info@szelvesz.hu>

Browse Source
This commit is contained in:
Viktor Szakats
1999-10-25 13:32:14 +00:00
parent de9e545bcf
commit ed752ded2a
3 changed files with 23 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -1,3 +1,9 @@
19991025-15:20 GMT+1 Victor Szel <info@szelvesz.hu>
* tests/memory.prg
+ Using hbmemory.ch
* source/rtl/net.c
+ cast added for MSVC
19991025-14:58 GMT+1 Victor Szel <info@szelvesz.hu>
* source/rtl/net.c
+ Name buffer length corrected.

2
harbour/source/rtl/net.c
View File

@@ -61,7 +61,7 @@ HARBOUR HB_NETNAME( void )
#if defined(_Windows) || defined(WINNT)
{
DWORD ulLen = MAX_COMPUTERNAME_LENGTH + 1;
char * pszValue = hb_xgrab( ulLen );
char * pszValue = ( char * ) hb_xgrab( ulLen );
pszValue[ 0 ] = '\0';

30
harbour/tests/memory.prg
View File

@@ -4,21 +4,23 @@
/* ; Donated to the public domain by Victor Szel <info@szelvesz.hu> */
#include "hbmemory.ch"
FUNCTION Main()
? 0, MEMORY( 0 )
? 1, MEMORY( 1 )
? 2, MEMORY( 2 )
? 3, MEMORY( 3 )
? 4, MEMORY( 4 )
? 101, MEMORY( 101 )
? 102, MEMORY( 102 )
? 103, MEMORY( 103 )
? 104, MEMORY( 104 )
? 105, MEMORY( 105 )
? 1001, MEMORY( 1001 )
? 1002, MEMORY( 1002 )
? 1003, MEMORY( 1003 )
? 1004, MEMORY( 1004 )
? "HB_MEM_CHAR " , MEMORY( HB_MEM_CHAR )
? "HB_MEM_BLOCK " , MEMORY( HB_MEM_BLOCK )
? "HB_MEM_RUN " , MEMORY( HB_MEM_RUN )
? "HB_MEM_VM " , MEMORY( HB_MEM_VM )
? "HB_MEM_EMS " , MEMORY( HB_MEM_EMS )
? "HB_MEM_FM " , MEMORY( HB_MEM_FM )
? "HB_MEM_FMSEGS " , MEMORY( HB_MEM_FMSEGS )
? "HB_MEM_SWAP " , MEMORY( HB_MEM_SWAP )
? "HB_MEM_CONV " , MEMORY( HB_MEM_CONV )
? "HB_MEM_EMSUSED " , MEMORY( HB_MEM_EMSUSED )
? "HB_MEM_USED " , MEMORY( HB_MEM_USED )
? "HB_MEM_USEDMAX " , MEMORY( HB_MEM_USEDMAX )
? "HB_MEM_STACKITEMS" , MEMORY( HB_MEM_STACKITEMS )
? "HB_MEM_STACK " , MEMORY( HB_MEM_STACK )
RETURN NIL