[Harbour] what happened to the mailing list?
Hi all, as subject says, what happened? I did not receive messages from december the 20th to january the 5th. I've seen this morning a warning from the mailing list of excessive bouncings of my address, which is just impossible since I'm subscribed to several mailing list which kept delivering messages to my address during the whole 'black out' period. Best regards. Maurilio. -- __ | | | |__| Maurilio Longo |_|_|_|| farmaconsult s.r.l. ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] what happened to the mailing list?
Hello all - glad it's working again. I generally read the mail in the Nabble forum as it is easier to follow threads. The site says:- This forum is an archive for the mailing list: harbour@harbour-project.org however there is still a gap in the messages between Dec 27 and Jan 5th. Also, can someone explain whether in reality there is any difference between posting to the forum or to the list? I have assumed that mail sent to either should automatically arrive in the other, but with these mail problems it's been hard to tell if this is really happening. I posted a message (to the list) asking for help using hbtpathy on Jan 5th but I don't see it anywhere. Regards, Barry Francesco Saverio Giudice wrote: Hi Maurilio, there was a problem on Harbour mailing list that Phil (thanks again) has solved from 5th of january. You can find lost messages on harbour mailing list archive. Best Regards Francesco Il 07/01/2009 9.34, Maurilio Longo ha scritto: Hi all, as subject says, what happened? I did not receive messages from december the 20th to january the 5th. I've seen this morning a warning from the mailing list of excessive bouncings of my address, which is just impossible since I'm subscribed to several mailing list which kept delivering messages to my address during the whole 'black out' period. Best regards. Maurilio. ___ 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
[Harbour] How to generate ERROR.LOG file with details of the failure of run-time errors?
In xHarbour ever happens a runtime error, it generates a file named Error.log contains: *** Error log file Date : 14/04/2008 Time : 11:44:38 Available Memory : 626036 Multi Threading : No VM Optimization : 0 Application : Z:\CU\XSYSCU.EXE Operating System : Windows XP Professional 5.01.2600 Service Pack 2 Compiler : Borland C++ 5.5.1 xHarbour Version : xHarbour build 0.99.51 Intl. (SimpLex) Build Date : Nov 11 2005 19:09:49 -- Environmental Information -- Exact is : Off Fixed is : Off Decimals is at ..: 2 Date Format is ..: DD/MM/ Epoch is : 1900 Path is .: Default is ..: Exclusive is : Off SoftSeek is .: Off Unique is ...: Off Deleted is ..: On Cancel is ...: On Debug is : False Color is : N+/W,B+/BG,N/N,N/N,N+/W,R+/N,R/G,W+/B Cursor is ...: 1 Console is ..: On Alternate is : Off AltFile is ..: Device is ...: SCREEN Printer is ..: False PrintFile is : PRN Margin is ...: 0 Bell is .: Off Confirm is ..: Off Escape is ...: On Insert is ...: Off Intensity is : On Scoreboard is ...: Off Delimeters is ...: Off Delimchars is ...: :: Wrap is .: On Message is ..: 23 MCenter is ..: On ===Detailed Work Area Items Internal Error Handling Information + Subsystem Call ..: BASE System Code .: 1002 Default Status ..: False Description .: Alias does not exist Operation ...: FUENTE Arguments ...: Involved File ...: Dos Error Code ..: 0 Trace Through: RESTOBRA : 996 in Module: Util.prg (b)CREA_MENU : 82 in Module: EXECUTE : 432 in Module: MENUMODAL : 208 in Module: Mm.prg MAIN : 256 in Module: Menu.prg ## Video Screen Dump ## ++ |ÀÄÄÙ| |SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO RE| |ESyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO R| |RESyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO | | RESyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO| |O RESyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERN| |NO RESyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIER| |RNO RESyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIE| |ERNO RESyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBI| |IERNO RESyS-CU GOBIEÉ»L PIURA SyS-CU GOB| |BIERNO RESyS-CU GOBIº SISTEMA DE COSTOS UNITARIOS - SyS-CUýºAL PIURA SyS-CU GO| |ÚÄ´ Restore de Obras (Recupera de Respaldos) ÃÄ¿| |³ ³| |ÃÄÄ´| |³ Indique Unidad/Ruta/NomArch U:\Ruta1\Ruta2\...\RutaN\NomArch: ³| |³ E:470 ³| |ÀÄÄÙ| |S-CU GOBIERNO RESyS-CU GOBIERNO REGIONAL PIURA SyS-CU GOBIERNO REGIONAL PIURA Sy| |Error BASE/1002 Alias does not exist: FUENTE | | | |Error at ...: RESTOBRA(996) in Module: Util.prg | |Called from : (b)CREA_MENU(82) in Module: | |Called from : EXECUTE(432) in Module: | |Called from : MENUMODAL(208) in Module: Mm.prg | |Called from : MAIN(256) in Module: Menu.prg | ++ ** Can I do this in Harbor? TIA Best Regards GVS *** Error log file Date : 14/04/2008 Time : 11:44:38 Available Memory : 626036 Multi Threading : No VM Optimization : 0 Application : Z:\CU\XSYSCU.EXE Operating System : Windows XP Professional 5.01.2600 Service Pack 2 Compiler : Borland C++ 5.5.1 xHarbour Version : xHarbour build 0.99.51 Intl. (SimpLex) Build Date : Nov 11 2005 19:09:49 -- Environmental Information -- Exact is : Off Fixed is : Off Decimals is at ..: 2 Date Format is ..: DD/MM/ Epoch is : 1900 Path is .: Default is ..: Exclusive is : Off SoftSeek is .: Off Unique is ...: Off Deleted is ..: On
[Harbour] Difference harbour/xharbour about free VIRTUAL MEMORY
Can somebody confirm? From: Andi Jahja xharb...@... Subject: Re: Current CVS stable? Newsgroups: gmane.comp.lang.xharbour.devel Date: 2009-01-07 10:46:45 GMT (2 hours and 17 minutes ago) Very stable! :-) One important status now compared to Harbour :-): xHarbour gently free VIRTUAL MEMORY upon application exit while Harbour, at the present moment, does not. (As usual, I use MEMPROOF with BCC build to make a test.) Congrats for the xHarbour crews! -- Andi -- Massimo Belgrano ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] ourxdbu free for all
uploaded new version of ourxdbu * Version 1.5.2 + Added multilanguage support (spanish, french, polish, russian, portuguesse, and others ) + Added vista skin + Added dbfnsx driver download it from: http://www.xharbour.com/xhc/index.asp?page=xhc_download_detail.asptype=dlid=78show_i=7show_sub=1 or from http://sourceforge.net/projects/ourxdbu/ I DENY THE USE OF THIS APPLICATION TO THE CITIZENS TO ISRAEL TO STOP KILLING PEOPLE. Best regards, Miguel Angel Marchuet ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] what can I use for these missing xharbour functions?
Hi, I'm trying to build a program of mine I've developed under xharbour on harbour and I've found a couple of missing functions: ..\lib/hbcurl.a(teasy.o): Undefined symbol _HB_FUN___CLSMSGASSIGNED referenced from data segment ..\lib/hbcurl.a(hbcurl.o): Undefined symbol _hb_itemPutCLStatic referenced from text segment make: *** [ims] Error 1 Is there something I can use instead of them? In particular ClsMsgAssigned() which is used to see if a subclass defines a message and, if this is the case, call the message. Best regards. Maurilio. PS. Note that hbcurl is not contrib\hbcurl available inside harbour svn. -- __ | | | |__| Maurilio Longo |_|_|_|| farmaconsult s.r.l. ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] -w3 optimizazion issue
function main local nVar := 0 nVar++ return nil In the code above harbour returns: testopt.prg:2:MAIN warning: W0032 Variable 'NVAR' is assigned but not used in function '2:MAIN' if I fix the warning removing := 0 with: function main local nVar nVar++ return nil I get no more messages but I the code stops with a RT error at line 3. Is there any way to detect such situation? best regards, Lorenzo ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
RE: [Harbour] -w3 optimizazion issue
Hi Lorenzo, I think that in this example the warning is ok. You never used this variable. As I can understand a variable is used only if it's a right opponent of an expression or a function parameter (at least on first level optimization). Brgds Mike Evans -Original Message- From: harbour-boun...@harbour-project.org [mailto:harbour-boun...@harbour-project.org] On Behalf Of Lorenzo Fiorini Sent: Wednesday, January 07, 2009 7:05 PM To: Harbour Project Main Developer List. Subject: [Harbour] -w3 optimizazion issue function main local nVar := 0 nVar++ return nil In the code above harbour returns: testopt.prg:2:MAIN warning: W0032 Variable 'NVAR' is assigned but not used in function '2:MAIN' if I fix the warning removing := 0 with: function main local nVar nVar++ return nil I get no more messages but I the code stops with a RT error at line 3. Is there any way to detect such situation? best regards, Lorenzo ___ 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] -w3 optimizazion issue
On Wed, Jan 7, 2009 at 6:05 PM, Mike Evans (Gmail) makis1...@gmail.com wrote: I think that in this example the warning is ok. You never used this variable. As I can understand a variable is used only if it's a right opponent of an expression or a function parameter (at least on first level optimization). Yes, the warning is right but it drives to the wrong fix. It's nVar++ the more useless code or at least both are useless. What I mean is that with the local nVar := 0 it gives the warning but it works while without it it says nothing but it doesn't work. best regards, Lorenzo ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] #unSomething
Hi, I'm using these two commands inside a .ch file on xharbour, harbour gives an error when it encounters them #xuntranslate CINIT #uncommand __DEFINE__ telling me that #xuntranslate and xuncommand miss a = in their definition. Are they not supported on harbour or am I missing something? Thanks a lot. Maurilio. -- __ | | | |__| Maurilio Longo |_|_|_|| farmaconsult s.r.l. ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] what can I use for these missing xharbour functions?
On Wednesday 07 January 2009 11:03:53 Maurilio Longo wrote: Hi, I'm trying to build a program of mine I've developed under xharbour on harbour and I've found a couple of missing functions: ..\lib/hbcurl.a(teasy.o): Undefined symbol _HB_FUN___CLSMSGASSIGNED referenced from data segment ..\lib/hbcurl.a(hbcurl.o): Undefined symbol _hb_itemPutCLStatic referenced from text segment make: *** [ims] Error 1 Is there something I can use instead of them? In particular ClsMsgAssigned() which is used to see if a subclass defines a message and, if this is the case, call the message. Hello Maurilio, Try to use __objHasMsg() to substitute __clsMsgAssigned(). For hb_itemPutCLStatic() try to use hb_itemPutCL(). best regards, Teo ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] How to generate ERROR.LOG file with details of the failure of run-time errors?
On Wednesday 07 January 2009 07:07:49 Guillermo Varona Silupú wrote: In xHarbour ever happens a runtime error, it generates a file named Error.log contains: *** Error log file [snip] +-- --+ ** Can I do this in Harbor? Hello Guillermo, To get that long-long error log in Harbour you need to implement it on the harbour's errorsys.prg. Check how xHarbour does it in their errorsys.prg Maybe you just need to substitute the harbour's errorsys.prg file with the xHarbour one. best regards, Teo ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] what can I use for these missing xharbour functions?
Teo Fonrouge wrote: Try to use __objHasMsg() to substitute __clsMsgAssigned(). Teo, thanks, but I need to know if a subclass implements a message which is virtual in the parent class. I think that __objHasMessage() returns true even if the subclass does not implement it. For hb_itemPutCLStatic() try to use hb_itemPutCL(). best regards, Ok, thanks a lot. Maurilio. -- __ | | | |__| Maurilio Longo |_|_|_|| farmaconsult s.r.l. ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
RE: [Harbour] -w3 optimizazion issue
The right fix is to delete every nvar in your function (as far as I can understand), but in general if you remove the assignment it will be nice if the compiler return an error that you are making a concatenation - calculation on a non initialized variable. I think that something like that it will be nice as we will have a lot less runtime errors due to bad coding. Brgds Mike Evans -Original Message- From: harbour-boun...@harbour-project.org [mailto:harbour-boun...@harbour-project.org] On Behalf Of Lorenzo Fiorini Sent: Wednesday, January 07, 2009 7:28 PM To: Harbour Project Main Developer List. Subject: Re: [Harbour] -w3 optimizazion issue On Wed, Jan 7, 2009 at 6:05 PM, Mike Evans (Gmail) makis1...@gmail.com wrote: I think that in this example the warning is ok. You never used this variable. As I can understand a variable is used only if it's a right opponent of an expression or a function parameter (at least on first level optimization). Yes, the warning is right but it drives to the wrong fix. It's nVar++ the more useless code or at least both are useless. What I mean is that with the local nVar := 0 it gives the warning but it works while without it it says nothing but it doesn't work. best regards, Lorenzo ___ 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] what can I use for these missing xharbour functions?
On Wednesday 07 January 2009 12:26:25 Maurilio Longo wrote: Teo Fonrouge wrote: Try to use __objHasMsg() to substitute __clsMsgAssigned(). Teo, thanks, but I need to know if a subclass implements a message which is virtual in the parent class. I think that __objHasMessage() returns true even if the subclass does not implement it. Maurilio, Please check with last SVN the __objHasMsgAssigned() function, it is supposed to be similar to xHarbour's __clsMsgAssigned(). [snip] best regards, Teo ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] 2009-01-07 13:52 UTC-0600 Teo Fonrouge (teo/at/windtelsoft/dot/com)
* source/vm/classes.c + addded __objHasMsgAssigned( object, msgName ) ; this is similar to xHarbour __clsMsgAssigned() and checks ; if a VIRTUAL message has been overrided in a sub-class. ; TODO: Please check this implementation, I'm sure it can be optimized. best regards, Teo ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] -w3 optimizazion issue
On Wed, Jan 7, 2009 at 7:29 PM, Mike Evans (Gmail) makis1...@gmail.com wrote: The right fix is to delete every nvar in your function (as far as I can understand), but in general if you remove the assignment it will be nice if the compiler return an error that you are making a concatenation - calculation on a non initialized variable. I think that something like that it will be nice as we will have a lot less runtime errors due to bad coding. This code is valid: function main local nVar := 0 nVar++ return nVar because nVar is used after the nVar++ so if a warning has to be issued it should point to nVar++ not local nVar := 0. Note that after deleting nVar++ local nVar := 0 become useless also. best regards, Lorenzo ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] How to generate ERROR.LOG file with details of the failure of run-time errors?
Teo Fonrouge escribió: On Wednesday 07 January 2009 07:07:49 Guillermo Varona Silupú wrote: In xHarbour ever happens a runtime error, it generates a file named Error.log contains: *** Error log file [snip] +-- --+ ** Can I do this in Harbor? Hello Guillermo, To get that long-long error log in Harbour you need to implement it on the harbour's errorsys.prg. Check how xHarbour does it in their errorsys.prg Maybe you just need to substitute the harbour's errorsys.prg file with the xHarbour one. Ok. Thanks. try to implement Best Regards GVS ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] Using /contrib/hbtpathy fuctions in Linux
Hi Barry, I can't help you with your problem but I do have two comments regarding your ThreadSleep() function: 1. I do not think that this will sleep the thread (unless Harbour does something which I doubt it does) - You need to make a call in this loop to explicitly sleep the thread. For example: DO WHILE seconds()now+secs ReleaseCPU() ENDDO 2. Your function will hang if it is called near midnight. Randy. At 03:37 PM 1/7/2009, you wrote: I am building an application to run in Mandriva Linux that needs com port functions as in Clipper tools. I have built an xhgtk GUI front end which is now working fine thanks to help here. I am now trying to use the functions in telepath.prg to provide the com functions. I have tested telepath.prg with the original testtp.prg and a loopback plug, but it fails, so to check whether it is failing on both send and receive I did the following:- I tested my com port with a loopback and a port test program built from source in Linux and it works. I have an old laptop with a terminal emulation program (mine in Clipper) that also works OK with the loopback. The port test program in Linux talks to the laptop and vice versa via a null modem cable. However my test program (below) does not send OR receive. Baud rate parity etc. OK. The only modifications I have made to hbtpathy.prg are small debug prints to screen and a delay function to replace ThreadSleep() which may be a problem. I have made a small test program to send single characters and check the receive buffer at each key press:- function main tp_open( 1,, 9600, 8, N, 1 ) do while !LASTKEY()=27 tp_send( 1, CHR(LASTKEY())) tp_delay(0.5) //uses ThreadSleep() ? tp_recv( 1 ) inkey(0) enddo tp_Close( 1 ) return nil function ThreadSleep ( millisecs ) secs = millisecs/1000 now = seconds() DO WHILE seconds()now+secs ENDDO return nil I have compiled and linked the test program as follows:- [...@jackodesktop hbr]$ hbcmp -gc -n telepath.prg Harbour 1.1.0dev (Rev. 9956) Copyright (c) 1999-2008, http://www.harbour-project.org/ Compiling 'telepath.prg'... Lines 1137, Functions/Procedures 31 Generating C source output to 'telepath.c'... Done. [...@jackodesktop hbr]$ hbcmp -gc testtp.prg Harbour 1.1.0dev (Rev. 9956) Copyright (c) 1999-2008, http://www.harbour-project.org/ Compiling 'testtp.prg'... Lines 19, Functions/Procedures 3 Generating C source output to 'testtp.c'... Done. [...@jackodesktop hbr]$ hbcc testtp.c telepath.c tpcommon.c tplinux.c [...@jackodesktop hbr]$ Then with loopback plug connected :- [...@jackodesktop hbr]$ a.out Send String = FetchChars = // from debug line added to function fetchchars Handle 3 // debug line added to function fetchchars Recv string = // first loop should fetch nothing // Hit key a Send String = a FetchChars = Handle 3 Recv string = //this should receive a I admit that I have now hit a brick wall with this. I have stepped through in debug as far as I can. Any help would be appreciated. Has anyone used telepath functions in Linux who could send me some working code to test in Mandriva? Anyone got any debugging ideas? Thanks in advance. -- View this message in context: http://www.nabble.com/Using--contrib-hbtpathy-fuctions-in-Linux-tp21339751p21339751.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 mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] Using /contrib/hbtpathy fuctions in Linux
Thanks Randy, I wondered about that but did not know of a way to implement ThreadSleep(). I have tried to use your suggestion but without documentation I can't find the lib for ReleaseCPU() :- undefined reference to `HB_FUN_RELEASECPU' Where can I find a full listing of Harbour functions etc. the site only seems to list the basics? Barry Randy Portnoff-2 wrote: I do not think that this will sleep the thread Hi Barry, I can't help you with your problem but I do have two comments regarding your ThreadSleep() function: 1. I do not think that this will sleep the thread (unless Harbour does something which I doubt it does) - You need to make a call in this loop to explicitly sleep the thread. For example: DO WHILE seconds()now+secs ReleaseCPU() ENDDO 2. Your function will hang if it is called near midnight. Randy. -- View this message in context: http://www.nabble.com/Using--contrib-hbtpathy-fuctions-in-Linux-tp21339751p21340671.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] Using /contrib/hbtpathy fuctions in Linux
Sorry, the function is called hb_ReleaseCPU() - It is defined in
IDLE.C as follows:
/* Release a CPU time slice */
HB_FUNC( HB_RELEASECPU )
{
hb_releaseCPU();
}
At 04:26 PM 1/7/2009, you wrote:
Thanks Randy,
I wondered about that but did not know of a way to implement ThreadSleep().
I have tried to use your suggestion but without documentation I can't find
the lib for
ReleaseCPU() :-
undefined reference to `HB_FUN_RELEASECPU'
Where can I find a full listing of Harbour functions etc. the site only
seems to list the basics?
Barry
Randy Portnoff-2 wrote:
I do not think that this will sleep the thread
Hi Barry,
I can't help you with your problem but I do have two comments
regarding your ThreadSleep() function:
1. I do not think that this will sleep the thread (unless Harbour
does something which I doubt it does) - You need to make a call in
this loop to explicitly sleep the thread. For example:
DO WHILE seconds()now+secs
ReleaseCPU()
ENDDO
2. Your function will hang if it is called near midnight.
Randy.
--
View this message in context:
http://www.nabble.com/Using--contrib-hbtpathy-fuctions-in-Linux-tp21339751p21340671.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 mailing list
Harbour@harbour-project.org
http://lists.harbour-project.org/mailman/listinfo/harbour
Re:[Harbour] Using /contrib/hbtpathy fuctions in Linux
Barry, I'm not sure, I don't have telepathy help at hand, but function main tp_open( 1,, 9600, 8, N, 1 ) tp_open( port, input-buffer size, output-buffer size, speed... so it lacks a comma and as such 9600 is not port speed and all the other parameters are wrong as well. But, I have to check with the help and the source which I don't have here. best regards. Maurilio. do while !LASTKEY()=27 tp_send( 1, CHR(LASTKEY())) tp_delay(0.5) //uses ThreadSleep() ? tp_recv( 1 ) inkey(0) enddo tp_Close( 1 ) return nil function ThreadSleep ( millisecs ) secs = millisecs/1000 now = seconds() DO WHILE seconds()now+secs ENDDO return nil I have compiled and linked the test program as follows:- [...@jackodesktop hbr]$ hbcmp -gc -n telepath.prg Harbour 1.1.0dev (Rev. 9956) Copyright (c) 1999-2008, http://www.harbour-project.org/ Compiling 'telepath.prg'... Lines 1137, Functions/Procedures 31 Generating C source output to 'telepath.c'... Done. [...@jackodesktop hbr]$ hbcmp -gc testtp.prg Harbour 1.1.0dev (Rev. 9956) Copyright (c) 1999-2008, http://www.harbour-project.org/ Compiling 'testtp.prg'... Lines 19, Functions/Procedures 3 Generating C source output to 'testtp.c'... Done. [...@jackodesktop hbr]$ hbcc testtp.c telepath.c tpcommon.c tplinux.c [...@jackodesktop hbr]$ Then with loopback plug connected :- [...@jackodesktop hbr]$ a.out Send String = FetchChars = // from debug line added to function fetchchars Handle 3 // debug line added to function fetchchars Recv string = // first loop should fetch nothing // Hit key a Send String = a FetchChars = Handle 3 Recv string = //this should receive a I admit that I have now hit a brick wall with this. I have stepped through in debug as far as I can. Any help would be appreciated. Has anyone used telepath functions in Linux who could send me some working code to test in Mandriva? Anyone got any debugging ideas? Thanks in advance. -- View this message in context: http://www.nabble.com/Using--contrib-hbtpathy-fuctions-in-Linux-tp21339751p21339751.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 mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
Re: [Harbour] Using /contrib/hbtpathy fuctions in Linux
Randy: That's better, it compiled and linked OK - thanks.
Still not working though.
Marilio: I just got your reply - thanks you are right I missed a ,
compared to the testtp.prg in contrib.
I have run my test with and without Randy's ReleaseCPU() in the delay loop
and still no output using the loopback. The Recv String= is outputting the
tp_recv return value just before the function returns it.
So test is now :-
function main
tp_open( 1,,,9600, 8, N, 1 )
do while !LASTKEY()=27
tp_send( 1, CHR(LASTKEY()))
tp_delay(0.5)
? tp_recv( 1 )
inkey(0)
enddo
tp_Close( 1 )
return nil
function ThreadSleep ( millisecs )
secs = millisecs/1000
now = seconds()
DO WHILE seconds()now+secs
hb_ReleaseCPU() //randy
ENDDO
return nil
Any other thoughts?
function main
tp_open( 1,, 9600, 8, N, 1 )
tp_open( port, input-buffer size, output-buffer size, speed...
so it lacks a comma and as such 9600 is not port speed and all the other
parameters are wrong as
well.
Sorry, the function is called hb_ReleaseCPU() - It is defined in
IDLE.C as follows:
/* Release a CPU time slice */
HB_FUNC( HB_RELEASECPU )
{
hb_releaseCPU();
}
--
View this message in context:
http://www.nabble.com/Using--contrib-hbtpathy-fuctions-in-Linux-tp21339751p21341309.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] Using /contrib/hbtpathy fuctions in Linux
Barry , try this library http://www.carozodequilmes.com.ar/Projects/QAC/hbcomm.lib.htm this page its part of http://www.carozodequilmes.com.ar/Projects/QAC/_Index_QAC.htm It 's in spanish but the code in zip it's comented in english Bruno 2009/1/7 Barry Jackson zen25...@zen.co.uk: Marilio, I just tested with the laptop and hbtpathy is now receiving - only - hence the loopback fail. Send String = g FetchChars = Handle 3 Recv string = So we are half way there! Pity it's this way round as my application only needs to send ! Barry -- View this message in context: http://www.nabble.com/Using--contrib-hbtpathy-fuctions-in-Linux-tp21339751p21342842.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 mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
[Harbour] Re: ourxdbu free for all
Miguel, I DENY THE USE OF THIS APPLICATION TO THE CITIZENS TO ISRAEL TO STOP KILLING PEOPLE. I am furious that you are mixing politics with the Harbour project! This is NOT a political group, and adding such notes degrade the community efforts to help people all over the world, regardless of their physical location, or country of origin. I am only going to reply on this issue once; this is not the scope of this group to such arguments. You don’t know the whole details, cities in Israel are under fire for more than 7 years, in that time Israel withdraw from the Gaza strip, it did not stop the firing. On the past few moths there was a cease-fire which was sort of accepted by both sides. Two weeks ago it was the official date that end that agreement, Israel said it want to continue with the cease-fire, we were answered with more that 70 rockets on our cities. Do you think another country would have sit and do nothing? Israel try to target offending military targets, they aim to our cities. And when they fire from within a school, the only way to stop the firing is shooting back to that school. This is horrible, and children do get hurt, we have no choice! Now they are hiding and operating their military actions from their hospital, knowing we do care about such issues (the Israeli hospital in Ashkelon was already targeted a few times, I didn’t see any angry protests denouncing that). Only two hours ago, the northern part of Israel was the target of rockets attacks from the Lebanon side with no cause. And as you deny your product from Israeli citizens, you are welcome to yank out any Pentium class processor from your computers are it was designed in Israel, you may probably need to do so to some of the chips in your digital camera and mobile phone. I don’t see you revoking these rights for American or British citizens for the acts that their soldiers are doing in Afghanistan or Iraq, I don’t see you “punishing” Chinese citizens for the human right violations their government does, you don’t have any issues with Russian and Ukraine conflict, or the was in Sudan and other parts of Africa, the Indian Pakistan tension, or the one between Central American governments and the USA. There are places suitable for expreesing such opinions, this is not one of them. I am sorry for the Harbour community to post this very off-topic here. My view is that the open source community should gap the bridges between people, which in turn such help reducing all these global conflicts and wars. Chen. ___ Harbour mailing list Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour
