module HaskellWorks.Polysemy.OS
  ( isWin32
  ) where

import           Data.Bool
import           Data.Eq
import           System.Info

-- | Determine if the operating system is Windows.
isWin32 :: Bool
isWin32 :: Bool
isWin32 = String
os String -> String -> Bool
forall a. Eq a => a -> a -> Bool
== String
"mingw32"
{-# INLINE isWin32 #-}