anchor.diff:    AllocUInt32Array( TopicsExcluded, // Exclusions are treated as boolean only
                       TopicCount );
   
  -  FillUInt32Array( TopicRelevances, TopicCount, 0);
  -  FillUInt32Array( TopicsExcluded, TopicCount, 0);
  +  ClearUInt32Array( TopicRelevances, TopicCount );
  +  ClearUInt32Array( TopicsExcluded, TopicCount );
   
     for TermIndex := 0 to Query.TermCount - 1 do
     begin
  
positive.code:         begin
            // Search for occurrences of this word
            // within the text of topics
            HelpFile.SearchTable.Search( DictIndex,
                                         TopicsMatchingDictWord );
  
            // debug
            s := HelpFile.DictionaryWords[ DictIndex ];
  
negative.code:   WordSequences.Clear;
  end;
  
  // given a Search word which is known to match the Reference word,
  // return the relevance
  function MatchedWordRelevance( const SearchWord: string;
                                 const ReferenceWord: string ): longint;
  