diff --git a/utils.lisp b/utils.lisp
index 930731b..e62cdaa 100644
--- a/utils.lisp
+++ b/utils.lisp
@@ -38,6 +38,10 @@
   `(insystem? (export*! ,@val) 
 	      (mapc #'eval '(,@val))))
 
+(defmacro defexport (&rest val)
+  `(export*! ,@val))
+(export? defexport)
+
 (defun file-get-contents (filename)
   (with-open-file (stream filename)
     (let ((contents (make-string (file-length stream))))