diff --git a/basis/bootstrap/image/image.factor b/basis/bootstrap/image/image.factor
index 3a3ae341d1..8b0051148f 100644
--- a/basis/bootstrap/image/image.factor
+++ b/basis/bootstrap/image/image.factor
@@ -14,8 +14,8 @@ IN: bootstrap.image
 
 : arch ( os cpu -- arch )
     {
-        { "ppc" [ name>> "-ppc" append ] }
-        { "x86.64" [ name>> "winnt" = "winnt" "unix" ? "-x86.64" append ] }
+        { "ppc" [ "-ppc" append ] }
+        { "x86.64" [ "winnt" = "winnt" "unix" ? "-x86.64" append ] }
         [ nip ]
     } case ;
 
diff --git a/basis/cpu/x86/64/unix/tags.txt b/basis/cpu/x86/64/unix/tags.txt
new file mode 100644
index 0000000000..6bf68304bb
--- /dev/null
+++ b/basis/cpu/x86/64/unix/tags.txt
@@ -0,0 +1 @@
+unportable
diff --git a/basis/cpu/x86/64/winnt/tags.txt b/basis/cpu/x86/64/winnt/tags.txt
new file mode 100644
index 0000000000..6bf68304bb
--- /dev/null
+++ b/basis/cpu/x86/64/winnt/tags.txt
@@ -0,0 +1 @@
+unportable