diff options
| author | Ben Morrow <ben@morrow.me.uk> | 2010-08-20 18:35:58 +0100 |
|---|---|---|
| committer | Jan Dubois <jand@activestate.com> | 2010-08-20 15:57:11 -0700 |
| commit | d88e091f660036722622a815efa9ef3779605ea6 (patch) | |
| tree | 653a33d8dc75118b4598d1f9190659693f994f6b /run.c | |
| parent | ecf9cdab78811498b3ffea48cfdfb09f678050d2 (diff) | |
| download | perl-d88e091f660036722622a815efa9ef3779605ea6.tar.gz | |
Fix my $x = 3; $x = length(undef);.
Assignment of length() to a lexical is optimized by passing the
assigned-to variable as TARG, avoiding a pp_padsv and pp_sassign.
9f621b which changed length(undef) to return undef didn't take this into
account, and used SETs (which doesn't set TARG), so the code above left
$x == 3.
Diffstat (limited to 'run.c')
0 files changed, 0 insertions, 0 deletions