diff options
| -rw-r--r-- | MANIFEST | 1 | ||||
| -rw-r--r-- | pod/perldelta.pod | 6 | ||||
| -rw-r--r-- | pod/perlutil.pod | 6 | ||||
| -rw-r--r-- | utils/Makefile | 6 | ||||
| -rw-r--r-- | utils/perlbc.PL | 81 |
5 files changed, 4 insertions, 96 deletions
@@ -1565,7 +1565,6 @@ utils/c2ph.PL program to translate dbx stabs to perl utils/dprofpp.PL Perl code profile post-processor utils/h2ph.PL A thing to turn C .h files into perl .ph files utils/h2xs.PL Program to make .xs files from C header files -utils/perlbc.PL Front-end for byte compiler utils/perlbug.PL A simple tool to submit a bug report utils/perlcc.PL Front-end for compiler utils/perldoc.PL A simple tool to find & display perl's documentation diff --git a/pod/perldelta.pod b/pod/perldelta.pod index ad438e750e..c496caf589 100644 --- a/pod/perldelta.pod +++ b/pod/perldelta.pod @@ -217,12 +217,6 @@ The Emacs perl mode (emacs/cperl-mode.el) has been updated to version 4.31. =item * -The long-dormant perl bytecompiler has been added to the list of -installed utilities since the bytecompiler backend has been improved. -The bytecompiler is still very much experimental, though. - -=item * - Perlbug is now much more robust. It also sends the bug report to perl.org, not perl.com. diff --git a/pod/perlutil.pod b/pod/perlutil.pod index 4ca1f9e24c..1b2c178b1f 100644 --- a/pod/perlutil.pod +++ b/pod/perlutil.pod @@ -170,10 +170,6 @@ for more information. F<perlcc> is the interface to the experimental Perl compiler suite. -=item L<perlbc|perlbc> - -F<perlbc> is the interface to the experimental Perl bytecompiler suite. - =back =head2 SEE ALSO @@ -184,6 +180,6 @@ L<podchecker|podchecker>, L<splain|splain>, L<perldiag>, L<roffitall|roffitall>, L<a2p|a2p>, L<s2p|s2p>, L<find2perl|find2perl>, L<File::Find|File::Find>, L<pl2pm|pl2pm>, L<perlbug|perlbug>, L<h2ph|h2ph>, L<c2ph|c2ph>, L<h2xs|h2xs>, L<dprofpp|dprofpp>, -L<Devel::Dprof>, L<perlcc|perlcc>, L<perlbc|perlbc> +L<Devel::Dprof>, L<perlcc|perlcc> =cut diff --git a/utils/Makefile b/utils/Makefile index fc248d0d3b..95d286efb8 100644 --- a/utils/Makefile +++ b/utils/Makefile @@ -5,9 +5,9 @@ REALPERL = ../perl # Files to be built with variable substitution after miniperl is # available. Dependencies handled manually below (for now). -pl = c2ph.PL h2ph.PL h2xs.PL perlbug.PL perldoc.PL pl2pm.PL splain.PL perlcc.PL perlbc.PL dprofpp.PL -plextract = c2ph h2ph h2xs perlbug perldoc pl2pm splain perlcc perlbc dprofpp -plextractexe = c2ph.exe h2ph.exe h2xs.exe perlbug.exe perldoc.exe pl2pm.exe splain.exe perlcc.exe perlbc.exe dprofpp.exe +pl = c2ph.PL h2ph.PL h2xs.PL perlbug.PL perldoc.PL pl2pm.PL splain.PL perlcc.PL dprofpp.PL +plextract = c2ph h2ph h2xs perlbug perldoc pl2pm splain perlcc dprofpp +plextractexe = c2ph.exe h2ph.exe h2xs.exe perlbug.exe perldoc.exe pl2pm.exe splain.exe perlcc.exe dprofpp.exe all: $(plextract) diff --git a/utils/perlbc.PL b/utils/perlbc.PL deleted file mode 100644 index fab4f349b2..0000000000 --- a/utils/perlbc.PL +++ /dev/null @@ -1,81 +0,0 @@ -#!/usr/local/bin/perl - -use Config; -use File::Basename qw(&basename &dirname); -use Cwd; - -# List explicitly here the variables you want Configure to -# generate. Metaconfig only looks for shell variables, so you -# have to mention them as if they were shell variables, not -# %Config entries. Thus you write -# $startperl -# to ensure Configure will look for $Config{startperl}. -# Wanted: $archlibexp - -# This forces PL files to create target in same directory as PL file. -# This is so that make depend always knows where to find PL derivatives. -$origdir = cwd; -chdir dirname($0); -$file = basename($0, '.PL'); -$file .= '.com' if $^O eq 'VMS'; - -open OUT,">$file" or die "Can't create $file: $!"; - -print "Extracting $file (with variable substitutions)\n"; - -# In this section, perl variables will be expanded during extraction. -# You can use $Config{...} to use Configure variables. - -print OUT <<"!GROK!THIS!"; -$Config{startperl} - eval 'exec $Config{perlpath} -S \$0 \${1+"\$@"}' - if \$running_under_some_shell; -!GROK!THIS! - -# In the following, perl variables are not expanded during extraction. - -print OUT <<'!NO!SUBS!'; - -use strict; -use warnings; - -our($running_under_some_shell); - -use Config; - -require ByteLoader; - -foreach my $infile (@ARGV) -{ - if ($infile =~ /\.p[ml]$/) - { - my $outfile = $infile . "c"; - - open(OUT,"> $outfile") || die "Can't open $outfile: $!"; - - if ($infile =~ /\.pl$/) - { - print OUT "$Config{startperl}\n"; - print OUT " eval 'exec $Config{perlpath} -S \$0 \${1+\"\$@\"}'\n"; - print OUT " if \$running_under_some_shell;\n\n"; - } - - print OUT "use ByteLoader $ByteLoader::VERSION;\n"; - - close(OUT); - - print "$^X -MO=Bytecode $infile >> $outfile\n"; - - system("$^X -MO=Bytecode $infile >> $outfile"); - } - else - { - warn "Don't know how to byte compile $infile"; - } -} -!NO!SUBS! - -close OUT or die "Can't close $file: $!"; -chmod 0755, $file or die "Can't reset permissions for $file: $!\n"; -exec("$Config{'eunicefix'} $file") if $Config{'eunicefix'} ne ':'; -chdir $origdir; |