(:asdf "closer-mop")
(:build "command-line-arguments")
(:build "fare-utils") ;; utilities and data structures.
- (:build "fare-matcher") ;; fare-matcher and fare-quasiquote-readtable
+ (:build "fare-quasiquote") ;; fare-quasiquote-readtable and fare-quasiquote-optima
(:build "fare-mop")
(:build "inferior-shell")
(:when (:featurep :xcvb-farmer)
(ignore-errors
(format! *stderr* "~&")
(apply #'format! *stderr* format arguments)
- (format! *stderr* "~&"))
- (quit 99)))
+ (format! *stderr* "~&")))
+ (quit 99))
(defun bork (condition)
"Depending on whether *DEBUGGING* is set, enter debugger or die"
(check-grain-ordinal ordinal)
(aref *ordered-grains* ordinal))
+#|
(define-interface <grain-map>
(<encoded-key-map>
<map-empty-is-nil>
(ordinal-grain ordinal)))
(defparameter <gm> <grain-map>)
+|#
\ No newline at end of file
(defpackage :xcvb
(:use :closer-common-lisp
:xcvb-utils :command-line-arguments :lisp-invocation
- :fare-matcher :interface :pure :fare-mop
+ :optima :interface :pure :fare-mop
:fare-memoization :inferior-shell
#+xcvb-farmer :quux-iolib #+xcvb-farmer :iolib.os)
:fare-mop :fare-memoization
:command-line-arguments
:asdf-dependency-grovel
- :fare-matcher :fare-quasiquote-readtable
+ :fare-quasiquote-extras
:ironclad :binascii :babel
:inferior-shell
:lisp-interface-library