From 424e1983e4fe2c76d320e28c874d12a4aa09c3ac Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Tue, 7 Oct 2014 23:56:12 -0700 Subject: [PATCH] tools.profiler.sampling: Kick it down a notch. Makes win32 tests finish! --- basis/tools/profiler/sampling/sampling-tests.factor | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/basis/tools/profiler/sampling/sampling-tests.factor b/basis/tools/profiler/sampling/sampling-tests.factor index e7490bf024..9a05aadda3 100644 --- a/basis/tools/profiler/sampling/sampling-tests.factor +++ b/basis/tools/profiler/sampling/sampling-tests.factor @@ -11,8 +11,8 @@ TUPLE: boom ; { } [ 10 [ [ 100 [ 1000 random (byte-array) drop ] times compact-gc ] profile ] times ] unit-test { } [ 2 [ [ 1 seconds sleep ] profile ] times ] unit-test -[ ] [ [ 3,000,000 iota [ sq sq sq ] map drop ] profile flat profile. ] unit-test -[ ] [ [ 3,000,000 iota [ sq sq sq ] map drop ] profile top-down profile. ] unit-test +[ ] [ [ 300,000 iota [ sq sq sq ] map drop ] profile flat profile. ] unit-test +[ ] [ [ 300,000 iota [ sq sq sq ] map drop ] profile top-down profile. ] unit-test (clear-samples) f raw-profile-data set-global