# HG changeset patch
# User Steve Losh <steve@stevelosh.com>
# Date 1470359452 0
# Node ID e212ea9a215914473b33a976b0a02faefeb99dca
# Parent  674116652382dde755b11b9facdadf33277eee02
Christ

diff -r 674116652382 -r e212ea9a2159 package.lisp
--- a/package.lisp	Fri Aug 05 01:07:41 2016 +0000
+++ b/package.lisp	Fri Aug 05 01:10:52 2016 +0000
@@ -13,6 +13,7 @@
     #:spit
     #:d
     #:clamp
+    #:symbolize
 
     #:dlambda
 
diff -r 674116652382 -r e212ea9a2159 src/main.lisp
--- a/src/main.lisp	Fri Aug 05 01:07:41 2016 +0000
+++ b/src/main.lisp	Fri Aug 05 01:10:52 2016 +0000
@@ -52,8 +52,6 @@
           *screen-center-y* (floor h 2))))
 
 
-(defun symbolize (&rest args)
-  (intern (format nil "~{~A~}" args)))
 
 (defmacro render (&body body)
   `(prog2
diff -r 674116652382 -r e212ea9a2159 src/utils.lisp
--- a/src/utils.lisp	Fri Aug 05 01:07:41 2016 +0000
+++ b/src/utils.lisp	Fri Aug 05 01:10:52 2016 +0000
@@ -69,6 +69,9 @@
                                       :if-exists :supersede)
      ,@body))
 
+(defun symbolize (&rest args)
+  (intern (format nil "~{~A~}" args)))
+
 
 ;;;; Maths
 (defun d (n sides &optional (plus 0))