Box: Let the 32-bit version refuse to run on 64-bit kernels

[moe.git] / mop / eval / mo-score.sh

diff --git a/mop/eval/mo-score.sh b/mop/eval/mo-score.sh
index 9d0a200ec13f29e72669b848d1bce8ffa5dc2dad..b893d7623b6128c6ba557d8dbefca0b81b0c6731 100755 (executable)
--- a/mop/eval/mo-score.sh
+++ b/mop/eval/mo-score.sh
@@ -82,6 +82,8 @@ foreach $u (keys %users) {
                                elsif ($trem =~ /^Caught fatal signal /) { $cmt = "SG"; }
                                elsif ($trem =~ /^([A-Za-z])\S*\s+([A-Za-z])/) {
                                        ($cmt = "$1$2") =~ tr/a-z/A-Z/;
                                elsif ($trem =~ /^Caught fatal signal /) { $cmt = "SG"; }
                                elsif ($trem =~ /^([A-Za-z])\S*\s+([A-Za-z])/) {
                                        ($cmt = "$1$2") =~ tr/a-z/A-Z/;

+                               } elsif ($trem =~ /^([A-Za-z]{2})/) {
+                                       ($cmt = $1) =~ tr/a-z/A-Z/;

                                }
                                if (!defined $messages{$trem}) {
                                        $messages{$trem} = $cmt;
                                }
                                if (!defined $messages{$trem}) {
                                        $messages{$trem} = $cmt;


@@ -185,7 +187,7 @@ while ($i < @table) {
        } else {
                ${table[$j]}[0] = $j+1 . ".-" . $i . ".";
                $j++;
        } else {
                ${table[$j]}[0] = $j+1 . ".-" . $i . ".";
                $j++;

-               while ($j < $i) { ${table[$j++]}[0] = ""; };
+               while ($j < $i) { ${table[$j++]}[0] = " "; };

        }
 }
 print STDERR "OK\n";
        }
 }
 print STDERR "OK\n";