From 2d7c5b7c6696f39028ab07064ff75548d71ee5cf Mon Sep 17 00:00:00 2001 From: Estevan Castilho Date: Thu, 24 Sep 2026 02:16:27 +0000 Subject: Make objects printable --- lib/evaluators/FOL.ml | 2 ++ lib/evaluators/Lambda.ml | 3 +++ 2 files changed, 5 insertions(+) (limited to 'lib/evaluators') diff --git a/lib/evaluators/FOL.ml b/lib/evaluators/FOL.ml index b290e0a..eba57a1 100644 --- a/lib/evaluators/FOL.ml +++ b/lib/evaluators/FOL.ml @@ -31,6 +31,8 @@ class evaluator = object (self) inherit Kernel.Lifecycle.null inherit Kernel.Identity.of_id + method to_string = "fol-evaluator" + method invoke = execute method protocols : Protocols.Handle.protocol list = [Program.make self] end diff --git a/lib/evaluators/Lambda.ml b/lib/evaluators/Lambda.ml index a75fc10..53b0301 100644 --- a/lib/evaluators/Lambda.ml +++ b/lib/evaluators/Lambda.ml @@ -98,6 +98,9 @@ let execute term = class evaluator = object (self) inherit Kernel.Lifecycle.null inherit Kernel.Identity.of_id + + method to_string = "lambda-evaluator" + method invoke program = execute program method protocols : Protocols.Handle.protocol list = [Program.make self] end -- cgit v1.2.3