PAPI_mix_hl_ll.c File Reference

Include dependency graph for PAPI_mix_hl_ll.c:

Go to the source code of this file.

Macros
#define	THRESHOLD   10000
#define	ERROR_RETURN(retval)   { fprintf(stderr, "Error %d %s:line %d: \n", retval,__FILE__,__LINE__); exit(retval); }

Functions
int	your_slow_code ()
int	main ()

Macro Definition Documentation

ERROR_RETURN

#define ERROR_RETURN

(

retval

)

{ fprintf(stderr, "Error %d %s:line %d: \n", retval,__FILE__,__LINE__); exit(retval); }

Definition at line 20 of file PAPI_mix_hl_ll.c.

THRESHOLD

#define THRESHOLD   10000

Definition at line 19 of file PAPI_mix_hl_ll.c.

Function Documentation

main()

int main

(

)

Definition at line 24 of file PAPI_mix_hl_ll.c.

{ 
  float ipc;
  int retval;
  int EventSet = PAPI_NULL;
  long_long values[2];
 
  if ( (retval = PAPI_hl_region_begin("slow_code")) < PAPI_OK )
    ERROR_RETURN(retval);
 
   your_slow_code();
 
  if ( (retval = PAPI_hl_region_end("slow_code")) < PAPI_OK )
    ERROR_RETURN(retval);
 
  if ( (retval = PAPI_hl_stop()) < PAPI_OK )
    ERROR_RETURN(retval);
 
  /* get IPC using low-level API */
  if ( (retval = PAPI_create_eventset(&EventSet)) < PAPI_OK )
    ERROR_RETURN(retval);
  
  if ( (retval = PAPI_add_event(EventSet, PAPI_TOT_INS)) < PAPI_OK )
    ERROR_RETURN(retval);
  if ( (retval = PAPI_add_event(EventSet, PAPI_TOT_CYC)) < PAPI_OK )
    ERROR_RETURN(retval);
 
  if ( (retval = PAPI_start(EventSet)) < PAPI_OK )
    ERROR_RETURN(retval);
 
    your_slow_code();
 
  if ( (retval = PAPI_stop(EventSet, values)) < PAPI_OK )
    ERROR_RETURN(retval);
  
  ipc = (float) ((float)values[0] / (float) ( values[1]));
 
  printf("Results from the low-level API:\n");
  printf("IPC: %f\n", ipc);
 
  exit(0);
}

Here is the call graph for this function:

your_slow_code()

int your_slow_code

(

)

Definition at line 67 of file PAPI_mix_hl_ll.c.

{
  int i;
  double  tmp=1.1;
 
  for(i=1; i<2000; i++)
  { 
    tmp=(tmp+100)/i;
  }
  return 0;
}

Here is the caller graph for this function: