diff --git a/README.md b/README.md index 552617ec3..1163d4b01 100644 --- a/README.md +++ b/README.md @@ -6,7 +6,7 @@ Prerequisites: ocaml [http://ocaml.org], opam [http://opam.ocaml.org]. Building: -* `opam pin add GT https://github.com/dboulytchev/GT.git` +* `opam pin add GT https://github.com/kakasu/GT.git#ppx` * `opam pin add ostap https://github.com/dboulytchev/ostap.git` * `opam install ostap` * `opam install GT` diff --git a/regression/x86only/test001.expr b/regression/x86only/test001.expr index 486bef831..50c3333a7 100644 --- a/regression/x86only/test001.expr +++ b/regression/x86only/test001.expr @@ -1,6 +1,6 @@ fun insert (tree, value) { case tree of - `Empty -> return `Node (value, `Empty, `Empty) + `Empty -> return `Node (value, `Empty, `Empty) | `Node (x, left, right) -> if x > value then return `Node (x, insert (left, value), right) diff --git a/regression/x86only/test002.expr b/regression/x86only/test002.expr index 37616d334..cbfcab27b 100644 --- a/regression/x86only/test002.expr +++ b/regression/x86only/test002.expr @@ -1,7 +1,7 @@ fun collect_ints_acc (v, tail) local i { case v of a@#unboxed -> return `cons (a, tail) - | #string -> return tail + | #string -> return tail | _ -> for i := 0, i < v.length, i := i + 1 do tail := collect_ints_acc (v[i], tail)