format

1 files changed, 3 insertions, 4 deletions

diff --git a/lib/dml/parser.ml b/lib/dml/parser.ml
index 28f8b6c..5678b47 100644
--- a/lib/dml/parser.ml
+++ b/lib/dml/parser.ml
@@ -2,13 +2,12 @@ type error = ParseError of string
 
 let of_sexp sexp =
   match Ast.statement_of_sexp sexp with
-  | stmt          -> Ok stmt
+  | stmt -> Ok stmt
   | exception exn -> Error (ParseError (Printexc.to_string exn))
 
 let of_string s =
   match Sexplib.Sexp.of_string s |> Ast.statement_of_sexp with
-  | stmt          -> Ok stmt
+  | stmt -> Ok stmt
   | exception exn -> Error (ParseError (Printexc.to_string exn))
 
-let to_string stmt =
-  Ast.sexp_of_statement stmt |> Sexplib.Sexp.to_string_hum
+let to_string stmt = Ast.sexp_of_statement stmt |> Sexplib.Sexp.to_string_hum