Fix deploy tests

extra/tools/deploy/deploy-tests.factor

@@ -49,12 +49,16 @@ namespaces continuations layouts accessors ;
     cell 8 = 50 30 ? 100000 * small-enough?
 ] unit-test
 
-[ ] [
-    "tools.deploy.test.1" shake-and-bake
-    vm "-i=" "test.image" temp-file append 2array try-process
-] unit-test
-
-[ ] [
-    "tools.deploy.test.2" shake-and-bake
-    vm "-i=" "test.image" temp-file append 2array try-process
-] unit-test
+{
+    "tools.deploy.test.1"
+    "tools.deploy.test.2"
+    "tools.deploy.test.3"
+    "tools.deploy.test.4"
+} [
+    [ ] swap [
+        shake-and-bake
+        vm
+        "-i=" "test.image" temp-file append
+        2array try-process
+    ] curry unit-test
+] each

extra/tools/deploy/test/3/3.factor

@@ -1,8 +1,7 @@
 IN: tools.deploy.test.3
-USING: io.encodings.ascii io.files kernel ;
+USING: io.encodings.ascii io.encodings.string system kernel ;
 
 : deploy-test-3 ( -- )
-    "resource:extra/tools/deploy/test/3/3.factor"
-    ascii file-contents drop ;
+    "xyzthg" ascii encode drop ;
 
 MAIN: deploy-test-3

extra/tools/deploy/test/4/4.factor

@@ -0,0 +1,7 @@
+IN: tools.deploy.test.4
+USING: io.encodings.8-bit io.encodings.string kernel ;
+
+: deploy-test-4 ( -- )
+    "xyzthg" latin7 encode drop ;
+
+MAIN: deploy-test-4

extra/tools/deploy/test/4/deploy.factor

@@ -0,0 +1,15 @@
+USING: tools.deploy.config ;
+H{
+    { deploy-math? f }
+    { deploy-ui? f }
+    { deploy-compiler? t }
+    { deploy-word-props? f }
+    { deploy-word-defs? f }
+    { deploy-io 2 }
+    { deploy-name "tools.deploy.test.4" }
+    { deploy-c-types? f }
+    { deploy-random? f }
+    { "stop-after-last-window?" t }
+    { deploy-threads? t }
+    { deploy-reflection 1 }
+}