This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
packsizetables.c -> packsizetables.inc
authorJarkko Hietaniemi <jhi@iki.fi>
Sat, 18 Jul 2015 13:28:46 +0000 (16:28 +0300)
committerJarkko Hietaniemi <jhi@iki.fi>
Wed, 22 Jul 2015 12:33:21 +0000 (08:33 -0400)
MANIFEST
packsizetables.inc [moved from packsizetables.c with 100% similarity]
pp_pack.c
regen/genpacksizetables.pl

index 2b7cab5..c731e9e 100644 (file)
--- a/MANIFEST
+++ b/MANIFEST
@@ -4517,7 +4517,7 @@ os2/perlrexx.c                    Support perl interpreter embedded in REXX
 os2/perlrexx.cmd               Test perl interpreter embedded in REXX
 overload.c                     generated overload enum (public)
 overload.h                     generated overload name table (implementation)
-packsizetables.c               The generated packprops array used in pp_pack.c
+packsizetables.inc             The generated packprops array used in pp_pack.c
 pad.c                          Scratchpad functions
 pad.h                          Scratchpad headers
 parser.h                       parser object header
similarity index 100%
rename from packsizetables.c
rename to packsizetables.inc
index cf1074e..dd0dd4e 100644 (file)
--- a/pp_pack.c
+++ b/pp_pack.c
@@ -237,7 +237,7 @@ S_mul128(pTHX_ SV *sv, U8 m)
 #define PACK_SIZE_UNPREDICTABLE                0x40    /* Not a fixed size element */
 #define PACK_SIZE_MASK                 0x3F
 
-#include "packsizetables.c"
+#include "packsizetables.inc"
 
 static void
 S_reverse_copy(const char *src, char *dest, STRLEN len)
index 742eb6f..7a03dcd 100644 (file)
@@ -70,7 +70,7 @@ my %asciimap  = map {chr $_, chr $_} 0..255;
 # will work; just choose one
 my %ebcdicmap = map {chr $_, Encode::encode("posix-bc", chr $_)} 0..255;
 
-my $fh = open_new('packsizetables.c', '>', { by => $0, from => 'its data'});
+my $fh = open_new('packsizetables.inc', '>', { by => $0, from => 'its data'});
 
 print $fh <<"EOC";
 #if TYPE_IS_SHRIEKING != 0x100