Original bug ID: 1984
Reporter: administrator
Status: closed
Resolution: fixed
Priority: normal
Severity: minor
Category: ~DO NOT USE (was: OCaml general)

Bug description

Here's a small and self-explanatory bug fix for ocamllex.

-- Mike Spivey

*** lex/main.ml.orig Wed Dec 17 15:39:55 2003
--- lex/main.ml Wed Dec 17 15:39:57 2003

*** 26,32 ****
let specs =
["-ml", Arg.Set ml_automata,
" Output code that does not use the Lexing module built-in automata
interpreter";
! "-o", Arg.String (fun x -> source_name := Some x),
" Set output file name to ";
"-q", Arg.Set Common.quiet_mode, " Do not display informational
messages";
]
--- 26,32 ----
let specs =
["-ml", Arg.Set ml_automata,
" Output code that does not use the Lexing module built-in automata
interpreter";
! "-o", Arg.String (fun x -> output_name := Some x),
" Set output file name to ";
"-q", Arg.Set Common.quiet_mode, " Do not display informational
messages";
]