diff options
Diffstat (limited to 'errors.ml')
-rwxr-xr-x | errors.ml | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/errors.ml b/errors.ml deleted file mode 100755 index 3751a60..0000000 --- a/errors.ml +++ /dev/null @@ -1,14 +0,0 @@ -
-(** The function is undefined *)
-exception Undefined of UTF8.t * string list
-
-exception TypeError
-
-exception Cycle
-
-let printf formatter = function
- | Undefined (name, args) -> Format.fprintf formatter
- "There is no function '%s' with signature %a"
- (UTF8.to_utf8string name)
- (Format.pp_print_list Format.pp_print_text) args
- | _ -> Format.fprintf formatter "#Error"
|