tools.profiler.sampling: win32

diff --git a/basis/tools/profiler/sampling/sampling-tests.factor b/basis/tools/profiler/sampling/sampling-tests.factor
index 765da7af14e42bbfdeca861aadc65011acf93f3c..a39f2615aad771fd96331fdc73f814227f378cfd 100644 (file)
--- a/basis/tools/profiler/sampling/sampling-tests.factor
+++ b/basis/tools/profiler/sampling/sampling-tests.factor
@@ -1,5 +1,5 @@
 USING: assocs byte-arrays calendar kernel kernel.private math
-memory namespaces parser random sequences threads
+memory namespaces parser random sequences system threads
 tools.profiler.sampling tools.profiler.sampling.private
 tools.test ;
 IN: tools.profiler.sampling.tests
@@ -11,8 +11,10 @@ IN: tools.profiler.sampling.tests
 ] unit-test
 
 ! Make sure the profiler doesn't blow up the VM
+os windows? cpu x86.32? and [
+    { } [ 10 [ [ ] profile ] times ] unit-test
+] unless
 TUPLE: boom ;
-{ } [ 10 [ [ ] profile ] times ] unit-test
 [ 10 [ [ boom new throw ] profile ] times ] [ boom? ] must-fail-with
 
 { t t t t t t t t t t } [