1 (* Copyright (C
) 1999-2005 Henry Cejtin
, Matthew Fluet
, Suresh
2 * Jagannathan
, and Stephen Weeks
.
3 * Copyright (C
) 1997-2000 NEC Research Institute
.
5 * MLton is released under a BSD
-style license
.
6 * See the file MLton
-LICENSE for details
.
13 Process
.usage
{usage
= "file.lex ...",
20 in parse
{switches
= args
, opts
= []}
24 Result
.No msg
=> usage msg
25 | Result
.Yes
[] => usage
"no files"
26 | Result
.Yes files
=> List.foreach (files
, LexGen
.lexGen
)
29 val main
= Process
.makeMain main