anchor.diff:    TableSize: Integer;
     Str: TFileStream;
     IsLE: boolean;
  +  bReadAllFile: boolean;
   begin
     Result:= False;
     //IsOEM:= False;
  
positive.code: 
            //If control chars present, then non-text
            if IsAsciiControlChar(n) then
            begin
              Result:= False;
              Break
            end;
  
            //Calculate freq table
            if DetectOEM then
  
negative.code:     BytesRead:= Str.Read(Buffer^, BufSize);
      if BytesRead > 0 then
        begin
          bReadAllFile:= BytesRead=Str.Size;
  
          //Test UTF16 signature
          if ((Buffer[0]=#$ff) and (Buffer[1]=#$fe)) or
            ((Buffer[0]=#$fe) and (Buffer[1]=#$ff)) then
  