diff options
| author | David Mitchell <davem@iabyn.com> | 2012-06-22 12:36:03 +0100 |
|---|---|---|
| committer | David Mitchell <davem@iabyn.com> | 2012-09-08 15:42:06 +0100 |
| commit | d3b97530399d61590a1500b52bdba553d657bda5 (patch) | |
| tree | 0ad370f9d3c601b62e19d31ef7c20290098ce23d /intrpvar.h | |
| parent | 8fd1a95029bf0ff87a3064dec7d6645f40359f2c (diff) | |
| download | perl-d3b97530399d61590a1500b52bdba553d657bda5.tar.gz | |
PL_sawampersand: use 3 bit flags rather than bool
Set a separate flag for each of $`, $& and $'.
It still works fine in boolean context.
This will allow us to have more refined control over what parts
of a match string to copy (we currently copy the whole string).
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/intrpvar.h b/intrpvar.h index f57fa7df62..94b7425c10 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -292,7 +292,7 @@ The C variable which corresponds to Perl's $^W warning variable. */ PERLVAR(I, dowarn, U8) -PERLVAR(I, sawampersand, bool) /* must save all match strings */ +PERLVAR(I, sawampersand, U8) /* must save all match strings */ PERLVAR(I, unsafe, bool) PERLVAR(I, exit_flags, U8) /* was exit() unexpected, etc. */ |