]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/alien/remote-control/remote-control-tests.factor
factor: trim using lists
[factor.git] / basis / alien / remote-control / remote-control-tests.factor
index 599cf62d4ba2100cd92f762e2a1601f4ef6f08bb..99722abc5774a147dcfecc165b247ae2751ade48 100644 (file)
@@ -1,7 +1,5 @@
-USING: interpolate multiline
-io io.directories io.encodings.ascii io.files
-io.files.temp io.launcher io.streams.string kernel locals system
-tools.test sequences ;
+USING: interpolate io io.encodings.ascii io.files io.files.temp
+io.launcher io.streams.string kernel sequences system ;
 IN: alien.remote-control.tests
 
 : compile-file ( contents -- )
@@ -18,7 +16,7 @@ IN: alien.remote-control.tests
     image-path :> image
 
     [
-        I[
+        [I
 #include <vm/master.h>
 #include <stdio.h>
 #include <stdbool.h>
@@ -34,7 +32,7 @@ int main(int argc, char **argv)
     printf("Done.\n");
     return 0;
 }
-        ]I
+        I]
     ] with-string-writer
     [ compile-file ] with-temp-directory
     [ run-test ] with-temp-directory ;