From db3198d7c5ad7bc60bd24bd1bb2c7b122a6dfbd0 Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Sat, 23 May 2026 01:07:14 +0000 Subject: Include messages on on all conditions --- lib/system.ml | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib/system.ml') diff --git a/lib/system.ml b/lib/system.ml index 831cf74..56a5440 100644 --- a/lib/system.ml +++ b/lib/system.ml @@ -19,7 +19,7 @@ type registry = { module Error = struct open Condition - let unknown_backend component tag = condition "unknown-backend" + let unknown_backend component tag = condition "unknown-backend" "Unknown backend for component" ("component" |=| (of_string component) & "tag" |=| (of_string tag)) end -- cgit v1.2.3