summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAustin Seipp <austin@well-typed.com>2014-07-21 20:31:53 -0500
committerAustin Seipp <austin@well-typed.com>2014-07-28 09:29:16 -0500
commitad36b1ad09be7eb7276850ff02e69484672ea3eb (patch)
treebba693e74b1a35929371f6599510ac61de5c5d8d
parent42f3bdf3267c2cb3f741de1550507c88c860673f (diff)
downloadhaskell-ad36b1ad09be7eb7276850ff02e69484672ea3eb.tar.gz
rts: delint Papi.c
Signed-off-by: Austin Seipp <austin@well-typed.com>
-rw-r--r--rts/Papi.c10
1 files changed, 6 insertions, 4 deletions
diff --git a/rts/Papi.c b/rts/Papi.c
index 3da612ed79..a36157f4c1 100644
--- a/rts/Papi.c
+++ b/rts/Papi.c
@@ -61,9 +61,10 @@ struct _papi_events {
#define BIG_STRING_LEN 512
-#define PAPI_CHECK(CALL) \
- if((papi_error=(CALL)) != PAPI_OK) { \
- debugBelch("PAPI function failed in module %s at line %d with error code %d\n", \
+#define PAPI_CHECK(CALL) \
+ if((papi_error=(CALL)) != PAPI_OK) { \
+ debugBelch("PAPI function failed in module %s at line %d " \
+ "with error code %d\n", \
__FILE__,__LINE__,papi_error); \
}
@@ -132,7 +133,8 @@ init_countable_events(void)
if (RtsFlags.PapiFlags.eventType==PAPI_FLAG_BRANCH) {
PAPI_ADD_EVENT(FR_BR);
PAPI_ADD_EVENT(FR_BR_MIS);
- /* Docs are wrong? Opteron does not count indirect branch misses exclusively */
+ // Docs are wrong? Opteron does not count indirect branch
+ // misses exclusively
PAPI_ADD_EVENT(FR_BR_MISCOMPARE);
} else if (RtsFlags.PapiFlags.eventType==PAPI_FLAG_STALLS) {
PAPI_ADD_EVENT(FR_DISPATCH_STALLS);