projects / platform / upstream / perl.git / commit
? search:
summary | shortlog | log | commit | commitdiff | tree
(parent: 10489e4) | patch
[perl #53746] bug with index() matching beyond end of string
authorDave Mitchell <davem@fdisolutions.com>
Fri, 30 May 2008 21:41:05 +0000 (21:41 +0000)
committerDave Mitchell <davem@fdisolutions.com>
Fri, 30 May 2008 21:41:05 +0000 (21:41 +0000)
commit8ba22ff48d546c5622ef74aee96415810fcbf7a0
tree645245e71b86a0d2b86af852cda34e5dba003fc1tree | snapshot
parent10489e41959ba56eedd511a8c320dfec04d8f588commit | diff
[perl #53746] bug with index() matching beyond end of string
An off-by-one error meant that index($str,...)
was effectively being executed as index("$str\0", ...).
Probably introduced by change #26511.
p4raw-link: @26511 on //depot/perl: 4c8626beeba549aaf3f327729c56a599716ee8b7

p4raw-id: //depot/perl@33952
t/op/index.t diff | blob | history
util.c diff | blob | history
Domain: System / Base;