如何重複TryParse直到F＃成功？

Question

對不起愚蠢的問題，但我有點困惑。

在C＃中，我可以慣用做到以下幾點：

int result = 0; 
while (!Int32.TryParse(someString, out result)) 
{ 
    ... 
} 

在F＃我有嘗試DoSomething的模式兩種選擇。
它要麼

let (isSuccess, result) = Int32.TryParse someString 

或

let result = ref 0 
let isSuccess = Int32.TryParse("23", result) 

我可以做while not Int32.TryParse("23", result) do ...，但不知道是否相同與第一方案可以實現的。

P.S.當然，尾遞歸也是可行這裏，但我感興趣的是使用while結構。

Answer 1

你可以這樣做：

while (not (fst (Int32.TryParse someString))) do 
    printfn "in while loop. It's not an Int32." ; 
    someString <- Console.ReadLine(); 

或者（如果你所關心的分析結果）：

while 
    let (isSuccess, result) = Int32.TryParse someString in 
    not isSuccess do 
     printfn "in while loop. It's not an Int32 ; it is %A" result; 
     someString <- Console.ReadLine();