diff options
| author | Damien Doligez <damien.doligez-inria.fr> | 2012-07-30 11:52:38 +0000 |
|---|---|---|
| committer | Damien Doligez <damien.doligez-inria.fr> | 2012-07-30 11:52:38 +0000 |
| commit | b7271628a25d208c90e77dce62ff0244a1c2fcdd (patch) | |
| tree | ddb823c71ff039afc8ef7efb8557ef849dec7c3b /ocamldoc/odoc_name.ml | |
| parent | f6f54d325d799f45dbf18e45f1af6e9702861413 (diff) | |
fix TABs and whitespace
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@12797 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamldoc/odoc_name.ml')
| -rw-r--r-- | ocamldoc/odoc_name.ml | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/ocamldoc/odoc_name.ml b/ocamldoc/odoc_name.ml index 7d059df40..9a934d752 100644 --- a/ocamldoc/odoc_name.ml +++ b/ocamldoc/odoc_name.ml @@ -52,11 +52,11 @@ let strip_string s = else match s.[n] with ' ' | '\t' | '\n' | '\r' -> iter_last (n-1) - | _ -> Some n + | _ -> Some n in match iter_last (len-1) with None -> String.sub s first 1 - | Some last -> String.sub s first ((last-first)+1) + | Some last -> String.sub s first ((last-first)+1) let parens_if_infix name = match strip_string name with |