Change 13960 by jhi@alpha on 2001/12/30 17:33:24
Fix ppport.h for Unix.
Affected files ...
.... //depot/perl/MANIFEST#687 edit
.... //depot/perl/ext/Devel/PPPort/Makefile.PL#5 edit
.... //depot/perl/ext/Devel/PPPort/ppport.h.PL#2 delete
.... //depot/perl/ext/Devel/PPPort/ppport_h.PL#1 add
Differences ...
==== //depot/perl/MANIFEST#687 (text) ====
Index: perl/MANIFEST
--- perl/MANIFEST.~1~ Sun Dec 30 10:45:06 2001
+++ perl/MANIFEST Sun Dec 30 10:45:06 2001
@@ -152,8 +152,9 @@
ext/Devel/PPPort/module3.c Devel::PPPort test file
ext/Devel/PPPort/PPPort.pm Devel::PPPort
ext/Devel/PPPort/PPPort.xs Devel::PPPort
+ext/Devel/PPPort/ppport_h.PL Devel::PPPort
ext/Devel/PPPort/README Devel::PPPort Readme
-ext/Devel/PPPort/soak Test Harness to run Devel::PPPort other Perls
+ext/Devel/PPPort/soak Test Harness to run Devel::PPPort other Perls
ext/Devel/PPPort/t/test.t See if Devel::PPPort works
ext/Devel/PPPort/TODO Devel::PPPort Todo
ext/Digest/MD5/Changes Digest::MD5 extension changes
@@ -980,10 +981,10 @@
lib/File/Path.pm Do things like `mkdir -p' and `rm -r'
lib/File/Path.t See if File::Path works
lib/File/Spec.pm portable operations on file names
+lib/File/Spec/Cygwin.pm portable operations on Cygwin file names
lib/File/Spec/Epoc.pm portable operations on EPOC file names
lib/File/Spec/Functions.pm Function interface to File::Spec object methods
lib/File/Spec/Mac.pm portable operations on Mac file names
-lib/File/Spec/Cygwin.pm portable operations on Cygwin file names
lib/File/Spec/NW5.pm portable operations on NetWare file names
lib/File/Spec/OS2.pm portable operations on OS2 file names
lib/File/Spec/t/Functions.t See if File::Spec::Functions works
@@ -1051,8 +1052,8 @@
lib/IPC/SysV.t See if IPC::SysV works
lib/less.pm For "use less"
lib/less.t See if less support works
+lib/lib.t For "use lib" testing
lib/lib_pm.PL For "use lib", produces lib/lib.pm
-lib/lib.t For "use lib" testing
lib/locale.pm For "use locale"
lib/locale.t See if locale support works
lib/Locale/Codes/t/all.t See if Locale::Codes work
==== //depot/perl/ext/Devel/PPPort/Makefile.PL#5 (text) ====
Index: perl/ext/Devel/PPPort/Makefile.PL
--- perl/ext/Devel/PPPort/Makefile.PL.~1~ Sun Dec 30 10:45:06 2001
+++ perl/ext/Devel/PPPort/Makefile.PL Sun Dec 30 10:45:06 2001
@@ -19,8 +19,8 @@
my $retval = <<"EOM";
-#ppport.h:: ppport.h.PL
-# \$(PERL) "-I\$(PERL_ARCHLIB)" "-I\$(PERL_LIB)" ppport.h.PL > ppport.h
+ppport.h: ppport_h.PL
+ \$(PERL) "-I\$(PERL_ARCHLIB)" "-I\$(PERL_LIB)" ppport_h.PL > ppport.h
PPPort.xs module2.c module3.c : ppport.h
-\$(TOUCH) \$@
==== //depot/perl/ext/Devel/PPPort/ppport_h.PL#1 (text) ====
Index: perl/ext/Devel/PPPort/ppport_h.PL
--- perl/ext/Devel/PPPort/ppport_h.PL.~1~ Sun Dec 30 10:45:06 2001
+++ perl/ext/Devel/PPPort/ppport_h.PL Sun Dec 30 10:45:06 2001
@@ -0,0 +1,5 @@
+my $pmfile = 'PPPort.pm';
+package Devel::PPPort;
+sub bootstrap {};
+require qq[$pmfile];
+WriteFile(qq[ppport.h]);
End of Patch.
