diff options
author | Father Chrysostomos <sprout@cpan.org> | 2013-08-25 00:21:14 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2013-08-25 12:12:35 -0700 |
commit | 5104905ca0e45a6aca96dc9f629e2bdd5058b01b (patch) | |
tree | afdc468ba8c3a57e21dfcc5863f5c3c4d5c30293 /toke.c | |
parent | 83694831aa716521294be467d8300a4e0ae7ff02 (diff) | |
download | perl-5104905ca0e45a6aca96dc9f629e2bdd5058b01b.tar.gz |
toke.c:scan_str: Document args in one spot
and space for readability
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 18 |
1 files changed, 10 insertions, 8 deletions
@@ -10356,11 +10356,15 @@ intro_sym: /* scan_str - takes: start position in buffer - keep_quoted preserve \ on the embedded delimiter(s) - keep_delims preserve the delimiters around the string - re_reparse compiling a run-time /(?{})/: - collapse // to /, and skip encoding src + takes: + start position in buffer + keep_quoted preserve \ on the embedded delimiter(s) + keep_delims preserve the delimiters around the string + re_reparse compiling a run-time /(?{})/: + collapse // to /, and skip encoding src + deprecate_escaped_meta issue a deprecation warning for cer- + tain paired metacharacters that appear + escaped within it returns: position to continue reading from buffer side-effects: multi_start, multi_close, lex_repl or lex_stuff, and updates the read buffer. @@ -10402,9 +10406,7 @@ intro_sym: STATIC char * S_scan_str(pTHX_ char *start, int keep_quoted, int keep_delims, int re_reparse, - bool deprecate_escaped_meta /* Should we issue a deprecation warning - for certain paired metacharacters that - appear escaped within it */ + bool deprecate_escaped_meta ) { dVAR; |