PR#6780: Poor error message for wrong -farch and -ffpu options (ocamlopt, ARM)

master
Xavier Leroy 2015-12-06 16:57:17 +01:00
parent 64146625f6
commit 9d78aa722f
2 changed files with 3 additions and 2 deletions

View File

@ -309,6 +309,7 @@ Bug fixes:
- PR#6744: Univars can escape through polymorphic variants (partial fix)
- PR#6776: Failure to kill the "tick" thread, segfault when exiting the runtime
- PR#6752: Extensible variant types and scope escaping
- PR#6780: Poor error message for wrong -farch and -ffpu options (ocamlopt, ARM)
- PR#6805: Duplicated expression in case of hole in a non-failing switch.
(Luc Maranget)
- PR#6808: the parsing of OCAMLRUNPARAM is too lax

View File

@ -64,7 +64,7 @@ let farch spec =
| "armv6" -> ARMv6
| "armv6t2" -> ARMv6T2
| "armv7" -> ARMv7
| spec -> raise (Arg.Bad spec))
| spec -> raise (Arg.Bad ("wrong '-farch' option: " ^ spec))
let ffpu spec =
fpu := (match spec with
@ -72,7 +72,7 @@ let ffpu spec =
| "vfpv2" when abi = EABI_HF -> VFPv2
| "vfpv3-d16" when abi = EABI_HF -> VFPv3_D16
| "vfpv3" when abi = EABI_HF -> VFPv3
| spec -> raise (Arg.Bad spec))
| spec -> raise (Arg.Bad ("wrong '-ffpu' option: " ^ spec))
let command_line_options =
[ "-farch", Arg.String farch,