aboutsummaryrefslogtreecommitdiffstats
path: root/lib/ddl
diff options
context:
space:
mode:
authorMarcos Magueta <maguetamarcos@gmail.com>2026-04-27 23:24:19 -0300
committerGitHub <noreply@github.com>2026-04-27 23:24:19 -0300
commit97960adb8426e5270fe16b027e82a2c61674f821 (patch)
tree03da5611898c06cd3868d4384ef4259005a29b69 /lib/ddl
parent56492ad5f6f09d8c9f337d42803b64d1b9f0668b (diff)
downloadSakura-97960adb8426e5270fe16b027e82a2c61674f821.tar.gz
Sakura-97960adb8426e5270fe16b027e82a2c61674f821.zip
Foreign call PRL (#67)
Diffstat (limited to 'lib/ddl')
-rw-r--r--lib/ddl/sublanguage.ml2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/ddl/sublanguage.ml b/lib/ddl/sublanguage.ml
index f5ff8f9..b1c87e5 100644
--- a/lib/ddl/sublanguage.ml
+++ b/lib/ddl/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