3 * COPYRIGHT (c
) 1993 by AT
&T Bell Laboratories
. See COPYRIGHT file for details
.
9 exception Unimplemented
of string
10 (* raised to report unimplemented features
*)
11 exception Impossible
of string
12 (* raised to report internal errors
*)
15 (* raised by searching operations
*)
17 val failure
: {module
: string, func
: string, msg
: string} -> 'a
18 (* raise the
exception Fail
with a standard format message
. *)
20 val version
: {date
: string, system
: string, version_id
: int list
}