about summary refs log blame commit diff
path: root/lisp/prelude.lisp
blob: 3522567ea0f7ef7ecfd1bb28aba6ad4bc48e4968 (plain) (tree)
1
2
3
4
5
6
7
8
9
10
11
12
13
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)