}
/* calculates center of mass of selection index from all coordinates x */
-#if defined(__INTEL_COMPILER) && ((__INTEL_COMPILER == 1900 && __INTEL_COMPILER_UPDATE >= 5) || __INTEL_COMPILER >= 1910)
-#pragma intel optimization_level 2
+ // Compiler segfault with 2019_update_5 and 2020_initial
-void pull_calc_coms(const t_commrec *cr,
- pull_t *pull,
- const t_mdatoms *md,
- t_pbc *pbc,
- double t,
- const rvec x[], rvec *xp)
++#if defined(__INTEL_COMPILER) \
++ && ((__INTEL_COMPILER == 1900 && __INTEL_COMPILER_UPDATE >= 5) || __INTEL_COMPILER >= 1910)
++# pragma intel optimization_level 2
+ #endif
+void pull_calc_coms(const t_commrec* cr,
+ pull_t* pull,
+ const t_mdatoms* md,
+ t_pbc* pbc,
+ double t,
+ const rvec x[],
+ rvec* xp)
{
real twopi_box = 0;
- pull_comm_t *comm;
+ pull_comm_t* comm;
comm = &pull->comm;