Re: [Harbour] debug

2009-09-14 Thread Franček Prijatelj

Hi Alexandr

In demoqt.prg insert before main()

INSERT THIS 
REQUEST HB_GT_WIN



INIT PROCEDURE Qt_Start()
 LOCAL lang:= QTextCodec():new ()
   qt_qapplication()
   * HERE IS YOUR CODE 
   lang:setCodecForCStrings (lang:codecForName_1("Windows-1250")) 
   **
   RETURN

EXIT PROCEDURE Qt_End()
   qt_qapplication_quit()
   RETURN

/*--*/

PROCEDURE Main()
   Local oLabel, oBtn, oDA, oTabBar
   Local oWnd, oSize
   Local oMenuBar, pIcon
   Local oMenuA, pAction
   LOCAL oPS, oPPrv, oMB, oWZ, oCD, oWP, oSBar, oStyle
   
   * INSERT THIS 
   Altd()   
   
.
.
.
.
  
 And remove this
/*
#ifdef __PLATFORM__WINDOWS
PROCEDURE hb_GtSys()
   HB_GT_GUI_DEFAULT()
   RETURN
#endif
*/


You have to link gtwin  
(If working on windows, otherwise some linux gt library) 
It works for me.

I also changed few lines in debugger.prg,
so that I can set breakpoints and other settings in init.cld


BRGS
Franček Prijatelj



Alexandr Okhotnikov wrote:
> 
> Hi Pritpal Bedi
> 
> Using hbqt how to use the harbour-debugger (for *. prg)?
> I asked earlier, no one answered. The debugger is not called. It is
> not possible or require additional conditions?
> 
> Best regards,
> Alexandr Okhotnikov
> ___
> Harbour mailing list
> Harbour@harbour-project.org
> http://lists.harbour-project.org/mailman/listinfo/harbour
> 
> 

-- 
View this message in context: 
http://www.nabble.com/debug-tp25430407p25431876.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] SF.net SVN: harbour-project:[12490] trunk/harbour

2009-09-14 Thread vszakats
Revision: 12490
  
http://harbour-project.svn.sourceforge.net/harbour-project/?rev=12490&view=rev
Author:   vszakats
Date: 2009-09-14 10:46:22 + (Mon, 14 Sep 2009)

Log Message:
---
2009-09-14 12:43 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
  * utils/hbmk2/hbmk2.prg
% Deleted UTF-8 hack. Now using the built-in UTF-8 conversion
  support.

  * contrib/hbwin/win_com.c
% Minor optimization and fixed warnings after recent patch.

  * INSTALL
+ Added see also HB_CC* to HB_COMPILER settings.

Modified Paths:
--
trunk/harbour/ChangeLog
trunk/harbour/INSTALL
trunk/harbour/contrib/hbwin/win_com.c
trunk/harbour/utils/hbmk2/hbmk2.prg


This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] debug

2009-09-14 Thread Alexandr Okhotnikov
Hi Franček Prijatelj

Hangs on startup
What compilation options for the harbour and demoqt should I use?
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] debug

2009-09-14 Thread Franček Prijatelj

Hi  Aleksandr

Try with this settings (with exact order of libs )

harbour demoqt.prg  -b -dDEBUG -n -m -w0 -gc -q0
-i.;C:\HRB\include;C:\Qt\2009.03\qt_msvc\include;   -odemoqt.c  
cl.exe -c -TC -W4 -D_CRT_SECURE_NO_WARNINGS -D_CRT_SECURE_NO_DEPRECATE   
-IC:\HRB\include   demoqt.c -Fdemoqt.obj
Microsoft (R) 32-bit C/C++ Optimizing Compiler Version 14.00.50727.762 for
80x86
Copyright (C) Microsoft Corporation.  All rights reserved.
demoqt.c

LINK  /OUT:demoqt.exe /MANIFEST:NO demoqt.obj 
/subsystem:WINDOWS  /DEFAULTLIB:LIBCMT 
/NODEFAULTLIB:LIBC 
/FORCE:MULTIPLE   
/libpath:C:/HRB/lib 
/libpath:C:/Qt/2009.03/qt_msvc/lib 
/libpath:c:/Lib/mysql/lib 
hbqt.lib  QtCore4.lib QtGui4.lib QtNetwork4.lib QtWebKit4.lib 
gtgui.lib gtstd.lib gtwin.lib hbbmcdx.lib hbbtree.lib hbcommon.lib 
hbcpage.lib hbct.lib hbdebug.lib hbextern.lib 
hbgt.lib hblang.lib hbmacro.lib hbmisc.lib hbmzip.lib 
hbodbc.lib hbwin.lib hbpcre.lib hbpp.lib 
hbrdd.lib hbsix.lib hbrtl.lib 
hbtip.lib hbusrrdd.lib hbvmmt.lib hbziparc.lib 
hbzlib.lib hbnf.lib rddcdx.lib rddfpt.lib 
rddntx.lib xhb.lib hbmysql.lib libmysql.lib 
kernel32.lib gdi32.lib user32.lib comctl32.lib comdlg32.lib shell32.lib 
winspool.lib ole32.lib oleaut32.lib uuid.lib ws2_32.lib 
advapi32.lib vfw32.lib winmm.lib   
Microsoft (R) Incremental Linker Version 8.00.50727.762
Copyright (C) Microsoft Corporation.  All rights reserved.


BRGS 
Franček


Alexandr Okhotnikov wrote:
> 
> Hi Franček Prijatelj
> 
> Hangs on startup
> What compilation options for the harbour and demoqt should I use?
> ___
> Harbour mailing list
> Harbour@harbour-project.org
> http://lists.harbour-project.org/mailman/listinfo/harbour
> 
> 

-- 
View this message in context: 
http://www.nabble.com/debug-tp25430407p25435612.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] debug

2009-09-14 Thread Franček Prijatelj

Hi again

And here for mingw 

harbour demoqt.prg  -b -dDEBUG -n -m -w0 -gc -q0
-i.C:\HRB\mingw\include;C:\Qt\2009.03\qt_mingw\include;
-odemoqt.c  

gcc.exe-c -Wall -W -O3 -fomit-frame-pointer  
-march=i586 -mtune=pentiumpro -fms-extensions -mms-bitfields 
-ffast-math -pipe  
-IC:\HRB\mingw\include  
demoqt.c -odemoqt.o
g++  -o demoqt  demoqt.o  
-mwindows -fms-extensions -Wall -mms-bitfields 
-LC:/HRB/mingw/lib 
-LC:/Qt/2009.03/qt_mingw/lib 
 -Wl,--allow-multiple-definition -Wl,--start-group 
 -lhbqt -lhbxbp -lQtCore4 -lQtGui4 -lQtNetwork4 -lQtWebKit4 
 -lsupc++ -lgtgui -lgtpca -lgtstd -lgtwin -lhbbmcdx -lhbbtree 
 -lhbcommon -lhbcpage -lhbct -lhbdebug -lhbextern -lhbgt 
 -lhblang -lhbmacro -lhbmisc -lhbmzip -lhbodbc -lhbwin -lhbpcre 
 -lhbpp -lhbrdd -lhbsix -lhbrtl -lhbtip -lhbusrrdd 
 -lhbvmmt -lhbziparc -lhbzlib -lhbnf -lrddcdx -lrddfpt 
 -lrddntx -lxhb  
 -lkernel32 -lgdi32 -luser32 -lcomctl32 -lcomdlg32 -lshell32 
 -lwinspool -lole32 -loleaut32 -luuid -lws2_32 
 -ladvapi32 -lvfw32 -lwinmm   -Wl,--end-group 

BRGS 
Franček



Alexandr Okhotnikov wrote:
> 
> Hi Franček Prijatelj
> 
> Hangs on startup
> What compilation options for the harbour and demoqt should I use?
> ___
> Harbour mailing list
> Harbour@harbour-project.org
> http://lists.harbour-project.org/mailman/listinfo/harbour
> 
> 

-- 
View this message in context: 
http://www.nabble.com/debug-tp25430407p25435888.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] Fwd: Contrib TPostgres (Contribuci ón) [TRANSLATE]

2009-09-14 Thread Rodrigo Machado
[GOOGLE TRANSLATOR]
Good Morning

Some time ago I modified the for postgresql contrib added the ability to
access data as follows
Instead of:
oQuery:getRow(oQuery:recno()):fieldget('codigo')
It can be used like this:
oQuery:codigo

This method has provided much programming, and so come to share with you.

I would like to include the sources in SVN.
Greetings


Buenos Dias

Hace algún tiempo he modificado el contrib para postgresql agregandole la
posibilidad de acceder a los datos de la siguiente manera
En vez de:
oQuery:getrow( oQuery:recno() ):fieldget('codigo')
Se puede usar así:
oQuery:codigo

Este método ha facilitado y mucho la programación, y por esto vengo a
compartir con ustedes.

Me gustaría que se incluyera a los fuentes en el SVN.
Saludos


*
***Rodrigo Machado***
***  rodrigo at flaro.net ***
***   30/08/2008  - 7:26  ***
*
METHOD SetFieldsValues()  CLASS TPQquery
   Local i
   Local aData

if ::nRecno > 0
   aData := array( len( ::aStruct ), 2 )
   for i := 1 to len(::aStruct)
  if ! __objHasData( SELF,  ::aStruct[i,1] )
 __objAddData( SELF, ::aStruct[i,1] )
  endif
  aData[ i, HB_OO_DATA_SYMBOL ] := ::aStruct[i,1]
  aData[ i, HB_OO_DATA_VALUE  ] := ::GetRow():Fieldget( i )
   next
   __ObjSetValueList( SELF, aData )
endif

RETURN nil



¿Estas buscando algún numero telefónico? www.teleguia.com.py

*:-.,_,.-:*'``'*:-.,_,.-:*:-.,_,.-:*'``'*:-.,_,.-:
  :: Rodrigo Machado ::
  FlaRo Sistemas
   www.flaro.net

  Telef:  0673 221 480
*:-.,_,.-:*'``'*:-.,_,.-:*:-.,_,.-:*'``'*:-.,_,.-:


TPostgres.prg
Description: Binary data
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] about NETIO

2009-09-14 Thread Przemyslaw Czerpak
On Mon, 14 Sep 2009, WenSheng wrote:

Hi,

>   I test netio function,
>   at server side use:
>   ---
>pListenSocket := NETIO_LISTEN( PORT, IP, DRIVER )
>do while .t.
>   pConnectionSocket := NETIO_ACCEPT( pListenSocket )
>   ? 'Have one connect...', pConnectionSocket
>   NETIO_SERVER( pConnectionSocket )
>enddo
>   ---
> I'm use 'netio_server' to create connect, 
> but, I don't know how to stop server connect when client is close connect!!

It's stopped automatically when client close all connections to
given server or when last copy of connection socket is cleared.
All allocated resorces are released when last copy of connection
socket is cleared. BTW you should add to above code:
  pConnectionSocket := NIL
just after:
  NETIO_SERVER( pConnectionSocket )
if you want to force releasing the resources bound with pConnectionSocket.
Otherwise they are release when new connection is accepted and
pConnectionSocket is overwrite in line:
  pListenSocket := NETIO_LISTEN( PORT, IP, DRIVER )

> server side is add memory when client connect to server.
> no method to release memory when client connect is close.

I do not think that above is true. AFAIK all allocated resources are
cleanly released.

best regards,
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] debug

2009-09-14 Thread Alexandr Okhotnikov
Hi

Many thanks
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] SF.net SVN: harbour-project:[12489] trunk/harbour

2009-09-14 Thread Viktor Szakáts

Hi,

Viktor, could you please take a look on the hbmk2 cross-compiler  
auto detection. Maybe there exist a similar solution with your last  
commit, thank you.


It's not so easy ATM. That part of autodetection code is not yet
implemented in hbmk2 at all. I plan to rework hbmk2 autodetection
to have all features of global.mk in the future, but probably only
after a stable release.

A second check of the linker '-L../../hbqt//lib ' switch maybe will  
be useful.


Could not replicate the double slashes locally, anyway it's just  
cosmetics,

won't cause any harm.

Brgds,
Viktor

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] about NETIO

2009-09-14 Thread Massimo Belgrano
Hi Przemek
have you same news regarding GTNET idea , for control remotely  GT/GUI object
NETGT like current NETIO a universal  solution For having the terminal
side on remote  computer with each GT

Are GTNET & NETIO the basic for universal harbour application server?
The better implementation ot this idea is now on c:\harbour\examples\terminal

Follow is prev post regarding Gtnet
>- with Remote Resource Sharing and Procedures Calls

>- lease also do not forget about yet another functionality. As long as
>it will be possible to recreate all application windows from scratch
>using only our own meta description then it will be possible to have
>GTNET in aApplication running on the server and native GT client on user side.
>When user computer crashes then it's enough to connect to the
>server again and restore all windows using information from server.
>In the moment when you introduce hidden bindings between GT windows
>not visible for our GT layer you are loosing such functionality.



2009/9/14 Przemyslaw Czerpak :
> On Mon, 14 Sep 2009, WenSheng wrote:
>
> Hi,
>
>>   I test netio function,
>>   at server side use:
>>   ---
>>    pListenSocket := NETIO_LISTEN( PORT, IP, DRIVER )
>>    do while .t.
>>       pConnectionSocket := NETIO_ACCEPT( pListenSocket )
>>       ? 'Have one connect...', pConnectionSocket
>>       NETIO_SERVER( pConnectionSocket )
>>    enddo
>>   ---
>> I'm use 'netio_server' to create connect,
>> but, I don't know how to stop server connect when client is close connect!!
>
> It's stopped automatically when client close all connections to
> given server or when last copy of connection socket is cleared.
> All allocated resorces are released when last copy of connection
> socket is cleared. BTW you should add to above code:
>      pConnectionSocket := NIL
> just after:
>      NETIO_SERVER( pConnectionSocket )
> if you want to force releasing the resources bound with pConnectionSocket.
> Otherwise they are release when new connection is accepted and
> pConnectionSocket is overwrite in line:
>      pListenSocket := NETIO_LISTEN( PORT, IP, DRIVER )
>
>> server side is add memory when client connect to server.
>> no method to release memory when client connect is close.
>
> I do not think that above is true. AFAIK all allocated resources are
> cleanly released.
>
> best regards,
> Przemek
> ___
> Harbour mailing list
> Harbour@harbour-project.org
> http://lists.harbour-project.org/mailman/listinfo/harbour
>



-- 
Massimo Belgrano
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] sample of my hbdoc2 results

2009-09-14 Thread Viktor Szakáts

Great job April. Feel free to upload it in place of old hbdoc.

BTW, for quality .pdf output you can try hbhpdf lib, I have very
good experiences with it.

Brgds,
Viktor

On 2009.09.13., at 22:39, April White wrote:

I'm looking for some reviews and comments on my work.  It is not  
ready to be uploaded to the repository yet.


I've uploaded source documents and sample results to:
  http://www.harbour-project.com.br/apwhite/hrbdocs.zip

This contains the source files /dir.txt/ and /menu.txt/ and the  
output formats for /ascii, text, html, html2, and xml/


If you want to see the source code, it is at:
  http://www.harbour-project.com.br/apwhite/hbdoc2-20090913-1633.zip

I think I've settled on the internal code design (classes); I'm  
going to tackle rtf output next (so it can be turned into hlp files)  
and then trf.


April

--
The hardest years in life are those between ten and seventy.
- Helen Hayes (at 73)

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] demoqt tests with debug_new - Leaked objects

2009-09-14 Thread Pritpal Bedi

Hi István


Bisz István wrote:
> 
> The ‘demoqt’ tests with ‘debug_new’ shows a lot of ‘leaked objects’ , see
> attached ‘debug_new.txt’. As I see now, the objects allocated by the new
> operator are not released by a corresponding delete operator.
> 

I am struggling with this aspect since 20 days and 
could not reached to any consclusion why Qt is not releasing the 
objects. To illustrate, just navigate in  tab in demoxbp and 
also keep an eye over task manager. You will be surprized to 
observe that memory keeps on growing all the time.
Not only here, just move the mouse in/out of the 
demoxbp window, the same behavior will follow.
And the worse is, if you play like this for a 
couple of hours, netxt time, demoxbp.exe will fail to 
load. You will need to reboot your computer.

I was wondering why this happens. I rewrote and 
subclassed QMainWindow() and implemented it for 
XbpDialog() class to have finer control over events 
and their execution. However I could not avoid this behavior.

And today you have confirmed that Qt itself is buggy on this front.

Even I downloaded Qt 2009.03 and checked all above against it
but the result is the same.

Along with above issue, I have one more issue with Qt in 
respect to its paint engine which fails on MT scenario.
I will post the modified code and will show what is needed to 
control it and what heavy penalty we have to pay.

And thanks for stopping my frustration over the subject.

Regards
Pritpal Bedi

-- 
View this message in context: 
http://www.nabble.com/demoqt-tests-with-debug_new---Leaked-objects-tp25434990p25440044.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] NETIO - Real Web IP - Application Behavior

2009-09-14 Thread Pritpal Bedi

Hello Przemek

I did as follows:

1. Opened a port on my router, 63000, to be accessible from outside.
2. Obtained temporary IP for my computer from no-ip .com, say, 64.123.212.67
3. Verified that the port 63000 is visible on that IP with some net tool.
4. Started NetIOSrv.exe 63000 0.0.0.0 c:\someFolderAsRootFolder
5. Executed the application with 64.123.212.67 63000

Application just hanged for indefinitely and did not showup next screen.
Normally if port is not accessible or NerIOSrv.exe is not running, 
application returns immediately with an error.

What could be the reasons for this behavior?

Regards
Pritpal Bedi
-- 
View this message in context: 
http://www.nabble.com/NETIO---Real-Web-IP---Application-Behavior-tp25440212p25440212.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] SF.net SVN: harbour-project:[12490] trunk/harbour

2009-09-14 Thread elart

On 09/14/2009 12:46 PM, vszak...@users.sourceforge.net wrote:

Revision: 12490
   
http://harbour-project.svn.sourceforge.net/harbour-project/?rev=12490&view=rev
Author:   vszakats
Date: 2009-09-14 10:46:22 + (Mon, 14 Sep 2009)

Log Message:
---
2009-09-14 12:43 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
   * utils/hbmk2/hbmk2.prg
 % Deleted UTF-8 hack. Now using the built-in UTF-8 conversion
   support.

   * contrib/hbwin/win_com.c
 % Minor optimization and fixed warnings after recent patch.

   * INSTALL
 + Added see also HB_CC* to HB_COMPILER settings.

Modified Paths:
--
 trunk/harbour/ChangeLog
 trunk/harbour/INSTALL
 trunk/harbour/contrib/hbwin/win_com.c
 trunk/harbour/utils/hbmk2/hbmk2.prg


This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


On Ubuntu 9.10 32 bits Harbour for Linux compile fine

Harbour for Win give me this error

In attachment the complete compile log...

Thank you and best regards

make[3]: «../../../../../lib/win/mingw/libhbdebug.a» è aggiornato.
/usr/bin/i586-mingw32msvc-gcc -shared -L../../../../../lib/win/mingw  -o 
../../../../../bin/win/mingw/harbour-20.dll __dyn__.tmp -lhbpcre 
-lhbzlib -lkernel32 -luser32 -lws2_32 -ladvapi32 -lgdi32 
-Wl,--out-implib,../../../../../lib/win/mingw/libharbour-20.a,--output-def,../../../../../bin/win/mingw/harbour-20.def

Creating library file: ../../../../../lib/win/mingw/libharbour-20.a
../../../../../source/common/obj/win/mingw/hbffind.o:hbffind.c:(.text+0x474): 
undefined reference to `_hb_osDecodeCP'
../../../../../source/rtl/obj/win/mingw/filesys.o:filesys.c:(.text+0xc8): undefined 
reference to `_hb_osDecodeCP'
../../../../../source/rtl/obj/win/mingw/filesys.o:filesys.c:(.text+0x2f7): 
undefined reference to `_hb_osEncodeCP'
../../../../../source/rtl/obj/win/mingw/filesys.o:filesys.c:(.text+0x10f1): 
undefined reference to `_hb_osDecodeCP'
../../../../../source/rtl/obj/win/mingw/gete.o:gete.c:(.text+0xaa): 
undefined reference to `_hb_osEncodeCP'
../../../../../source/rtl/obj/win/mingw/gete.o:gete.c:(.text+0xc6): 
undefined reference to `_hb_osEncodeCP'
../../../../../source/rtl/obj/win/mingw/gete.o:gete.c:(.text+0x18c): 
undefined reference to `_hb_osDecodeCP'
../../../../../source/rtl/obj/win/mingw/gete.o:gete.c:(.text+0x2cb): 
undefined reference to `_hb_osDecodeCP'
../../../../../source/rtl/obj/win/mingw/hbproces.o:hbproces.c:(.text+0x180): 
undefined reference to `_hb_osEncodeCP'
../../../../../source/rtl/obj/win/mingw/hbproces.o:hbproces.c:(.text+0x5bd): 
undefined reference to `_hb_osEncodeCP'
../../../../../source/rtl/obj/win/mingw/hbrunfun.o:hbrunfun.c:(.text+0x58): 
undefined reference to `_hb_osEncodeCP'
../../../../../source/rtl/obj/win/mingw/net.o:net.c:(.text+0xc1): 
undefined reference to `_hb_osDecodeCP'
../../../../../source/rtl/obj/win/mingw/net.o:net.c:(.text+0x121): 
undefined reference to `_hb_osDecodeCP'
../../../../../source/rtl/obj/win/mingw/philes.o:philes.c:(.text+0x5fd): 
undefined reference to `_hb_osDecodeCP'
../../../../../source/rtl/obj/win/mingw/run.o:run.c:(.text+0x3f): 
undefined reference to `_hb_osEncodeCP'
../../../../../source/vm/obj/win/mingw/cmdarg.o:cmdarg.c:(.text+0x3b9): 
undefined reference to `_hb_osDecodeCP'
../../../../../source/vm/obj/win/mingw/cmdarg.o:cmdarg.c:(.text+0x796): 
undefined reference to `_hb_osDecodeCP'

collect2: ld returned 1 exit status
make[3]: *** [harbour-20.dll] Errore 1
make[2]: *** [descend] Errore 2
make[1]: *** [dynlib] Errore 2
make: *** [source] Errore 2





log.txt.tar.gz
Description: GNU Zip compressed data
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] NETIO - Real Web IP - Application Behavior

2009-09-14 Thread elart

On 09/14/2009 07:42 PM, Pritpal Bedi wrote:


Hello Przemek

I did as follows:

1. Opened a port on my router, 63000, to be accessible from outside.
2. Obtained temporary IP for my computer from no-ip .com, say, 64.123.212.67
3. Verified that the port 63000 is visible on that IP with some net tool.
4. Started NetIOSrv.exe 63000 0.0.0.0 c:\someFolderAsRootFolder
5. Executed the application with 64.123.212.67 63000

Application just hanged for indefinitely and did not showup next screen.
Normally if port is not accessible or NerIOSrv.exe is not running,
application returns immediately with an error.

What could be the reasons for this behavior?

Regards
Pritpal Bedi
I have a similar issue on Linux and Przemek tell me to link at compile 
time the -gtwin lib.


Hope this helps
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] if you have some time to kill....

2009-09-14 Thread Tamas TEVESZ

hi,

i had, this was fun.

it's barely over the "it just compiles" stage, there are a whole loads 
of problems with terminal, possibly network, and whatnot.

anyway, if someone wants to chew this, it's a start. the downloadable 
haiku r1alpha1 iso contains everything one needs to get started ;)

2009.09.14 20:54:52 Haiku 1 BePC
Harbour 2.0.0beta3 (Rev. 12490) GNU C 2.95 (32-bit) x86
THREADS: 0
N_LOOPS: 100
[ T000: empty loop overhead ]...0.89

[ T001: x := L_C ]..0.00
[ T002: x := L_N ]..0.00
[ T003: x := L_D ]..0.00
[ T004: x := S_C ]..0.00
[ T005: x := S_N ]..0.00
[ T006: x := S_D ]..0.00
[ T007: x := M->M_C ]...0.00
[ T008: x := M->M_N ]...0.00
[ T009: x := M->M_D ]...0.00
[ T010: x := M->P_C ]...0.00
[ T011: x := M->P_N ]...0.00
[ T012: x := M->P_D ]...0.00
[ T013: x := F_C ]..4.17
[ T014: x := F_N ]..0.10
[ T015: x := F_D ]..0.00
[ T016: x := o:Args ]...0.13
[ T017: x := o[2] ].0.00
[ T018: round( i / 1000, 2 ) ]..0.31
[ T019: str( i / 1000 ) ]...4.34
[ T020: val( s ) ]..0.21
[ T021: val( a [ i % 16 + 1 ] ) ]...0.90
[ T022: dtos( d - i % 1 ) ].1.88
[ T023: eval( { || i % 16 } ) ].2.01
[ T024: eval( bc := { || i % 16 } ) ]...0.00
[ T025: eval( { |x| x % 16 }, i ) ].0.97
[ T026: eval( bc := { |x| x % 16 }, i ) ]...0.00
[ T027: eval( { |x| f1( x ) }, i ) ]1.25
[ T028: eval( bc := { |x| f1( x ) }, i ) ]..0.20
[ T029: eval( bc := &("{ |x| f1( x ) }"), i ) ].0.33
[ T030: x := &( "f1(" + str(i) + ")" ) ]...22.08
[ T031: bc := &( "{|x|f1(x)}" ), eval( bc, i ) ]...25.36
[ T032: x := valtype( x ) +  valtype( i ) ].1.93
[ T033: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..5.00
[ T034: x := a[ i % 16 + 1 ] == s ].0.17
[ T035: x := a[ i % 16 + 1 ] = s ]..0.24
[ T036: x := a[ i % 16 + 1 ] >= s ].0.25
[ T037: x := a[ i % 16 + 1 ] <= s ].0.48
[ T038: x := a[ i % 16 + 1 ] < s ]..0.23
[ T039: x := a[ i % 16 + 1 ] > s ]..0.22
[ T040: ascan( a, i % 16 ) ]0.08
[ T041: ascan( a, { |x| x == i % 16 } ) ]...7.77
[ T042: iif( i%1000==0, a:={}, ) , aadd(a,{i,1,.T.,s,s2,a2 ]3.73
[ T043: x := a ]0.00
[ T044: x := {} ]...0.45
[ T045: f0() ]..0.00
[ T046: f1( i ) ]...0.00
[ T047: f2( c[1...8] ) ]0.00
[ T048: f2( c[1...4] ) ]0.00
[ T049: f2( @c[1...4] ) ]...0.00
[ T050: f2( @c[1...4] ), c2 := c ]..0.00
[ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]0.38
[ T052: f2( a ) ]...0.00
[ T053: x := f4() ].2.80
[ T054: x := f5() ].1.35
[ T055: x := space(16) ]0.99
[ T056: f_prv( c ) ]1.32

[ total application time: ]...134.25
[ total real time: ]..139.30

-- 
[-]

mkdir /nonexistentIndex: include/hbthread.h
===
--- include/hbthread.h  (revision 12490)
+++ include/hbthread.h  (working copy)
@@ -62,7 +62,8 @@
   defined( HB_OS_DOS )
 #  define HB_TASK_THREAD
 #elif defined( HB_OS_LINUX ) || defined( HB_OS_DARWIN ) || \
-  defined( HB_OS_SUNOS ) || define

Re: [Harbour] if you have some time to kill....

2009-09-14 Thread Viktor Szakáts

Hi,

Just great!

I'll upload it.

Brgds,
Viktor

On 2009.09.14., at 22:42, Tamas TEVESZ wrote:



hi,

i had, this was fun.

it's barely over the "it just compiles" stage, there are a whole loads
of problems with terminal, possibly network, and whatnot.

anyway, if someone wants to chew this, it's a start. the downloadable
haiku r1alpha1 iso contains everything one needs to get started ;)

2009.09.14 20:54:52 Haiku 1 BePC
Harbour 2.0.0beta3 (Rev. 12490) GNU C 2.95 (32-bit) x86
THREADS: 0
N_LOOPS: 100
[ T000: empty loop overhead ]...0.89

[ T001: x := L_C ]..0.00
[ T002: x := L_N ]..0.00
[ T003: x := L_D ]..0.00
[ T004: x := S_C ]..0.00
[ T005: x := S_N ]..0.00
[ T006: x := S_D ]..0.00
[ T007: x := M->M_C ]...0.00
[ T008: x := M->M_N ]...0.00
[ T009: x := M->M_D ]...0.00
[ T010: x := M->P_C ]...0.00
[ T011: x := M->P_N ]...0.00
[ T012: x := M->P_D ]...0.00
[ T013: x := F_C ]..4.17
[ T014: x := F_N ]..0.10
[ T015: x := F_D ]..0.00
[ T016: x := o:Args ]...0.13
[ T017: x := o[2] ].0.00
[ T018: round( i / 1000, 2 ) ]..0.31
[ T019: str( i / 1000 ) ]...4.34
[ T020: val( s ) ]..0.21
[ T021: val( a [ i % 16 + 1 ] ) ]...0.90
[ T022: dtos( d - i % 1 ) ].1.88
[ T023: eval( { || i % 16 } ) ].2.01
[ T024: eval( bc := { || i % 16 } ) ]...0.00
[ T025: eval( { |x| x % 16 }, i ) ].0.97
[ T026: eval( bc := { |x| x % 16 }, i ) ]...0.00
[ T027: eval( { |x| f1( x ) }, i ) ]1.25
[ T028: eval( bc := { |x| f1( x ) }, i ) ]..0.20
[ T029: eval( bc := &("{ |x| f1( x ) }"), i ) ].0.33
[ T030: x := &( "f1(" + str(i) + ")" ) ]...22.08
[ T031: bc := &( "{|x|f1(x)}" ), eval( bc, i ) ]...25.36
[ T032: x := valtype( x ) +  valtype( i ) ].1.93
[ T033: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..5.00
[ T034: x := a[ i % 16 + 1 ] == s ].0.17
[ T035: x := a[ i % 16 + 1 ] = s ]..0.24
[ T036: x := a[ i % 16 + 1 ] >= s ].0.25
[ T037: x := a[ i % 16 + 1 ] <= s ].0.48
[ T038: x := a[ i % 16 + 1 ] < s ]..0.23
[ T039: x := a[ i % 16 + 1 ] > s ]..0.22
[ T040: ascan( a, i % 16 ) ]0.08
[ T041: ascan( a, { |x| x == i % 16 } ) ]...7.77
[ T042: iif( i%1000==0, a:={}, ) , aadd(a,{i,1,.T.,s,s2,a2 ]3.73
[ T043: x := a ]0.00
[ T044: x := {} ]...0.45
[ T045: f0() ]..0.00
[ T046: f1( i ) ]...0.00
[ T047: f2( c[1...8] ) ]0.00
[ T048: f2( c[1...4] ) ]0.00
[ T049: f2( @c[1...4] ) ]...0.00
[ T050: f2( @c[1...4] ), c2 := c ]..0.00
[ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]0.38
[ T052: f2( a ) ]...0.00
[ T053: x := f4() ].2.80
[ T054: x := f5() ].1.35
[ T055: x := space(16) ]0.99
[ T056: f_prv( c ) ]1.32

[ total application time: ]...134.25
[ total real time: ]..139.30

--  
[-]


mkdir / 
nonexistent___

Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


___
Harbour mailing list
Harbour@harbour-pro

[Harbour] SF.net SVN: harbour-project:[12491] trunk/harbour

2009-09-14 Thread vszakats
Revision: 12491
  
http://harbour-project.svn.sourceforge.net/harbour-project/?rev=12491&view=rev
Author:   vszakats
Date: 2009-09-14 22:06:18 + (Mon, 14 Sep 2009)

Log Message:
---
2009-09-15 00:02 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
  * include/hbthread.h
  * include/hbdefs.h
  * include/hbsetup.h
  * include/hbinit.h
  * source/common/hbprintf.c
  * source/rtl/hbsocket.c
  + config/haiku
  + config/haiku/libs.mk
  + config/haiku/gcc.mk
  + config/haiku/global.mk
  * config/global.mk
  * config/detect.mk
+ Applied patch adding Haiku OS port to Harbour.
  By Tamas Tevesz.

  * INSTALL
+ Added haiku to supported OS list (in 'experimental' status)

Modified Paths:
--
trunk/harbour/ChangeLog
trunk/harbour/INSTALL
trunk/harbour/config/detect.mk
trunk/harbour/config/global.mk
trunk/harbour/include/hbdefs.h
trunk/harbour/include/hbinit.h
trunk/harbour/include/hbsetup.h
trunk/harbour/include/hbthread.h
trunk/harbour/source/common/hbprintf.c
trunk/harbour/source/rtl/hbsocket.c

Added Paths:
---
trunk/harbour/config/haiku/
trunk/harbour/config/haiku/gcc.mk
trunk/harbour/config/haiku/global.mk
trunk/harbour/config/haiku/libs.mk


This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] if you have some time to kill....

2009-09-14 Thread Viktor Szakáts

Hi,

What do you think to rename HAIKU to BEOS inside Harbour?

It'd certainly sound more familiar for ppl, but I wonder
if it would be accurate.

[ f.e. OSTYPE returns 'beos' in Haiku, uname -m returns 'BePC'. ]

BTW, not wanting to give any ideas ;) but we're still missing
two important ports of Harbour: IBM AIX and OpenVMS :)

Brgds,
Viktor

On 2009.09.14., at 22:42, Tamas TEVESZ wrote:



hi,

i had, this was fun.

it's barely over the "it just compiles" stage, there are a whole loads
of problems with terminal, possibly network, and whatnot.

anyway, if someone wants to chew this, it's a start. the downloadable
haiku r1alpha1 iso contains everything one needs to get started ;)

2009.09.14 20:54:52 Haiku 1 BePC
Harbour 2.0.0beta3 (Rev. 12490) GNU C 2.95 (32-bit) x86
THREADS: 0
N_LOOPS: 100
[ T000: empty loop overhead ]...0.89

[ T001: x := L_C ]..0.00
[ T002: x := L_N ]..0.00
[ T003: x := L_D ]..0.00
[ T004: x := S_C ]..0.00
[ T005: x := S_N ]..0.00
[ T006: x := S_D ]..0.00
[ T007: x := M->M_C ]...0.00
[ T008: x := M->M_N ]...0.00
[ T009: x := M->M_D ]...0.00
[ T010: x := M->P_C ]...0.00
[ T011: x := M->P_N ]...0.00
[ T012: x := M->P_D ]...0.00
[ T013: x := F_C ]..4.17
[ T014: x := F_N ]..0.10
[ T015: x := F_D ]..0.00
[ T016: x := o:Args ]...0.13
[ T017: x := o[2] ].0.00
[ T018: round( i / 1000, 2 ) ]..0.31
[ T019: str( i / 1000 ) ]...4.34
[ T020: val( s ) ]..0.21
[ T021: val( a [ i % 16 + 1 ] ) ]...0.90
[ T022: dtos( d - i % 1 ) ].1.88
[ T023: eval( { || i % 16 } ) ].2.01
[ T024: eval( bc := { || i % 16 } ) ]...0.00
[ T025: eval( { |x| x % 16 }, i ) ].0.97
[ T026: eval( bc := { |x| x % 16 }, i ) ]...0.00
[ T027: eval( { |x| f1( x ) }, i ) ]1.25
[ T028: eval( bc := { |x| f1( x ) }, i ) ]..0.20
[ T029: eval( bc := &("{ |x| f1( x ) }"), i ) ].0.33
[ T030: x := &( "f1(" + str(i) + ")" ) ]...22.08
[ T031: bc := &( "{|x|f1(x)}" ), eval( bc, i ) ]...25.36
[ T032: x := valtype( x ) +  valtype( i ) ].1.93
[ T033: x := strzero( i % 100, 2 ) $ a[ i % 16 + 1 ] ]..5.00
[ T034: x := a[ i % 16 + 1 ] == s ].0.17
[ T035: x := a[ i % 16 + 1 ] = s ]..0.24
[ T036: x := a[ i % 16 + 1 ] >= s ].0.25
[ T037: x := a[ i % 16 + 1 ] <= s ].0.48
[ T038: x := a[ i % 16 + 1 ] < s ]..0.23
[ T039: x := a[ i % 16 + 1 ] > s ]..0.22
[ T040: ascan( a, i % 16 ) ]0.08
[ T041: ascan( a, { |x| x == i % 16 } ) ]...7.77
[ T042: iif( i%1000==0, a:={}, ) , aadd(a,{i,1,.T.,s,s2,a2 ]3.73
[ T043: x := a ]0.00
[ T044: x := {} ]...0.45
[ T045: f0() ]..0.00
[ T046: f1( i ) ]...0.00
[ T047: f2( c[1...8] ) ]0.00
[ T048: f2( c[1...4] ) ]0.00
[ T049: f2( @c[1...4] ) ]...0.00
[ T050: f2( @c[1...4] ), c2 := c ]..0.00
[ T051: f3( a, a2, s, i, s2, bc, i, n, x ) ]0.38
[ T052: f2( a ) ]...0.00
[ T053: x := f4() ].2.80
[ T054: x := f5() ].1.35
[ T055: x := space(16) ]0.99
[ T056: f_prv( c ) ]1.32

[ total application time: ]...134.25
[ total real time: ]..

Re: [Harbour] if you have some time to kill....

2009-09-14 Thread Tamas TEVESZ
On Tue, 15 Sep 2009, Viktor Szakáts wrote:

hi,

 > What do you think to rename HAIKU to BEOS inside Harbour?

as you see fit.

 > It'd certainly sound more familiar for ppl, but I wonder
 > if it would be accurate.

i absolutely have no idea. six hours ago i didn't even really know 
haiku exists (sure, i read about it every now and then, but that was 
just about it...)

 > BTW, not wanting to give any ideas ;) but we're still missing
 > two important ports of Harbour: IBM AIX and OpenVMS :)

i am ready to loan you, for an extended period of time, an ibm 
intellistation 9114/275 (it's about a 1ghz power4 with about a gig of 
ram, sadly no disk but i borrow one) and an almost fully equipped 
vaxstation vlc 4000 :))

and you are forgetting sco (yes, they are still used all over). but i 
am not :)

aix (damned be thy name) shouldn't be a problem. vms... good luck? :) 
(but i have good connections to very knowledgeable vms people :)


-- 
[-]

mkdir /nonexistent
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] NETIO - Real Web IP - Application Behavior

2009-09-14 Thread Pritpal Bedi

Hi


elart wrote:
> 
> I have a similar issue on Linux and Przemek tell me to link at compile 
> time the -gtwin lib.
> 

What part GT has to play with NetIO ?

BTW on LAN and on 127.0.0.1 I am getting the correct results.

Regards
Pritpal Bedi

-- 
View this message in context: 
http://www.nabble.com/NETIO---Real-Web-IP---Application-Behavior-tp25440212p25445752.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] NETIO - Real Web IP - Application Behavior

2009-09-14 Thread elart

On 09/15/2009 02:06 AM, Pritpal Bedi wrote:


Hi


elart wrote:


I have a similar issue on Linux and Przemek tell me to link at compile
time the -gtwin lib.



What part GT has to play with NetIO ?

BTW on LAN and on 127.0.0.1 I am getting the correct results.

Regards
Pritpal Bedi



*
Howto compile the harbour/contrib/hbnetio/test/netiotst
**

# cd $HOME/src/harbour/contrib/hbnetio/tests

Just add the directory where hbwin is installed (/tmp/hbwin in my Linux 
box) to you PATH, i.e.:


# export PATH=/tmp/hbwin/bin:$PATH

to your *nix PATH and then:

# hbwmk -static -n -w -es2 -mt -gtwin netiotst

To check the file generated

# file netiotst.exe
netiotst.exe: PE32 executable for MS Windows (GUI) Intel 80386 32-bit

To run the test...

wine ./netiotst.exe


---

Below some sent to me by Przemek

Best regards

Marco





Przemek note...

NETIO server application has to be linked with MT HVM version.
Please use -mt hbwmk switch to compile server.

> > give me the wine app started window with the message it cannot start
> > server...
> > Can you test my app in your enviroment...
> > in attach the hb_testio.tar.gz
It works if you compile netioserver.prg with -mt switch.
I tested Windows and Linux binaries.
BTW for normal usage I suggest to always use native binaries.
If you want to run server on Linux machine then create native
Linux netio server binaries. And of course native client binaries.
Of course you can connect to the one server from different stations
working with WIN, DOS, OS2 or different *nixes.

And remove from netioserver.prg this code:

   if empty( cServer )
  cServer := '127.0.0.1'
   endif

it reduces connections to 127.0.0.1 only so such server cannot be accessed
remotely. Use empty value or 0.0.0.0 if you want to give access from
different interfaces without any limitation.

best regards,
Przemek
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] NETIO - Real Web IP - Application Behavior

2009-09-14 Thread Pritpal Bedi

Hi

BUT did you read my message carefully ?

Regards
Pritpal Bedi
-- 
View this message in context: 
http://www.nabble.com/NETIO---Real-Web-IP---Application-Behavior-tp25440212p25446023.html
Sent from the Harbour - Dev mailing list archive at Nabble.com.

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] about NETIO

2009-09-14 Thread WenSheng

Thank You!

Yes, I had change prg code to view change of memory and it's up/down,

I have another question.
How can I stop server listen ?
like code:
//-
   do while .t.
  pConnectionSocket := NETIO_ACCEPT( pListenSocket )
  ? 'Have one connect...', pConnectionSocket, memory(0)
  NETIO_SERVER( pConnectionSocket )
   enddo
//-
The code is loop to accept client connect,
I don't know how to STOP SERVER on server side.



___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] sample of my hbdoc2 results

2009-09-14 Thread April White

Viktor Szakáts wrote:

Great job April. Feel free to upload it in place of old hbdoc.
I want to upload this as soon as possible but I also want to keep the 
existing hbdoc for reference


I'm going to:
- backup my local repository,
- do a checkout
- do an update of the hbdoc folder to restore the current version
   - is this the correct operation?  I originally did some changed to 
hbdoc before I started hbdoc2
- add my 'hbdoc2' folder; in the future I/we can remove hbdoc and rename 
hbdoc2



BTW, for quality .pdf output you can try hbhpdf lib, I have very
good experiences with it.
Thank you Viktor.  I'll do some simple work with this soon; I need to 
fully implement 'seealso' and other links within HTML files before I can 
tackle RTF and PDF.


April

--
A male gynecologist is like an auto mechanic who never owned a car.
- Carrie Snow

___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


[Harbour] SF.net SVN: harbour-project:[12492] trunk/harbour

2009-09-14 Thread vszakats
Revision: 12492
  
http://harbour-project.svn.sourceforge.net/harbour-project/?rev=12492&view=rev
Author:   vszakats
Date: 2009-09-15 01:57:20 + (Tue, 15 Sep 2009)

Log Message:
---
2009-09-15 03:56 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
  * utils/hbmk2/hbmk2.prg
+ Extended autodetection of mingw cross-compiler on *nix system.
* Disabled native compiler tool autodetection for non-*nix targets
  on *nix hosts. This will need further refinement.

  * config/haiku/libs.mk
- Deleted commented lines.

  * config/global.mk
+ Some more Haiku/BeOS autodetection.

Modified Paths:
--
trunk/harbour/ChangeLog
trunk/harbour/config/global.mk
trunk/harbour/config/haiku/libs.mk
trunk/harbour/utils/hbmk2/hbmk2.prg


This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour


Re: [Harbour] if you have some time to kill....

2009-09-14 Thread Tamas TEVESZ

the following (and attached, too) makes it possible to just "make", 
and get most of the stuff (compiled, at least). after this, my regular 
build tests still build.

i also need some help. it seems that there's only a static library for 
ncurses, and no matter how i bend things, it just won't get linked 
into gtcrs (libncurses.a is ~400k, libgtcrs.a stays at ~65k, and 
curses doesn't seem to work). any idea how to twist it so that it gets 
linked in?

viktor, could you please, when you find some time, whip up some 
support for this combination in hbmk2?

also a second look at the changes in contrib/hbtpathy/tpunix.c would 
be great.

thanks,

Index: external/libpng/Makefile
===
--- external/libpng/Makefile(revision 12491)
+++ external/libpng/Makefile(working copy)
@@ -42,7 +42,7 @@
_DET_VAR_HAS_ := HB_HAS_PNG
_DET_FLT_PLAT :=
_DET_FLT_COMP :=
-   _DET_INC_DEFP := /usr/include
+   _DET_INC_DEFP := /usr/include /boot/develop/headers/3rdparty
_DET_INC_LOCL := $(TOP)$(ROOT)external/libpng
_DET_INC_HEAD := /png.h
include $(TOP)$(ROOT)config/detfun.mk
Index: contrib/xhb/hbserv.c
===
--- contrib/xhb/hbserv.c(revision 12491)
+++ contrib/xhb/hbserv.c(working copy)
@@ -68,7 +68,9 @@
 !defined( HB_OS_DARWIN_5 ) && \
 ! ( defined( HB_OS_WIN_CE ) && defined( __POCC__ ) ) && \
 !defined( HB_OS_WIN_64 ) && \
-( !defined( HB_OS_OS2 ) || defined( HB_OS_OS2_GCC ) )
+( !defined( HB_OS_OS2 ) || defined( HB_OS_OS2_GCC ) ) && \
+!defined( HB_OS_HAIKU )
+/* TODO: Haiku will supposedly do this later on, read 
/boot/develop/headers/posix/signal.h */
 
 #if defined( HB_OS_UNIX ) || defined( HB_OS_OS2_GCC )
 #include 
Index: contrib/hbtpathy/tpunix.c
===
--- contrib/hbtpathy/tpunix.c   (revision 12491)
+++ contrib/hbtpathy/tpunix.c   (working copy)
@@ -125,8 +125,10 @@
/* Enable the receiver and set local mode... */
options.c_cflag |= ( CLOCAL | CREAD );
 
+#if defined( cfmakeraw )
/* Raw input from device */
cfmakeraw( &options );
+#endif
 
/* Reset data bits ( cfmakeraw() puts it to CS8 ) */
options.c_cflag &= ~CSIZE;
@@ -219,41 +221,49 @@
 
 HB_FUNC( __TP_ISDCD )
 {
+#if defined( TIOCMGET )
int status;
 
if ( ioctl( hb_parnl( 1 ), TIOCMGET, &status ) == 0 )
   hb_retl( ( status & TIOCM_CD ) == TIOCM_CD );
else
+#endif
   hb_retl( FALSE );
 }
 
 HB_FUNC( __TP_ISRI )
 {
+#if defined( TIOCMGET )
int status;
 
if ( ioctl( hb_parnl( 1 ), TIOCMGET, &status ) == 0 )
   hb_retl( ( status & TIOCM_RI ) == TIOCM_RI );
else
+#endif
   hb_retl( FALSE );
 }
 
 HB_FUNC( __TP_ISDSR )
 {
+#if defined( TIOCMGET )
int status;
 
if ( ioctl( hb_parnl( 1 ), TIOCMGET, &status ) == 0 )
   hb_retl( ( status & TIOCM_DSR ) == TIOCM_DSR );
else
+#endif
   hb_retl( FALSE );
 }
 
 HB_FUNC( __TP_ISCTS )
 {
+#if defined( TIOCMGET )
int status;
 
if ( ioctl( hb_parnl( 1 ), TIOCMGET, &status ) == 0 )
   hb_retl( ( status & TIOCM_CTS ) == TIOCM_CTS );
else
+#endif
   hb_retl( FALSE );
 }
 
Index: contrib/hbsqlit3/Makefile
===
--- contrib/hbsqlit3/Makefile   (revision 12491)
+++ contrib/hbsqlit3/Makefile   (working copy)
@@ -19,7 +19,7 @@
 _DET_VAR_HAS_ := HB_HAS_SQLITE3
 _DET_FLT_PLAT :=
 _DET_FLT_COMP :=
-_DET_INC_DEFP := /usr/include
+_DET_INC_DEFP := /usr/include /boot/common/include
 _DET_INC_LOCL := $(TOP)$(ROOT)external/sqlite3
 _DET_INC_HEAD := /sqlite3.h
 include $(TOP)$(ROOT)config/detfun.mk
Index: config/detect.mk
===
--- config/detect.mk(revision 12491)
+++ config/detect.mk(working copy)
@@ -73,7 +73,7 @@
 _DET_VAR_HAS_ := HB_HAS_OPENSSL
 _DET_FLT_PLAT :=
 _DET_FLT_COMP := !watcom
-_DET_INC_DEFP := /usr/include /usr/local/ssl/include
+_DET_INC_DEFP := /usr/include /usr/local/ssl/include /boot/common/include
 _DET_INC_HEAD := /openssl/ssl.h
 
 include $(TOP)$(ROOT)config/detfun.mk

-- 
[-]

mkdir /nonexistentIndex: external/libpng/Makefile
===
--- external/libpng/Makefile(revision 12491)
+++ external/libpng/Makefile(working copy)
@@ -42,7 +42,7 @@
_DET_VAR_HAS_ := HB_HAS_PNG
_DET_FLT_PLAT :=
_DET_FLT_COMP :=
-   _DET_INC_DEFP := /usr/include
+   _DET_INC_DEFP := /usr/include /boot/develop/headers/3rdparty
_DET_INC_LOCL := $(TOP)$(ROOT)external/libpng
_DET_INC_HEAD := /png.h
include $(TOP)$(ROOT)config/detfun.mk
Index: contrib/xhb/hbserv.c
===
--- contrib/xhb/hbserv.c(revision 12491)
+++ contrib/xhb/hbserv.c(working copy)
@@ -68,7 +68,9 @@
 !defined( HB_OS_DARWIN_5 ) && \
 ! ( d

[Harbour] SF.net SVN: harbour-project:[12493] trunk/harbour

2009-09-14 Thread vszakats
Revision: 12493
  
http://harbour-project.svn.sourceforge.net/harbour-project/?rev=12493&view=rev
Author:   vszakats
Date: 2009-09-15 02:21:41 + (Tue, 15 Sep 2009)

Log Message:
---
2009-09-15 04:07 UTC+0200 Viktor Szakats (harbour.01 syenar.hu)
  * INSTALL
  * include/hbthread.h
  * include/hbdefs.h
  * include/hbsetup.h
  - config/haiku
  + config/beos
  * config/global.mk
* Changed Haiku's internal name in Harbour to BeOS.
  HB_OS_HAIKU -> HB_OS_BEOS
  'haiku' -> 'beos'
* Changed __HAIKU__ guards to HB_OS_BEOS (two occurrences).
  Hope this is right.

  * external/libpng/Makefile
  * contrib/xhb/hbserv.c
  * contrib/hbtpathy/tpunix.c
  * contrib/hbsqlit3/Makefile
  * config/detect.mk
+ Applied 2nd Haiku patch by Tamas Tevesz.
; Please review hbtpathy patch.
; I've changed one HB_OS_HAIKU reference to __HAIKU__ since
  it looks to be a Haiku specific thing (thus HB_OS_BEOS doesn't
  seem appropriate).

Modified Paths:
--
trunk/harbour/ChangeLog
trunk/harbour/INSTALL
trunk/harbour/config/detect.mk
trunk/harbour/config/global.mk
trunk/harbour/contrib/hbsqlit3/Makefile
trunk/harbour/contrib/hbtpathy/tpunix.c
trunk/harbour/contrib/xhb/hbserv.c
trunk/harbour/external/libpng/Makefile
trunk/harbour/include/hbdefs.h
trunk/harbour/include/hbsetup.h
trunk/harbour/include/hbthread.h
trunk/harbour/source/common/hbprintf.c
trunk/harbour/source/rtl/hbsocket.c

Added Paths:
---
trunk/harbour/config/beos/

Removed Paths:
-
trunk/harbour/config/haiku/


This was sent by the SourceForge.net collaborative development platform, the 
world's largest Open Source development site.
___
Harbour mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour