Skip to content

Commit

Permalink
Remove microperl
Browse files Browse the repository at this point in the history
It hasn't built in ages, and nobody has bothered fixing it, even after
the threat of removal in perl5180delta and @nwc10's repeated threat in
2021, so let's make good on those.
  • Loading branch information
ilmari authored and jkeenan committed Jul 26, 2023
1 parent da68804 commit 1232708
Show file tree
Hide file tree
Showing 37 changed files with 70 additions and 7,782 deletions.
10 changes: 1 addition & 9 deletions Cross/Makefile-cross-SH
Original file line number Diff line number Diff line change
Expand Up @@ -695,14 +695,6 @@ perl.gcov: perl.config.gcov
$(MAKE) PERL_SUFFIX=.gcov PERL_PROFILE_LDFLAGS='' perl
@echo "Now you may run perl.gcov and then run gcov some.c."
# Microperl. This is just a convenience thing if one happens to
# build also the full Perl and therefore the real big Makefile:
# usually one should manually explicitly issue the below command.
.PHONY: microperl
microperl:
$(MAKE) -f Makefile.micro
!NO!SUBS!

fi
Expand Down Expand Up @@ -949,7 +941,7 @@ _mopup:
-rm -f perl.pixie lib*.so.perl.pixie lib*.so.Addrs
-rm -f perl.Addrs perl.Counts t/perl.Addrs t/perl.Counts *perl.xok
-rm -f cygwin.c libperl*.def libperl*.dll cygperl*.dll *.exe.stackdump
-rm -f perl$(EXE_EXT) miniperl$(EXE_EXT) $(LIBPERL) libperl.* microperl
-rm -f perl$(EXE_EXT) miniperl$(EXE_EXT) $(LIBPERL) libperl.*
-rm -f config.over
# Do not 'make _tidy' directly.
Expand Down
6 changes: 0 additions & 6 deletions MANIFEST
Original file line number Diff line number Diff line change
Expand Up @@ -66,7 +66,6 @@ make_patchnum.pl Script to generate git_version.h and lib/Config_git.pl files
makedef.pl Create symbol export lists for linking
makedepend.SH Precursor to makedepend
makedepend_file.SH Precursor to makedepend_file
Makefile.micro microperl Makefile
Makefile.SH A script that generates Makefile
malloc.c A version of malloc you might not want
malloc_ctl.h A version of malloc you might not want
Expand Down Expand Up @@ -148,7 +147,6 @@ README.jp Perl for Japanese (in EUC-JP)
README.ko Perl for Korean (in EUC-KR)
README.linux Perl notes for Linux
README.macosx Perl notes for Mac OS X
README.micro Notes about microperl
README.openbsd Perl notes for OpenBSD
README.os2 Perl notes for OS/2
README.os390 Perl notes for OS/390
Expand Down Expand Up @@ -197,9 +195,6 @@ time64.c 64 bit clean time.h (code)
time64.h 64 bit clean time.h (header)
time64_config.h 64 bit clean time.h (configuration)
toke.c The tokener
uconfig.h Configuration header for microperl
uconfig.sh Configuration script for microperl
uconfig64.sh Configuration script for microperl for LP64
uni_keywords.h Map unicode property names to numbers
unicode_constants.h compile-time macros for Unicode code points
universal.c The default UNIVERSAL package methods
Expand Down Expand Up @@ -5676,7 +5671,6 @@ regen/regcomp.pl Builder of regnodes.h
regen/regen_lib.pl Common file routines for generator scripts
regen/scope_types.pl Regenerate scope_types.h
regen/tidy_embed.pl Program to clean up embed.fnc manually
regen/uconfig_h.pl generate uconfig.h (requires /bin/sh)
regen/unicode_constants.pl generate unicode_constants.h
regen/warnings.pl Program to write warnings.h and lib/warnings.pm
t/base/cond.t See if conditionals work
Expand Down
12 changes: 1 addition & 11 deletions Makefile.SH
Original file line number Diff line number Diff line change
Expand Up @@ -1072,14 +1072,6 @@ $(PERL_EXE): $& $(perlmain_dep) $(LIBPERL) $(static_ext) ext.libs $(PERLEXPORT)

$spitshell >>$Makefile <<'!NO!SUBS!'
# Microperl. This is just a convenience thing if one happens to
# build also the full Perl and therefore the real big Makefile:
# usually one should manually explicitly issue the below command.
.PHONY: microperl
microperl:
$(MAKE) -f Makefile.micro
!NO!SUBS!

fi
Expand Down Expand Up @@ -1276,11 +1268,9 @@ CHMOD_W = chmod +w
regen: FORCE
-perl regen.pl
-perl regen/uconfig_h.pl
regen_headers regen-headers: FORCE
-perl regen.pl -v
-perl regen/uconfig_h.pl -v
regen_meta regen-meta: META.yml META.json
Expand Down Expand Up @@ -1370,7 +1360,7 @@ _mopup:
-rm -f perl.export perl.dll perl.libexp perl.map perl.def
-rm -f *perl.xok
-rm -f cygwin.c libperl*.def libperl*.dll cygperl*.dll *.exe.stackdump
-rm -f $(PERL_EXE) $(MINIPERL_EXE) $(LIBPERL) libperl.* microperl
-rm -f $(PERL_EXE) $(MINIPERL_EXE) $(LIBPERL) libperl.*
-rm -f config.arch config.over $(DTRACE_H)
_cleaner1:
Expand Down
211 changes: 0 additions & 211 deletions Makefile.micro

This file was deleted.

8 changes: 0 additions & 8 deletions Porting/bump-perl-version
Original file line number Diff line number Diff line change
Expand Up @@ -188,14 +188,6 @@ my @maps = (
"$oldx$oldy",
qr/win32|hints/, # README.win32, win32/*, hints/*
],

# microperl locations should be bumped for major versions
[
qr{(/)(\d\.\d{2})(["'/])},
sub { $2, "$1$newx.$newy$3" },
"$oldx.$oldy",
qr/uconfig/,
],
);


Expand Down
2 changes: 1 addition & 1 deletion Porting/checkcfguse.pl
Original file line number Diff line number Diff line change
Expand Up @@ -78,7 +78,7 @@
# Skip matches from the config files themselves,
# from metaconfig generated files that refer to
# the config symbols, and from pods.
next if $fn =~ m{^(?:config_h.SH|Configure|configure\.com|Porting/(?:config|Glossary)|(?:plan9|win32)/(?:config|(?:GNU)?[Mm]akefile)|uconfig)|\.pod$};
next if $fn =~ m{^(?:config_h.SH|Configure|configure\.com|Porting/(?:config|Glossary)|(?:plan9|win32)/(?:config|(?:GNU)?[Mm]akefile))|\.pod$};
open my $fh, '<', $fn or die qq[$0: Failed to open $fn: $!];
while (<$fh>) {
while (/\b($SYM)\b/go) {
Expand Down
2 changes: 0 additions & 2 deletions Porting/checkcfgvar.pl
Original file line number Diff line number Diff line change
Expand Up @@ -44,8 +44,6 @@ sub usage {
# perl that we are running, not the version of the source tree.
"Cross/config.sh-arm-linux",
"Cross/config.sh-arm-linux-n770",
"uconfig.sh",
"uconfig64.sh",
"plan9/config_sh.sample",
"win32/config.gc",
"win32/config.vc",
Expand Down
1 change: 0 additions & 1 deletion Porting/exec-bit.txt
Original file line number Diff line number Diff line change
Expand Up @@ -35,7 +35,6 @@ regen/feature.pl
regen/keywords.pl
regen/opcode.pl
regen/regcharclass.pl
regen/uconfig_h.pl
runtests.SH
t/TEST
Porting/Maintainers.pl
Expand Down
1 change: 0 additions & 1 deletion Porting/makerel
Original file line number Diff line number Diff line change
Expand Up @@ -252,7 +252,6 @@ my @writables = qw(
win32/Makefile
win32/config_H.gc
win32/config_H.vc
uconfig.h
);

my $out = `chmod u+w @writables 2>&1`;
Expand Down
9 changes: 1 addition & 8 deletions Porting/release_managers_guide.pod
Original file line number Diff line number Diff line change
Expand Up @@ -450,14 +450,7 @@ release and this is something you would have to do at the very end.
When releasing a MAINT perl version, the C<PERL_API_*> constants C<MUST NOT>
be changed as we aim to guarantee binary compatibility in maint branches.

After editing, regenerate uconfig.h (this must be run on a system with a
/bin/sh available):

$ perl regen/uconfig_h.pl

This might not cause any new changes.

You may also need to regen opcodes:
After editing, you may need to regen opcodes:

$ ./perl -Ilib regen/opcode.pl

Expand Down
15 changes: 0 additions & 15 deletions Porting/todo.pod
Original file line number Diff line number Diff line change
Expand Up @@ -1196,18 +1196,3 @@ One bit would be to determine how to clone directory handles on systems
without a C<fchdir> function (in sv.c:Perl_dirp_dup).

Fix Perl_sv_dup, et al so that threads can return objects.

=head1 Tasks for microperl


[ Each and every one of these may be obsolete, but they were listed
in the old Todo.micro file]

=head2 do away with fork/exec/wait?

(system, popen should be enough?)

=head2 some of the uconfig.sh really needs to be probed (using cc) in buildtime:

(uConfigure? :-) native datatype widths and endianness come to mind

Loading

1 comment on commit 1232708

@rwp0
Copy link
Contributor

@rwp0 rwp0 commented on 1232708 Jul 26, 2023

Choose a reason for hiding this comment

The reason will be displayed to describe this comment to others. Learn more.

Great job! 👍🏻

Please sign in to comment.