(in-package :swank)

(defmacro null-exports (&body exports)
 `(progn ,@(mapcar #'(lambda (name) `(progn (defun ,name ()) (export ',name))) exports)))

; TODO - arrange these properly
(null-exports 
 ; Init/misc stuff
              connection-info
              arglist-for-echo-area
              swank-macroexpand-1
              swank-macroexpand-all
 ; eval/compile
              listener-eval
              interactive-eval
              compile-file-for-emacs
              re-evaluate-defvar
              compile-string-for-emacs
              compiler-notes-for-emacs
 ; SLDB
              invoke-nth-restart-for-emacs
              throw-to-toplevel
              debugger-info-for-emacs
              frame-locals-for-emacs
 ; Inspector
              init-inspector
              inspect-nth-part
              inspector-pop
              quit-inspector)