chiark / gitweb /
atoms.lisp: Move `export' calls to near the appropriate definition.
authorMark Wooding <mdw@distorted.org.uk>
Sun, 24 Mar 2013 01:21:40 +0000 (01:21 +0000)
committerMark Wooding <mdw@distorted.org.uk>
Sun, 24 Mar 2013 01:21:40 +0000 (01:21 +0000)
atoms.lisp

index c68a6677ff546fa43de55c94679938250164acc9..3f225b39c8dc77ea2125b33a5400c78af1cbb423 100644 (file)
@@ -26,8 +26,7 @@ (cl:defpackage #:atoms
        #+cmu #:ext
        #+sbcl #:sb-ext
        #+clisp #:ext)
-  #+clisp (:shadow #:map-dependents #:add-dependent #:remove-dependent)
-  (:export #:start-atom-game))
+  #+clisp (:shadow #:map-dependents #:add-dependent #:remove-dependent))
 (cl:in-package #:atoms)
 
 (eval-when (:compile-toplevel :load-toplevel :execute)
@@ -1150,6 +1149,7 @@ (defmethod shared-initialize :after
 
 (defvar *window* nil)
 
+(export 'start-atom-game)
 (defun start-atom-game (&rest initargs)
   (when *window*
     (gtk:widget-destroy *window*)