diff options
author | Karl Williamson <public@khwilliamson.com> | 2013-01-07 08:23:58 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2013-01-11 11:50:36 -0700 |
commit | 17896a857f42d1297358c97b97ee592b824c0c10 (patch) | |
tree | 66919a48ab65650d3a76c5bf4a5242789e173695 /embed.fnc | |
parent | 344451ec0ac464dfefc065162e19e505c7aa8c56 (diff) | |
download | perl-17896a857f42d1297358c97b97ee592b824c0c10.tar.gz |
grok_bslash_[ox]: Add param to silence non-portable warnings
If a hex or octal number is too big to fit in a 32 bit word, grok_oct
and grok_hex by default output a warning that it is a non-portable
value. This new parameter to the grok_bslash functions can cause them
to shut up those warnings. This is currently unused, but will be needed
in future commits.
Diffstat (limited to 'embed.fnc')
-rw-r--r-- | embed.fnc | 20 |
1 files changed, 12 insertions, 8 deletions
@@ -736,14 +736,18 @@ ApdR |I32 |looks_like_number|NN SV *const sv Apd |UV |grok_bin |NN const char* start|NN STRLEN* len_p|NN I32* flags|NULLOK NV *result #if defined(PERL_IN_REGCOMP_C) || defined(PERL_IN_TOKE_C) EMsR |char |grok_bslash_c |const char source|const bool utf8|const bool output_warning -EMsR |bool |grok_bslash_o |NN char** s|NN UV* uv \ - |NN const char** error_msg \ - |const bool output_warning \ - |const bool strict|const bool utf8 -EMiR |bool |grok_bslash_x |NN char** s|NN UV* uv \ - |NN const char** error_msg \ - |const bool output_warning \ - |const bool strict|const bool utf8 +EMsR |bool |grok_bslash_o |NN char** s|NN UV* uv \ + |NN const char** error_msg \ + |const bool output_warning \ + |const bool strict \ + |const bool silence_non_portable \ + |const bool utf8 +EMiR |bool |grok_bslash_x |NN char** s|NN UV* uv \ + |NN const char** error_msg \ + |const bool output_warning \ + |const bool strict \ + |const bool silence_non_portable \ + |const bool utf8 #endif Apd |UV |grok_hex |NN const char* start|NN STRLEN* len_p|NN I32* flags|NULLOK NV *result Apd |int |grok_number |NN const char *pv|STRLEN len|NULLOK UV *valuep |