@leroysheep / rag-system
Code Commits Pulls CI/CD 82,128
seen
bisect jch maint master next seen test todo
text 4 lines 181 Bytes
Raw
1 (eval-when (:compile-toplevel :load-toplevel :execute) ; RIGHT
2 (set-macro-character #\?
3 (lambda (stream char)
4 `(make-pattern-variable ,(read stream))))) ; ChangeMe