cvsuser 01/12/31 12:07:54
Modified: . Configure.pl
Log:
Nuke all object files in the parrot tree that matter when configuring.
Shouldn't be necessary with good dependencies in the makefile, but we don't
have those yet.
Revision Changes Path
1.54 +9 -2 parrot/Configure.pl
Index: Configure.pl
===================================================================
RCS file: /home/perlcvs/parrot/Configure.pl,v
retrieving revision 1.53
retrieving revision 1.54
diff -u -w -r1.53 -r1.54
--- Configure.pl 31 Dec 2001 19:40:14 -0000 1.53
+++ Configure.pl 31 Dec 2001 20:07:54 -0000 1.54
@@ -2,7 +2,7 @@
#
# Configure.pl
#
-# $Id: Configure.pl,v 1.53 2001/12/31 19:40:14 dan Exp $
+# $Id: Configure.pl,v 1.54 2001/12/31 20:07:54 dan Exp $
#
# Author: Brent Dax
#
@@ -42,7 +42,7 @@
if($opt_version) {
print "Parrot Version $parrot_version Configure\n";
- print '$Id: Configure.pl,v 1.53 2001/12/31 19:40:14 dan Exp $' . "\n";
+ print '$Id: Configure.pl,v 1.54 2001/12/31 20:07:54 dan Exp $' . "\n";
exit;
}
@@ -473,6 +473,13 @@
END
buildfile("config_h", "include/parrot");
+
+# Toss old .o files
+foreach my $dir ("./", "classes/", "encodings/", "chartypes/") {
+ foreach my $file (glob($dir . "*". $c{o})) {
+ 1 while unlink $file;
+ }
+}
#
