blob: 0e95f13ded030e1b9e978a260aa98e2242c4bc21 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
|
#ifdef NEED_PERL_H
# include <EXTERN.h>
# ifndef _SEM_SEMUN_UNDEFINED
# define HAS_UNION_SEMUN
# endif
# include <perl.h>
# undef _
# undef PACKAGE
/* For compatibility with perl 5.004 and older */
# ifndef ERRSV
# define ERRSV GvSV(errgv)
# endif
extern PerlInterpreter *my_perl; /* must be called my_perl or some perl implementations won't work */
#endif
#include "common.h"
#define MODULE_NAME "perl/core"
|
