Page 1 of 1

Bug in /= operator

Posted: Sun Mar 25, 2007 4:40 pm
by Enrico Maria Giordano
This is the sample:

Code: Select all | Expand

#include "Fwce.ch"


FUNCTION MAIN()

    LOCAL nVal1 := 2.000
    LOCAL nVal2 := 10

    MSGINFO( nVal1 /= nVal2 )

    RETURN NIL


It terminates with an error when operator /= is executed.

EMG

Posted: Sun Mar 25, 2007 10:24 pm
by Antonio Linares
Enrico,

This is a workaround:

Code: Select all | Expand

#include "Fwce.ch" 

FUNCTION MAIN()

    LOCAL nVal1 := 2.000
    LOCAL nVal2 := 10
    local nVal3 := nVal1 / nVal2

    MSGINFO( nVal3 )

    RETURN NIL

Anyhow we are going to check where the error comes from

Posted: Mon Mar 26, 2007 8:20 am
by Enrico Maria Giordano
Antonio Linares wrote:Enrico,

This is a workaround:

Code: Select all | Expand

#include "Fwce.ch" 

FUNCTION MAIN()

    LOCAL nVal1 := 2.000
    LOCAL nVal2 := 10
    local nVal3 := nVal1 / nVal2

    MSGINFO( nVal3 )

    RETURN NIL


Yes, I did already know it. :)

Antonio Linares wrote:Anyhow we are going to check where the error comes from


Thank you!

EMG

Posted: Mon Mar 26, 2007 8:35 am
by Antonio Linares
Enrico,

It looks as a bug in the Harbour build used for Pocket PC, as this sample with no FWPPC code in it also fails:

nVal1 /= nVal2

Posted: Mon Mar 26, 2007 8:38 am
by Enrico Maria Giordano
Thank you. I'm going to report it to the Harbour developers list.

EMG

Posted: Mon Mar 26, 2007 8:40 am
by Antonio Linares
Enrico,

Wait, its ok in the current Harbour version, so it looks as the bug is just contained in the build used for Pocket PC

We may upgrade soon Harbour for Pocket PC to the current Harbour build

Posted: Mon Mar 26, 2007 8:41 am
by Enrico Maria Giordano
Yes, you are right.

Thank you.

EMG