core: remove getwd alias for getcwd
[scilab.git] / scilab / modules / core / includes / machine.h.vc
1 /** machine.h version for vc++ **/
2 /* Copyright INRIA/ENPC */
3
4 #ifndef MACHINE_H
5 #define MACHINE_H
6
7 #include <math.h>
8
9 /* Define if trailing underscores */
10 #define WTU 1
11
12 /* Define if use sharpsigns */
13 #define USE_SHARP_SIGN 1
14
15 /* Define if have exp10 */
16 /* #undef HAVE_EXP10 */
17
18 /* Define if have strerror: used in fileio/misc.c */
19 #define HAVE_STRERROR 1
20
21 /* Define if have termcap library */
22 #define HAVE_TERMCAP 1
23
24 /* CNAME(x,y) ==> xy **/
25
26 #if defined(USE_SHARP_SIGN)
27 #define CNAME(name1,name2) name1##name2
28 #else
29 #define CNAME(name1,name2) name1/**/name2
30 #endif
31
32 /* Define  C2F and F2C entry point conversion */
33 #if defined(WTU)
34 #if defined(USE_SHARP_SIGN)
35 #define C2F(name) name##_
36 #define F2C(name) name##_
37 #else
38 #define C2F(name) name/**/_
39 #define F2C(name) name/**/_
40 #endif
41 #else
42 #define C2F(name) name
43 #define F2C(name) name
44 #endif
45
46 /* Define some functions */
47
48 #if !defined(HAVE_EXP10)
49 /* #define exp10(x) pow( (double)10.0, (x) ) */
50 /* much faster than using pow */
51 #define log_10_ 2.3025850929940456840179914546844 /* log(10) */
52 #define exp10(x) exp( (log_10_) * (x) )
53 #endif
54
55 #if !defined(HAVE_GETWD)
56 #define getwd(x) getcwd(x,1024) /* you must define char x[1024] */
57 #endif
58
59 /*
60    Define integer C type which must fit Fortran integer
61    For Scilab to work, the rule is:
62           size of Fortran double precision = 2 * size of Fortran integer
63
64    At the present time, we suppose:
65        size of Fortran integer = 4 bytes
66        size of Fortran double precision = 8 bytes
67        size of C int = 4 bytes
68 */
69
70 #define SHARED_LIB_EXT ".dll"
71 #define SHARED_LIB_EXTW L".dll"
72
73 /* PATH_SEPARATOR : Under Windows by default is ; */
74 #define PATH_SEPARATOR ";"
75
76 /* DIR_SEPARATOR : Under Windows by default is \ */
77 #define DIR_SEPARATOR "\\"
78 #define DIR_SEPARATORW L"\\"
79
80 #define HAVE_LIBINTL_H
81
82 #if defined( __INTEL_COMPILER) && !defined(_WIN64)
83 #define va_copy(x,y) (x=(y))
84 #endif
85
86 #define SIZEOF_INT 4
87 #define SIZEOF_LONG 4
88
89 #define bsiz 4096
90
91 #endif /* MACHINE_H  */