assocs: Add of and ?of. Change all the things at once! Fixes #701.

[factor.git] / basis / io / launcher / windows / windows-tests.factor

diff --git a/basis/io/launcher/windows/windows-tests.factor b/basis/io/launcher/windows/windows-tests.factor
index 754c3db871dd9a432e7af3f9d1e9d6e292a1d9cf..5dba7098449281d65170af78d0fe1557c0a6fbb2 100644 (file)
--- a/basis/io/launcher/windows/windows-tests.factor
+++ b/basis/io/launcher/windows/windows-tests.factor
@@ -173,7 +173,7 @@ IN: io.launcher.windows.tests
         ascii <process-reader> stream-contents
     ] with-directory eval( -- alist )
 
-    "A" swap at
+    "A" of
 ] unit-test
 
 [ f ] [
@@ -185,7 +185,7 @@ IN: io.launcher.windows.tests
         ascii <process-reader> stream-contents
     ] with-directory eval( -- alist )
 
-    "USERPROFILE" swap at "XXX" =
+    "USERPROFILE" of "XXX" =
 ] unit-test
 
 2 [
@@ -240,4 +240,4 @@ IN: io.launcher.windows.tests
         [ process>> command>> "asdfdontexistplzplz" = ]
         [ process>> status>> f = ]
     } 1&&
-] must-fail-with
\ No newline at end of file
+] must-fail-with