From 346ec161172044c228d97deaee44124a19ac3235 Mon Sep 17 00:00:00 2001
From: Doug Coleman <doug.coleman@gmail.com>
Date: Fri, 3 Jan 2020 13:04:11 -0600
Subject: [PATCH] Revert "io.files.windows: replace "-1 <alien>" with
 INVALID_HANDLE_VALUE"

This reverts commit a6f0b74f03059cab725e13ff83bdfc4b242f8de3.
---
 basis/io/files/windows/windows.factor | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/basis/io/files/windows/windows.factor b/basis/io/files/windows/windows.factor
index 0531551b60..684d8f13d7 100644
--- a/basis/io/files/windows/windows.factor
+++ b/basis/io/files/windows/windows.factor
@@ -399,7 +399,7 @@ M: windows home
     WIN32_FIND_STREAM_DATA <struct>
     0
     [ FindFirstStream ] keepd
-    over INVALID_HANDLE_VALUE = [
+    over -1 <alien> = [
         2drop throw-win32-error
     ] [
         1vector swap file-streams-rest