This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
In S_mro_get_linear_isa_dfs(), save copying by making a shared hash
authorNicholas Clark <nick@ccl4.org>
Fri, 22 Aug 2008 07:00:17 +0000 (07:00 +0000)
committerNicholas Clark <nick@ccl4.org>
Fri, 22 Aug 2008 07:00:17 +0000 (07:00 +0000)
commitf46ee2483d022839b174c58babe5076a34c0b367
tree7f523a849e8e5dfca498e274afbd100bcc294b00
parent8e45cc2bb9db96fb730868796fbfe1d0f7ece32d
In S_mro_get_linear_isa_dfs(), save copying by making a shared hash
key scalar from the key of the hash entry we've just creating.
(Currently the hash is disposed of afterwards, but soon it won't, so
having both point to the same string buffer will also save memory.)

p4raw-id: //depot/perl@34215
mro.c
sv.c