@@ -6,13 +6,13 @@ module Data.UUID
66 ) where
77
88import Prelude (class Ord, class Eq, class Show, compare, (==), ($), pure, (<<<), (>>=))
9−import Control.Monad.Eff (Eff)
9+import Control.Monad.Eff (Eff, kind Effect)
1010import Data.Maybe (Maybe(Nothing, Just))
1111
1212newtype UUID = UUID String
1313
1414-- | The effect of generating a new UUID.
15−foreign import data GENUUID :: !
15+foreign import data GENUUID :: Effect
1616
1717foreign import getUUIDImpl :: forall e. Eff (uuid :: GENUUID | e) String
1818