hasufell/hpath
1
1
Fork 0
Code Issues 8 Pull Requests Releases Wiki Activity

Add Typeable instances

Browse Source
This commit is contained in:
Chris Done 2015-05-11 08:47:17 +02:00
parent 3621b46b44
commit cb5545f2fe
2 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
path.cabal
View File

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

10
src/Path.hs
View File

@ -47,16 +47,16 @@ import qualified System.FilePath as FilePath
-- Types -- Types
-- | An absolute path. -- | An absolute path.
data Abs data Abs deriving (Typeable)
-- | A relative path; one without a root. -- | A relative path; one without a root.
data Rel data Rel deriving (Typeable)
-- | A file path. -- | A file path.
data File data File deriving (Typeable)
-- | A directory path. -- | A directory path.
data Dir data Dir deriving (Typeable)
-- | Exception when parsing a location. -- | Exception when parsing a location.
data PathParseException data PathParseException
@ -210,7 +210,7 @@ toFilePath (Path l) = l
-- --
-- The following properties hold: -- The following properties hold:
-- --
-- @stripDir parent (parent <\/> child) = child@ -- @stripDir parent (parent \<\/> child) = child@
-- --
-- Cases which are proven not possible: -- Cases which are proven not possible:
-- --