9a2b790 · typeable/uuid

git.iko.soy/typeable/uuid

on master help sign in

proper support for both base-3 and base-4

9a2b790aslatter17 years ago

Data/UUID/Internal.hs+3−3

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

31import Data.Typeable

33−#if __GLASGOW_HASKELL__ >= 610

33+#ifdef BASE_3_SUPPORT

34−import Data.Data

35−#else

36import Data.Generics.Basics

34import Data.Generics.Basics

35+#else

36+import Data.Data

37#endif

39import Foreign.Ptr

uuid.cabal+11−1

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

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

22+Flag Base3

23+ Default: False

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

25+

22Library

26Library

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

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

24 time

28 time

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+

26 Exposed-Modules:

36 Exposed-Modules:

27 Data.UUID

37 Data.UUID

28 Data.UUID.V1

38 Data.UUID.V1