Merge pull request #21 from matoruru/add-timelog

Add console.timeLog

Author: garyb

src/Effect/Class/Console.purs

@@ -33,5 +33,8 @@ infoShow = liftEffect <<< EffConsole.infoShow
 time :: forall m. MonadEffect m => String -> m Unit
 time = liftEffect <<< EffConsole.time
 
+timeLog :: forall m. MonadEffect m => String -> m Unit
+timeLog = liftEffect <<< EffConsole.timeLog
+
 timeEnd :: forall m. MonadEffect m => String -> m Unit
 timeEnd = liftEffect <<< EffConsole.timeEnd

src/Effect/Console.js

@@ -35,6 +35,13 @@ exports.time = function (s) {
   };
 };
 
+exports.timeLog = function (s) {
+  return function () {
+    console.timeLog(s);
+    return {};
+  };
+};
+
 exports.timeEnd = function (s) {
   return function () {
     console.timeEnd(s);

src/Effect/Console.purs

@@ -48,5 +48,8 @@ infoShow a = info (show a)
 -- | Start a named timer.
 foreign import time :: String -> Effect Unit
 
+-- | Print the time since a named timer started in milliseconds.
+foreign import timeLog :: String -> Effect Unit
+
 -- | Stop a named timer and print time since it started in milliseconds.
 foreign import timeEnd :: String -> Effect Unit