@@ -6,13 +6,13 @@
66
77-- |
88-- Module : Data.UUID.Types.Internal
9−-- Copyright : (c) 2008-2009, 2012 Antoine Latter
9+-- Copyright : (c) 2017-2018 Herbert Valerio Riedel
10+-- (c) 2008-2009, 2012 Antoine Latter
1011-- (c) 2009 Mark Lentczner
1112--
1213-- License : BSD-style
1314--
14−-- Maintainer : aslatter@gmail.com
15−-- Stability : experimental
15+-- Maintainer : hvr@gnu.org
1616-- Portability : portable
1717
1818module Data.UUID.Types.Internal
@@ -77,8 +77,8 @@ import System.Random
7777
7878
7979-- |The UUID type. A 'Random' instance is provided which produces
80−-- insecure version 4 UUIDs as specified in RFC 4122. The 'Storable' and
81−-- 'Binary' instances are compatible with RFC 4122, storing the fields in
80+-- insecure version 4 UUIDs as specified in <http://tools.ietf.org/html/rfc4122 RFC 4122>. The 'Storable' and
81+-- 'Binary' instances are compatible with <http://tools.ietf.org/html/rfc4122 RFC 4122>, storing the fields in
8282-- network order as 16 bytes.
8383data UUID = UUID {-# UNPACK #-} !Word64 {-# UNPACK #-} !Word64
8484 deriving (Eq, Ord, Typeable)
@@ -273,7 +273,7 @@ null = (== nil)
273273 -- null (UUID 0 0 0 0) = True
274274 -- null _ = False
275275
276−-- |The nil UUID, as defined in RFC 4122.
276+-- |The nil UUID, as defined in <http://tools.ietf.org/html/rfc4122 RFC 4122>.
277277-- It is a UUID of all zeros. @'null' u@ iff @'u' == 'nil'@.
278278nil :: UUID
279279nil = UUID 0 0