From 72152bc99f336bb5d5e11d778118eafe387f5975 Mon Sep 17 00:00:00 2001
From: Harendra Kumar <harendra@composewell.com>
Date: Mon, 8 Aug 2022 17:50:38 +0530
Subject: [PATCH] Fix test warnings

---
 test/Streamly/System/Process.hs | 16 +++++-----------
 1 file changed, 5 insertions(+), 11 deletions(-)

diff --git a/test/Streamly/System/Process.hs b/test/Streamly/System/Process.hs
index a7440978..01d7d6c5 100644
--- a/test/Streamly/System/Process.hs
+++ b/test/Streamly/System/Process.hs
@@ -1,6 +1,6 @@
 {-# LANGUAGE CPP #-}
 
-module Main where
+module Main (main) where
 
 import Data.Function ((&))
 import Data.List ((\\))
@@ -71,18 +71,12 @@ minBlockCount = 1
 maxBlockCount :: Int
 maxBlockCount = 100
 
-minNumChar :: Int
-minNumChar = 1
-
-maxNumChar :: Int
-maxNumChar = 100 * 1024
-
 arrayChunkSize :: Int
 arrayChunkSize = 100
 
 interpreterFile :: FilePath
 interpreterArg :: String
-#if mingw32_HOST_OS == 1
+#ifdef mingw32_HOST_OS
 interpreterFile = "cmd.exe"
 interpreterArg = "/c"
 #else
@@ -91,21 +85,21 @@ interpreterArg = "sh"
 #endif
 
 executableFile :: FilePath
-#if mingw32_HOST_OS == 1
+#ifdef mingw32_HOST_OS
 executableFile = "./test/data/writeTrToError.bat"
 #else
 executableFile = "./test/data/writeTrToError.sh"
 #endif
 
 executableFileFail :: FilePath
-#if mingw32_HOST_OS == 1
+#ifdef mingw32_HOST_OS
 executableFileFail = "./test/data/failExec.bat"
 #else
 executableFileFail = "./test/data/failExec.sh"
 #endif
 
 executableFilePass :: FilePath
-#if mingw32_HOST_OS == 1
+#ifdef mingw32_HOST_OS
 executableFilePass = "./test/data/passExec.bat"
 #else
 executableFilePass = "./test/data/passExec.sh"