diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-08 18:47:35 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-08 18:47:35 +0000 |
| commit | 51371543ca1a75ed152020ad0846b5b8cf11c32f (patch) | |
| tree | 9bfd9a21697b0769e2681483631c742642dd8c45 /perlapi.h | |
| parent | 4d61ec052de5c3a91dc64c80c032c2cbec44d845 (diff) | |
| download | perl-51371543ca1a75ed152020ad0846b5b8cf11c32f.tar.gz | |
more PERL_OBJECT cleanups (changes still untested on Unix!)
p4raw-id: //depot/perl@3660
Diffstat (limited to 'perlapi.h')
| -rwxr-xr-x | perlapi.h | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/perlapi.h b/perlapi.h new file mode 100755 index 0000000000..d1d8dd5617 --- /dev/null +++ b/perlapi.h @@ -0,0 +1,34 @@ +/* !!!!!!! DO NOT EDIT THIS FILE !!!!!!! + This file is built by embed.pl from data in embed.pl, pp.sym, intrpvar.h, + perlvars.h and thrdvar.h. Any changes made here will be lost! +*/ + +#if defined(PERL_OBJECT) + +/* declare accessor functions for Perl variables */ + +START_EXTERN_C + +#undef PERLVAR +#undef PERLVARA +#undef PERLVARI +#undef PERLVARIC +#define PERLVAR(v,t) EXTERN_C t* Perl_##v##_ptr(void *p); +#define PERLVARA(v,n,t) typedef t PL_##v##_t[n]; \ + EXTERN_C PL_##v##_t* Perl_##v##_ptr(void *p); +#define PERLVARI(v,t,i) PERLVAR(v,t) +#define PERLVARIC(v,t,i) PERLVAR(v,t) + +#include "thrdvar.h" +#include "intrpvar.h" +#include "perlvars.h" + +#undef PERLVAR +#undef PERLVARA +#undef PERLVARI +#undef PERLVARIC + +END_EXTERN_C + +#endif /* PERL_OBJECT */ + |