为什么可以';t我用F#打印这个数组

本文关键字:打印 数组 我用 为什么 | 更新日期: 2023-09-27 17:49:21

我在C#中有这个列表:

List<string> words = new List<string> { "how", "are", "you" };

我可以用轻松打印列表的内容

foreach(string word in words)
   Debug.WriteLine(word);

现在我想在F#中做同样的事情(我从这里了解到List<T>类似于ResizeArray(:

let words = ResizeArray<string>()
words.Add("how")
words.Add("are")
words.Add("you")
for word in words do
    Debug.WriteLine(sprintf "%s" word) 

现在的问题是,在for循环中,word变为空。我在这里做错了什么?

编辑:这是完整的代码。我按照建议把它改成了printf。不幸的是,当我在for循环中时,单词中仍然为null:

let myFunction =
    let words = ResizeArray<string>()
    words.Add("how")
    words.Add("are")
    words.Add("you")
    for word in words do
        printf "%s" word // <-- word becomes null
    words
[<EntryPoint>]
let main argv = 
    ignore myFunction
    0 // return an integer exit code

为什么可以';t我用F#打印这个数组

我知道你希望你的代码看起来像C#。但F#是一种函数式语言(不是严格意义上的,但这是主要的范式(,在这些特征中蕴藏着语言的力量。首先是你的收藏品。更惯用的类型是List。它是不可变的,这是语言的功能特征之一。

let words = ["how"; "are"; "you"]

由于它是不可变的,您可以通过创建一个新集合来扩展它。您可以在开头附加一个项目:

let moreWords = "Hello" :: words

或者加入一个列表与另一个列表:

let evenMore = moreWords @ ["I"; "am"; "fine"]

然后迭代。For循环纯粹是命令式构造。由于我们切换到函数集合,因此使用内置的List函数之一进行迭代:

let prnt lst = lst |> List.iter (fun x -> printfn "%s" x)

这需要一个列表。逐项迭代。并对每个项目执行(fun x -> printfn "%s" x)函数。

或者,你可以玩一点,编写自己的函数来遍历所有元素,并在每个元素上执行一个函数。一种方法是使用递归和列表匹配:

let rec loopFn lst fn =
    match lst with
    | [] -> fn
    | head::tail ->
        fn head
        loopFn tail fn

此函数接受一个列表和另一个函数作为参数。与列表匹配。如果它是空的(| [](-执行该功能。否则,将列表拆分为头,其余的(head::tail(在head(fn head(上执行函数,并在其余项目(loopFn tail fn(上进一步循环。

要打印项目,请将单词列表和打印功能传递给该功能:

loopFn words (fun x -> printfn "%s" x)

或者由于printfn本身就是一个函数,您可以稍微简化调用:

loopFn words (printfn "%s")

我怀疑这是由于F#的惰性求值性质。因此,在printf语句使用word之前,它实际上不会被赋值,因此您无法在调试器中看到该值。

如果您在循环中添加另一条语句并在那里设置断点,您将看到word赋值的值。请参阅下面的片段-

let myFunction =
let words = ResizeArray<string>()
words.Add("how")
words.Add("are")
words.Add("you")
for word in words do
    printf "%s" word // 
    printf "%s" word // <-- SET A BREAKPOINT HERE AND VERIFY THE VALUE OF 'word'
words

这是有效的:

for word in words do
    printf "%s" word

但是,如果您真的想要调试输出,您是否正在加载system.diagnostics命名空间?

open System.Diagnostics
(Your code)

这在没有加载命名空间的情况下对我有效:

for word in words do
    System.Diagnostics.Debug.Write(sprintf "%s" word)