Список из всех подпапок в директории - Lisp
Формулировка задачи:
Всем доброго времени суток!
Может кто то подсказать способ, как получить список с именами всех подпапок в заданной директории?
Решение задачи: «Список из всех подпапок в директории»
textual
Листинг программы
_$ (defun dir-list (dir) (sysDir dir &H10)) DIR-LIST _$ (dir-list "C:\Windows\*.*") ; ошибка: no function definition: SYSDIR _$
Объяснение кода листинга программы
В представленном коде:
- _$ (defun dir-list (dir) (sysDir dir &H10)) - Создаётся функция с именем dir-list, которая принимает один аргумент dir. Функция вызывает функцию sysDir с аргументом dir и константой &H10. Вероятно, функция sysDir должна возвращать список подпапок директории dir.
- DIR-LIST -
Функция dir-list вызывается с аргументом
C:\Windows\*.*. Вероятно, это путь к директории, из которой нужно получить список подпапок. - ; ошибка: no function definition: SYSDIR - Выводится сообщение об ошибке, потому что функция sysDir не определена. Вывод: код содержит функцию dir-list, которая вызывает функцию sysDir для получения списка подпапок директории. Однако, функция sysDir не определена, что вызывает ошибку.
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д