pinosaur
/
ekitaihs.git
/ blob
e413b67de13c4f5c6ed8412d59d0504178486a6b
[ekitaihs.git]
/
Ekitai.hs
1
import System.Environment
2
3
import Parse
4
5
main = do
6
argv <- getArgs
7
(opts, fname) <- ekitaiOpts argv
8
putStrLn fname
9
return 0
10