dos-djgpp updates (from Laszlo Molnar <laszlo.molnar@eth.ericsson.se>)
authorGurusamy Sarathy <gsar@cpan.org>
Tue, 22 Feb 2000 10:10:36 +0000 (10:10 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Tue, 22 Feb 2000 10:10:36 +0000 (10:10 +0000)
p4raw-id: //depot/perl@5196

djgpp/config.over
djgpp/configure.bat
djgpp/djgppsed.sh
t/lib/glob-basic.t
t/lib/glob-case.t
t/lib/glob-global.t
t/lib/glob-taint.t
t/lib/io_unix.t

index f47e7fc..1f567b4 100644 (file)
@@ -29,6 +29,7 @@ repair()
      -e 's/byteload/ByteLoader/'\
      -e 's=devel/peek=Devel/Peek='\
      -e 's=devel/dprof=Devel/DProf='\
+     -e 's=sys/sys=Sys/Sys='\
      -e 's=file/=='\
      -e 's=File/=='\
      -e 's=glob=='\
index e7d41d7..370f5ed 100644 (file)
@@ -33,5 +33,5 @@ echo Running sed...
 sh djgpp/djgppsed.sh
 
 echo Running Configure...
-sh Configure %1 %2 %3 %4 %5 %6 %7 %8 %9
+sh Configure -DPERL_EXTERNAL_GLOB %1 %2 %3 %4 %5 %6 %7 %8 %9
 :end
index b62acfd..bb95ad8 100644 (file)
@@ -24,6 +24,7 @@ SDBHASH='s=dbhash\.tmp=dbhash_tmp=g'
 SSTAT='s=\.\(stat\.\)=_\1=g'
 STMP2='s=tmp2=tm2=g'
 SPACKLIST='s=\.\(packlist\)=_\1=g'
+SDOTTMP='s=\.tmp=_tmp=g'
 
 sed -e $SCONFIG -e $SGREPTMP -e $SECHOTMP -e $SDDC -e $SOUT -e 's=\.\( \./\$file\)$=sh\1=g' Configure |tr -d '\r' >s; mv -f s Configure
 sed -e $SEXISTS -e $SLIST -e $SCONFIG Makefile.SH |tr -d '\r' >s; mv -f s Makefile.SH
@@ -33,7 +34,7 @@ sed -e $SEXISTS -e $SPACKLIST installperl >s; mv -f s installperl
 sed -e $SPOD2HTML lib/Pod/Html.pm |tr -d '\r' >s; mv -f s lib/Pod/Html.pm
 sed -e $SCC -e $SLIST -e $SFILEC -e $SCOR -e $SDEPTMP -e $SHSED makedepend.SH |tr -d '\r' >s; mv -f s makedepend.SH
 sed -e $SCPP t/comp/cpp.aux |tr -d '\r' >s; mv -f s t/comp/cpp.aux
-sed -e $SARGV t/io/argv.t >s; mv -f s t/io/argv.t
+sed -e $SARGV -e $SDOTTMP t/io/argv.t >s; mv -f s t/io/argv.t
 sed -e $SABC t/io/inplace.t >s; mv -f s t/io/inplace.t
 sed -e $SDBMX t/lib/anydbm.t >s; mv -f s t/lib/anydbm.t
 sed -e $SDBMX -e $SDBHASH t/lib/gdbm.t >s; mv -f s t/lib/gdbm.t
index dde8773..a2479ac 100755 (executable)
@@ -3,7 +3,11 @@
 BEGIN {
     chdir 't' if -d 't';
     unshift @INC, '../lib';
-
+    require Config; import Config;
+    if ($Config{'extensions'} !~ /\bFile\/Glob\b/i) {
+        print "1..0\n";
+        exit 0;
+    }
     print "1..9\n";
 }
 END {
index 2e65a0f..32719b2 100755 (executable)
@@ -3,6 +3,11 @@
 BEGIN {
     chdir 't' if -d 't';
     unshift @INC, '../lib';
+    require Config; import Config;
+    if ($Config{'extensions'} !~ /\bFile\/Glob\b/i) {
+        print "1..0\n";
+        exit 0;
+    }
     print "1..7\n";
 }
 END {
index 44d7e8b..9d273bd 100755 (executable)
@@ -3,7 +3,11 @@
 BEGIN {
     chdir 't' if -d 't';
     unshift @INC, '../lib';
-
+    require Config; import Config;
+    if ($Config{'extensions'} !~ /\bFile\/Glob\b/i) {
+        print "1..0\n";
+        exit 0;
+    }
     print "1..10\n";
 }
 END {
index 1b9c053..a8dc213 100755 (executable)
@@ -3,6 +3,11 @@
 BEGIN {
     chdir 't' if -d 't';
     unshift @INC, '../lib';
+    require Config; import Config;
+    if ($Config{'extensions'} !~ /\bFile\/Glob\b/i) {
+        print "1..0\n";
+        exit 0;
+    }
     print "1..2\n";
 }
 END {
index 0e559e0..62569a5 100644 (file)
@@ -8,6 +8,7 @@ BEGIN {
     # ``use IO::Socket'' executes too early below in the os2 block
     if ($^O eq 'dos') {
         print "1..0 # Skip: no fork\n";
+       exit 0;
     }
 }