Вопросы по теме 'common-lisp'
Лисп в реальном мире
Я экспериментировал с Lisp (на самом деле Scheme) и обнаружил, что это очень красивый язык, о котором мне интересно узнать больше. Однако похоже, что Lisp никогда не используется в серьезных проектах, и я не видел, чтобы он указывался как желаемый...
32613 просмотров
schedule
24.02.2024
Project Euler #211 - проблема эффективности
Я медленно просматривал список задач Project Euler и пришел к одной, которую знаю, как решить, но, похоже, не могу (учитывая, как было написано мое решение).
Для этого я использую Common Lisp, и мой скрипт работает уже более 24 часов (намного...
3818 просмотров
schedule
27.11.2022
Allegro Webactions не работает на SBCL. Методы отладки или возможные решения?
Я пытаюсь запустить Portable Allegro Serve и Webactions на SBCL. До сих пор мне удалось заставить paserve правильно обслуживать страницы. Но webactions завершается со следующим предупреждением в консоли:
1-aserve-worker: 05/27/09 - 21:28:43 -...
178 просмотров
schedule
27.12.2023
Стиль Лисп: setq против setf
Питер Норвиг упоминает в парадигмах программирования искусственного интеллекта на стр. 50 , компромисс между специфичностью и согласованностью и выбором использования setq или setf для обновления переменной до ценность. Что вы порекомендуете? Вы...
12632 просмотров
schedule
14.12.2023
Озадачен условием конца файла в Common Lisp
не могу прочитать текстовый файл.
ЧТЕНИЕ: входной поток #1=# достиг своего конца [Условие типа SYSTEM::SIMPLE-END-OF-FILE]
что означает "достиг своего конца".
2810 просмотров
schedule
06.11.2023
Как я могу установить элемент в дереве с помощью средства доступа?
Мы использовали Lisp в моем курсе искусственного интеллекта. Задания, которые я получил, включали поиск и создание древовидных структур. Для каждого задания я написал что-то вроде:
(defun initial-state ()
(list
0 ; score
nil ;...
318 просмотров
schedule
03.12.2023
Как вставить в список вне макроса в Common Lisp?
Скажем, у меня есть функция foo:
(defun foo (x y &rest args)
...)
И позже я хочу обернуть его функциональной панелью:
(defun bar (x &rest args)
(foo x 100 args))
Предположим, что бар тогда назывался так: (bar 50 1 2 3)...
4154 просмотров
schedule
03.12.2023
CLSQL и MYSQL в OS X
Я работаю над OS X 10.6.4. Я использую clbuild для установки вспомогательных библиотек для SBCL (включая clsql) и выполняю всю свою работу через Aquamacs. Я установил MySQL, используя прекрасные инструкции на сайте Hive Logic . Но когда я вызываю...
727 просмотров
schedule
29.09.2022
Отключение печати результата в common lisp
Я работаю с достаточно большим набором данных в GNU clisp. Было бы действительно хорошо, если бы я мог отключить P в REPL. Тысячи результатов, выплескивающиеся на мой экран, на самом деле не очень полезны.
Я рылся в документах и не мог...
120 просмотров
schedule
23.05.2024
Доступ к активной таблице символов в Common Lisp
Я слышал, что активная таблица символов доступна в среде выполнения Common Lisp. Я неправильно понял?
762 просмотров
schedule
09.05.2024
Как определять структуры в Лиспе, используя параметры в определении
Я хочу написать такой код на Лиспе
(defstruct board
(size 7)
(matrix (make-array (list size size))
(red-stones 0)
(black-stones 0))
чтобы определить структуру, представляющую игровое поле.
Я хочу иметь возможность создать...
1588 просмотров
schedule
19.02.2024
Mapcar и ассоц.
Я хотел бы сделать:
(mapcar #'assoc '(a s) '((a . b) (c . d) (s . f)))
и вернуть его
((A . B) (S . F))
Что кажется вполне разумным, учитывая, что (assoc 'a '((a . b) (c . d) (s . f))) возвращает (A . B) , а (assoc 's '((a . b) (c...
636 просмотров
schedule
10.10.2022
Программно проверить размер fixnum
Викикнига по Common Lisp говорит, что fixnums гарантированно могут содержать целочисленные значения в [-2 15 ; 2 15 -1] и зависит от реализации. *features* может сказать мне, является ли хост 32-битным или 64-битным, но это fixnum в Lisp не...
451 просмотров
schedule
27.03.2024
Каковы фактические различия между Scheme и Common Lisp? (Или любые другие два диалекта Лиспа)
Примечание. Я не спрашиваю, что изучать, что лучше или что-то в этом роде.
Я выбрал бесплатную версию SICP, потому что счел, что ее было бы неплохо прочитать (я слышал о ней хорошие отзывы, и меня интересует такая сторона программирования).
Я...
31337 просмотров
schedule
22.01.2024
Найти соседей в 2d-списке, умный способ
Предположим, что у меня есть 2d-список (или массив, если хотите), который выглядит так:
'( (I I I O)
(I X I O)
(I I I O))
А теперь предположим, что я хочу найти всех соседей X. В этом случае моя функция вернет список из 8 I:s. Как мне...
428 просмотров
schedule
24.11.2022
В LISP можно получить доступ к форме функции?
Предположим, я определяю функцию глобально:
(defun x (y) (1+ y)) ;; Edit: my first example was too complicated
Можно ли «принудить» функцию x к списку, например:
(x (y) (1+ y))
Заранее спасибо!
PS - пример @Danlei работает в...
481 просмотров
schedule
11.06.2024
Распечатать ключи из plist на основе значений?
Как выполнить итерацию и распечатать ключи plist на основе заданных значений?
Пример:
; plist
(defun my-list() (list :a "hi" :b "no" :c "go"))
; from that list i want to iterate and print out keys based on values like:
for each x in ("hi"...
1954 просмотров
schedule
12.06.2024
Несколько аргументов для mapcar
Я уверен, что это очень начинающий вопрос в lisp, так как я только изучаю язык.
У меня есть функция в clisp, называемая count. Он подсчитывает, сколько раз данный атом появляется в списке. Что я хотел бы сделать, так это иметь возможность...
3219 просмотров
schedule
23.11.2022
написать строковую функцию сравнения
Я полностью понимаю использование списка в lisp, но у меня проблемы с использованием строки. Я пытаюсь написать свой собственный код функций, таких как string> или string‹, из common lisp, чтобы понять, как lisp работает со строками. Например, abcde...
873 просмотров
schedule
09.01.2024
Common Lisp: удалить пару в списке через setq и assoc
Я нахожу код в старой книге по общему лиспу и пробую его в lispworks и clozure cl. Но оба они не могут запустить код. Этот код используется для удаления пары: (author1 . john) .
(setf q '((author1 . john) (author2 . tony) (author3 . fred)))...
931 просмотров
schedule
25.01.2024