diff options
| author | Estevan Castilho <tevo@riajuu.net> | 2026-05-21 01:19:40 +0000 |
|---|---|---|
| committer | Estevan Castilho <tevo@riajuu.net> | 2026-05-21 01:19:40 +0000 |
| commit | 4161e4e8328d2d104c028bd1987cd6950aab97e0 (patch) | |
| tree | 7684e4343899aa082ba0e08cfbb9d1d4ed7ada01 /lib/prl/sublanguage.ml | |
| parent | fe0ee9136886ae944b76166d262bf93a34807546 (diff) | |
| download | Sakura-4161e4e8328d2d104c028bd1987cd6950aab97e0.tar.gz Sakura-4161e4e8328d2d104c028bd1987cd6950aab97e0.zip | |
Migrate the PRL over
Diffstat (limited to '')
| -rw-r--r-- | lib/prl/sublanguage.ml | 7 |
1 files changed, 1 insertions, 6 deletions
diff --git a/lib/prl/sublanguage.ml b/lib/prl/sublanguage.ml index 96891a9..387da34 100644 --- a/lib/prl/sublanguage.ml +++ b/lib/prl/sublanguage.ml @@ -3,16 +3,11 @@ module Make (NT : Nt.S) = struct type configuration = unit type ast = Ast.statement - type error = Exec.error let name = "prl" 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 = Exec.execute - let sexp_of_error = Exec.sexp_of_error end |