Commit 94db450e authored by Tobias C. Rittweiler's avatar Tobias C. Rittweiler
Browse files

Bind SB-EXT:*DERIVE-FUNCTION-TYPES* to T when compiling named-readtables.

parent ff5a48d9
(asdf:defsystem :named-readtables
(defpackage :named-readtables-system
(:use :cl :asdf))
(in-package :named-readtables-system)
(defclass named-readtables-source-file (cl-source-file) ())
(defsystem :named-readtables
:description "Library that creates a namespace for named readtable akin to the namespace of packages."
:author "Tobias C. Rittweiler <>"
:version "1.0 (unpublished so far)"
:licence "BSD"
:serial t
:default-component-class named-readtables-source-file
((:file "package")
(:file "without-package-locks" :depends-on ("package"))
(:file "utils" :depends-on ("package" "without-package-locks"))
(:file "utils" :depends-on ("package"))
(:file "cruft" :depends-on ("package" "utils"))
(:file "named-readtables" :depends-on ("package" "utils" "cruft"))))
\ No newline at end of file
(:file "named-readtables" :depends-on ("package" "utils" "cruft"))))
(defmethod perform :around ((operation compile-op)
(c named-readtables-source-file))
(let ((sb-ext:*derive-function-types* t))
\ No newline at end of file
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment