adambard/learnxinyminutes-docs
1
1
Fork 0
mirror of https://github.com/adambard/learnxinyminutes-docs.git synced 2024-10-05 00:58:17 +03:00
Code Issues Projects Releases Wiki Activity

Recursive function a little bit to recursive

Browse Source 
Infinitely recursive
This commit is contained in:
Oscar 2014-10-18 11:44:44 +08:00
parent 8e723a5f45
commit b2cb538a5a
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ocaml.html.markdown
View File

@ -93,7 +93,7 @@ let inc_int (x: int) : int = x + 1 ;;
(* You need to mark recursive function definitions as such with "rec" keyword. *)
let rec factorial n =
if n = 0 then 1
else factorial n * factorial (n-1)
else n * factorial (n-1)
;;
(* Function application usually doesn't need parentheses around arguments *)