module Main where

--
-- Displays 'Hello .NET World!' using .NET's Console.WriteLine() method.
--

import Foreign.Salsa
import Control.Monad (forever)
import Bindings

main :: IO ()
main = withCLR $ do
    invoke _Console _WriteLine ("Hello .NET World!")
    invoke _Application _EnableVisualStyles ()
    f <- new _Form ()
    invoke _Application _Run (f)
    return ()

-- vim:set sw=4 ts=4 expandtab: