1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
|
#ifndef XSH_CAPS_H
#define XSH_CAPS_H 1
#define XSH_HAS_PERL(R, V, S) (PERL_REVISION > (R) || (PERL_REVISION == (R) && (PERL_VERSION > (V) || (PERL_VERSION == (V) && (PERL_SUBVERSION >= (S))))))
#define XSH_HAS_PERL_BRANCH(R, V, S) (PERL_REVISION == (R) && PERL_VERSION == (V) && PERL_SUBVERSION >= (S))
#define XSH_HAS_PERL_EXACT(R, V, S) ((PERL_REVISION == (R)) && (PERL_VERSION == (V)) && (PERL_SUBVERSION == (S)))
#ifndef XSH_PERL_PATCHLEVEL
# ifdef PERL_PATCHNUM
# define XSH_PERL_PATCHLEVEL PERL_PATCHNUM
# else
# define XSH_PERL_PATCHLEVEL 0
# endif
#endif
#define XSH_HAS_PERL_MAINT(R, V, S, P) (PERL_REVISION == (R) && PERL_VERSION == (V) && (XSH_PERL_PATCHLEVEL >= (P) || (!XSH_PERL_PATCHLEVEL && PERL_SUBVERSION >= (S))))
#ifndef XSH_MULTIPLICITY
# if defined(MULTIPLICITY)
# define XSH_MULTIPLICITY 1
# else
# define XSH_MULTIPLICITY 0
# endif
#endif
#if XSH_MULTIPLICITY
# ifndef PERL_IMPLICIT_CONTEXT
# error MULTIPLICITY builds must set PERL_IMPLICIT_CONTEXT
# endif
# ifndef tTHX
# define tTHX PerlInterpreter*
# endif
#endif
#if XSH_MULTIPLICITY && defined(USE_ITHREADS) && defined(dMY_CXT) && defined(MY_CXT) && defined(START_MY_CXT) && defined(MY_CXT_INIT) && (defined(MY_CXT_CLONE) || defined(dMY_CXT_SV))
# define XSH_THREADSAFE 1
#else
# define XSH_THREADSAFE 0
#endif
/* Safe unless stated otherwise in Makefile.PL */
#ifndef XSH_FORKSAFE
# define XSH_FORKSAFE 1
#endif
#endif /* XSH_CAPS_H */
|
