From 97960adb8426e5270fe16b027e82a2c61674f821 Mon Sep 17 00:00:00 2001
From: Marcos Magueta <maguetamarcos@gmail.com>
Date: Mon, 27 Apr 2026 23:24:19 -0300
Subject: Foreign call PRL (#67)

---
 lib/icl/sublanguage.ml | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'lib/icl/sublanguage.ml')

diff --git a/lib/icl/sublanguage.ml b/lib/icl/sublanguage.ml
index fdf17b3..c415d96 100644
--- a/lib/icl/sublanguage.ml
+++ b/lib/icl/sublanguage.ml
@@ -16,7 +16,7 @@ module Make (Storage : Management.Physical.S) = struct
 
   let execute storage db ast =
     match Exec.execute storage db ast with
-    | Ok (db, msg) -> Ok (Sublanguage_types.Transition (db, msg))
+    | Ok (db, _) -> Ok (Sublanguage_types.Transition db)
     | Error e -> Error e
 
   let sexp_of_error = Exec.sexp_of_error
-- 
cgit v1.2.3