Skip to content

Instantly share code, notes, and snippets.

@rayshih
Last active August 9, 2018 06:55
Show Gist options
  • Save rayshih/7ba385836940c72fc847abdb3c8ce0cb to your computer and use it in GitHub Desktop.
Save rayshih/7ba385836940c72fc847abdb3c8ce0cb to your computer and use it in GitHub Desktop.
module Main where
import Prelude
import Control.Monad.Eff.Console (log)
import TryPureScript (render, withConsole)
data Weekday = Monday
| Tuesday
| Wednesday
| Thursday
| Friday
printDay Monday = log "Monday"
printDay Tuesday = log "Tuesday"
printDay Wednesday = log "Wednesday"
printDay Thursday = log "Thursday"
printDay Friday = log "Friday"
main = render =<< withConsole do
printDay Monday
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment