change#3612 was buggy and failed to build Tk; applied Ilya's
[p5sagit/p5-mst-13.2.git] / perlapi.h
CommitLineData
51371543 1/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!!
2 This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h,
3 perlvars.h and thrdvar.h. Any changes made here will be lost!
4*/
5
6#if defined(PERL_OBJECT)
7
8/* declare accessor functions for Perl variables */
9
10START_EXTERN_C
11
12#undef PERLVAR
13#undef PERLVARA
14#undef PERLVARI
15#undef PERLVARIC
16#define PERLVAR(v,t) EXTERN_C t* Perl_##v##_ptr(void *p);
17#define PERLVARA(v,n,t) typedef t PL_##v##_t[n]; \
18 EXTERN_C PL_##v##_t* Perl_##v##_ptr(void *p);
19#define PERLVARI(v,t,i) PERLVAR(v,t)
20#define PERLVARIC(v,t,i) PERLVAR(v,t)
21
22#include "thrdvar.h"
23#include "intrpvar.h"
24#include "perlvars.h"
25
26#undef PERLVAR
27#undef PERLVARA
28#undef PERLVARI
29#undef PERLVARIC
30
31END_EXTERN_C
32
33#endif /* PERL_OBJECT */
34