cga/GtkMain.hs
2014-10-10 17:40:08 +02:00

11 lines
164 B
Haskell

{-# OPTIONS_HADDOCK ignore-exports #-}
import GUI.Gtk
import System.Environment
main :: IO ()
main = do
a <- getArgs
makeGUI (if null a then "" else head a)