From d72907302ae66063cb7af9b92b6d1acec8c7d1bf Mon Sep 17 00:00:00 2001 From: Fabian Date: Sun, 19 Apr 2020 17:42:13 +0200 Subject: [PATCH] Disable core_kernel test for now --- benchs/dune | 2 +- benchs/run_objsize.ml | 4 ++-- 2 files changed, 3 insertions(+), 3 deletions(-) diff --git a/benchs/dune b/benchs/dune index 9a900f8d..374bd297 100644 --- a/benchs/dune +++ b/benchs/dune @@ -2,7 +2,7 @@ (names run_benchs run_bench_hash run_objsize) (libraries containers containers.data containers.iter containers.thread benchmark gen iter qcheck oseq - batteries base core_kernel sek) + batteries base sek) (flags :standard -warn-error -3 -safe-string -color always -open CCShims_) (ocamlopt_flags :standard -O3 -color always -unbox-closures -unbox-closures-factor 20) diff --git a/benchs/run_objsize.ml b/benchs/run_objsize.ml index aa681623..98e378d5 100644 --- a/benchs/run_objsize.ml +++ b/benchs/run_objsize.ml @@ -1,4 +1,4 @@ -module Deque = Core_kernel.Deque +(* module Deque = Core_kernel.Deque *) module Int_map = Map.Make(CCInt) module Int_set = Set.Make(CCInt) @@ -29,7 +29,7 @@ let types = [ "Sek.Persistent", (fun n -> Obj.magic @@ List.fold_left (Sek.Persistent.push front) (Sek.Persistent.create dummy) (ns n)); "Sek.Ephemeral", (fun n -> Obj.magic @@ let c = Sek.Ephemeral.create dummy in iter_range n (Sek.Ephemeral.push front c); c); "CCVector", (fun n -> Obj.magic @@ let c = CCVector.create () in iter_range n (CCVector.push c); c); - "Core_kernel.Deque", (fun n -> Obj.magic @@ let c = Deque.create () in iter_range n (Deque.enqueue_back c); c); + (* "Core_kernel.Deque", (fun n -> Obj.magic @@ let c = Deque.create () in iter_range n (Deque.enqueue_back c); c); *) "Base.Queue", (fun n -> Obj.magic @@ let c = Base.Queue.create () in iter_range n (Base.Queue.enqueue c); c); "Stdlib.Queue", (fun n -> Obj.magic @@ Queue.of_seq (OSeq.init ~n id)); "CCQueue", (fun n -> Obj.magic @@ CCDeque.of_list (ns n));