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)