anchor.diff:            currentReadGame := filename
           end;
   
  -      view.cl.Add(x [index], filename, index);
  +      view.cl.Add(x[index], filename, index);
         // avoid freeing games in cl
  -      x [index] := nil;
  +      x[index] := nil;
       end;
   
     x.Free
  
positive.code: 
    for i := i1 to i2 do
      for j := j1 to j2 do
        case gb.Board [i, j] of
          Black : Result := Result + iff(gb.IsWildcard(i, j), 'x', 'X');
          White : Result := Result + iff(gb.IsWildcard(i, j), 'o', 'O');
          else    Result := Result + iff(gb.IsWildcard(i, j), '*', '.');
  
negative.code:   k, nB, nW, color : integer;
  begin
    for k := 0 to gl.Continuations.Count - 1 do
      with TKContinuation(gl.Continuations.Items[k]) do
        begin
          nB := B; // number of Black continuations
          nW := W; // number of White continuations
  