7 #define PAPI_CHECK(CALL) \
8 if((papi_error=(CALL)) != PAPI_OK) { \
9 debugBelch("PAPI function failed in module %s at line %d with error code %d\n", \
10 __FILE__,__LINE__,papi_error); \
13 /* Check the error value of a PAPI call, reporting an error, if needed */
14 extern int papi_error;
16 /* While PAPI reporting is going on this flag is on */
17 extern int papi_is_reporting;
19 /* Event sets and counter arrays for GC and mutator */
21 extern int MutatorEvents;
24 extern long_long MutatorCounters[];
25 extern long_long GCCounters[];
27 long_long papi_counter(long_long values[],int event);
28 void papi_report(long_long PapiCounters[]);
29 void papi_add_events(int EventSet);
31 void papi_init_eventsets(void);
32 void papi_start_mutator_count(void);
33 void papi_stop_mutator_count(void);
34 void papi_start_gc_count(void);
35 void papi_stop_gc_count(void);