tvl-depot/users/wpcarro/lisp/prelude.lisp

Ignoring revisions in .git-blame-ignore-revs. Click here to bypass and see the normal blame view.

15 lines
369 B
Common Lisp
Raw Permalink Normal View History

(in-package #:cl-user)
(defpackage #:prelude
(:documentation "Supporting miscellaneous utility functions and macros.")
(:use #:cl)
(:shadow #:type)
(:export #:type #:comment))
(in-package #:prelude)
;; TODO: Add documentation to these macros.
(defmacro type (name in out)
`(declaim (ftype (function ,in ,out) ,name)))
(defmacro comment (&rest _forms) nil)