     [ ] [
         <process>
             "cmd.exe /c dir" >>command
-            "dir.txt" temp-file >>stdout
+            "dir.txt" unique-file [ out-path set-global ] keep >>stdout
         try-process
     ] unit-test
 
-    [ ] [ "dir.txt" temp-file delete-file ] unit-test
+    [ ] [ out-path get-global delete-file ] unit-test
 ] times
 
-[ "append-test" temp-file delete-file ] ignore-errors
-
 { "Hello appender\r\nÖrjan ågren är åter\r\nHello appender\r\nÖrjan ågren är åter\r\n" } [
+    "append-test" unique-file out-path set-global
     2 [
         launcher-test-path [
             <process>
                 console-vm "-script" "append.factor" 3array >>command
-                "append-test" temp-file <appender> >>stdout
+                out-path get-global <appender> >>stdout
             try-process
         ] with-directory
     ] times
 
-    "append-test" temp-file utf8 file-contents
+    out-path get-global utf8 file-contents
 ] unit-test
 
 [ "IN: scratchpad " ] [

USING: accessors arrays assocs calendar continuations
environment eval hashtables io io.directories
io.encodings.ascii io.encodings.utf8 io.files io.files.temp io.launcher
io.launcher.windows io.pathnames kernel math namespaces parser
sequences splitting system tools.test combinators.short-circuit ;
IN: io.launcher.windows.tests

[ "hello world" ] [ { "hello" "world" } join-arguments ] unit-test

: console-vm ( -- path )
    vm ".exe" ?tail [ ".com" append ] when ;

SYMBOLS: out-path err-path ;

[ ] [
    <process>
        console-vm "-run=hello-world" 2array >>command
        "out.txt" unique-file [ out-path set-global ] keep >>stdout
    try-process
] unit-test

[ "Hello world" ] [
    out-path get-global ascii file-lines first
] unit-test

[ "IN: scratchpad " ] [
