The R Project SVN R

Rev

Rev 34025 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 34025 Rev 34092
Line 495... Line 495...
495 
		    &shell_quote_file_path(&file_path(${R::Vars::R_HOME},
 495 
		    &shell_quote_file_path(&file_path(${R::Vars::R_HOME},
496 
						      "etc", "Makeconf"));
 496 
						      "etc", "Makeconf"));
497 
		$makefiles .= " -f Makefile";
 497 
		$makefiles .= " -f Makefile";
498 
		R_system("${R::Vars::MAKE} $makefiles clean");
 498 
		R_system("${R::Vars::MAKE} $makefiles clean");
499 
	    } else {
 499 
	    } else {
- 
 
 500 
		## Also cleanup possible Windows leftovers ...
500 
		foreach my $file (<*.o *.s[lo] .dylib>) {
 501 
		unlink((<*.o *.s[lo] *.dylib>,
501 
		    unlink($file);
 502 
			"$pkgname.a", "$pkgname.dll", "$pkgname.def"));
502 
		}
 - 
 
503 
		rmtree(".libs") if (-d ".libs");
 503 
		rmtree(".libs") if (-d ".libs");
- 
 
 504 
		rmtree("_libs") if (-d "_libs");
504 
	    }
 505 
	    }
505 
	}
 506 
	}
506 
    }
 507 
    }
507
508
508 
    chdir($pkgdir);
 509 
    chdir($pkgdir);