diff options
| author | Alain Frisch <alain@frisch.fr> | 2013-09-12 13:41:01 +0000 |
|---|---|---|
| committer | Alain Frisch <alain@frisch.fr> | 2013-09-12 13:41:01 +0000 |
| commit | 6950d6f7808b23bab47e17cd58bd7ca671d34d95 (patch) | |
| tree | 236fb17df938fac287d41cad42dd4e5ca1ca10fd /ocamldoc | |
| parent | 290fe0c0b2f72d5caf38878502e80aa9c87d0373 (diff) | |
| download | ocaml-6950d6f7808b23bab47e17cd58bd7ca671d34d95.tar.gz | |
Do not keep file name in exception, after all.
git-svn-id: http://caml.inria.fr/svn/ocaml/branches/exception_registration@14110 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamldoc')
| -rw-r--r-- | ocamldoc/odoc_analyse.ml | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/ocamldoc/odoc_analyse.ml b/ocamldoc/odoc_analyse.ml index 37a83b504f..4ace701e77 100644 --- a/ocamldoc/odoc_analyse.ml +++ b/ocamldoc/odoc_analyse.ml @@ -44,7 +44,7 @@ let initial_env () = let preprocess sourcefile = try Pparse.preprocess sourcefile - with Pparse.Error (err, _file) -> + with Pparse.Error err -> Format.eprintf "Preprocessing error@.%a@." Pparse.report_error err; exit 2 |
