byso: refonte de split (match reste a faire)

61987f02 · Martin Clochard · a4aad230 · 61987f02 · 61987f02
Commit 61987f02 authored Dec 10, 2015 by Martin Clochard
Expand all Hide whitespace changes
Inline Side-by-side

Showing with 292 additions and 268 deletions

src/parser/typing.ml src/parser/typing.ml +1 -1

src/transform/split_goal.ml src/transform/split_goal.ml +291 -267

No files found.
--- a/src/parser/typing.ml
+++ b/src/parser/typing.ml
@@ -324,7 +324,7 @@ let rec dterm uc gvars denv {term_desc = desc; term_loc = loc} =
      | Ptree.Timplies -> k DTimplies
      | Ptree.Tiff -> k DTiff
      | Ptree.Tby -> DTbinop (DTimplies, et (), e1)
-      | Ptree.Tso -> DTbinop (DTand, e1,et ())
+      | Ptree.Tso -> DTbinop (DTand, e1, et ())
      end
  | Ptree.Tquant (q, uqu, trl, e1) ->
      let qvl = List.map (quant_var uc) uqu in

--- a/src/transform/split_goal.ml
+++ b/src/transform/split_goal.ml