diff options
| author | Daniel Dragan <bulk88@hotmail.com> | 2012-10-09 19:00:24 -0400 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2012-10-09 18:04:55 -0700 |
| commit | 613875e219013b5860700144832fdde49efb15f2 (patch) | |
| tree | 5fd82f6706a8e15a810d684425b5c05d8d65f4c7 /universal.c | |
| parent | 86e69b18632c87a8d5d07a35439df8d22533b675 (diff) | |
| download | perl-613875e219013b5860700144832fdde49efb15f2.tar.gz | |
add const to Perl_boot_core_UNIVERSAL's xsub registration struct
Move struct xsub_details details to RO memory from RW memory. This increases
the amount of bytes of the image that can be shared between Perl processes
by the OS. The inverse is each perl process takes less process specific
memory. I saw no change in .text, .rdata went from 0x21121 to 0x21391
(+0x270), .data went from 0x3b18 to 0x38b8 (-0x260). 32 bit Visual C.
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/universal.c b/universal.c index 6bae5bdf00..e71745968c 100644 --- a/universal.c +++ b/universal.c @@ -1355,7 +1355,7 @@ struct xsub_details { const char *proto; }; -struct xsub_details details[] = { +const struct xsub_details details[] = { {"UNIVERSAL::isa", XS_UNIVERSAL_isa, NULL}, {"UNIVERSAL::can", XS_UNIVERSAL_can, NULL}, {"UNIVERSAL::DOES", XS_UNIVERSAL_DOES, NULL}, |