Merge branch 'dev' of gitlab.com:ligolang/ligo into rinderknecht@doc

2020-02-25 16:40:23 +01:00 · 2020-02-25 16:40:23 +01:00 · d7dd064095
commit d7dd064095
parent 88c231f379 09999c2c82
1 changed files with 2 additions and 1 deletions
--- a/src/passes/2-simplify/pascaligo.ml
+++ b/src/passes/2-simplify/pascaligo.ml
@ -367,7 +367,8 @@ let rec simpl_expression (t:Raw.expr) : expr result =
  | EConstr (ConstrApp c) -> (
      let ((c, args) , loc) = r_split c in
      match args with
-        None -> simpl_tuple_expression []
+        None ->
+        return @@ e_constructor ~loc c.value (e_unit ())
      | Some args ->
          let args, args_loc = r_split args in
          let%bind arg =