From: Doug Coleman <doug.coleman@gmail.com>
Date: Fri, 3 Jan 2020 19:04:38 +0000 (-0600)
Subject: Revert "windows.errors: make check-invalid-handle throw windows-error instances"
X-Git-Tag: 0.99~3604
X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=commitdiff_plain;h=0625b85b47e65fed1648d9e20aadf5a0849d69cf

Revert "windows.errors: make check-invalid-handle throw windows-error instances"

This reverts commit 38ab7289b5db4bdc33b9a0ac76fa4c4daa6c092c.
---

diff --git a/basis/windows/errors/errors.factor b/basis/windows/errors/errors.factor
index 82e8701d16..83a8df0148 100644
--- a/basis/windows/errors/errors.factor
+++ b/basis/windows/errors/errors.factor
@@ -744,7 +744,7 @@ ERROR: windows-error n string ;
     win32-error-string throw ;
 
 : check-invalid-handle ( handle -- handle )
-    dup INVALID_HANDLE_VALUE = [ win32-error ] when ;
+    dup INVALID_HANDLE_VALUE = [ throw-win32-error ] when ;
 
 CONSTANT: expected-io-errors
     ${