Skip to content

Instantly share code, notes, and snippets.

@tylerFowler

tylerFowler/upcase_first.ml

Created December 22, 2014 21:58
Show Gist options
  • Save tylerFowler/d260ec1d8bee4e5cba81 to your computer and use it in GitHub Desktop.
Save tylerFowler/d260ec1d8bee4e5cba81 to your computer and use it in GitHub Desktop.
Download ZIP
Example of OCaml `let .. in` constructs
Raw
upcase_first.ml
let upcase_first_entry line =
let (first :: rest) = String.split ~on:',' line in
String.concat ~sep:","
(String.uppercase first :: rest)
;;
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment