diff --git a/tests/IO/all.T b/tests/IO/all.T
index 291f90f202846320c718e9afdb1f1da636beeb08..edf150b8d49566335eb4b03e58c9684ced7e804a 100644
--- a/tests/IO/all.T
+++ b/tests/IO/all.T
@@ -1,7 +1,7 @@
 # -*- coding: utf-8 -*-
 
 def expect_fail_if_windows(opts):
-   f = if_platform('i386-unknown-mingw32', expect_fail);
+   f = if_os('mingw32', expect_fail);
    return f(opts);
 
 test('IOError001', compose(omit_ways(['ghci']), set_stdin('IOError001.hs')),