File: seval.c.patch

package info (click to toggle)
sjeng 11.2-15.1
  • links: PTS, VCS
  • area: main
  • in suites: forky, sid
  • size: 1,444 kB
  • sloc: ansic: 13,378; sh: 324; makefile: 29
file content (54 lines) | stat: -rw-r--r-- 1,305 bytes parent folder | download | duplicates (5)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
Author: Lukas Geyer <lukas@debian.org>
Description: General code cleanup.

--- sjeng-11.2.orig/seval.c
+++ sjeng-11.2/seval.c
@@ -121,8 +121,6 @@
 
 static int black_saccers(int square)
 {
-  register int ndir, a_sq;
-  register int basq, i;
   register int f = FALSE;
 
   /* for white pawn on square, any black
@@ -148,8 +146,8 @@
       f = TRUE;
     }
   else if (rank(square) == 4 &&
-	   board[square + 35] == bpawn ||
-	   board[square + 37] == bpawn)
+	   (board[square + 35] == bpawn ||
+	    board[square + 37] == bpawn))
     {
       f = TRUE;
     }
@@ -205,8 +203,6 @@
   /* for black pawn on square, any black
    * pieces that can sac themselves to it? */
   
-  register int ndir, a_sq;
-  register int basq, i;
   register int f = FALSE;
 
   /* for white pawn on square, any black
@@ -232,8 +228,8 @@
       f = TRUE;
     }
   else if (rank(square) == 5 &&
-	   board[square - 35] == wpawn ||
-	   board[square - 37] == wpawn)
+	   (board[square - 35] == wpawn ||
+	    board[square - 37] == wpawn))
     {
       f = TRUE;
     }
@@ -298,7 +294,7 @@
   int isolated, backwards, i, a, j;
   long int score = 0;
   int in_cache;
-  int wb = 0, bb = 0, wbc, bbc;
+  int wb = 0, bb = 0, wbc = 0, bbc = 0;
   int wk = 0, bk = 0, wr = 0, br = 0;
   int wn = 0, bn = 0, wp = 0, bp = 0;