From 01e8817ebd580fef547699853a38c854eac670d1 Mon Sep 17 00:00:00 2001
From: Estevan Castilho <tevo@riajuu.net>
Date: Thu, 21 May 2026 01:51:54 +0000
Subject: Migrate the SCL over

---
 lib/scl/sublanguage.ml | 8 +-------
 1 file changed, 1 insertion(+), 7 deletions(-)

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

diff --git a/lib/scl/sublanguage.ml b/lib/scl/sublanguage.ml
index 87e4d42..0793211 100644
--- a/lib/scl/sublanguage.ml
+++ b/lib/scl/sublanguage.ml
@@ -3,15 +3,11 @@ module Make (NT : Nt.S) = struct
 
   type configuration = unit
   type ast = Ast.statement
-  type error = Exec.error
 
   let name = "scl"
   let parse _ = Ok ()
 
-  let parse_sexp sexp =
-    match Parser.of_sexp sexp with
-    | Ok r -> Ok r
-    | Error (Parser.ParseError s) -> Error (Exec.ParseError s)
+  let parse_sexp sexp = Parser.of_sexp sexp
 
   let execute ctx ast =
     Exec.execute ctx ast
@@ -19,6 +15,4 @@ module Make (NT : Nt.S) = struct
          | Executor.Batch { cursor_id; rows; has_more } ->
              Sublanguage_types.Cursor { cursor_id; rows; has_more }
          | Executor.Closed delta -> Sublanguage_types.Transition delta)
-
-  let sexp_of_error = Exec.sexp_of_error
 end
-- 
cgit v1.2.3