aboutsummaryrefslogtreecommitdiffstats
path: root/flocq/Core/Fcore_FLT.v
diff options
context:
space:
mode:
authorGuillaume Melquiond <guillaume.melquiond@inria.fr>2017-03-08 08:35:29 +0100
committerGuillaume Melquiond <guillaume.melquiond@inria.fr>2017-03-08 08:35:29 +0100
commit177c8fbc523a171e8c8470fa675f9a69ef7f99de (patch)
treef54d8315891bec2f741545991f420dd4407bccc0 /flocq/Core/Fcore_FLT.v
parent44b63eb13151ca5c3e83ee6a9e7eb6c0049c3758 (diff)
downloadcompcert-kvx-177c8fbc523a171e8c8470fa675f9a69ef7f99de.tar.gz
compcert-kvx-177c8fbc523a171e8c8470fa675f9a69ef7f99de.zip
Adapt proofs to future handling of literal constants in Coq.
This commit is mainly a squash of the relevant compatibility commits from Flocq's master. Most of the changes are meant to make the proofs oblivious to the way constants such as 0, 1, 2, and -1 are represented.
Diffstat (limited to 'flocq/Core/Fcore_FLT.v')
-rw-r--r--flocq/Core/Fcore_FLT.v2
1 files changed, 1 insertions, 1 deletions
diff --git a/flocq/Core/Fcore_FLT.v b/flocq/Core/Fcore_FLT.v
index 372af6ad..53dc48a7 100644
--- a/flocq/Core/Fcore_FLT.v
+++ b/flocq/Core/Fcore_FLT.v
@@ -187,7 +187,7 @@ Qed.
(** Links between FLT and FIX (underflow) *)
Theorem canonic_exp_FLT_FIX :
- forall x, x <> R0 ->
+ forall x, x <> 0%R ->
(Rabs x < bpow (emin + prec))%R ->
canonic_exp beta FLT_exp x = canonic_exp beta (FIX_exp emin) x.
Proof.