9a2b790 · typeable/uuid

git.iko.soy/typeable/uuid

proper support for both base-3 and base-4

commit9a2b79011f6c88c541de1c35720925e90d87b5f2 authoraslatter <aslatter@gmail.com> dateMon 25 May 2009, 20:23 (17 years ago) parent13d3a65

2 files changed+14−4

unifiedsplit

Data/UUID/Internal.hs+3−3

@@ -30,10 +30,10 @@ import Data.List (splitAt, foldl', unfoldr)

3030

3131import Data.Typeable

3232

33−#if __GLASGOW_HASKELL__ >= 610

34−import Data.Data

35−#else

33+#ifdef BASE_3_SUPPORT

3634import Data.Generics.Basics

35+#else

36+import Data.Data

3737#endif

3838

3939import Foreign.Ptr

uuid.cabal+11−1

@@ -19,10 +19,20 @@ Synopsis: For creating, comparing, parsing and printing Universally Unique Ident

1919

2020Homepage: http://community.haskell.org/~aslatter/code/uuid/

2121

22+Flag Base3

23+ Default: False

24+ Description: Set when support for base package version 3 is required.

25+

2226Library

23− Build-Depends: base, random, binary, bytestring, Crypto, maccatcher,

27+ Build-Depends: random, binary, bytestring, Crypto, maccatcher,

2428 time

2529

30+ if flag(Base3)

31+ Build-Depends: base >= 3, base < 4

32+ CPP-Options: -DBASE_3_SUPPORT

33+ else

34+ Build-Depends: base >=4, base < 5

35+

2636 Exposed-Modules:

2737 Data.UUID

2838 Data.UUID.V1