diff --git a/src/Effects/Time.hs b/src/Effects/Time.hs
index 845c910..14f6415 100644
--- a/src/Effects/Time.hs
+++ b/src/Effects/Time.hs
@@ -22,7 +22,22 @@ data Time :: Effect where
   CurrentTimeT :: Time m Text
   BenchFunction :: m a -> Time m (Timespan, a)
 
-makeEffect ''Time
+makeEffect_ ''Time
+
+currentTime ::
+  Time :> es =>
+  -- | Returns current time
+  Eff es C.Time
+
+currentTimeB ::
+  Time :> es =>
+  -- | Returns current time
+  Eff es T.Builder
+
+currentTimeT ::
+  Time :> es =>
+  -- | Returns current time
+  Eff es Text
 
 runTimeEff ::
   (IOE :> es) =>