diff options
author | colin <colin@cicadas.surf> | 2024-05-04 10:19:17 -0700 |
---|---|---|
committer | colin <colin@cicadas.surf> | 2024-05-04 10:19:17 -0700 |
commit | 5d3b5870b7f4d3a9b9be9ea840b21398fa77241d (patch) | |
tree | 4851a6692f16473863ca1b6b8460d309459d921b | |
parent | b83e27e66b0032c67072a85bed3c87d948f087f8 (diff) |
renamed
-rw-r--r-- | flatbind.asd | 13 | ||||
-rw-r--r-- | flatbind.lisp (renamed from obwyn.lisp) | 6 | ||||
-rw-r--r-- | obwyn.asd | 13 |
3 files changed, 16 insertions, 16 deletions
diff --git a/flatbind.asd b/flatbind.asd new file mode 100644 index 0000000..fb6d905 --- /dev/null +++ b/flatbind.asd @@ -0,0 +1,13 @@ +;;;; flatbind.asd + +(asdf:defsystem #:flatbind + :description "Syntactic sugar cribbing style from haskell's do syntax." + :author "Colin <colin@cicadas.surf>" + :license "Unlicense" + :version "0.0.1" + :serial t + :depends-on (#:argot #:alexandria #:testiere) + :components ((:file "flatbind"))) + + + diff --git a/obwyn.lisp b/flatbind.lisp index 70a1772..9a76ff3 100644 --- a/obwyn.lisp +++ b/flatbind.lisp @@ -1,10 +1,10 @@ -(defpackage #:obwyn +(defpackage #:flatbind (:use #:cl) (:local-nicknames (#:a #:alexandria-2)) (:export #:do>)) -(in-package :obwyn) +(in-package :flatbind) (defun variablep (thing) (and (symbolp thing) (not (keywordp thing)))) @@ -36,7 +36,7 @@ (and (listp form) (ignore-errors (multiple-value-bind (required optional rest kwargs allow-other aux keyp) - (alexandria:parse-ordinary-lambda-list form) + (a:parse-ordinary-lambda-list form) (declare (ignorable required optional rest kwargs keyp)) (not (or allow-other aux)))))) diff --git a/obwyn.asd b/obwyn.asd deleted file mode 100644 index 1aa0693..0000000 --- a/obwyn.asd +++ /dev/null @@ -1,13 +0,0 @@ -;;;; obwyn.asd - -(asdf:defsystem #:obwyn - :description "Only Bind When You Need" - :author "Colin <colin@cicadas.surf>" - :license "Unlicense" - :version "0.0.1" - :serial t - :depends-on (#:argot #:alexandria #:testiere) - :components ((:file "obwyn"))) - - - |