mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2024-06-16 10:19:55 +00:00
Code Issues 1 Releases Wiki Activity

Add -m option to command line

Browse Source 
The -m option set the default system path for finding libraries
for that invocation of Janet.
This commit is contained in:
Calvin Rose 2019-02-18 15:06:17 -05:00
parent 540b326c54
commit 6af5800d21
2 changed files with 4 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
CHANGELOG.md
View File

@ -2,6 +2,8 @@
All notable changes to this project will be documented in this file. All notable changes to this project will be documented in this file.
## 0.4.0 - ?? ## 0.4.0 - ??
- Add `-m` flag to main client to allow specifying where to load
system modules from.
- Add `-c` flag to main client to allow compiling Janet modules to images. - Add `-c` flag to main client to allow compiling Janet modules to images.
- Add `string/format` and `buffer/format`. - Add `string/format` and `buffer/format`.
- Remove `string/pretty` and `string/number`. - Remove `string/pretty` and `string/number`.

2
src/mainclient/init.janet
View File

@ -22,6 +22,7 @@
-r : Enter the repl after running all scripts -r : Enter the repl after running all scripts
-p : Keep on executing if there is a top level error (persistent) -p : Keep on executing if there is a top level error (persistent)
-q : Hide prompt, logo, and repl output (quiet) -q : Hide prompt, logo, and repl output (quiet)
-m syspath : Set system path for loading global modules
-c source output : Compile janet source code into an image -c source output : Compile janet source code into an image
-l path : Execute code in a file before running the main script -l path : Execute code in a file before running the main script
-- : Stop handling options`) -- : Stop handling options`)
@ -32,6 +33,7 @@
"r" (fn [&] (set *should-repl* true) 1) "r" (fn [&] (set *should-repl* true) 1)
"p" (fn [&] (set *exit-on-error* false) 1) "p" (fn [&] (set *exit-on-error* false) 1)
"q" (fn [&] (set *quiet* true) 1) "q" (fn [&] (set *quiet* true) 1)
"m" (fn [i &] (set module/*syspath* (get process/args (+ i 1))) 2)
"c" (fn [i &] "c" (fn [i &]
(def e (require (get process/args (+ i 1)))) (def e (require (get process/args (+ i 1))))
(spit (get process/args (+ i 2)) (make-image e)) (spit (get process/args (+ i 2)) (make-image e))