mescc: Accept -O, --std, -x.

* scripts/mescc.in (parse-opts): Accept -O, --std, -x.
This commit is contained in:
Jan Nieuwenhuizen 2018-11-08 14:07:27 +01:00
parent 414a94f5f6
commit 213c89072f
No known key found for this signature in database
GPG Key ID: F3C1A0D9C1D65273
1 changed files with 26 additions and 21 deletions

View File

@ -85,11 +85,14 @@ fi
(library (single-char #\l) (value #t)) (library (single-char #\l) (value #t))
(machine (single-char #\m) (value #t)) (machine (single-char #\m) (value #t))
(preprocess (single-char #\E)) (preprocess (single-char #\E))
(std (value #t))
(output (single-char #\o) (value #t)) (output (single-char #\o) (value #t))
(optimize (single-char #\O) (value #t))
(version (single-char #\V)) (version (single-char #\V))
(verbose (single-char #\v)) (verbose (single-char #\v))
(write (single-char #\w) (value #t)))) (write (single-char #\w) (value #t))
(single-dash-options '("-dumpmachine")) (language (single-char #\x) (value #t))))
(single-dash-options '("-dumpmachine" "-std"))
(args (map (lambda (o) (args (map (lambda (o)
(if (member o single-dash-options) (string-append "-" o) (if (member o single-dash-options) (string-append "-" o)
o)) o))
@ -107,29 +110,31 @@ fi
(and (or help? usage?) (and (or help? usage?)
(format (or (and usage? (current-error-port)) (current-output-port)) "\ (format (or (and usage? (current-error-port)) (current-output-port)) "\
Usage: mescc [OPTION]... FILE... Usage: mescc [OPTION]... FILE...
--align align globals --align align globals
-c preprocess, compile and assemble only; do not link -dumpmachine display the compiler's target processor
-dumpmachine display the compiler's target processor
--base-address=ADRRESS --base-address=ADRRESS
use BaseAddress ADDRESS [0x1000000] use BaseAddress ADDRESS [0x1000000]
-D DEFINE[=VALUE] define DEFINE [VALUE=1] -D DEFINE[=VALUE] define DEFINE [VALUE=1]
-E preprocess only; do not compile, assemble or link -E preprocess only; do not compile, assemble or link
-g add debug info [GDB, objdump] TODO: hex2 footer -g add debug info [GDB, objdump] TODO: hex2 footer
-h, --help display this help and exit -h, --help display this help and exit
-I DIR append DIR to include path -I DIR append DIR to include path
-L DIR append DIR to library path -L DIR append DIR to library path
-l LIBNAME link with LIBNAME -l LIBNAME link with LIBNAME
-m BITS compile for BITS bits [32] -m BITS compile for BITS bits [32]
-o FILE write output to FILE -o FILE write output to FILE
-S preprocess and compile only; do not assemble or link -O LEVEL use optimizing LEVEL
-v, --version display version and exit -S preprocess and compile only; do not assemble or link
-w,--write=TYPE dump Nyacc AST using TYPE {pretty-print,write} --std=STANDARD assume that the input sources are for STANDARD
-v, --version display version and exit
-w,--write=TYPE dump Nyacc AST using TYPE {pretty-print,write}
-x LANGUAGE specify LANGUAGE of the following input files
Environment variables: Environment variables:
MES=BINARY run on mes-executable BINARY {mes,guile} MES=BINARY run on mes-executable BINARY {mes,guile}
MES_DEBUG=LEVEL show debug output with verbosity LEVEL {0..5} MES_DEBUG=LEVEL show debug output with verbosity LEVEL {0..5}
NYACC_TRACE=1 show Nyacc progress NYACC_TRACE=1 show Nyacc progress
") ")
(exit (or (and usage? 2) 0))) (exit (or (and usage? 2) 0)))
options)))) options))))