eternal-0.0.1: src/Control/Eternal/Syntax/Logic.hs

module Control.Eternal.Syntax.Logic
  ( ifSo
  ) where

import Control.Monad (when)

ifSo :: IO () -> Bool -> IO ()
ifSo = flip when