Skip to content

Commit

Permalink
Eliminate useless rec.
Browse files Browse the repository at this point in the history
git-svn-id: http://caml.inria.fr/svn/ocaml/version/4.00@12506 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
  • Loading branch information
alainfrisch committed May 29, 2012
1 parent e08cb66 commit 34aed3f
Showing 1 changed file with 1 addition and 1 deletion.
2 changes: 1 addition & 1 deletion stdlib/scanf.ml
Original file line number Diff line number Diff line change
Expand Up @@ -1032,7 +1032,7 @@ let scan_range fmt j =
scan_closing (j + 1)
| _ -> scan_closing j in

let rec scan_first_neg j =
let scan_first_neg j =
if j >= len then incomplete_format fmt else
match Sformat.get fmt j with
| '^' ->
Expand Down

0 comments on commit 34aed3f

Please sign in to comment.