PureBasic

Sans débogueur, la proc renvoie des valeurs correctes.
Avec débogueur, ben... j'comprend pas trop

EDIT:
Ah, ça le fait que si on coche "threadsafe" dans les options du compilo.

Procedure.l MandPoint(cr.d, ci.d, max.l)
   cnt.l = 0
   While cnt.l <= max
      ni.d = 2 * zr.d * zi.d
      zr = zr * zr - zi * zi + cr
      zi = ni + ci
      If zr * zr + zi * zi > 4
         ProcedureReturn cnt
      EndIf
      cnt + 1
   Wend
   ProcedureReturn -1
EndProcedure

a.l = MandPoint(0.1, 0.6, 1000)

MessageRequester("", Str(a))

a.l = MandPoint(0.8, 0.6, 1000)

MessageRequester("", Str(a))

J'ai le même résultat pour les deux: -1 et 2

Pardon, j'avais pas précisé que c'est avec la béta.
Ou bien est-ce que j'ai loupé une MAJ ?

Comme Nico , -1 et 2 dans les deux cas , et avec la beta 1

Ca le fait qu'en mode threadsafe, je vient de m'appercevoir

Effectivement

C'est corrigé.

Déjà ! Ah ben ça rigole pas !

PureBasic

[v4 beta1] Le débogueur fausse un calcul ? [Corrigé]

[v4 beta1] Le débogueur fausse un calcul ? [Corrigé]