git.iko.soy/typeable/uuid
on cc5ac43 help sign in
typeable/uuid/Data/UUID.hs
31 lines 761 B history raw
1-- |
2-- Module : Data.UUID
3-- Copyright : (c) 2008 Antoine Latter
4--
5-- License : BSD-style
6--
7-- Maintainer : aslatter@gmail.com
8-- Stability : experimental
9-- Portability : portable
10--
11--
12-- This library is useful for comparing, parsing and
13-- printing Universally Unique Identifiers.
14-- See <http://en.wikipedia.org/wiki/UUID> for the general idea.
16module Data.UUID(UUID
17 ,toString
18 ,fromString
19 ,null
20 ,module Data.UUID.V5
21 ) where
23import Data.UUID.Internal
24import Data.UUID.V5
26import Prelude hiding (null)
28-- |Returns 'True' if the passed-in 'UUID' is the null UUID.
29null :: UUID -> Bool
30null = (== nullUuid)
31 where nullUuid = UUID 0 0 0 0 0 $ Node 0 0 0 0 0 0