summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicholas Clark <nick@ccl4.org>2010-11-28 19:03:21 +0000
committerNicholas Clark <nick@ccl4.org>2010-11-28 19:06:14 +0000
commitcbeaa189514a121fd71c6b4fb40c0bee7598a3d3 (patch)
tree4d54b91992db7da3bd9f5d2f451bcae99599dd76
parent94a75ecf43c2b2684fcdd148754a11f69c3c3ab2 (diff)
downloadperl-cbeaa189514a121fd71c6b4fb40c0bee7598a3d3.tar.gz
Remove makeaperl, never used, a wrapper for ExtUtils::MakeMaker::makeaperl
makeaperl was added in perl5.000k, wrapped as makeaperl.SH in perl5.000l, but neither used in the core build nor installed. All it does is acts as a command-line wrapper to makeaperl() in ExtUtils::MakeMaker.
-rw-r--r--Cross/Makefile-cross-SH2
-rw-r--r--MANIFEST1
-rwxr-xr-xMakefile.SH6
-rw-r--r--Porting/exec-bit.txt1
-rwxr-xr-xmakeaperl.SH130
5 files changed, 3 insertions, 137 deletions
diff --git a/Cross/Makefile-cross-SH b/Cross/Makefile-cross-SH
index 9b45943352..6e792e197f 100644
--- a/Cross/Makefile-cross-SH
+++ b/Cross/Makefile-cross-SH
@@ -326,7 +326,7 @@ CONFIGPM = xlib/$(CROSS_NAME)/Config.pm
private = preplibrary $(CONFIGPM) $(CROSS_LIB)/Config.pod
-shextract = Makefile cflags config.h makeaperl makedepend \
+shextract = Makefile cflags config.h makedepend \
makedir myconfig writemain pod/Makefile
addedbyconf = UU $(shextract) lib/lib.pm pstruct
diff --git a/MANIFEST b/MANIFEST
index daf2706298..0ec0d03bdd 100644
--- a/MANIFEST
+++ b/MANIFEST
@@ -3905,7 +3905,6 @@ mad/P5AST.pm Used by nomad
mad/P5re.pm Used by nomad
mad/PLXML.pm Used by nomad
mad/t/p55.t Test for the Perl 5 to Perl 5 translator
-makeaperl.SH perl script that produces a new perl binary
makedef.pl Create symbol export lists for linking
makedepend.SH Precursor to makedepend
make_ext.pl Used by Makefile to execute extension Makefiles
diff --git a/Makefile.SH b/Makefile.SH
index 531579368a..86e6d465b9 100755
--- a/Makefile.SH
+++ b/Makefile.SH
@@ -434,11 +434,9 @@ private = preplibrary $(CONFIGPM) $(CONFIGPOD) lib/ExtUtils/Miniperl.pm git_vers
# Files to be built with variable substitution before miniperl
# is available.
-sh = Makefile.SH cflags.SH config_h.SH makeaperl.SH makedepend.SH \
- myconfig.SH pod/Makefile.SH
+sh = Makefile.SH cflags.SH config_h.SH makedepend.SH myconfig.SH pod/Makefile.SH
-shextract = Makefile cflags config.h makeaperl makedepend \
- makedir myconfig pod/Makefile
+shextract = Makefile cflags config.h makedepend makedir myconfig pod/Makefile
addedbyconf = UU $(shextract) pstruct
diff --git a/Porting/exec-bit.txt b/Porting/exec-bit.txt
index 5e0f1e0645..7f42ea33fc 100644
--- a/Porting/exec-bit.txt
+++ b/Porting/exec-bit.txt
@@ -14,7 +14,6 @@ cpan/Test-Harness/t/source_tests/source.sh
cpan/Test-Harness/t/source_tests/source_args.sh
installperl
installman
-makeaperl.SH
makedepend.SH
myconfig.SH
regen/embed.pl
diff --git a/makeaperl.SH b/makeaperl.SH
deleted file mode 100755
index 80c0f21319..0000000000
--- a/makeaperl.SH
+++ /dev/null
@@ -1,130 +0,0 @@
-case $PERL_CONFIG_SH in
-'')
- if test -f config.sh; then TOP=.;
- elif test -f ../config.sh; then TOP=..;
- elif test -f ../../config.sh; then TOP=../..;
- elif test -f ../../../config.sh; then TOP=../../..;
- elif test -f ../../../../config.sh; then TOP=../../../..;
- else
- echo "Can't find config.sh."; exit 1
- fi
- . $TOP/config.sh
- ;;
-esac
-: This forces SH files to create target in same directory as SH file.
-: This is so that make depend always knows where to find SH derivatives.
-case "$0" in
-*/*) cd `expr X$0 : 'X\(.*\)/'` ;;
-esac
-echo "Extracting makeaperl (with variable substitutions)"
-rm -f makeaperl
-$spitshell >makeaperl <<!GROK!THIS!
-$startperl
- eval 'exec $perlpath -S \$0 \${1+"\$@"}'
- if \$running_under_some_shell;
-!GROK!THIS!
-
-$spitshell >>makeaperl <<'!NO!SUBS!'
-
-=head1 NAME
-
-makeaperl - create a new perl binary from static extensions
-
-=head1 SYNOPSIS
-
-C<makeaperl -l library -m makefile -o target -t tempdir [object_files] [static_extensions] [search_directories]>
-
-=head1 DESCRIPTION
-
-This utility is designed to build new perl binaries from existing
-extensions on the fly. Called without any arguments it produces a new
-binary with the name C<perl> in the current directory. Intermediate
-files are produced in C</tmp>, if that is writeable, else in the
-current directory. The most important intermediate file is a Makefile,
-that is used internally to call C<make>. The new perl binary will consist
-
-The C<-l> switch lets you specify the name of a perl library to be
-linked into the new binary. If you do not specify a library, makeaperl
-writes targets for any C<libperl*.a> it finds in the search path. The
-topmost target will be the one related to C<libperl.a>.
-
-With the C<-m> switch you can provide a name for the Makefile that
-will be written (default C</tmp/Makefile.$$>). Likewise specifies the
-C<-o> switch a name for the perl binary (default C<perl>). The C<-t>
-switch lets you determine, in which directory the intermediate files
-should be stored.
-
-All object files and static extensions following on the command line
-will be linked into the target file. If there are any directories
-specified on the command line, these directories are searched for
-C<*.a> files, and all of the found ones will be linked in, too. If
-there is no directory named, then the contents of $INC[0] are
-searched.
-
-If the command fails, there is currently no other mechanism to adjust
-the behaviour of the program than to alter the generated Makefile and
-run C<make> by hand.
-
-=head1 AUTHORS
-Tim Bunce <Tim.Bunce@ig.co.uk>, Andreas Koenig
-<koenig@franz.ww.TU-Berlin.DE>;
-
-=head2 STATUS
-First version, written 5 Feb 1995, is considered alpha.
-
-=cut
-
-use ExtUtils::MakeMaker;
-use Getopt::Long;
-use strict qw(subs refs);
-
-$Version = 1.0;
-$Verbose = 0;
-
-sub usage{
- warn <<END;
-$0 version $Version
-
-$0: [options] [object_files] [static_extensions ...] [directories to search through]
- -l perllibrary perl library to link from (the first libperl.a found)
- -m makefilename name of the makefile to be written (/tmp/Makefile.\$\$)
- -o name name for perl executable (perl)
- -t directory directory where intermediate files reside (/tmp)
-END
- exit 1;
-}
-
-if (-w "/tmp") {
- $opt_t = "/tmp";
-} else {
- $opt_t = ".";
-}
-$opt_l = '';
-$opt_m = "$opt_t/Makefile.$$";
-$opt_o = 'perl';
-
-$Getopt::Long::ignorecase=0;
-
-GetOptions('t=s', 'l=s', 'm=s', 'o=s') || die &usage;
-
-@dirs = grep -d $_, @ARGV;
-@fils = grep -f $_, @ARGV;
-
-@dirs = $INC[0] unless @dirs;
-
-open MAKE, ">$opt_m";
-MM->init_main();
-MM->init_others();
-print MAKE MM->makeaperl('MAKE' => $opt_m,
- 'TARGET' => $opt_o,
- 'TMP' => $opt_t,
- 'LIBPERL' => $opt_l,
- 'DIRS' => [@dirs],
- 'STAT' => [@fils],
- 'INCL' => [@dirs]
-);
-close MAKE;
-(system "make -f $opt_m") == 0 or die "$0 failed: Please check file $opt_m and run make -f $opt_m\n";
-!NO!SUBS!
-chmod 755 makeaperl
-$eunicefix makeaperl