This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Various updates and fixes to some of the SysV IPC ops and their tests
[perl5.git] / INTERN.h
CommitLineData
a0d0e21e 1/* INTERN.h
a687059c 2 *
4bb101f2
JH
3 * Copyright (C) 1991, 1992, 1993, 1995, 1996, 1998, 2000, 2001,
4 * by Larry Wall and others
a687059c 5 *
132b68a5
LW
6 * You may distribute under the terms of either the GNU General Public
7 * License or the Artistic License, as specified in the README file.
8d063cd8 8 *
8d063cd8
LW
9 */
10
4633a7c4
LW
11/*
12 * EXT designates a global var which is defined in perl.h
13 * dEXT designates a global var which is defined in another
14 * file, so we can't count on finding it in perl.h
15 * (this practice should be avoided).
16 */
8d063cd8 17#undef EXT
4633a7c4 18#undef dEXT
36477c24
PP
19#undef EXTCONST
20#undef dEXTCONST
400638aa 21
822c8b4d 22# if (defined(WIN32) && defined(__MINGW32__) && ! defined(PERL_IS_MINIPERL))
1ea760a1
SH
23# ifdef __cplusplus
24# define EXT __declspec(dllexport)
25# define dEXT
26# define EXTCONST __declspec(dllexport) extern const
27# define dEXTCONST const
28# else
29# define EXT __declspec(dllexport)
30# define dEXT
31# define EXTCONST __declspec(dllexport) const
32# define dEXTCONST const
33# endif
27da23d5
JH
34# else
35# ifdef __cplusplus
36# define EXT
37# define dEXT
1545a179 38# define EXTCONST EXTERN_C const
27da23d5
JH
39# define dEXTCONST const
40# else
41# define EXT
42# define dEXT
43# define EXTCONST const
44# define dEXTCONST const
45# endif
46# endif
8d063cd8
LW
47
48#undef INIT
49#define INIT(x) = x
50
51#define DOINIT