Este comportamiento es correcto ?

[mastintin]

Este código me ha traido de cabeza.
los resultados son :

.t.
.f.
.t.
.f.

Compilado con harbour y bcc7 y lo mismo con harbour para mac y fivemac

Para sacar un resultado correcto:
! ( aux1 == aux2 )

Code: Select all  Expand view

function Main()

local aux1:= "xxxxxxxxxxxxxxx"
local aux2 := aux1 + "ccc"

? ( aux1 != aux2 )
? ( aux2 != aux1 )

? ( aux1 <> aux2 )
? ( aux2 <> aux1 )

return nil
 

[acuellar]

Estimado Manuel
Siempre fue así.

Por eso yo aplico el SET EXACT ON

[mastintin]

Básico de manual de clipper
Yo tambien pongo set exact on en mis programas pero en este no lo tenia ...
Pues si que le he dado vueltas .
Gracias por el apunte.

[Carles]

Manuel,

Yo siempre uso el operador == (exactamente igual). Muchos lenguajes lo usn, asi que ya me acostumbro siempre a este

Prueba

Code: Select all  Expand view

msginfo ( ! (aux2 == aux1) )
msginfo (  (aux2 == aux1) )

[nageswaragunupudi]

Mr Manuel
The results were as should be expected.