From 986bcb796d8b9e1f485baa8da599aa816c56b587 Mon Sep 17 00:00:00 2001 From: Sébastien Dailly Date: Tue, 7 Jan 2025 22:40:19 +0100 Subject: Explicitly list all the availables functions --- lib/errors/importErrors.ml | 4 ++++ 1 file changed, 4 insertions(+) (limited to 'lib/errors/importErrors.ml') diff --git a/lib/errors/importErrors.ml b/lib/errors/importErrors.ml index 04f9deb..782291e 100644 --- a/lib/errors/importErrors.ml +++ b/lib/errors/importErrors.ml @@ -25,6 +25,7 @@ exception SqlError of Sqlite3.Rc.t exception MisplacedWindow exception Unknown_source of string exception Unknown_extension of string +exception UnknowFunction of string exception Cycle of string list (** Cycle between the dpendencies *) @@ -53,6 +54,9 @@ let repr_error = function (ImportDataTypes.Types.string_of_t expected) expression | Unknown_extension ext -> Printf.sprintf "Unknown file extension %s" ext + | UnknowFunction name -> + Printf.sprintf "Unknown function or wrong number of arguments for '%s'" + name | Cycle deps -> Printf.sprintf "Cycle between the dependencies : %s" (String.concat ~sep:"," deps) -- cgit v1.2.3