inflow

00003c(:emacs-rex (swank:connection-info) "COMMON-LISP-USER" t 1)
00003c(:emacs-rex (swank:create-repl nil) "COMMON-LISP-USER" t 2)
000049(:emacs-rex (swank:operator-arglist "def" "user") "user" :repl-thread 3)
000049(:emacs-rex (swank:operator-arglist "def" "user") "user" :repl-thread 4)
000065(:emacs-rex (swank:listener-eval "(def foo \"this was typed at the repl\")
") "user" :repl-thread 5)
000037(:emacs-rex (swank:operator-arglist "ns" nil) nil t 6)
000071(:emacs-rex (swank:buffer-first-change "/home/tomoj/code/clojure/swank_test.clj") "com.tomojack.swank-test" t 7)
000064(:emacs-rex (swank:operator-arglist "def" "com.tomojack.swank-test") "com.tomojack.swank-test" t 8)
000064(:emacs-rex (swank:operator-arglist "def" "com.tomojack.swank-test") "com.tomojack.swank-test" t 9)
00008b(:emacs-rex (swank:compile-file-for-emacs "/home/tomoj/code/clojure/swank_test.clj" t :policy (quote nil)) "com.tomojack.swank-test" t 10)
000072(:emacs-rex (swank:buffer-first-change "/home/tomoj/code/clojure/swank_test.clj") "com.tomojack.swank-test" t 11)
00007c(:emacs-rex (swank:interactive-eval "(def foo \"this code is being loaded with C-x C-e\")") "com.tomojack.swank-test" t 12)
000045(:emacs-rex (swank:list-all-package-names t) "user" :repl-thread 13)
000052(:emacs-rex (swank:set-package "com.tomojack.swank-test") "user" :repl-thread 14)
000074(:emacs-rex (swank:operator-arglist "println" "com.tomojack.swank-test") "com.tomojack.swank-test" :repl-thread 15)
000099(:emacs-rex (swank:listener-eval "(println \"I just switched into the com.tomojack.swank-test namespace\")
") "com.tomojack.swank-test" :repl-thread 16)
000077(:emacs-rex (swank:listener-eval "(println \"now let's try completion\")
") "com.tomojack.swank-test" :repl-thread 17)
000072(:emacs-rex (swank:buffer-first-change "/home/tomoj/code/clojure/swank_test.clj") "com.tomojack.swank-test" t 18)
00006e(:emacs-rex (swank:simple-completions "ma" (quote "com.tomojack.swank-test")) "com.tomojack.swank-test" t 19)
00006f(:emacs-rex (swank:simple-completions "map" (quote "com.tomojack.swank-test")) "com.tomojack.swank-test" t 20)
000065(:emacs-rex (swank:operator-arglist "map" "com.tomojack.swank-test") "com.tomojack.swank-test" t 21)
00006f(:emacs-rex (swank:simple-completions "app" (quote "com.tomojack.swank-test")) "com.tomojack.swank-test" t 22)
000065(:emacs-rex (swank:operator-arglist "map" "com.tomojack.swank-test") "com.tomojack.swank-test" t 23)
00006f(:emacs-rex (swank:simple-completions "red" (quote "com.tomojack.swank-test")) "com.tomojack.swank-test" t 24)
000072(:emacs-rex (swank:simple-completions "reduce" (quote "com.tomojack.swank-test")) "com.tomojack.swank-test" t 25)
000068(:emacs-rex (swank:operator-arglist "reduce" "com.tomojack.swank-test") "com.tomojack.swank-test" t 26)
00006a(:emacs-rex (swank:listener-eval "(println \"ok, now M-.\")
") "com.tomojack.swank-test" :repl-thread 27)
000064(:emacs-rex (swank:find-definitions-for-emacs "println") "com.tomojack.swank-test" :repl-thread 28)
00006a(:emacs-rex (swank:operator-arglist ":require" "com.tomojack.swank-test") "com.tomojack.swank-test" t 29)
00006c(:emacs-rex (swank:operator-arglist "swank.core" "com.tomojack.swank-test") "com.tomojack.swank-test" t 30)
00006c(:emacs-rex (swank:operator-arglist "swank.core" "com.tomojack.swank-test") "com.tomojack.swank-test" t 31)
00008b(:emacs-rex (swank:compile-file-for-emacs "/home/tomoj/code/clojure/swank_test.clj" t :policy (quote nil)) "com.tomojack.swank-test" t 32)
000079(:emacs-rex (swank:simple-completions "swank.core/br" (quote "com.tomojack.swank-test")) "com.tomojack.swank-test" t 33)
000072(:emacs-rex (swank:buffer-first-change "/home/tomoj/code/clojure/swank_test.clj") "com.tomojack.swank-test" t 34)
000066(:emacs-rex (swank:operator-arglist "defn" "com.tomojack.swank-test") "com.tomojack.swank-test" t 35)
000066(:emacs-rex (swank:operator-arglist "defn" "com.tomojack.swank-test") "com.tomojack.swank-test" t 36)
000065(:emacs-rex (swank:operator-arglist "let" "com.tomojack.swank-test") "com.tomojack.swank-test" t 37)
000063(:emacs-rex (swank:operator-arglist "a" "com.tomojack.swank-test") "com.tomojack.swank-test" t 38)
000063(:emacs-rex (swank:operator-arglist "a" "com.tomojack.swank-test") "com.tomojack.swank-test" t 39)
000063(:emacs-rex (swank:operator-arglist "a" "com.tomojack.swank-test") "com.tomojack.swank-test" t 40)
00007d(:emacs-rex (swank:listener-eval "(println \"now let's try swank.core/break\")
") "com.tomojack.swank-test" :repl-thread 41)
00008b(:emacs-rex (swank:compile-file-for-emacs "/home/tomoj/code/clojure/swank_test.clj" t :policy (quote nil)) "com.tomojack.swank-test" t 42)
000056(:emacs-rex (swank:listener-eval "(foo)
") "com.tomojack.swank-test" :repl-thread 43)
000052(:emacs-rex (swank:frame-locals-and-catch-tags 0) "com.tomojack.swank-test" 1 44)
000055(:emacs-rex (swank:invoke-nth-restart-for-emacs 1 1) "com.tomojack.swank-test" 1 45)
000056(:emacs-rex (swank:listener-eval "(foo)
") "com.tomojack.swank-test" :repl-thread 46)
000055(:emacs-rex (swank:invoke-nth-restart-for-emacs 1 0) "com.tomojack.swank-test" 1 47)
000049(:emacs-rex (swank:quit-lisp) "com.tomojack.swank-test" :repl-thread 48)

outflow

00033b(:indentation-update (("dothread-keeping-clj" . 1) ("dothread-keeping" . 1) ("dothread" . 0) ("binding-map" . 1) ("with-pretty-writer" . 1) ("with-pprint-dispatch" . 1) ("with-connection" . 1) ("with-bindings" . 0) ("with-emacs-package" . 0) ("dothread-swank" . 0) ("with-package-tracking" . 0) ("doseq" . 1) ("letfn" . 1) ("cond" . 0) ("with-open" . 1) ("sync" . 1) ("let" . 1) ("dotimes" . 1) ("with-in-str" . 1) ("loop" . 1) ("with-out-str" . 0) ("when-not" . 1) ("with-loading-context" . 0) ("future" . 0) ("when-first" . 1) ("comment" . 0) ("condp" . 2) ("with-local-vars" . 1) ("with-bindings" . 1) ("when-let" . 1) ("while" . 1) ("case" . 1) ("locking" . 1) ("delay" . 0) ("io!" . 0) ("lazy-seq" . 0) ("when" . 1) ("binding" . 1) ("defslimefn" . defun) ("returning" . 1) ("continuously" . 0) ("failing-gracefully" . 0)))
0000b6(:return (:ok (:pid "9118" :style :spawn :lisp-implementation (:type "Clojure" :name "clojure" :version "1.2.0-beta1") :package (:name "user" :prompt "user") :version "20100404")) 1)
000021(:return (:ok ("user" "user")) 2)
000015(:return (:ok nil) 3)
000015(:return (:ok nil) 4)
00002a(:write-string "#'user/foo
" :repl-result)
000015(:return (:ok nil) 5)
00003d(:return (:ok "([name docstring? attr-map? references*])") 6)
000015(:return (:ok nil) 7)
000015(:return (:ok nil) 8)
000015(:return (:ok nil) 9)
00002d(:indentation-update (("with-bindings" . 0)))
000058(:return (:ok (:compilation-result nil "#'com.tomojack.swank-test/foo" 0.011242879)) 10)
000016(:return (:ok nil) 11)
000032(:return (:ok "#'com.tomojack.swank-test/foo") 12)
0003ac(:return (:ok ("clojure.contrib.macro-utils" "swank.core.threadmap" "swank.rpc" "clojure.set" "swank.util.io" "swank.util.concurrent.thread" "clojure.pprint" "swank.commands.inspector" "swank.core.connection" "swank.util.net.sockets" "swank.commands.contrib" "swank.clj-contrib.pprint" "clojure.walk" "user" "swank.util.java" "clojure.contrib.def" "swank.commands.basic" "swank.util.sys" "swank.clj-contrib.macroexpand" "clojure.main" "swank.commands.completion" "swank.core" "swank.core.server" "clojure.core" "clojure.java.shell" "swank.commands" "clojure.zip" "clojure.java.browse" "swank.swank" "clojure.repl" "swank.util.class-browse" "swank.util.hooks" "swank.commands.indent" "swank.util.string" "clojure.java.io" "swank.core.hooks" "swank.commands.xref" "swank.util.concurrent.mbox" "clojure.core.protocols" "clojure.xml" "clojure.java.javadoc" "swank.util.clojure" "com.tomojack.swank-test" "swank.util" "swank.core.protocol")) 13)
000048(:return (:ok ("com.tomojack.swank-test" "com.tomojack.swank-test")) 14)
00001f(:return (:ok "([& more])") 15)
00004d(:write-string "I just switched into the com.tomojack.swank-test namespace
")
000023(:write-string "nil
" :repl-result)
000016(:return (:ok nil) 16)
00002b(:write-string "now let's try completion
")
000023(:write-string "nil
" :repl-result)
000016(:return (:ok nil) 17)
000016(:return (:ok nil) 18)
00008b(:return (:ok (("macroexpand" "macroexpand-1" "make-array" "make-hierarchy" "map" "map-indexed" "map?" "mapcat" "max" "max-key") "ma")) 19)
000040(:return (:ok (("map" "map-indexed" "map?" "mapcat") "map")) 20)
00004b(:return (:ok "([f coll] [f c1 c2] [f c1 c2 c3] [f c1 c2 c3 & colls])") 21)
000026(:return (:ok (("apply") "apply")) 22)
00004b(:return (:ok "([f coll] [f c1 c2] [f c1 c2 c3] [f c1 c2 c3 & colls])") 23)
000034(:return (:ok (("reduce" "reductions") "reduc")) 24)
000028(:return (:ok (("reduce") "reduce")) 25)
00002c(:return (:ok "([f coll] [f val coll])") 26)
00001e(:write-string "ok, now M-.
")
000023(:write-string "nil
" :repl-result)
000016(:return (:ok nil) 27)
00009d(:return (:ok (("(defn println)" (:location (:zip "/home/tomoj/code/clojure/sexpbot/lib/clojure-1.2.0-beta1.jar" "clojure/core.clj") (:line 2865) nil)))) 28)
00001c(:return (:ok "([map])") 29)
000016(:return (:ok nil) 30)
000016(:return (:ok nil) 31)
000057(:return (:ok (:compilation-result nil "#'com.tomojack.swank-test/foo" 0.01469323)) 32)
00003c(:return (:ok (("swank.core/break") "swank.core/break")) 33)
000016(:return (:ok nil) 34)
00007c(:return (:ok "([name doc-string? attr-map? [params*] body] [name doc-string? attr-map? ([params*] body) + attr-map?])") 35)
00007c(:return (:ok "([name doc-string? attr-map? [params*] body] [name doc-string? attr-map? ([params*] body) + attr-map?])") 36)
000028(:return (:ok "([bindings & body])") 37)
000016(:return (:ok nil) 38)
000016(:return (:ok nil) 39)
000016(:return (:ok nil) 40)
000031(:write-string "now let's try swank.core/break
")
000023(:write-string "nil
" :repl-result)
000016(:return (:ok nil) 41)
000058(:return (:ok (:compilation-result nil "#'com.tomojack.swank-test/foo" 0.014149899)) 42)
000398(:debug 1 1 ("BREAK:" "  [Thrown class java.lang.Exception]" nil) (("QUIT" "Quit to the SLIME top level") ("CONTINUE" "Continue from breakpoint")) ((0 "com.tomojack.swank_test$foo.invoke(swank_test.clj:9)" (:restartable nil)) (1 "com.tomojack.swank_test$eval1680.invoke(NO_SOURCE_FILE:1)" (:restartable nil)) (2 "clojure.lang.Compiler.eval(Compiler.java:5419)" (:restartable nil)) (3 "clojure.lang.Compiler.eval(Compiler.java:5386)" (:restartable nil)) (4 "clojure.core$eval.invoke(core.clj:2382)" (:restartable nil)) (5 "swank.commands.basic$eval_region.invoke(basic.clj:47)" (:restartable nil)) (6 "swank.commands.basic$eval_region.invoke(basic.clj:37)" (:restartable nil)) (7 "swank.commands.basic$eval807$listener_eval__808.invoke(basic.clj:71)" (:restartable nil)) (8 "clojure.lang.Var.invoke(Var.java:365)" (:restartable nil)) (9 "com.tomojack.swank_test$eval1678.invoke(NO_SOURCE_FILE)" (:restartable nil))) (43))
000019(:debug-activate 1 1 nil)
000054(:return (:ok (((:name "b" :id 0 :value "2") (:name "a" :id 0 :value "1")) nil)) 44)
000019(:debug-activate 1 1 nil)
000015(:return (:abort) 45)
000017(:debug-return 1 1 nil)
000023(:write-string "nil
" :repl-result)
000016(:return (:ok nil) 43)
000398(:debug 1 1 ("BREAK:" "  [Thrown class java.lang.Exception]" nil) (("QUIT" "Quit to the SLIME top level") ("CONTINUE" "Continue from breakpoint")) ((0 "com.tomojack.swank_test$foo.invoke(swank_test.clj:9)" (:restartable nil)) (1 "com.tomojack.swank_test$eval1688.invoke(NO_SOURCE_FILE:1)" (:restartable nil)) (2 "clojure.lang.Compiler.eval(Compiler.java:5419)" (:restartable nil)) (3 "clojure.lang.Compiler.eval(Compiler.java:5386)" (:restartable nil)) (4 "clojure.core$eval.invoke(core.clj:2382)" (:restartable nil)) (5 "swank.commands.basic$eval_region.invoke(basic.clj:47)" (:restartable nil)) (6 "swank.commands.basic$eval_region.invoke(basic.clj:37)" (:restartable nil)) (7 "swank.commands.basic$eval807$listener_eval__808.invoke(basic.clj:71)" (:restartable nil)) (8 "clojure.lang.Var.invoke(Var.java:365)" (:restartable nil)) (9 "com.tomojack.swank_test$eval1686.invoke(NO_SOURCE_FILE)" (:restartable nil))) (46))
000019(:debug-activate 1 1 nil)
000015(:return (:abort) 47)
000017(:debug-return 1 1 nil)
000015(:return (:abort) 46)