7 lines
129 B
Plaintext
7 lines
129 B
Plaintext
(let x (function int [function in int num]
|
|
(print "recursively called" (+ num 1) "times")
|
|
(in in (+ num 1))
|
|
))
|
|
|
|
(x x 1)
|