编写一个SML函数，该函数采用文件名并返回一个不带空格的字符列表

在一次考试中，我发现了以下练习： “编写一个函数，该函数采用文件名（即“text.txt”），并返回不带空格的字符列表”

例如： “text.txt”包含“ab e ad c” 函数必须返回->[#“a”、#“b”、#“e”、#“a”、#“d”、#“c”]

哪种方法是解决练习的最简单方法？

我曾尝试使用库“TextIO”和函数“input1”，但我被卡住了。我不知道如何递归地实现这个函数。有人能帮忙吗？

fun chars文件名=
fun chars filename =
  let
    val f = TextIO.openIn filename
    val s = TextIO.inputAll f
  in
    TextIO.closeIn f;
    List.filter (fn c => c <> #" ") (explode s)
  end

让
val f=TextIO.openIn文件名
val s=文本IO.inputAll f
在里面
TextIO.closinf；
List.filter（fn c=>c#“”）（分解为s）
结束