From 95d03facb3af93323101737d76470f190e7ca2ae Mon Sep 17 00:00:00 2001 From: William Carroll Date: Fri, 24 Jan 2020 10:52:53 +0000 Subject: Support prelude.lisp Using this module to support utility functions that I have not classified further than being miscellaneous. --- lisp/prelude.lisp | 14 ++++++++++++++ 1 file changed, 14 insertions(+) create mode 100644 lisp/prelude.lisp (limited to 'lisp/prelude.lisp') diff --git a/lisp/prelude.lisp b/lisp/prelude.lisp new file mode 100644 index 000000000000..3522567ea0f7 --- /dev/null +++ b/lisp/prelude.lisp @@ -0,0 +1,14 @@ +(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) -- cgit 1.4.1