diff --git a/basis/io/backend/unix/unix.factor b/basis/io/backend/unix/unix.factor
index e25550590f..c4883f54ef 100644
--- a/basis/io/backend/unix/unix.factor
+++ b/basis/io/backend/unix/unix.factor
@@ -164,7 +164,7 @@ M: stdin refill
         size-read-fd <fd> init-fd <input-port> >>size
         data-read-fd <fd> >>data ;
 
-M: unix (init-stdio) ( -- )
+M: unix (init-stdio)
     <stdin> <input-port>
     1 <fd> <output-port>
     2 <fd> <output-port> ;
diff --git a/basis/io/backend/windows/nt/nt.factor b/basis/io/backend/windows/nt/nt.factor
index b114cefdc0..c6b24a0a11 100755
--- a/basis/io/backend/windows/nt/nt.factor
+++ b/basis/io/backend/windows/nt/nt.factor
@@ -120,9 +120,9 @@ M: winnt (wait-to-read) ( port -- )
         tri
     ] with-destructors ;
 
-: console-app? ( -- ? ) GetConsoleWindow ;
+: console-app? ( -- ? ) GetConsoleWindow >boolean ;
 
 M: winnt (init-stdio)
-    console-app? [ f f f f ] [ init-c-stdio t ] if ;
+    console-app? [ init-c-stdio t ] [ f f f f ] if ;
 
 winnt set-io-backend
diff --git a/build-support/factor.sh b/build-support/factor.sh
index 3517d8f4ba..44c047155d 100755
--- a/build-support/factor.sh
+++ b/build-support/factor.sh
@@ -236,7 +236,7 @@ find_word_size() {
 
 set_factor_binary() {
     case $OS in
-        winnt) FACTOR_BINARY=factor.com;;
+        winnt) FACTOR_BINARY=factor-console.exe;;
         *) FACTOR_BINARY=factor;;
     esac
 }