         <process>
             console-vm "-script" "env.factor" 3array >>command
             { { "A" "B" } } >>environment
-        utf8 <process-reader> stream-contents
+        utf8 [ contents ] with-process-reader
     ] with-directory eval( -- alist )
 
     "A" of

    "err2.txt" temp-file ascii file-lines first
] unit-test

[ t ] [
    launcher-test-path [
        <process>
            console-vm "-script" "env.factor" 3array >>command
        utf8 <process-reader> stream-contents
    ] with-directory eval( -- alist )

    os-envs =

            console-vm "-script" "env.factor" 3array >>command
            +replace-environment+ >>environment-mode
            os-envs >>environment
        utf8 [ contents ] with-process-reader
    ] with-directory eval( -- alist )

    os-envs =
