Problema di comparazione valori numerici decimali negativi

[Marco Turco]

Salve a tutti,
sono stato parecchio indaffarato con il lavoro ed è un pò che manco dal forum ne approfitto quindi per rientrare con un bel (si fa per dire) problemino.

Credo che xharbour abbia dei problemi nella comparazione di valori negativi con decimali ed interi.

Questo self contained parte da un valore 4 contenuto nella variabile IL.
Viene quindi fatto un confronto tra questo valore decrementato di 10360 e di 1 e diviso per 250 tra l'intero dello stesso numero.

Il confronto avviene tra -41.3 e -41 e vengono considerati UGUALI !!!
Nel test che ho fatto ho anche attivato SET EXACT ma il risultato non cambia.

Qualche idea ? Sono io che sbaglio qualcosa ?

Grazie in anticipo

Saluti

Marco Turco

**********************************
** Self contained che mostra il problema
**********************************
Function Test()

il:=4
MSGINFO((il-10360-1)/250)
MSGINFO(INT((il-10360-1)/250))
if ((il-10360-1)/250)<>(int(il-10360-1)/250)
msginfo("differenti")
else
msginfo("uguali")
endif
return

[Enrico Maria Giordano]

Questo

MSGINFO(INT((il-10360-1)/250))

e questo

if ((il-10360-1)/250)<>(int(il-10360-1)/250)

non sono la stessa cosa.

EMG

[Marco Turco]

Arghh !! Hai ragione. Devo cercare subito un oculista !!!

Grazie

Saluti

Marco

[Silvio]

marco ti avevo scritto in privato ultimamente ....