File mvapich-s390_get_cycles.patch of Package mvapich2.4642

---
 src/mpid/ch3/channels/common/include/mv2_clock.h |    6 ++++++
 1 file changed, 6 insertions(+)

Index: src/mpid/ch3/channels/common/include/mv2_clock.h
===================================================================
--- src/mpid/ch3/channels/common/include/mv2_clock.h.orig
+++ src/mpid/ch3/channels/common/include/mv2_clock.h
@@ -82,6 +82,14 @@ static inline cycles_t get_cycles()
     return ret;
 }
 
+#elif defined(__s390__) || defined(__s390x__)
+typedef unsigned long cycles_t;
+static inline cycles_t get_cycles()
+{
+    unsigned long  clk;
+    asm volatile("stck %0" : "=Q" (clk) : : "cc");
+    return clk >> 2;
+}
 #else
 #warning get_cycles not implemented for this architecture: attempt asm/timex.h
 #include <asm/timex.h>
openSUSE Build Service is sponsored by