packages feed

tilia-0.1.0.0: corpora/vendored/other/cpp/arguments-at-the-end-behind-alternatives.hs

{-# LANGUAGE CPP #-}

module Storage.Create (createFor) where

import Storage.Handle

createFor :: FilePath -> Mode -> IO Handle
createFor path mode  =
  createWith path  mode
#if MIN_VERSION_storage(0,3,0)
    closeOnExec  inheritable
#elif MIN_VERSION_storage(0,2,0)
    closeOnExec
#endif