mirror of
https://github.com/fosslinux/live-bootstrap.git
synced 2026-03-02 01:18:08 +01:00
Cleanup 5.22 and 5.24
This commit is contained in:
parent
654e317725
commit
97f6ac66ec
6 changed files with 188 additions and 12 deletions
|
|
@ -14,10 +14,10 @@ src_prepare() {
|
|||
mv Compress-Raw-Zlib_config.in cpan/Compress-Raw-Zlib/config.in
|
||||
|
||||
# Remove miscellaneous pregenerated files
|
||||
rm -f Porting/Glossary \
|
||||
dist/Devel-PPPort/parts/apidoc.fnc Configure config_h.SH \
|
||||
rm Porting/Glossary \
|
||||
cpan/Devel-PPPort/parts/apidoc.fnc Configure config_h.SH \
|
||||
cpan/Win32API-File/cFile.pc cpan/Sys-Syslog/win32/Win32.pm \
|
||||
dist/ExtUtils-CBuilder/Makefile.PL cpan/Devel-PPPort/parts/apidoc.fnc
|
||||
dist/ExtUtils-CBuilder/Makefile.PL
|
||||
rm win32/perlexe.ico
|
||||
rm -r cpan/Compress-Raw-Zlib/zlib-src
|
||||
|
||||
|
|
@ -27,15 +27,13 @@ src_prepare() {
|
|||
|
||||
# Regenerate other prebuilt header files
|
||||
# Taken from headers of regen scripts
|
||||
rm -f lib/warnings.pm warnings.h regnodes.h reentr.h reentr.c \
|
||||
overload.h opcode.h opnames.h pp_proto.h \
|
||||
keywords.h embed.h embedvar.h perlapi.{c,h} \
|
||||
proto.h lib/overload/numbers.pm regcharclass.h perly.{tab,h,act} \
|
||||
mg_{raw.h,vtable.h} keywords.c l1_char_class_tab.h \
|
||||
lib/feature.pm lib/B/Op_private.pm lib/unicore/uni_keywords.pl \
|
||||
miniperlmain.c unicode_constants.h uni_keywords.h \
|
||||
charclass_invlists.h ebcdic_tables.h mg_names.inc overload.inc \
|
||||
packsizetables.c overload.c mg_names.c
|
||||
rm lib/warnings.pm warnings.h regnodes.h reentr.h reentr.c overload.h \
|
||||
opcode.h opnames.h pp_proto.h keywords.h embed.h embedvar.h \
|
||||
perlapi.{c,h} proto.h lib/overload/numbers.pm regcharclass.h \
|
||||
perly.{tab,h,act} mg_{raw.h,vtable.h} keywords.c l1_char_class_tab.h \
|
||||
lib/feature.pm lib/B/Op_private.pm miniperlmain.c unicode_constants.h \
|
||||
charclass_invlists.h ebcdic_tables.h packsizetables.c overload.c \
|
||||
mg_names.c
|
||||
perl regen.pl
|
||||
perl regen_perly.pl -b bison-2.3
|
||||
perl regen/keywords.pl
|
||||
|
|
|
|||
5
steps/perl-5.24.4/files/Compress-Raw-Zlib_config.in
Normal file
5
steps/perl-5.24.4/files/Compress-Raw-Zlib_config.in
Normal file
|
|
@ -0,0 +1,5 @@
|
|||
BUILD_ZLIB = False
|
||||
INCLUDE = /usr/include
|
||||
LIB = /usr/lib/i386-unknown-linux-musl
|
||||
OLD_ZLIB = False
|
||||
GZIP_OS_CODE = AUTO_DETECT
|
||||
85
steps/perl-5.24.4/pass1.sh
Executable file
85
steps/perl-5.24.4/pass1.sh
Executable file
|
|
@ -0,0 +1,85 @@
|
|||
# SPDX-FileCopyrightText: 2025 fosslinux <fosslinux@aussies.space>
|
||||
#
|
||||
# SPDX-License-Identifier: GPL-3.0-or-later
|
||||
|
||||
src_prepare() {
|
||||
default
|
||||
|
||||
mv Compress-Raw-Zlib_config.in cpan/Compress-Raw-Zlib/config.in
|
||||
|
||||
# Remove miscellaneous pregenerated files
|
||||
rm Porting/Glossary \
|
||||
cpan/Devel-PPPort/parts/apidoc.fnc Configure config_h.SH \
|
||||
cpan/Win32API-File/cFile.pc cpan/Sys-Syslog/win32/Win32.pm \
|
||||
dist/ExtUtils-CBuilder/Makefile.PL
|
||||
rm win32/perlexe.ico
|
||||
rm -r cpan/Compress-Raw-Zlib/zlib-src
|
||||
|
||||
# Generated tests
|
||||
rm cpan/Unicode-Collate/Collate/keys.txt \
|
||||
cpan/Devel-PPPort/t/*.t
|
||||
|
||||
# Regenerate other prebuilt header files
|
||||
# Taken from headers of regen scripts
|
||||
rm lib/warnings.pm warnings.h regnodes.h reentr.h reentr.c overload.h \
|
||||
opcode.h opnames.h pp_proto.h keywords.h embed.h embedvar.h \
|
||||
perlapi.{c,h} proto.h lib/overload/numbers.pm regcharclass.h \
|
||||
perly.{tab,h,act} mg_{raw.h,vtable.h} keywords.c l1_char_class_tab.h \
|
||||
lib/feature.pm lib/B/Op_private.pm miniperlmain.c unicode_constants.h \
|
||||
charclass_invlists.h ebcdic_tables.h mg_names.inc overload.inc \
|
||||
packsizetables.inc
|
||||
perl regen.pl
|
||||
perl regen_perly.pl -b bison-2.3
|
||||
perl regen/keywords.pl
|
||||
perl regen/mk_PL_charclass.pl
|
||||
perl regen/regcharclass.pl
|
||||
perl regen/genpacksizetables.pl
|
||||
perl regen/ebcdic.pl
|
||||
perl regen/mk_invlists.pl
|
||||
perl regen/miniperlmain.pl
|
||||
perl regen/unicode_constants.pl
|
||||
|
||||
# regenerate configure
|
||||
ln -s ../metaconfig*/.package .
|
||||
ln -s ../metaconfig*/U .
|
||||
metaconfig -m
|
||||
|
||||
# Glossary
|
||||
sed -i -e "s:/pro/3gl/CPAN/lib/dist:${PREFIX}/lib/perl5/5.6.2:" \
|
||||
-e "s:/pro/3gl/CPAN/perl:$PWD:" \
|
||||
../metaconfig*/U/mkglossary
|
||||
chmod +x ../metaconfig*/U/mkglossary
|
||||
../metaconfig*/U/mkglossary > Porting/Glossary
|
||||
|
||||
bash cpan/Devel-PPPort/devel/mkapidoc.sh . \
|
||||
cpan/Devel-PPPort/parts/apidoc.fnc \
|
||||
cpan/Devel-PPPort/parts/embed.fnc
|
||||
|
||||
# Remove lines from MANIFEST that we have deleted
|
||||
while read -r line; do
|
||||
f="$(echo "${line}" | cut -d' ' -f1)"
|
||||
if [ -e "${f}" ]; then
|
||||
echo "${line}"
|
||||
fi
|
||||
done < MANIFEST > MANIFEST.new
|
||||
mv MANIFEST.new MANIFEST
|
||||
}
|
||||
|
||||
src_configure() {
|
||||
./Configure -des \
|
||||
-Dprefix="${PREFIX}" \
|
||||
-Dcc=gcc \
|
||||
-Dusedl=false \
|
||||
-Ddate=':' \
|
||||
-Dccflags="-U__DATE__ -U__TIME__" \
|
||||
-Darchname="i386-linux" \
|
||||
-Dmyhostname="(none)" \
|
||||
-Dmaildomain="(none)"
|
||||
}
|
||||
|
||||
src_install() {
|
||||
default
|
||||
|
||||
# Remove messed up manpages
|
||||
rm "${DESTDIR}/"*.0
|
||||
}
|
||||
|
|
@ -0,0 +1,35 @@
|
|||
SPDX-FileCopyrightText: 2015 Karl Williamson <public@khwilliamson.com>
|
||||
SPDX-FileCopyrightText: 2025 fosslinux <fosslinux@aussies.space>
|
||||
|
||||
SPDX-License-Identifier: Artistic-1.0
|
||||
|
||||
This commit does not affect correctness of the script, and negative indexes are
|
||||
not supported in Perl 5.22.
|
||||
|
||||
From c5ea74f1efd612cda79d6ba3cb1430afdc2ab970 Mon Sep 17 00:00:00 2001
|
||||
From: Samuel Tyler <fosslinux@aussies.space>
|
||||
Date: Sun, 31 Aug 2025 12:21:46 +1000
|
||||
Subject: [PATCH] Revert "regen/mk_PL_charclass.pl: Suppress extra null array
|
||||
element"
|
||||
|
||||
This reverts commit e8368231412c57222c53c0dc1fac7f711fa051e2.
|
||||
---
|
||||
regen/mk_PL_charclass.pl | 2 --
|
||||
1 file changed, 2 deletions(-)
|
||||
|
||||
diff --git perl-5.24.4/regen/mk_PL_charclass.pl perl-5.24.4/regen/mk_PL_charclass.pl
|
||||
index 5b609e530b..0bee1ac2a0 100644
|
||||
--- perl-5.24.4/regen/mk_PL_charclass.pl
|
||||
+++ perl-5.24.4/regen/mk_PL_charclass.pl
|
||||
@@ -384,8 +384,6 @@ foreach my $charset (get_supported_code_pages()) {
|
||||
|
||||
$out[$index] .= ",\n";
|
||||
}
|
||||
- $out[-1] =~ s/,$//; # No trailing comma in the final entry
|
||||
-
|
||||
print $out_fh join "", @out;
|
||||
print $out_fh "\n" . get_conditional_compile_line_end();
|
||||
}
|
||||
--
|
||||
2.49.1
|
||||
|
||||
|
|
@ -0,0 +1,51 @@
|
|||
SPDX-FileCopyrightText: 2015 Aaron Crane <arc@cpan.org>
|
||||
SPDX-FileCopyrightText: 2025 fosslinux <fosslinux@aussies.space>
|
||||
|
||||
SPDX-License-Identifier: Artistic-1.0
|
||||
|
||||
The patch avoided autoderef experimental feature by using a new,
|
||||
non-experimental feature not supported in Perl 5.22.
|
||||
|
||||
From dbec508168fd65dae2aff413fe5184f5f457779d Mon Sep 17 00:00:00 2001
|
||||
From: Samuel Tyler <fosslinux@aussies.space>
|
||||
Date: Sun, 31 Aug 2025 14:45:48 +1000
|
||||
Subject: [PATCH] Revert "regen/regcharclass.pl: avoid autoderef feature"
|
||||
|
||||
This reverts commit de6cb0abd243e5772b9783a2cbeef5755a8267d6.
|
||||
---
|
||||
regen/regcharclass.pl | 5 +++--
|
||||
2 files changed, 9 insertions(+), 2 deletions(-)
|
||||
|
||||
diff --git perl-5.24.4/regen/regcharclass.pl perl-5.24.4/regen/regcharclass.pl
|
||||
index 9115eafeb6..279ca013d0 100755
|
||||
--- perl-5.24.4/regen/regcharclass.pl
|
||||
+++ perl-5.24.4/regen/regcharclass.pl
|
||||
@@ -4,6 +4,7 @@ use strict;
|
||||
use 5.008;
|
||||
use warnings;
|
||||
use warnings FATAL => 'all';
|
||||
+no warnings 'experimental::autoderef';
|
||||
use Data::Dumper;
|
||||
$Data::Dumper::Useqq= 1;
|
||||
our $hex_fmt= "0x%02X";
|
||||
@@ -874,7 +875,7 @@ sub calculate_mask(@) {
|
||||
my @final_results;
|
||||
foreach my $count (reverse sort { $a <=> $b } keys %hash) {
|
||||
my $need = 2 ** $count; # Need 8 values for 3 differing bits, etc
|
||||
- foreach my $bits (sort keys $hash{$count}->%*) {
|
||||
+ foreach my $bits (sort keys $hash{$count}) {
|
||||
|
||||
print STDERR __LINE__, ": For $count bit(s) difference ($bits), need $need; have ", scalar @{$hash{$count}{$bits}}, "\n" if DEBUG;
|
||||
|
||||
@@ -962,7 +963,7 @@ sub calculate_mask(@) {
|
||||
# individually.
|
||||
my @individuals;
|
||||
foreach my $count (reverse sort { $a <=> $b } keys %hash) {
|
||||
- foreach my $bits (sort keys $hash{$count}->%*) {
|
||||
+ foreach my $bits (sort keys $hash{$count}) {
|
||||
foreach my $remaining (@{$hash{$count}{$bits}}) {
|
||||
|
||||
# If we already know about this value, just ignore it.
|
||||
--
|
||||
2.49.1
|
||||
|
||||
2
steps/perl-5.24.4/sources
Normal file
2
steps/perl-5.24.4/sources
Normal file
|
|
@ -0,0 +1,2 @@
|
|||
http://www.cpan.org/src/5.0/perl-5.24.4.tar.xz 7f080287ff64750270689843ae945f02159a33cb8f2fc910248c15befba5db84
|
||||
git://github.com/Perl/metaconfig~5.26.1 https://github.com/Perl/metaconfig/archive/5.26.1.tar.gz 4641f5127a55cf2e1e8f9253ec27fba10b5b77076b4163e7f4bdc7f670d1aaf0
|
||||
Loading…
Add table
Add a link
Reference in a new issue