-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 -- )
image-path :> image
[
- I[
+ [I
#include <vm/master.h>
#include <stdio.h>
#include <stdbool.h>
printf("Done.\n");
return 0;
}
- ]I
+ I]
] with-string-writer
[ compile-file ] with-temp-directory
[ run-test ] with-temp-directory ;