mirrors/janet
1
0
Fork 0
mirror of https://github.com/janet-lang/janet synced 2025-01-23 13:46:52 +00:00
Code Issues 1 Releases Wiki Activity

Add sum and product functions to boot.dst.

Browse Source
This commit is contained in:
Calvin Rose 2018-05-26 14:21:49 -04:00
parent 8a346ec655
commit 3b30b98ec0
1 changed files with 3 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/compiler/boot.dst
View File

@ -102,6 +102,9 @@
})
(fn [x] (not (get non-atomic-types (type x))))))
(defn sum [xs] (apply1 + xs))
(defn product [xs] (apply1 * xs))
# C style macros and functions for imperative sugar
(defn inc [x] (+ x 1))
(defn dec [x] (- x 1))