mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-02-27 13:20:02 +00:00
Code Issues 1 Releases Wiki Activity

Merge pull request #603 from pepe/evcal-doc

Browse Source 
Fix ev/call doc
This commit is contained in:
Calvin Rose 2021-01-20 20:52:23 -06:00 committed by GitHub
commit f7ca6deeb0
No known key found for this signature in database
GPG Key ID: 4AEE18F83AFDEB23
1 changed files with 6 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
src/boot/boot.janet
View File

@ -3148,8 +3148,10 @@
(defn net/close "Alias for ev/close." [stream] (ev/close stream)) (defn net/close "Alias for ev/close." [stream] (ev/close stream))
(defn ev/call (defn ev/call
"Call a function asynchronously. Returns a fiber that is scheduled to " ```
"run the function." Call a function asynchronously.
Returns a fiber that is scheduled to run the function.
```
[f & args] [f & args]
(ev/go (fiber/new (fn [&] (f ;args)) :tp))) (ev/go (fiber/new (fn [&] (f ;args)) :tp)))
@ -3291,7 +3293,7 @@
(if-let [jp (getenv-alias "JANET_PATH")] (setdyn :syspath jp)) (if-let [jp (getenv-alias "JANET_PATH")] (setdyn :syspath jp))
(if-let [jp (getenv-alias "JANET_HEADERPATH")] (setdyn :headerpath jp)) (if-let [jp (getenv-alias "JANET_HEADERPATH")] (setdyn :headerpath jp))
(if-let [jprofile (getenv-alias "JANET_PROFILE")] (setdyn :profilepath jprofile)) (if-let [jprofile (getenv-alias "JANET_PROFILE")] (setdyn :profilepath jprofile))
# Flag handlers # Flag handlers
(def handlers (def handlers
{"h" (fn [&] {"h" (fn [&]
@ -3382,7 +3384,7 @@
(file/flush stdout) (file/flush stdout)
(file/read stdin :line buf)) (file/read stdin :line buf))
(def env (make-env)) (def env (make-env))
(when-let [profile.janet (dyn :profilepath)] (when-let [profile.janet (dyn :profilepath)]
(def new-env (dofile profile.janet :exit true)) (def new-env (dofile profile.janet :exit true))
(merge-module env new-env "" false)) (merge-module env new-env "" false))
(if *debug* (put env :debug true)) (if *debug* (put env :debug true))