From a5b78fd94084965d71b8a2cb3e9921c2b043038b Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Mon, 26 Jan 2015 11:57:39 +0100
Subject: [PATCH] remove uses of |> in roseTree and its tests

---
 src/misc/roseTree.ml   | 2 +-
 tests/test_RoseTree.ml | 4 +++-
 2 files changed, 4 insertions(+), 2 deletions(-)

diff --git a/src/misc/roseTree.ml b/src/misc/roseTree.ml
index f78670c2..5b69cf30 100644
--- a/src/misc/roseTree.ml
+++ b/src/misc/roseTree.ml
@@ -110,7 +110,7 @@ module Zipper = struct
     | last_left::tail_rev_lefts ->
       Some {
         tree = last_left ;
-        lefts = tail_rev_lefts |> List.rev ;
+        lefts = List.rev tail_rev_lefts;
         rights = zipper.tree::zipper.rights ;
         parents = zipper.parents
       }
diff --git a/tests/test_RoseTree.ml b/tests/test_RoseTree.ml
index c967d8c1..36e4c735 100644
--- a/tests/test_RoseTree.ml
+++ b/tests/test_RoseTree.ml
@@ -1,5 +1,7 @@
-open Containers_misc
 open OUnit
+open CCFun
+
+module RoseTree = Containers_misc.RoseTree
 
 let format_node = Format.pp_print_int