From 0c7280a8f4c0450022968a52fd2ac4bc53517991 Mon Sep 17 00:00:00 2001
From: Simon Cruanes <simon.cruanes.2007@m4x.org>
Date: Tue, 18 Apr 2017 21:46:38 +0200
Subject: [PATCH] remove test that depends on 4.02

---
 src/core/CCFormat.ml | 6 ------
 1 file changed, 6 deletions(-)

diff --git a/src/core/CCFormat.ml b/src/core/CCFormat.ml
index 12bd744d..431f7850 100644
--- a/src/core/CCFormat.ml
+++ b/src/core/CCFormat.ml
@@ -79,12 +79,6 @@ let text out (s:string): unit =
   "a b\nc" (sprintf_no_color "@[<h>%a@]%!" text "a b\nc")
   *)
 
-(*$Q
-  Q.(printable_string) (fun s -> \
-    sprintf_no_color "@[<hv2>%a@]%!" text s = \
-    sprintf_no_color "@[<hv2>%a@]%!" Format.pp_print_text s)
-*)
-
 let list ?(sep=return ",@ ") pp fmt l =
   let rec pp_list l = match l with
     | x::((_::_) as l) ->