hg.stevelosh.com > cl-netpbm

(eval-when (:compile-toplevel :load-toplevel :execute)
  (unless (find-package "NETPBM.QUICKUTILS")
    (defpackage "NETPBM.QUICKUTILS"
      (:documentation "Package that contains Quickutil utility functions.")
      (:use :cl))))

(in-package "NETPBM.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)
author	Steve Losh <steve@stevelosh.com>
date	Sat, 23 Feb 2019 14:24:43 -0500
parents	1e155f658715
children	(none)