1
0
mirror of https://github.com/janet-lang/janet synced 2024-12-25 16:00:27 +00:00

Merge branch 'master' of github.com:janet-lang/janet

This commit is contained in:
Calvin Rose 2020-06-29 22:57:46 -05:00
commit 7fb8c4a68d
2 changed files with 5 additions and 3 deletions

View File

@ -1215,7 +1215,8 @@
res)
(defn reverse
"Reverses the order of the elements in a given array or tuple and returns a new array."
"Reverses the order of the elements in a given array or buffer and returns it
mutated."
[t]
(def len-1 (- (length t) 1))
(def half (/ len-1 2))
@ -1228,7 +1229,8 @@
t)
(defn reversed
"Reverses the order of the elements in a given array or tuple and returns a new array."
"Reverses the order of the elements in a given array or tuple and returns
a new array. If string or buffer is provided function returns array of chars reversed."
[t]
(def len (length t))
(var n (- len 1))

View File

@ -112,7 +112,7 @@ typedef struct {
#endif
static JanetStream *make_stream(int fd, int flags) {
JanetStream *stream = janet_abstract(&StreamAT, sizeof(JanetStream));
#ifndef SOCK_CLOEXEC
#if !defined(SOCK_CLOEXEC) && defined(O_CLOEXEC)
int extra = O_CLOEXEC;
#else
int extra = 0;