From 0db0ac4a255931036c5859c3f22108f4e27ccd11 Mon Sep 17 00:00:00 2001 From: Thomas Miedema Date: Thu, 11 Jun 2015 20:31:24 +0200 Subject: Removes all occurrences of __MINGW32__ (#10485) In Haskell files, replace `__MINGW32__` by `mingw32_HOST_OS`. In .c and .h files, delete `__MINGW32__` when `_WIN32` is also tested because `_WIN32` is always defined when `__MINGW32__` is. Also replace `__MINGW32__` by `_WIN32` when used standalone for consistency. Differential Revision: https://phabricator.haskell.org/D971 --- utils/hp2ps/Main.c | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'utils/hp2ps') diff --git a/utils/hp2ps/Main.c b/utils/hp2ps/Main.c index 1c21d2b2cb..709bb1357d 100644 --- a/utils/hp2ps/Main.c +++ b/utils/hp2ps/Main.c @@ -143,7 +143,7 @@ nextarg: ; if (!filter) { pathName = copystring(argv[0]); DropSuffix(pathName, ".hp"); -#if defined(_MSC_VER) || defined(__MINGW32__) || defined(_WIN32) +#if defined(_MSC_VER) || defined(_WIN32) DropSuffix(pathName, ".exe"); #endif baseName = copystring(Basename(pathName)); -- cgit v1.2.1