HsLexerGen.hs

import HaskellLexicalSyntax(program) -- The lexical syntax specification
import LexerGen2(lexerGen)           -- The lexer generator implementation
import System(getArgs)

main = putStrLn . lexerGen "HsLex" "haskellLex" program =<< getArgs