vendor/quickutils-package.lisp @ d9139e596d0a
More `(setf (values ...) ...)`ing
| author | Steve Losh <steve@stevelosh.com> |
|---|---|
| date | Fri, 16 Dec 2016 20:23:33 -0500 |
| parents | d7119e2cc512 |
| children | (none) |
(eval-when (:compile-toplevel :load-toplevel :execute) (unless (find-package "CHIP8.QUICKUTILS") (defpackage "CHIP8.QUICKUTILS" (:documentation "Package that contains Quickutil utility functions.") (:use :cl)))) (in-package "CHIP8.QUICKUTILS") ;; need to define this here so sbcl will shut the hell up about it being ;; undefined when compiling quickutils.lisp. computers are trash. (defparameter *utilities* nil)