diff options
| author | Michael Schmidt <github@mschmidt.me> | 2016-08-17 16:32:56 +0200 |
|---|---|---|
| committer | Michael Schmidt <github@mschmidt.me> | 2016-08-17 16:32:56 +0200 |
| commit | e0f0f573a4a8fc1f564a31388afa9c23e48bb016 (patch) | |
| tree | b7c004b3aae01c79bef8c8914e759a1e3ce358f7 /driver/Configuration.ml | |
| parent | 18fcf2ffef8b4ba5eb0624b15371e93b4ac88cfe (diff) | |
| parent | e2b4459ccd1b0f8436cb70a631772d715e642dcd (diff) | |
| download | compcert-e0f0f573a4a8fc1f564a31388afa9c23e48bb016.tar.gz compcert-e0f0f573a4a8fc1f564a31388afa9c23e48bb016.zip | |
fix merge conflicts
Diffstat (limited to 'driver/Configuration.ml')
| -rw-r--r-- | driver/Configuration.ml | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/driver/Configuration.ml b/driver/Configuration.ml index 765b075a..87e29e0f 100644 --- a/driver/Configuration.ml +++ b/driver/Configuration.ml @@ -176,3 +176,15 @@ let struct_return_style = | "int1-8" -> SR_int1to8 | "ref" -> SR_ref | v -> bad_config "struct_return_style" [v] + +type response_file_style = + | Gnu (* responsefiles in gnu compatible syntax *) + | Diab (* responsefiles in diab compatible syntax *) + | Unsupported (* responsefiles are not supported *) + +let response_file_style = + match get_config_string "response_file_style" with + | "unsupported" -> Unsupported + | "gnu" -> Gnu + | "diab" -> Diab + | v -> bad_config "response_file_style" [v] |