git.iko.soy/typeable/uuid
on cb4b691 help sign in
typeable/uuid/Data/UUID.hs
33 lines 818 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 ,module Data.UUID.V1
18 ,module Data.UUID.V5
19 ,toString
20 ,fromString
21 ,null
22 ) where
24import Data.UUID.Internal
25import Data.UUID.V1
26import Data.UUID.V5
28import Prelude hiding (null)
30-- |Returns 'True' if the passed-in 'UUID' is the null UUID.
31null :: UUID -> Bool
32null = (== nullUuid)
33 where nullUuid = UUID 0 0 0 0 0 $ Node 0 0 0 0 0 0