Problème avec une boucle for [Résolu]

[Trap D]

Bonjour

J'ai une fonction qui teste les caractères d'une string à partir d'un certain point de cette chaine vers la gauche ou la droite, pour cette recherche j'utilise une boucle for.
J'aimerais récupérer en retour de cette fonction l'indice où la recherche s'arrête et évidemment ça ne fonctionne pas car le type de l'indice de boucle est unit et moi je voudairs un int.
Comment faire ?
Je donne un exemple de code

Code :

1
2
3
4
5
let search_right (x : String, i : int) =
    for k = i to x.Length - 2 do
      if Char.IsSeparator(x, k+1) then
         k
    x.Length - 1

J'ai une erreur signalée pour k

erreur FS0001: Cette expression était censée avoir le type unit mais elle a ici le type int

Comment faire ?

Merci

[LLB]

Il n'y a pas de break ou de return pour sortir d'une boucle. La solution impérative est donc d'utiliser un while avec une variable (mutable).

Code :

1
2
3
4
let searchRight (s: string) start =
  let mutable i = start
  while i < s.Length && not (Char.IsSeparator s.[i]) do i <- i + 1
  i

On peut aussi faire le parcours en récursif :

Code :

1
2
3
4
5
6
let searchRight (s: string) start =
  let rec search i =
    if i >= s.Length then s.Length
    elif Char.IsSeparator s.[i] then i
    else search (i + 1)
  search start

Tu peux aussi utiliser IndexOfAny en listant les séparateurs :

Code :

1
2
let separators = [|' '; '\t'; '\n'|]
"Hello world".IndexOfAny(separators, 2)

(je te laisse ajuster les valeurs de retour)

[Trap D]

merci ça tourne.
J'aurai surement encore pas mal d'autres questions.