cga/GtkMain.hs

11 lines
164 B
Haskell
Raw Normal View History

{-# OPTIONS_HADDOCK ignore-exports #-}
2014-10-10 15:40:08 +00:00
import GUI.Gtk
2014-10-01 19:47:54 +00:00
import System.Environment
2014-09-30 22:05:29 +00:00
main :: IO ()
2014-10-01 19:47:54 +00:00
main = do
a <- getArgs
2014-10-05 16:43:10 +00:00
makeGUI (if null a then "" else head a)