anchor.diff:          end;
           reader.next;
           addToken(ltkComment);
  +        if callBackDoStop then exit;
           continue;
         end
         else
  
positive.code:           identifier += reader.head^;
          end;
          addToken(ltkNumber);
          continue;
        end
        else reader.previous;
  
negative.code:             then
                begin
                  addToken(ltkOperator);
                  if callBackDoStop then exit;
                  continue;
                end;
            end;
  