yogsototh/leiningen
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

Fixed the explosion of REPL on bad input.

Browse source
This commit is contained in:
Isaac Hodes 2010-08-22 22:30:03 -04:00 committed by Phil Hagelberg
parent a21362699d
commit 8ec9b4a9ba
1 changed files with 2 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
src/leiningen/repl.clj
View file

@ -58,7 +58,8 @@
(defn- repl-client [reader writer]
(copy-out reader)
(let [eof (Object.)
input (read *in* false eof)]
input (try (read *in* false eof)
(catch Exception e nil))]
(when-not (= eof input)
(.write writer (str (pr-str input) "\n"))
(.flush writer)