1
0
mirror of https://github.com/janet-lang/janet synced 2024-11-28 11:09:54 +00:00

Add help text to repl line.

This commit is contained in:
Calvin Rose 2020-09-19 16:35:32 -05:00
parent 32bf70571a
commit cc0035b1d7

View File

@ -2868,7 +2868,7 @@
(when (and (not *compile-only*) (or *should-repl* *no-file*)) (when (and (not *compile-only*) (or *should-repl* *no-file*))
(if-not *quiet* (if-not *quiet*
(print "Janet " janet/version "-" janet/build " " (os/which) "/" (os/arch))) (print "Janet " janet/version "-" janet/build " " (os/which) "/" (os/arch) " - '(doc)' for help"))
(flush) (flush)
(defn getprompt [p] (defn getprompt [p]
(def [line] (parser/where p)) (def [line] (parser/where p))