[#351] exit REPL on ctrl-D

This commit is contained in:
Michiel Borkent 2020-04-14 13:12:33 +02:00 committed by GitHub
parent 3ec5e1806d
commit ffcbfa02b8
No known key found for this signature in database
GPG key ID: 4AEE18F83AFDEB23
4 changed files with 9 additions and 13 deletions

View file

@ -1,7 +1,7 @@
{:paths ["src" "sci/src" "babashka.curl/src" "resources" "sci/resources"],
:deps {org.clojure/clojure {:mvn/version "1.10.2-alpha1"},
org.clojure/tools.reader {:mvn/version "1.3.2"},
borkdude/edamame {:mvn/version "0.0.11-alpha.6"},
borkdude/edamame {:mvn/version "0.0.11-alpha.8"},
borkdude/graal.locking {:mvn/version "0.0.2"},
borkdude/sci.impl.reflector {:mvn/version "0.0.1"}
org.clojure/core.async {:mvn/version "1.0.567"},

View file

@ -13,7 +13,7 @@
:resource-paths ["resources" "sci/resources"]
:dependencies [[org.clojure/clojure "1.10.2-alpha1"]
[org.clojure/tools.reader "1.3.2"]
[borkdude/edamame "0.0.11-alpha.6"]
[borkdude/edamame "0.0.11-alpha.8"]
[borkdude/graal.locking "0.0.2"]
[borkdude/sci.impl.reflector "0.0.1"]
[org.clojure/core.async "1.0.567"]

2
sci

@ -1 +1 @@
Subproject commit b425eedeebd8612d42befa92b800a25c824b8c49
Subproject commit 22bd92211c82b885b079b94d175eb821edb2e9b4

View file

@ -38,16 +38,12 @@
(eval-form sci-ctx '(use 'clojure.repl))))
:read (or read
(fn [_request-prompt request-exit]
;; (prn "PEEK" @sci/in (r/peek-char @sci/in))
;; (prn "PEEK" @sci/in (r/peek-char @sci/in)) this works fine
(if (r/peek-char in) ;; if this is nil, we reached EOF
(let [v (parser/parse-next sci-ctx in)]
(if (or (identical? :repl/quit v)
(identical? :repl/exit v)
(identical? :edamame.impl.parser/eof v))
request-exit
v))
request-exit)))
v))))
:eval (or eval
(fn [expr]
(let [ret (eval-form (update sci-ctx