Support Common Lisp

Adding some Common Lisp here to get the party started! *cues music*
This commit is contained in:
William Carroll 2020-01-22 21:52:45 +00:00
parent c010e6d6cf
commit 55860debe5

15
common-lisp/main.lisp Normal file
View file

@ -0,0 +1,15 @@
(in-package #:cl-user)
(defpackage #:utils
(:documentation "Some utility functions and macros to wet my beak.")
(:use #:cl)
(:shadow #:type))
(in-package #:utils)
(defmacro type (name in out)
`(declaim (ftype (function ,in ,out) ,name)))
(defmacro comment (&rest _forms) nil)
(type add (int int) int)
(defun add (a b)
(+ a b))