Ekdohibs
/
ocaml
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity
ocaml/testasmcomp/fib.cmm

6 lines
112 B
Plaintext
Raw Blame History

(function "fib" (n: int)
(if (< n 2)
1
(+ (app "fib" (- n 1) int)
(app "fib" (- n 2) int))))
Reference in New Issue View Git Blame Copy Permalink