[u/mrichter/AliRoot.git] / GEANT321 / comad / gcadd.cxx

#if defined(CERNLIB_WINNT)
  #define gcaddc GCADDC
  #define gcaddf GCADDF
  #define gcaddi GCADDI
  #define gcaddl GCADDL
  #define type_of_call _stdcall
#else
  #define gcaddc gcaddc_
  #define gcaddf gcaddf_
  #define gcaddi gcaddi_
  #define gcaddl gcaddl_
  #define type_of_call
#endif

extern "C" char* type_of_call gcaddc(char *arg)
{
  return arg;
}
extern "C" int*  type_of_call gcaddi(int  *arg)
{
  return arg;
}
extern "C" float* type_of_call gcaddf(float *arg)
{
  return arg;
}
extern "C" int* type_of_call gcaddl(int *arg)
{
  return arg;
}
Commit	Line	Data
fe4da5cc	1	#if defined(CERNLIB_WINNT)
	2	#define gcaddc GCADDC
	3	#define gcaddf GCADDF
	4	#define gcaddi GCADDI
	5	#define gcaddl GCADDL
	6	#define type_of_call _stdcall
	7	#else
	8	#define gcaddc gcaddc_
	9	#define gcaddf gcaddf_
	10	#define gcaddi gcaddi_
	11	#define gcaddl gcaddl_
	12	#define type_of_call
	13	#endif
	14
	15	extern "C" char* type_of_call gcaddc(char *arg)
	16	{
	17	return arg;
	18	}
	19	extern "C" int* type_of_call gcaddi(int *arg)
	20	{
	21	return arg;
	22	}
	23	extern "C" float* type_of_call gcaddf(float *arg)
	24	{
	25	return arg;
	26	}
	27	extern "C" int* type_of_call gcaddl(int *arg)
	28	{
	29	return arg;
	30	}