implement `swank:quit-inspector`

diff --git a/swank.R b/swank.R
index 2d2bf779cdb126f8a62af59429d0156257bedc5f..cb13210f87e9badfd929d49e9cfdec3dea25564a 100644 (file)
--- a/swank.R
+++ b/swank.R
@@ -536,3 +536,7 @@ emacsInspect.list <- function(list) {
            names(list), list))
 }
 
            names(list), list))
 }
 

+`swank:quit-inspector` <- function(slimeConnection, sldbState) {
+  resetInspector(slimeConnection)
+  FALSE
+}