{-# LANGUAGE ForeignFunctionInterface #-}

module Main where

import Data.JSString

foreign import javascript unsafe "alert($1);" alert :: JSString -> IO ()

main = alert "Hello JS"