diff options
| author | Maxence Guesdon <maxence.guesdon@inria.fr> | 2002-03-27 16:20:32 +0000 |
|---|---|---|
| committer | Maxence Guesdon <maxence.guesdon@inria.fr> | 2002-03-27 16:20:32 +0000 |
| commit | 7a5ea2442771efc5ec966373c58bde9f02246308 (patch) | |
| tree | 02339c1cea31ad3ac277ca21c162242edb9837ba /ocamldoc/odoc_exception.ml | |
| parent | c2876e5c25499b496add82188a907866a504a312 (diff) | |
ajout ocamldoc, pas encore compile automatiquement
git-svn-id: http://caml.inria.fr/svn/ocaml/trunk@4566 f963ae5c-01c2-4b8c-9fe0-0dff7051ff02
Diffstat (limited to 'ocamldoc/odoc_exception.ml')
| -rw-r--r-- | ocamldoc/odoc_exception.ml | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/ocamldoc/odoc_exception.ml b/ocamldoc/odoc_exception.ml new file mode 100644 index 000000000..b5b41bf93 --- /dev/null +++ b/ocamldoc/odoc_exception.ml @@ -0,0 +1,29 @@ +(***********************************************************************) +(* OCamldoc *) +(* *) +(* Maxence Guesdon, projet Cristal, INRIA Rocquencourt *) +(* *) +(* Copyright 2001 Institut National de Recherche en Informatique et *) +(* en Automatique. All rights reserved. This file is distributed *) +(* under the terms of the Q Public License version 1.0. *) +(* *) +(***********************************************************************) + + +(** Representation and manipulation of exceptions. *) + +module Name = Odoc_name + +type exception_alias = { + ea_name : Name.t ; + mutable ea_ex : t_exception option ; + } + +and t_exception = { + ex_name : Name.t ; + mutable ex_info : Odoc_types.info option ; (** optional user information *) + ex_args : Types.type_expr list ; (** the types of the parameters *) + ex_alias : exception_alias option ; + mutable ex_loc : Odoc_types.location ; + } + |