А как лучше?

Хз, разницы много нет. Просто без всяких my/ вначале выглядит все лаконичнее

В любом случае узнать просто: твоя эта функция или нет. describe-function. Но это немного не тот чат)

Лучше хотя бы в стракт завернуть чтобы отличать просто список от хука

В srfi-173 есть sample implementation. Смотрю его и там есть такой код

(define (hook-delete! hook proc)
      (let loop ((procs (hook-procs hook))
                 (out '()))
        (unless (null? procs)
          (if (eq? proc (car procs))
              (hook-procs! hook (append (cdr procs) out))
              (loop (cdr procs) (cons (car procs) out))))))

Функция просто удаляет переданную процедуру из списка.

Но при этом тот же самый код можно написать так

(delete proc (hook-procs hook) eq?)

При условии импорта srfi-1

Кстати. Вопрос есть ли референс по scheme? Именно по стандартным функциям и srfi? Целый день искал эту функцию delete потому что где-то она называется remove а где-то remq

я обычно иду на сайт чикена, там есть много всякого

https://wiki.call-cc.org/man/4/Unit%20srfi-1 - например srfi

а, ну и там и ссылка на сам оригинальный документ есть

Я бы реализацию srfi 173 для чикена выложил, но я там проверку арности функций убрал. То есть фактически оно теперь не совпадает с эталоном.

В данном конкретном случае тяжело искать потому что у функции классное имя delete. А в Гугле вместо стандартной функции миллиард велосипедов

норм - есть identifier search, ищет не по тексту, а конкретно имя

ну то есть все равно куча вариантов, но можно найти

Можно искать через site:srfi.schemers.org

А ещё оказалось что у утки есть !srfi, но он работает по номерам

Вышел Guile 2.9.4 (beta)

https://www.gnu.org/software/guile/news/gnu-guile-294-beta-released.html

Chezure

Chez Scheme биндинг для Rust’s regular expression API.

https://macdavid313.github.io/chezure/

Тем временем протестировал хуки, работает вроде, но появились проблемы:
1) Пока не ясно как из C кода передавать аргументы.
2) Как вообще нормально запускать эти самые хуки из того же C.
3) Как быть с зависимостями которые надо ставить отдельно типа srfi-1

Пока всё очень примитивно. Движок (В данном случае darkplaces) инициализирует Chicken а затем грузит файл init.scm (название выбрано совершенно случайно) из этого файла естественно можно подгружать и другие. На скрине видно что я сначала импортирую модуль hook затем создаю хук и добавляю в него функцию.

Где-то в C коде мне остаётся лишь вызвать

CHICKEN_eval_string("(hook-run cl-init-hook)", NULL)

Под каждый хук наверное нужно будет создать отдельную C функцию так как hook-run принимает переменное число аргументов(на лисповый стороне) а C так не может (вернее может но тогда возникает проблема определения типа каждого аргумента для конвертации в лисповые сущности)

Интересно? Или не стоит захламлять чат?