summaryrefslogtreecommitdiff
path: root/ia32/Archi.v
diff options
context:
space:
mode:
Diffstat (limited to 'ia32/Archi.v')
-rw-r--r--ia32/Archi.v5
1 files changed, 4 insertions, 1 deletions
diff --git a/ia32/Archi.v b/ia32/Archi.v
index fff25cf..674b276 100644
--- a/ia32/Archi.v
+++ b/ia32/Archi.v
@@ -37,7 +37,10 @@ Program Definition default_pl_32 : bool * nan_pl 24 :=
Definition choose_binop_pl_32 (s1: bool) (pl1: nan_pl 24) (s2: bool) (pl2: nan_pl 24) :=
false. (**r always choose first NaN *)
+Definition float_of_single_preserves_sNaN := false.
+
Global Opaque big_endian
default_pl_64 choose_binop_pl_64
- default_pl_32 choose_binop_pl_32.
+ default_pl_32 choose_binop_pl_32
+ float_of_single_preserves_sNaN.