diff options
| author | Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> | 2023-02-10 14:35:59 +0000 |
|---|---|---|
| committer | Paul "LeoNerd" Evans <leonerd@leonerd.org.uk> | 2023-02-10 14:35:59 +0000 |
| commit | 185929a010d6025e1b146d410a0f1581cc336b75 (patch) | |
| tree | ff8e696a1813889bbe6493d6f3c7550476cda464 /embed.h | |
| parent | b40895ae558e0aff0c347785dafeaaff40a01801 (diff) | |
| parent | fd11211b37c20262922903f6435c1c09ac046e5c (diff) | |
| download | perl-185929a010d6025e1b146d410a0f1581cc336b75.tar.gz | |
Merge stage 1 of 'feature-class' into blead
Implements the most basic `class`, `field` and `method` keywords.
Diffstat (limited to 'embed.h')
| -rw-r--r-- | embed.h | 11 |
1 files changed, 11 insertions, 0 deletions
@@ -1972,6 +1972,17 @@ # define my_pclose(a) Perl_my_pclose(aTHX_ a) # define my_popen(a,b) Perl_my_popen(aTHX_ a,b) # endif /* !defined(PERL_IMPLICIT_SYS) */ +# if defined(PERL_IN_CLASS_C) || defined(PERL_IN_PAD_C) || \ + defined(PERL_IN_PERLY_C) || defined(PERL_IN_TOKE_C) +# define class_add_ADJUST(a,b) Perl_class_add_ADJUST(aTHX_ a,b) +# define class_add_field(a,b) Perl_class_add_field(aTHX_ a,b) +# define class_prepare_method_parse(a) Perl_class_prepare_method_parse(aTHX_ a) +# define class_seal_stash(a) Perl_class_seal_stash(aTHX_ a) +# define class_setup_stash(a) Perl_class_setup_stash(aTHX_ a) +# define class_wrap_method_body(a) Perl_class_wrap_method_body(aTHX_ a) +# define croak_kw_unless_class(a) Perl_croak_kw_unless_class(aTHX_ a) +# endif /* defined(PERL_IN_CLASS_C) || defined(PERL_IN_PAD_C) || \ + defined(PERL_IN_PERLY_C) || defined(PERL_IN_TOKE_C) */ # if defined(PERL_IN_REGEX_ENGINE) # define check_regnode_after(a,b) Perl_check_regnode_after(aTHX_ a,b) # define regnext(a) Perl_regnext(aTHX_ a) |