X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=basis%2Fwindows%2Ferrors%2Ferrors.factor;fp=basis%2Fwindows%2Ferrors%2Ferrors.factor;h=35779243960f59d52e9959b42a13512d8d11fc85;hp=b31104c4fed0b180a3813b8451856e7d88235cca;hb=10810599bc32824a56c9e6e0a084c8d722a1373f;hpb=7c8707fd633c753d3bdea864475b699253dc4acf

diff --git a/basis/windows/errors/errors.factor b/basis/windows/errors/errors.factor
index b31104c4fe..3577924396 100644
--- a/basis/windows/errors/errors.factor
+++ b/basis/windows/errors/errors.factor
@@ -759,6 +759,3 @@ CONSTANT: expected-io-errors
 
 : expected-io-error? ( error-code -- ? )
     expected-io-errors member? ;
-
-: expected-io-error ( error-code -- )
-    expected-io-error? [ win32-error ] unless ;