|
Lines 357-362
Link Here
|
| 357 |
/* _FPU_MASK_ZM | _FPU_MASK_OM | _FPU_MASK_UM | _FPU_MASK_IM */ |
357 |
/* _FPU_MASK_ZM | _FPU_MASK_OM | _FPU_MASK_UM | _FPU_MASK_IM */ |
| 358 |
#define SOMA_FPEXCEPTIONS_ON() __setfpucw( _FPU_DEFAULT | 0x000000F0 ) |
358 |
#define SOMA_FPEXCEPTIONS_ON() __setfpucw( _FPU_DEFAULT | 0x000000F0 ) |
| 359 |
#define SOMA_FPEXCEPTIONS_OFF() __setfpucw( _FPU_DEFAULT ) |
359 |
#define SOMA_FPEXCEPTIONS_OFF() __setfpucw( _FPU_DEFAULT ) |
|
|
360 |
#elif defined(S390) |
| 361 |
#include <fenv.h> |
| 362 |
#define SOMA_FPEXCEPTIONS_ON() feenableexcept (FE_ALL_EXCEPT) |
| 363 |
#define SOMA_FPEXCEPTIONS_OFF() fedisableexcept (FE_ALL_EXCEPT) |
| 360 |
#else |
364 |
#else |
| 361 |
#define SOMA_FPEXCEPTIONS_ON() __setfpucw( _FPU_DEFAULT & ~0x001F ) |
365 |
#define SOMA_FPEXCEPTIONS_ON() __setfpucw( _FPU_DEFAULT & ~0x001F ) |
| 362 |
#define SOMA_FPEXCEPTIONS_OFF() __setfpucw( _FPU_IEEE ) |
366 |
#define SOMA_FPEXCEPTIONS_OFF() __setfpucw( _FPU_IEEE ) |