source/factorcss/FactorCSS.hs

import Tokeniser
import Parser
import CSS

main = do
        s <- getContents
--      print (alexScanTokens s)
--      print (parser (alexScanTokens s))
        putStr (unlines (show_stylesheet (parser (alexScanTokens s))))
1	james	61	import Tokeniser
2			import Parser
3			import CSS
4
5			main = do
6			s <- getContents
7			-- print (alexScanTokens s)
8			-- print (parser (alexScanTokens s))
9			putStr (unlines (show_stylesheet (parser (alexScanTokens s))))