]>
Commit | Line | Data |
---|---|---|
4c039060 | 1 | /************************************************************************** |
2 | * Copyright(c) 1998-1999, ALICE Experiment at CERN, All rights reserved. * | |
3 | * * | |
4 | * Author: The ALICE Off-line Project. * | |
5 | * Contributors are mentioned in the code where appropriate. * | |
6 | * * | |
7 | * Permission to use, copy, modify and distribute this software and its * | |
8 | * documentation strictly for non-commercial purposes is hereby granted * | |
9 | * without fee, provided that the above copyright notice appears in all * | |
10 | * copies and that both the copyright notice and this permission notice * | |
11 | * appear in the supporting documentation. The authors make no claims * | |
12 | * about the suitability of this software for any purpose. It is * | |
13 | * provided "as is" without express or implied warranty. * | |
14 | **************************************************************************/ | |
15 | ||
16 | /* | |
17 | $Log$ | |
18 | */ | |
19 | ||
fe4da5cc | 20 | #if defined(CERNLIB_WINNT) |
21 | #define gcaddc GCADDC | |
22 | #define gcaddf GCADDF | |
6d462b1c | 23 | #define gcaddd GCADDD |
fe4da5cc | 24 | #define gcaddi GCADDI |
25 | #define gcaddl GCADDL | |
26 | #define type_of_call _stdcall | |
27 | #else | |
28 | #define gcaddc gcaddc_ | |
29 | #define gcaddf gcaddf_ | |
6d462b1c | 30 | #define gcaddd gcaddd_ |
fe4da5cc | 31 | #define gcaddi gcaddi_ |
32 | #define gcaddl gcaddl_ | |
33 | #define type_of_call | |
34 | #endif | |
35 | ||
36 | extern "C" char* type_of_call gcaddc(char *arg) | |
37 | { | |
38 | return arg; | |
39 | } | |
6d462b1c | 40 | extern "C" double* type_of_call gcaddd(double *arg) |
41 | { | |
42 | return arg; | |
43 | } | |
fe4da5cc | 44 | extern "C" int* type_of_call gcaddi(int *arg) |
45 | { | |
46 | return arg; | |
47 | } | |
48 | extern "C" float* type_of_call gcaddf(float *arg) | |
49 | { | |
50 | return arg; | |
51 | } | |
52 | extern "C" int* type_of_call gcaddl(int *arg) | |
53 | { | |
54 | return arg; | |
55 | } |