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

2001-06-11 14:16 GMT+2 Maurilio Longo <maurilio.longo@libero.it>

Browse Source 
* source/rtl/net.c
     ! To compile under OS/2 EMX GCC compiler there were missing include files.
       NOTE: you need to link socket.a library to every program from now on or you'll get:
       rtl.a(net.o): Undefined symbol _gethostname referenced from text segment
This commit is contained in:
Maurilio Longo
2001-06-11 12:18:43 +00:00
parent 36420aa9af
commit 5d9da70f18
2 changed files with 21 additions and 3 deletions
Download Patch File Download Diff File Expand all files Collapse all files

6
harbour/ChangeLog
View File

@@ -1,3 +1,9 @@
2001-06-11 14:16 GMT+2 Maurilio Longo <maurilio.longo@libero.it>
* source/rtl/net.c
! To compile under OS/2 EMX GCC compiler there were missing include files.
NOTE: you need to link socket.a library to every program from now on or you'll get:
rtl.a(net.o): Undefined symbol _gethostname referenced from text segment
2001-06-10 17:40 UTC-0800 Ron Pinkas <ron@profit-master.com>
+ contrib/dot/pp.prg
+ Restored deleted file.

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

@@ -57,8 +57,20 @@
#include "hbapi.h"
#include "hb_io.h"
#if defined(__DJGPP__) || defined(__RSX32__) || defined(__GNUC__)
#include "sys/param.h"
#if defined(__DJGPP__) || defined(__RSX32__) || defined(__GNUC__) && ! defined(HB_OS_OS2)
#include "sys/param.h"
/* EMX GCC does need a different approach to include gethostname()
NOTE: you need to link socket.a library to every program from now on or you'll get:
rtl.a(net.o): Undefined symbol _gethostname referenced from text segment
*/
#elif defined(__GNUC__) && defined(HB_OS_OS2)
#include "sys/types.h"
#include "sys/socket.h"
#include "sys/ioctl.h"
#include "netdb.h"
#define MAXGETHOSTNAME 256 /* should be enough for a host name */
#endif
/* NOTE: Clipper will only return a maximum of 15 bytes from this function.
And it will be padded with spaces. Harbour does the same in the
@@ -72,7 +84,7 @@ HB_FUNC( NETNAME )
{
char * pszValue = (char *) hb_xgrab(MAXGETHOSTNAME+1);
pszValue[ 0 ] = '\0';
gethostname (pszValue, MAXGETHOSTNAME);
hb_retc( pszValue );