Add RealPath module

composewell · Jul 13, 2022 · e062159 · e062159
1 parent b1e6fc3
commit e062159
Show file tree

Hide file tree

Showing 2 changed files with 22 additions and 0 deletions.
diff --git a/src/Streamly/Coreutils/RealPath.hs b/src/Streamly/Coreutils/RealPath.hs
@@ -0,0 +1,21 @@
+-- |
+-- Module      : Streamly.Coreutils.RealPath
+-- Copyright   : (c) 2022 Composewell Technologies
+-- License     : BSD-3-Clause
+-- Maintainer  : [email protected]
+-- Stability   : experimental
+-- Portability : GHC
+--
+-- Returns resolved symbolic link target.
+
+module Streamly.Coreutils.RealPath
+    (realPath)
+where
+
+import System.Directory (canonicalizePath )
+
+-- | Make a path absolute, normalize the path,
+-- and remove as many indirections from it as possible.
+
+realPath :: FilePath -> IO FilePath
+realPath = canonicalizePath
diff --git a/streamly-coreutils.cabal b/streamly-coreutils.cabal
@@ -98,6 +98,7 @@ library
     , Streamly.Coreutils.Common
     , Streamly.Coreutils.Cp
     , Streamly.Coreutils.FileTest
+    , Streamly.Coreutils.RealPath
     , Streamly.Coreutils.ShellWords
     , Streamly.Coreutils.Uniq
     , Streamly.Coreutils.Which