diff options
| author | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-08-05 17:48:53 +0200 |
|---|---|---|
| committer | Bernhard Schommer <bernhardschommer@gmail.com> | 2016-08-05 17:48:53 +0200 |
| commit | 8a740c6d441afd980e3bdb43d1844bd23e0ad55b (patch) | |
| tree | b421878688446134d9dfc11668c72fbb1268930f /driver/Commandline.mli | |
| parent | 21156a2fcf48764762c7f2209fa850024378d83a (diff) | |
| download | compcert-8a740c6d441afd980e3bdb43d1844bd23e0ad55b.tar.gz compcert-8a740c6d441afd980e3bdb43d1844bd23e0ad55b.zip | |
Additional test for color output.
Color output is only enabled if stderr is a tty, and the
environment variable TERM is not empty or dumb.
Bug 18004
Diffstat (limited to 'driver/Commandline.mli')
| -rw-r--r-- | driver/Commandline.mli | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/driver/Commandline.mli b/driver/Commandline.mli index 79786678..5f9d8704 100644 --- a/driver/Commandline.mli +++ b/driver/Commandline.mli @@ -33,6 +33,8 @@ type action = | Self of (string -> unit) (** call the function with the matched string *) | String of (string -> unit) (** read next arg as a string, call function *) | Integer of (int -> unit) (** read next arg as an int, call function *) + | Ignore (** ignore the arg *) + | Unit of (unit -> unit) (** call the function with unit as argument *) val parse_cmdline: (pattern * action) list -> unit |