Don't throw in test code
This commit is contained in:
parent
31d407c181
commit
9fd69b57f3
|
@ -252,20 +252,8 @@
|
||||||
|
|
||||||
(def source "
|
(def source "
|
||||||
|
|
||||||
fn fib {
|
let s = @{:foo @{:baz 12}, :bar 23}
|
||||||
(0) -> 1
|
s :foo :baz
|
||||||
(1) -> 1
|
|
||||||
(n) -> add (
|
|
||||||
fib (sub (n, 1))
|
|
||||||
fib (sub (n, 2)))
|
|
||||||
}
|
|
||||||
|
|
||||||
fn fact {
|
|
||||||
(1) -> 1
|
|
||||||
(n) -> mult (n, fact (sub (n, 1)))
|
|
||||||
}
|
|
||||||
|
|
||||||
fib (1)
|
|
||||||
|
|
||||||
")
|
")
|
||||||
|
|
||||||
|
|
Loading…
Reference in New Issue
Block a user