diff options
Diffstat (limited to 'lib')
| -rw-r--r-- | lib/cErrors.ml | 3 | ||||
| -rw-r--r-- | lib/cErrors.mli | 3 |
2 files changed, 0 insertions, 6 deletions
diff --git a/lib/cErrors.ml b/lib/cErrors.ml index a42504701f..8406adfe18 100644 --- a/lib/cErrors.ml +++ b/lib/cErrors.ml @@ -39,9 +39,6 @@ let user_err ?loc ?hdr strm = Loc.raise ?loc (UserError (hdr, strm)) let invalid_arg ?loc s = Loc.raise ?loc (Invalid_argument s) -exception AlreadyDeclared of Pp.t (* for already declared Schemes *) -let alreadydeclared pps = raise (AlreadyDeclared(pps)) - exception Timeout let handle_stack = ref [] diff --git a/lib/cErrors.mli b/lib/cErrors.mli index 51ec5c907a..8580622095 100644 --- a/lib/cErrors.mli +++ b/lib/cErrors.mli @@ -41,9 +41,6 @@ val user_err : ?loc:Loc.t -> ?hdr:string -> Pp.t -> 'a (** Main error raising primitive. [user_err ?loc ?hdr pp] signals an error [pp] with optional header and location [hdr] [loc] *) -exception AlreadyDeclared of Pp.t -val alreadydeclared : Pp.t -> 'a - val invalid_arg : ?loc:Loc.t -> string -> 'a (** [todo] is for running of an incomplete code its implementation is |