--- a/Makefile	Sat Jul 22 12:54:59 2006 +0000
+++ b/Makefile	Sun Jul 23 12:59:39 2006 +0000
@@ -182,6 +182,8 @@
 compile_clean :
 	$(eval z_rm = $(shell find compile -type f  -name "*\\.o" | grep -v ".svn"))
 	$(RM) $(z_rm)
+	$(eval z_rm = $(shell find compile -type f  -name "*\\.exe" | grep -v ".svn"))
+	$(RM) $(z_rm)
 
 # used in some complex test cases
 define analyse_compile

--- a/message_tie.pl	Sat Jul 22 12:54:59 2006 +0000
+++ b/message_tie.pl	Sun Jul 23 12:59:39 2006 +0000
@@ -1,14 +1,15 @@
 #!/usr/bin/perl
 
+use strict;
+use warnings;
+
 my $message_pattern = shift;
 my $last_cmd;
 
 while (<>) {
-	if ($_ =~ /^(run|norun|compile|nocompile): (.*)/){
+	if (/^(run|norun|compile|nocompile): (.*)/) {
 		$last_cmd = $2;
-	}
-	if(/$message_pattern/) {
+	} elsif (/$message_pattern/) {
 		print "$last_cmd\n$_\n";
 	}
 }
-