mirror of
https://github.com/janet-lang/janet
synced 2025-01-24 06:06:52 +00:00
Remove extra code.
This commit is contained in:
parent
169a22f03e
commit
7a7291ac3a
@ -1,5 +1,5 @@
|
||||
# Copyright 2017-2018 (C) Calvin Rose
|
||||
(table.setproto @{ 1 2} @{})
|
||||
|
||||
(do
|
||||
|
||||
(var *should-repl* :private false)
|
||||
@ -10,7 +10,7 @@
|
||||
|
||||
# Flag handlers
|
||||
(def handlers :private
|
||||
{"h" (fn @[]
|
||||
{"h" (fn []
|
||||
(print "usage: " (get args 0) " [options] scripts...")
|
||||
(print
|
||||
`Options are:
|
||||
@ -54,7 +54,7 @@
|
||||
(repl nil identity)
|
||||
(do
|
||||
(print (string "Dst " VERSION " Copyright (C) 2017-2018 Calvin Rose"))
|
||||
(repl (fn @[buf p]
|
||||
(repl (fn [buf p]
|
||||
(def [line] (parser.where p))
|
||||
(def prompt (string "dst:" line ":" (parser.state p) "> "))
|
||||
(getline prompt buf)))))))
|
||||
|
Loading…
Reference in New Issue
Block a user