Publicité
+ Répondre à la discussion
Affichage des résultats 1 à 3 sur 3
  1. #1
    Rédacteur/Modérateur
    Avatar de Trap D
    Inscrit en
    septembre 2003
    Messages
    4 571
    Détails du profil
    Informations forums :
    Inscription : septembre 2003
    Messages : 4 571
    Points : 6 001
    Points
    6 001

    Par défaut Problème avec une boucle for

    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
    "La haine seule fait des choix" - Koan Zen
    "Il ne faut pas être meilleur que les autres, il faut être meilleur que soi." Albert Jacquard
    "Ceux qui savent où ils ont posé leur parapluie ne sont pas alcooliques." - pgibonne.
    Faites du Prolog, ça vous changera les idées !
    Ma page Prolog
    Mes codes sources commentés

    Mon avatar : Intérieur avec jeune femme de Vilhelm Hammershoi

  2. #2
    LLB
    LLB est déconnecté
    Membre Expert
    Inscrit en
    mars 2002
    Messages
    962
    Détails du profil
    Informations forums :
    Inscription : mars 2002
    Messages : 962
    Points : 1 263
    Points
    1 263

    Par défaut

    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)

  3. #3
    Rédacteur/Modérateur
    Avatar de Trap D
    Inscrit en
    septembre 2003
    Messages
    4 571
    Détails du profil
    Informations forums :
    Inscription : septembre 2003
    Messages : 4 571
    Points : 6 001
    Points
    6 001

    Par défaut

    merci ça tourne.
    J'aurai surement encore pas mal d'autres questions.
    "La haine seule fait des choix" - Koan Zen
    "Il ne faut pas être meilleur que les autres, il faut être meilleur que soi." Albert Jacquard
    "Ceux qui savent où ils ont posé leur parapluie ne sont pas alcooliques." - pgibonne.
    Faites du Prolog, ça vous changera les idées !
    Ma page Prolog
    Mes codes sources commentés

    Mon avatar : Intérieur avec jeune femme de Vilhelm Hammershoi

+ Répondre à la discussion
Cette discussion est résolue.

Liens sociaux

Règles de messages

  • Vous ne pouvez pas créer de nouvelles discussions
  • Vous ne pouvez pas envoyer des réponses
  • Vous ne pouvez pas envoyer des pièces jointes
  • Vous ne pouvez pas modifier vos messages
  •