home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
C!T ROM 5
/
ctrom5b.zip
/
ctrom5b
/
OS2
/
SPEL
/
UCHESS
/
UCHESSRC
/
DEBUG10.H
< prev
next >
Wrap
Text File
|
1992-12-07
|
992b
|
39 lines
#ifdef DEBUG10
else
{
FILE *D;
int r, c, l;
struct leaf *xnode;
D = fopen ("/tmp/DEBUG", "w");
pnt = TrPnt[2];
fprintf (D, "hashfile failure\n");
algbr (PV >> 8, PV & 0x3f, 0);
fprintf (D, "inout move is %s\n", mvstr);
fprintf (D, "legal move are \n");
for (r = TrPnt[ply]; r < TrPnt[ply + 1]; r++)
{
xnode = &Tree[r];
algbr (xnode->f, xnode->t, (short) xnode->flags);
fprintf (D, "%s %s %s %s\n", mvstr[0], mvstr[1], mvstr[2], mvstr[3]);
}
fprintf (D, "\n current board is\n");
for (r = 7; r >= 0; r--)
{
for (c = 0; c <= 7; c++)
{
l = locn (r, c);
if (color[l] == neutral)
fprintf (D, " -");
else if (color[l] == white)
fprintf (D, " %c", qxx[board[l]]);
else
fprintf (D, " %c", pxx[board[l]]);
}
fprintf (D, "\n");
}
fprintf (D, "\n");
fclose (D);
}
#endif