diff options
| author | Nicholas Clark <nick@ccl4.org> | 2009-10-13 10:27:36 +0100 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2009-10-13 10:27:36 +0100 |
| commit | 8290c3237cb4f93c9895ceba724c626dd529346f (patch) | |
| tree | 6bc1bb32b5580e5417fca0746c405d661a50124d /proto.h | |
| parent | a4df5da1fe962395b9ad9ab6a0922d022fdb809c (diff) | |
| download | perl-8290c3237cb4f93c9895ceba724c626dd529346f.tar.gz | |
Move the code related to deprecate("comma-less variable list") into a function.
This makes all calls to deprecate() string constants.
Diffstat (limited to 'proto.h')
| -rw-r--r-- | proto.h | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -5841,6 +5841,7 @@ STATIC SV* S_new_constant(pTHX_ const char *s, STRLEN len, const char *key, STRL #define PERL_ARGS_ASSERT_NEW_CONSTANT \ assert(key); assert(sv) +STATIC int S_deprecate_commaless_var_list(pTHX); STATIC int S_ao(pTHX_ int toketype); # if defined(PERL_CR_FILTER) STATIC I32 S_cr_textfilter(pTHX_ int idx, SV *sv, int maxlen); |