]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/io/monitors/recursive/recursive-tests.factor
Delete empty unit tests files, remove 1- and 1+, reorder IN: lines in a lot of places...
[factor.git] / basis / io / monitors / recursive / recursive-tests.factor
index fba879a6d278c26dbf855e8f848cd405dd6fd3c6..7329e73a8007bfb9c14b1e4ac7f43134dae82909 100644 (file)
@@ -1,10 +1,9 @@
 USING: accessors math kernel namespaces continuations
 io.files io.monitors io.monitors.recursive io.backend
-concurrency.mailboxes tools.test destructors ;
+concurrency.mailboxes tools.test destructors io.files.info
+io.pathnames io.files.temp io.directories.hierarchy ;
 IN: io.monitors.recursive.tests
 
-\ pump-thread must-infer
-
 SINGLETON: mock-io-backend
 
 TUPLE: counter i ;
@@ -15,13 +14,13 @@ SYMBOL: dummy-monitor-disposed
 TUPLE: dummy-monitor < monitor ;
 
 M: dummy-monitor dispose
-    drop dummy-monitor-disposed get [ 1+ ] change-i drop ;
+    drop dummy-monitor-disposed get [ 1 + ] change-i drop ;
 
 M: mock-io-backend (monitor)
     nip
     over exists? [
         dummy-monitor new-monitor
-        dummy-monitor-created get [ 1+ ] change-i drop
+        dummy-monitor-created get [ 1 + ] change-i drop
     ] [
         "Does not exist" throw
     ] if ;