Skip to content

Instantly share code, notes, and snippets.

@pdonadeo

pdonadeo/rev.ml

Created June 8, 2017 20:17
Show Gist options
  • Save pdonadeo/c2f93594ee126f6cfd692d04f973f3a3 to your computer and use it in GitHub Desktop.
Save pdonadeo/c2f93594ee126f6cfd692d04f973f3a3 to your computer and use it in GitHub Desktop.
Download ZIP
Example of reversing a list in OCaml
Raw
rev.ml
let rec rev ?(acc = []) xs =
match xs with
| hd::tl -> rev ~acc:(hd::acc) tl
| [] -> acc
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment