path 0.0.0 → 0.0.1

raw patch · 2 files changed

+8/−10 lines, 2 files

Files

• path.cabal +1/−1
• src/Path.hs +7/−9

@@ -1,5 +1,5 @@ name:                path-version:             0.0.0+version:             0.0.1 synopsis:            Path description:         Path license:             BSD3

@@ -47,16 +47,16 @@ -- Types  -- | An absolute path.-data Abs+data Abs deriving (Typeable)  -- | A relative path; one without a root.-data Rel+data Rel deriving (Typeable)  -- | A file path.-data File+data File deriving (Typeable)  -- | A directory path.-data Dir+data Dir deriving (Typeable)  -- | Exception when parsing a location. data PathParseException@@ -99,8 +99,7 @@      then return (Path (normalizeDir filepath))      else throwM (InvalidRelDir filepath) --- | Get a location for an absolute file. Produces a normalized---  path which always ends in a path separator.+-- | Get a location for an absolute file. -- -- Throws: 'PathParseException' --@@ -114,8 +113,7 @@      then return (Path (normalizeFile filepath))      else throwM (InvalidAbsFile filepath) --- | Get a location for a relative file. Produces a normalized--- path which always ends in a path separator.+-- | Get a location for a relative file. -- -- Throws: 'PathParseException' --@@ -212,7 +210,7 @@ -- -- The following properties hold: ----- @stripDir parent (parent <\/> child) = child@+-- @stripDir parent (parent \<\/> child) = child@ -- -- Cases which are proven not possible: --