File: init.h

package info (click to toggle)
libpromise-xs-perl 0.20-1
  • links: PTS
  • area: main
  • in suites: forky, sid, trixie
  • size: 908 kB
  • sloc: perl: 1,097; ansic: 355; makefile: 3
file content (30 lines) | stat: -rw-r--r-- 494 bytes parent folder | download | duplicates (2)
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
#ifndef EASYXS_INIT
#define EASYXS_INIT 1

#ifdef __cplusplus
extern "C" {
#endif

#define PERL_NO_GET_CONTEXT
#include "EXTERN.h"

/* Implement perl5 7169efc77525df for older perls (part 1): */
#define STMT_START  do
#define STMT_END    while (0)

#include "perl.h"
#include "XSUB.h"

#include "ppport.h"

#ifdef __cplusplus
}
#endif

/* Implement perl5 7169efc77525df for older perls (part 2): */
#undef STMT_START
#undef STMT_END
#define STMT_START  do
#define STMT_END    while (0)

#endif