Функция: чтение слов из файла в список - Lisp
Формулировка задачи:
Добрый вечер,
Кто-то может помочь с реализацией функции чтение слов из файла в список?
Файл состоит из слов
Решение задачи: «Функция: чтение слов из файла в список»
textual
Листинг программы
(defun task (fname) (apply 'append (iter (for stri in-file fname) (collecting (strWords stri)))))
Объяснение кода листинга программы
В данном коде:
- Создаётся функция
task, которая принимает один аргументfname(строка с именем файла). - Внутри функции используется функция
applyс аргументомappend, которая объединяет результаты вызовов функцииiterв список. - Функция
iterвызывается с аргументомfor stri in-file fname, который итерирует по каждой строке в файлеfname. - Внутри цикла
forиспользуется функцияcollecting, которая собирает результаты вызова функцииstrWordsв список. - Функция
strWordsвызывается для каждой строкиstriи возвращает список слов, которые являются строками. - Результат вызова функции
iterиcollectingобъединяется с помощью функцииappendв один список слов. - Результат выполнения функции
task— список слов из файлаfname.