在SMLNJ中逐个字符地读取文件

时间:2016-05-03 23:12:59

标签: sml smlnj ml

我需要在SMLNJ中逐个字符地读取文本文件并将其存储在列表中。该文件由一行数字组成,没有空格或任何形式的分隔。我的问题是如何从文件中获取单个字符并将其添加到字符列表中?

示例:

/**
 Do not include SyncableObject into schema, only the subclasses
 */
public override class func shouldIncludeInDefaultSchema() -> Bool {
    return SyncableObject.className() != self.className()
}

结果:

12345678

1 个答案:

答案 0 :(得分:1)

使用以下代码,您可以通过将文件内容作为字符串读取来获取字符列表(TextIO.vector是准确的)。 explode函数用于转换为字符列表。

fun parse file =
let
    fun next_String input = (TextIO.inputAll input) 
    val stream = TextIO.openIn file
    val a = next_String stream
in
    explode(a)
end