[cig-commits] [commit] devel: Update force_ftz.c (d453e37)

[cig_noreply at geodynamics.org]

Repository : ssh://geoshell/specfem3d

On branch  : devel
Link       : https://github.com/geodynamics/pylith_benchmarks/compare/b18768a541005fcf437aa50bdb2cd57e8e8adc11...c4e103232bf76f6fbf78b6524c8603d2d9b9a577

>---------------------------------------------------------------

commit d453e374b19ae89ad6969c6ee54ac01cf31ad13a
Author: Dimitri Komatitsch <komatits at users.noreply.github.com>
Date:   Mon Apr 7 23:20:56 2014 +0200

    Update force_ftz.c


>---------------------------------------------------------------

d453e374b19ae89ad6969c6ee54ac01cf31ad13a
 src/shared/force_ftz.c | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/src/shared/force_ftz.c b/src/shared/force_ftz.c
index 3f81004..a691518 100644
--- a/src/shared/force_ftz.c
+++ b/src/shared/force_ftz.c
@@ -46,6 +46,10 @@
 /*   * The FTZ bit (bit 15) in the MXCSR register must be masked (value = 1). */
 /*   * The underflow exception (bit 11) needs to be masked (value = 1). */
 
+/* This routine is not strictly necessary for SPECFEM, thus if it does not compile on your system
+   (since it calls some low-level system routines) just suppress all the lines below (i.e. make it an empty file)
+   and comment out the call to force_ftz() in the main SPECFEM program */
+
 #include "config.h"
 
 #define FTZ_BIT 15