Add dirname module

Author: rnjtranjan

src/Streamly/Coreutils/Dirname.hs

@@ -0,0 +1,18 @@
+-- |
+-- Module      : Streamly.Coreutils.Dirname
+-- Copyright   : (c) 2022 Composewell Technologies
+-- License     : BSD-3-Clause
+-- Maintainer  : streamly@composewell.com
+-- Stability   : experimental
+-- Portability : GHC
+--
+-- Strip the last component from file name.
+
+module Streamly.Coreutils.Dirname
+    (dirname)
+where
+
+import System.FilePath (takeDirectory)
+
+dirname :: FilePath -> FilePath
+dirname = takeDirectory

streamly-coreutils.cabal

@@ -104,12 +104,14 @@ library
     , time >= 1.9 && < 1.14
     , unix >= 2.7.0 && < 2.8
     , directory >= 1.2.2 && < 1.4
+    , filepath >= 1.4 && < 1.5
   hs-source-dirs:      src
   exposed-modules:
       Streamly.Coreutils
     , Streamly.Coreutils.Common
     , Streamly.Coreutils.Cp
     , Streamly.Coreutils.Directory
+    , Streamly.Coreutils.Dirname
     , Streamly.Coreutils.Mv
     , Streamly.Coreutils.Stat
     , Streamly.Coreutils.Mkdir