diff options
| author | Daniel de Rauglaudre <daniel.de_rauglaudre@inria.fr> | 2002-02-08 10:14:31 +0000 |
|---|---|---|
| committer | Daniel de Rauglaudre <daniel.de_rauglaudre@inria.fr> | 2002-02-08 10:14:31 +0000 |
| commit | c1e0dad2a8200e56dc4d15c0314d4cde7a80628c (patch) | |
| tree | faddc95d6739c75b5f8c5d26e3944807200b4b46 /driver/errors.ml | |
| parent | bd7a6924b6d9630c4b483adf98d519b2d9ecfa20 (diff) | |
Regroupement du preprocessage et de la lecture directe des fichiers source
à arbre de syntaxe, dans un nouveau fichier pparse.ml commun a compile.ml
et optcompile.ml
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4365 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'driver/errors.ml')
| -rw-r--r-- | driver/errors.ml | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/driver/errors.ml b/driver/errors.ml index 3d0b19774..73e7caf9b 100644 --- a/driver/errors.ml +++ b/driver/errors.ml @@ -29,6 +29,8 @@ let report_error ppf exn = Lexer.report_error ppf err | Syntaxerr.Error err -> Syntaxerr.report_error ppf err + | Pparse.Error -> + fprintf ppf "Preprocessor error" | Env.Error err -> Env.report_error ppf err | Ctype.Tags(l, l') -> fprintf ppf |