Skip to content
Fetching contributors…
Cannot retrieve contributors at this time
54 lines (43 sloc) 641 Bytes
{-# LANGUAGE NoImplicitPrelude #-}
module DoLet where
import Language.Fay.FFI
import Language.Fay.Prelude
main = do
first
second
third
fourth
fifth
sixth
first = do
let x = 123
print x
second = do
let x = 123
x <- return 10
print x
third = do
x <- return 123
let x = 777
print x
fourth = do
x <- return 123
let y = 777
print x
print y
fifth = do
print 123
x <- return 123
print 10
let y = 777
print y
print x
sixth = do
print 123
Just x <- return (Just 123)
print 10
let y = 777
print y
print x
print :: Double -> Fay ()
print = ffi "console.log(%1)"
Something went wrong with that request. Please try again.