teitoku/rust-mal
1
0
Fork 0
mirror of https://github.com/teo3300/rust-mal.git synced 2026-01-12 01:05:32 +01:00
Code Issues Packages Projects Releases Wiki Activity

Adding helper functions

Browse Source 
- improved 'help'
- added 'find'
- using clojure syntax for function arguments

Signed-off-by: teo3300 <matteo.rogora@live.it>
This commit is contained in:
teo3300
2023-12-29 11:01:12 +09:00
parent 672c73cb4f
commit e6924d42b4
6 changed files with 47 additions and 24 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
tests/fibonacci.mal
View File

@ -1,8 +1,8 @@
(def! n-fib (fn* (n)
(def! n-fib (fn* [n]
(if (< n 2) n ; base
(+ (n-fib (- n 1)) (n-fib (- n 2)))))) ; recursive
(def! assert-fib (fn* (n expected) ; check fibonacci result
(def! assert-fib (fn* [n expected] ; check fibonacci result
(if (not (= (n-fib n) expected))
(do (prn (list
"Expected"