aboutsummaryrefslogtreecommitdiff
path: root/errors.ml
diff options
context:
space:
mode:
Diffstat (limited to 'errors.ml')
-rwxr-xr-xerrors.ml14
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"