From bb3156b8ab78b035ce886bbe3021ec7cbe269d03 Mon Sep 17 00:00:00 2001
From: Marcos Magueta <maguetamarcos@gmail.com>
Date: Sat, 11 Jul 2026 00:51:11 -0300
Subject: FOL: First Order Logic Execution Engine

Co-authored-by: Estevan Castilho <tevo@riajuu.net>
---
 lib/concepts/Value.ml | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

(limited to 'lib/concepts/Value.ml')

diff --git a/lib/concepts/Value.ml b/lib/concepts/Value.ml
index 3e57717..65a0439 100644
--- a/lib/concepts/Value.ml
+++ b/lib/concepts/Value.ml
@@ -1,3 +1,3 @@
-type value
-  = String of string
-  | Integer of int
+type value = String of string | Integer of int
+
+let to_string = function String s -> s | Integer n -> Int.to_string n
-- 
cgit v1.2.3