Harbour warnings

Re: Harbour warnings

Postby nageswaragunupudi » Sat Jun 25, 2022 3:40 pm

Enrico Maria Giordano wrote:The solution is already present in xHarbour (-wb- compiler switch). As I already wrote, I did hope that there were a similar solution for Harbour. Ok, I understood that there is not. :-(

EMG

Yes.
I tried earlier and could not find any switch in Harbour with similar functionality as -wb- in xHarbour.
Regards

G. N. Rao.
Hyderabad, India
User avatar
nageswaragunupudi
 
Posts: 10646
Joined: Sun Nov 19, 2006 5:22 am
Location: India

Re: Harbour warnings

Postby Enrico Maria Giordano » Sat Jun 25, 2022 3:49 pm

rhlawek wrote:What I do NOT understand why Self in the row for .center. does not also throw the warning when using w3.


There is no Self in the CENTER clause. Probably you mistakenly looked at the VALID clause:

Code: Select all  Expand view  RUN
<.center.>, [{|Self|<uValid>}],;


EMG
User avatar
Enrico Maria Giordano
 
Posts: 8718
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Re: Harbour warnings

Postby rhlawek » Sat Jun 25, 2022 3:53 pm

You are correct, I missed the fact of the comma.
User avatar
rhlawek
 
Posts: 194
Joined: Sun Jul 22, 2012 7:01 pm

Re: Harbour warnings

Postby Jimmy » Sun Jun 26, 2022 8:48 pm

hi,

in c:\fwh\include\objects.ch i found this
Code: Select all  Expand view  RUN
#xtranslate :: =>  Self:

what about add
Code: Select all  Expand view  RUN
#xtranslate Self: => ::
greeting,
Jimmy
User avatar
Jimmy
 
Posts: 1732
Joined: Thu Sep 05, 2019 5:32 am
Location: Hamburg, Germany

Re: Harbour warnings

Postby Enrico Maria Giordano » Thu Oct 13, 2022 10:20 am

I have been able to solve the problem using something like this:

Code: Select all  Expand view  RUN
#xtranslate { | <xVar> | <uAction> } => { | <xVar> | ( <xVar> ), <uAction> }
#xtranslate { | <xVar1>, <xVar2> | <uAction> } => { | <xVar1>, <xVar2> | ( <xVar1>, <xVar2> ), <uAction> }
#xtranslate { | <xVar1>, <xVar2>, <xVar3> | <uAction> } => { | <xVar1>, <xVar2>, <xVar3> | ( <xVar1>, <xVar2>, <xVar3> ), <uAction> }
#xtranslate { | <xVar1>, <xVar2>, <xVar3>, <xVar4> | <uAction> } => { | <xVar1>, <xVar2>, <xVar3>, <xVar4> | ( <xVar1>, <xVar2>, <xVar3>, <xVar4> ), <uAction> }
#xtranslate { | <xVar1>, <xVar2>, <xVar3>, <xVar4>, <xVar5>, <xVar6> | <uAction> } => { | <xVar1>, <xVar2>, <xVar3>, <xVar4>, <xVar5>, <xVar6> | ( <xVar1>, <xVar2>, <xVar3>, <xVar4>, <xVar5>, <xVar6> ), <uAction> }

#xtranslate { | <xVar> | <uAction>, <uAction2> } => { | <xVar> | ( <xVar> ), <uAction>, <uAction2> }
#xtranslate { | <xVar1>, <xVar2> | <uAction>, <uAction2> } => { | <xVar1>, <xVar2> | ( <xVar1>, <xVar2> ), <uAction>, ( <uAction2> ) }
#xtranslate { | <xVar1>, <xVar2>, <xVar3> | <uAction>, <uAction2> } => { | <xVar1>, <xVar2>, <xVar3> | ( <xVar1>, <xVar2>, <xVar3> ), <uAction>, ( <uAction2> ) }
User avatar
Enrico Maria Giordano
 
Posts: 8718
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Previous

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: Google [Bot] and 58 guests