[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[gnugo-devel] patch trevor_1_11.1
From: |
Trevor Morris |
Subject: |
[gnugo-devel] patch trevor_1_11.1 |
Date: |
Sun, 14 Oct 2001 21:42:38 -0400 |
Patch trevor_1_11.1:
- Adds a few scattered regression comments
- Updates regress.pl to latest ever evolving version.
- Adds several test cases and SGF files to trevor.tst & games/trevor/
As usual, don't trust my mailer, but get the patch from:
http://www.public32.com/games/go/trevor_1_11.1.tar.gz
FYI:
Index: regression/ego.tst
===================================================================
RCS file: /cvsroot/gnugo/gnugo/regression/ego.tst,v
retrieving revision 1.9
diff -u -r1.9 ego.tst
--- regression/ego.tst 2001/10/09 17:56:17 1.9
+++ regression/ego.tst 2001/10/15 01:04:05
@@ -31,6 +31,10 @@
4 gg_genmove white
#? [!(G19|H19|K17)]*
+
+#CATEGORY=
+#DESCRIPTION=Why is B15 so bad? -Trevor
+#SEVERITY=0
# D7 is a good move.
loadsgf games/ego.sgf 68
5 gg_genmove white
Index: regression/life.tst
===================================================================
RCS file: /cvsroot/gnugo/gnugo/regression/life.tst,v
retrieving revision 1.3
diff -u -r1.3 life.tst
--- regression/life.tst 2001/09/06 21:34:20 1.3
+++ regression/life.tst 2001/10/15 01:04:06
@@ -107,8 +107,10 @@
#? [0 1 J18 J18]
# Correct answer to 322 should be 0 2 G17 G17, a chimera, but this is
# temporarily changed to accomodate for a workaround in the code.
+# When run w/out --life, gg gets the "true" correct answer.
+# So, adding the correct answer as an option: -Trevor
322 eval_eye F17
-#? [1 2 G17 G17]
+#? [(0|1) 2 G17 G17]
323 eval_eye O19
#? [1 1]
324 eval_eye K13
Index: regression/regress.pl
===================================================================
RCS file: /cvsroot/gnugo/gnugo/regression/regress.pl,v
retrieving revision 1.3
diff -u -r1.3 regress.pl
--- regression/regress.pl 2001/10/10 19:22:25 1.3
+++ regression/regress.pl 2001/10/15 01:04:12
@@ -320,13 +320,13 @@
print "$num skipped.\n";
html_results ($num, "skipped", " ", " ", 0);
} else {
- foreach (times) {
- print "$_ ";
- } print ":TIMES\n";
+ #foreach (times) {
+ # print "$_ ";
+ #} print ":TIMES\n";
print "TST: $negate - $correct_re - $fail - $ignore\n" if
$verbose > 1;
if (!$ignore) {
- my $match_result = $result =~ $correct_re ;
+ my $match_result = $result =~ /^$correct_re$/ ;
if ($negate) {
$match_result = ! $match_result;
}
@@ -339,8 +339,11 @@
} else {
if ($verbose) {
print "$num passed\n";
- html_results ( $num, "passed", "$bang$correct_re",
"$result", 1);
}
+ if ($verbose >=2 ) {
+ print " Correct: '$bang$correct_re', got
'$result'\n";
+ }
+ html_results ( $num, "passed", "$bang$correct_re",
"$result",
1);
}
} else {
$failures++;
@@ -353,8 +356,8 @@
push @failed_links, $num;
if ($verbose) {
print "$num failed: Correct '$bang$correct_re', got
'$result'\n";
- html_results ($num, "failed", "$bang$correct_re",
"$result", 1);
}
+ html_results ($num, "failed", "$bang$correct_re",
"$result", 1);
}
}
}
@@ -448,10 +451,11 @@
print $brd "<TR><TD>correct:</TD><TD>$correct<BR></TD></TR>\n";
print $brd "<TR><TD>answer:</TD><TD>$incorrect</TD></TR>\n";
print $brd "<TR><TD>gtp:</TD><TD>$prev_cmd</TD></TR>\n";
- foreach ("DESCRIPTION", "CATEGORY", "SEVERITY") {
- $html_whole_gtp =~ /$_=(.*?)<BR>/)
- $_ = defined($1) ? $1 : "";
- print $brd "<TR><TD>".lc($_).":</TD><TD>$1</TD>\n";
+ foreach my $listval ("DESCRIPTION", "CATEGORY", "SEVERITY") {
+ my $astxt;
+ $html_whole_gtp =~ /$listval=(.*?)<BR>/;
+ if (defined($1)) {$astxt = $1;} else {$astxt = "";};
+ print $brd "<TR><TD>".lc($listval).":</TD><TD>$astxt</TD>\n";
}
print $brd "</TABLE>\n\n<HR>\n";
print $brd "<A HREF=\"$num.sgf\">sgf board</A><HR>\n";
@@ -748,20 +752,20 @@
my $markcolor = "";
my $status = $stones{$iA.$j};
if ($status =~ /;known_wrong;/) {
- print " known_wrong: $iA$j\n";
+ #print " known_wrong: $iA$j\n";
$markcolor = "magenta";
}
if ($status =~ /;known_right;/) {
- print " known_right: $iA$j\n";
+ #print " known_right: $iA$j\n";
$markcolor = "green";
}
if ($status =~ /;try_right;/) {
- print " try_right: $iA$j\n";
+ #print " try_right: $iA$j\n";
$markcolor = "cyan";
}
if ($status =~ /;try_wrong;/) {
- print " try_wrong: $iA$j\n";
- $markcolor = "red";
+ #print " try_wrong: $iA$j\n";
+ $markcolor = "yellow";
}
$colorboard_imgsrc = createPngFile($bw, $img_pix_size, "",
$dragonletter, $dragoncolor, $markcolor);
Index: regression/trevor.tst
===================================================================
RCS file: /cvsroot/gnugo/gnugo/regression/trevor.tst,v
retrieving revision 1.13
diff -u -r1.13 trevor.tst
--- regression/trevor.tst 2001/10/15 00:21:16 1.13
+++ regression/trevor.tst 2001/10/15 01:04:15
@@ -351,3 +351,102 @@
360 owl_defend G8
#? [(2|3) J9]*
+#CATEGORY=OWL_BUG
+#DESCRIPTION=Can safely connect out!
+#SEVERITY=10
+loadsgf games/trevor/trevor_37.sgf
+370 owl_defend C9
+#? [1 F8]*
+
+
+#CATEGORY=PATTERN_TUNING
+#DESCRIPTION=E3 is certainly better locally
+#SEVERITY=2
+loadsgf games/trevor/trevor_38.sgf 22
+380 gg_genmove white
+#? [!E4]*
+
+#CATEGORY=READING
+#DESCRIPTION=C6 is wrong way to protect the cut. Loses one point.
+#SEVERITY=3
+loadsgf games/trevor/trevor_38.sgf 39
+381 gg_genmove black
+#? [D7|C7]*
+
+#CATEGORY=KO_THREATS
+#DESCRIPTION=E9 is terrible for leaving Ko threats.
+#SEVERITY=1
+loadsgf games/trevor/trevor_38.sgf 41
+382 gg_genmove black
+#? [E8]*
+
+
+#CATEGORY=PATTERN_TUNING
+#DESCRIPTION=White misses cut.
+#SEVERITY=10
+loadsgf games/trevor/trevor_39.sgf 38
+390 gg_genmove white
+#? [!PASS]*
+
+
+#CATEGORY=OWL_TUNING
+#DESCRIPTION=F8 is tough to find, but not too tough.
+#SEVERITY=3
+loadsgf games/trevor/trevor_40.sgf 1
+400 gg_genmove black
+#? [F8]*
+
+#CATEGORY=
+#DESCRIPTION=White can live!
+#SEVERITY=4
+loadsgf games/trevor/trevor_40a.sgf 2
+401 gg_genmove white
+#? [F8]*
+
+#CATEGORY=
+#DESCRIPTION=White can live!
+#SEVERITY=8
+loadsgf games/trevor/trevor_40.sgf 2
+402 gg_genmove white
+#? [!PASS]*
+
+
+#CATEGORY=PATTERN_TUNING
+#DESCRIPTION=Black should block, not play B4.
+#SEVERITY=5
+loadsgf games/trevor/trevor_41.sgf 29
+410 gg_genmove black
+#? [D5|E5]*
+
+#CATEGORY=BLUNDER
+#DESCRIPTION=A3 leaves behind a double-atari.
+#SEVERITY=10
+loadsgf games/trevor/trevor_41.sgf 35
+411 gg_genmove black
+#? [!A3]*
+
+#CATEGORY=TACTICAL_READING
+#DESCRIPTION=D4 worm is more important to save than B2.
+#SEVERITY=3
+loadsgf games/trevor/trevor_41.sgf 37
+412 gg_genmove black
+#? [C4]*
+
+#CATEGORY=KO
+#DESCRIPTION=Terrible confusion on GnuGo's part here.
+#SEVERITY=10
+#Submitted by:address@hidden (Cai Qiang)
+#Cai said: I made a play between GnuGo 3.0.0 and FunGo with 3
+# handicaps. Gnugo played quite well. And in the end it almost
+# killed a corner of FunGo, but it played a big blunder:-(.
+# Attachment is the SGF file.
+loadsgf games/trevor/trevor_42.sgf 211
+420 gg_genmove black
+#? [G16]*
+
+#CATEGORY=TACTICAL_READING
+#DESCRIPTION=Minus 1 point, attacking very dead stone.
+#SEVERITY=10
+loadsgf games/trevor/trevor_42.sgf 191
+421 gg_genmove black
+#? [!C2]*