[cig-commits] [commit] devel: Update force_ftz.c (d453e37)
cig_noreply at geodynamics.org
cig_noreply at geodynamics.org
Mon Apr 7 14:20:50 PDT 2014
Repository : ssh://shell.geodynamics.org/specfem3d
On branch : devel
Link : https://github.com/geodynamics/specfem3d/compare/e4139e0f94f6809b388dcfa8788475e41293c003...d453e374b19ae89ad6969c6ee54ac01cf31ad13a
>---------------------------------------------------------------
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
More information about the CIG-COMMITS
mailing list