The last smoke.tgz has syntax errors and other mistakes in it. This
patches.
I think the "Configure" vs "./Configure" problem was mentioned before.
I don't have . in my PATH, and that's pretty common.
And sitting here on Debian, it's /bin/sh, not /usr/bin/sh. I think
that's the more common setup.
--- smoke.orig/mkovz.pl Thu Aug 23 19:47:06 2001
+++ smoke/mkovz.pl Wed Aug 22 12:19:51 2001
@@ -13,7 +13,7 @@
my $debug = "";
$rpt{patch} = "?";
my $out = "$testd/mktest.out";
-open OUT, "<$out" or next;
+open OUT, "<$out" or die "Can't open $out: $!";
for (<OUT>) {
m/^\s*$/ and next;
m/^-+$/ and next;
--- smoke.orig/mktest.pl Thu Aug 23 19:45:22 2001
+++ smoke/mktest.pl Wed Aug 22 12:22:18 2001
@@ -77,7 +84,7 @@
}
print TTY "\nConfigure ...";
- qx "Configure -Dusedevel $conf $tconf $uconf -des";
+ qx "./Configure -Dusedevel $conf $tconf $uconf -des";
unless (-f "Makefile" && -s "config.sh") {
print TTY " Unable to configure perl in this configuration\n";
@@ -148,7 +155,7 @@
print;
}
print LOG map { " $_" } @nok;
- if (grep m,^All tests successful, @nok) {
+ if (grep m/^All tests successful/, @nok) {
print TTY "\nOK, archive results ...";
$patch and $nok[0] =~ s/\./ for .patch = $patch./;
# make {,n}okfile now, cause a failure might not be able to
--- smoke.orig/smoke.sh Thu Aug 23 19:44:36 2001
+++ smoke/smoke.sh Wed Aug 22 12:17:00 2001
@@ -1,9 +1,9 @@
-#!/usr/bin/sh
+#!/bin/sh
--
Michael G. Schwern <[EMAIL PROTECTED]> http://www.pobox.com/~schwern/
Perl6 Quality Assurance <[EMAIL PROTECTED]> Kwalitee Is Job One
You see, in this world there's two kinds of people. Those with loaded
guns, and those who dig. Dig.
-- Blonde, "The Good, The Bad And The Ugly"
