Чтение строк и помещение их в список

Следующий вопрос связан с SMLNJ. Я пытаюсь написать функцию, которая при вызове будет читать текстовый файл, и каждая строка будет помещена в список. Я продолжал получать некоторые синтаксические ошибки.

Вот код, который у меня есть:

забавный список чтения (infile: string) = let val ins = TextIO.openIn infile val l = TextIO.inputLine ins список val = (l::nil) забавный createlist() = let val l = TextIO.inputLine ins

  in case l of
       NONE => (TextIO.closeIn ins)
     | SOME l => list = l::list; createlist()

в конце createlist ()

Ниже приведена синтаксическая ошибка, которая у меня есть: readlist.sml:11.48 Ошибка: синтаксическая ошибка: вставка необработанного исключения END Компилировать [Компилировать: "синтаксическая ошибка"]

поднято по адресу: ../compiler/Parse/main/smlfile.sml:15.24-15.46 ../compiler/TopLevel/interact/evalloop.sml:44.55

         ../compiler/TopLevel/interact/evalloop.sml:296.17-296.20

1 ответ

Звучит так, как будто это тот же вопрос, что и цикл по строкам текстового файла в SML / NJ, на который уже есть хороший ответ.

Другие вопросы по тегам