Skip to content

Instantly share code, notes, and snippets.

@ecthiender
ecthiender / main.hs
Created August 30, 2017 18:59 — forked from thsutton/main.hs
Monad logger
{-# LANGUAGE GeneralizedNewtypeDeriving #-}
{-# LANGUAGE TemplateHaskell #-}
{-# LANGUAGE OverloadedStrings #-}
module Main where
import Control.Applicative
import Control.Monad.Except
import Control.Monad.IO.Class ()
import Control.Monad.Reader
var Timer;
Timer = (function() {
function Timer(opts) {
this.opts = opts != null ? opts : {};
_(this).extend(Backbone.Events);
_.defaults(this.opts, {
start: 0
});