From 2d7c5b7c6696f39028ab07064ff75548d71ee5cf Mon Sep 17 00:00:00 2001
From: Estevan Castilho <tevo@riajuu.net>
Date: Thu, 24 Sep 2026 02:16:27 +0000
Subject: Make objects printable

---
 lib/kernel/SubstantialRelation.ml | 3 +++
 1 file changed, 3 insertions(+)

(limited to 'lib/kernel/SubstantialRelation.ml')

diff --git a/lib/kernel/SubstantialRelation.ml b/lib/kernel/SubstantialRelation.ml
index 0afc3f7..136c146 100644
--- a/lib/kernel/SubstantialRelation.ml
+++ b/lib/kernel/SubstantialRelation.ml
@@ -146,6 +146,9 @@ module Make (S : Abstract.Storage.STORAGE) = struct
   class relation storage value =
     object (self)
       inherit Lifecycle.null
+
+      method to_string = "relation"
+
       val storage : S.connection = storage
       val relation : t = value
       method predicate = Ok relation.predicate
-- 
cgit v1.2.3