diff options
Diffstat (limited to 'meta/recipes-devtools/perl/perl-5.14.3/letgcc-find-errno.patch')
-rw-r--r-- | meta/recipes-devtools/perl/perl-5.14.3/letgcc-find-errno.patch | 46 |
1 files changed, 46 insertions, 0 deletions
diff --git a/meta/recipes-devtools/perl/perl-5.14.3/letgcc-find-errno.patch b/meta/recipes-devtools/perl/perl-5.14.3/letgcc-find-errno.patch new file mode 100644 index 0000000000..5161e4c8b6 --- /dev/null +++ b/meta/recipes-devtools/perl/perl-5.14.3/letgcc-find-errno.patch | |||
@@ -0,0 +1,46 @@ | |||
1 | Upstream-Status:Inappropriate [embedded specific] | ||
2 | |||
3 | This removes all the logic that perl uses to locate an appropriate | ||
4 | errno.h for the target. Instead we simple create a file that does | ||
5 | |||
6 | #include "errno.h" | ||
7 | |||
8 | and use that as the file to parse. This is needed when using an | ||
9 | external toolchain since perl will search in ${STAGING_INCDIR} for | ||
10 | errno.h (when using gcc) and that isn't where it's located - its | ||
11 | wherever the external toolchain keeps it's headers. | ||
12 | |||
13 | Index: perl-5.12.3/ext/Errno/Errno_pm.PL | ||
14 | =================================================================== | ||
15 | --- perl-5.12.3.orig/ext/Errno/Errno_pm.PL | ||
16 | +++ perl-5.12.3/ext/Errno/Errno_pm.PL | ||
17 | @@ -17,8 +17,18 @@ unlink "Errno.tmp" if -f "Errno.tmp"; | ||
18 | open OUT, ">Errno.tmp" or die "Cannot open Errno.tmp: $!"; | ||
19 | select OUT; | ||
20 | my $file; | ||
21 | -my @files = get_files(); | ||
22 | -if ($Config{gccversion} ne '' && $^O eq 'MSWin32') { | ||
23 | +#my @files = get_files(); | ||
24 | +my @files = ("errno.h"); | ||
25 | + | ||
26 | +if (1) { | ||
27 | + open INCS, '>includes.c' or | ||
28 | + die "Cannot open includes.c"; | ||
29 | + print INCS qq[#include "errno.h"\n]; | ||
30 | + close INCS; | ||
31 | + process_file('includes.c'); | ||
32 | + unlink 'includes.c'; | ||
33 | +} | ||
34 | +elsif ($Config{gccversion} ne '' && $^O eq 'MSWin32') { | ||
35 | # MinGW complains "warning: #pragma system_header ignored outside include | ||
36 | # file" if the header files are processed individually, so include them | ||
37 | # all in .c file and process that instead. | ||
38 | @@ -53,7 +63,7 @@ sub process_file { | ||
39 | chomp($file = `cygpath -w "$file"`); | ||
40 | } | ||
41 | |||
42 | - return unless defined $file and -f $file; | ||
43 | +# return unless defined $file and -f $file; | ||
44 | # warn "Processing $file\n"; | ||
45 | |||
46 | local *FH; | ||