HERWIG/herwig6_address.c

   1 #  define herwig6_addressc herwig6_addressc_
   2 #  define herwig6_addressf herwig6_addressf_
   3 #  define herwig6_addressi herwig6_addressi_
   4 #  define herwig6_addressd herwig6_addressd_
   5 #  define herwig6_addressl herwig6_addressl_
   6 #  define type_of_call
   7
   8
   9 char* type_of_call herwig6_addressc(char *arg)
  10 {
  11   return arg;
  12 }
  13 int*  type_of_call herwig6_addressi(int  *arg)
  14 {
  15   return arg;
  16 }
  17 float* type_of_call herwig6_addressf(float *arg)
  18 {
  19   return arg;
  20 }
  21 double* type_of_call herwig6_addressd(double *arg)
  22 {
  23   return arg;
  24 }
  25
  26 int* type_of_call herwig6_addressl(int *arg)
  27 {
  28   return arg;
  29 }