Eliminate useless rec.

git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@12507 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
2012-05-29 12:52:44 +00:00 · 2012-05-29 12:52:44 +00:00 · e489d6e3f4
parent 1cc8f999d8
commit e489d6e3f4
1 changed files with 1 additions and 1 deletions
--- a/stdlib/arg.ml
+++ b/stdlib/arg.ml
@ -219,7 +219,7 @@ let parse l f msg =
  | Help msg -> printf "%s" msg; exit 0;
 ;;

-let rec second_word s =
+let second_word s =
  let len = String.length s in
  let rec loop n =
    if n >= len then len