From 7996fe6af661fcd13e76adf1860e5552c8e05412 Mon Sep 17 00:00:00 2001 From: Ian Lynagh Date: Fri, 9 Jan 2009 18:25:54 +0000 Subject: [PATCH] Fix getPermissions001 on Windows --- tests/getPermissions001.hs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/tests/getPermissions001.hs b/tests/getPermissions001.hs index f1fbeaa..5e9adf2 100644 --- a/tests/getPermissions001.hs +++ b/tests/getPermissions001.hs @@ -5,7 +5,7 @@ main = do print p p <- getPermissions "getPermissions001.hs" print p -#ifndef i386_unknown_mingw32 +#ifndef mingw32_HOST_OS p <- getPermissions "getPermissions001" #else p <- getPermissions "getPermissions001.exe" -- 1.7.10.4