Problema di comparazione valori numerici decimali negativi
Posted: Thu Nov 09, 2006 6:32 pmSalve 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
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