diff options
| author | Andrey Orst <andreyorst@gmail.com> | 2020-11-09 22:33:42 +0300 |
|---|---|---|
| committer | Andrey Orst <andreyorst@gmail.com> | 2020-11-09 22:33:42 +0300 |
| commit | 7ac429383b6fb61c24de2b7f9b1322dfdaea6f93 (patch) | |
| tree | 83809b48c98f99db5e9609ef0fd640f637a3ac6f /core.fnl | |
| parent | 40eeb480099fe238ae03566ae7167003789ea4c7 (diff) | |
fix(core): rename plus to add, minus to sub
Diffstat (limited to 'core.fnl')
| -rw-r--r-- | core.fnl | 8 |
1 files changed, 4 insertions, 4 deletions
@@ -501,21 +501,21 @@ that would apply to that value, or `nil' if none apply and no default." (or (. (getmetatable multifn) :multimethods dispatch-val) (. (getmetatable multifn) :multimethods :default))) -(fn* core.plus +(fn* core.add ([] 0) ([a] a) ([a b] (+ a b)) ([a b c] (+ a b c)) ([a b c d] (+ a b c d)) - ([a b c d & rest] (apply plus (+ a b c d) rest))) + ([a b c d & rest] (apply add (+ a b c d) rest))) -(fn* core.minus +(fn* core.sub ([] 0) ([a] (- a)) ([a b] (- a b)) ([a b c] (- a b c)) ([a b c d] (- a b c d)) - ([a b c d & rest] (apply minus (- a b c d) rest))) + ([a b c d & rest] (apply sub (- a b c d) rest))) (fn* core.mul ([] 1) |