fix condition create in generateDoWhileLoopStatement

[ProHolz]

func generateDoWhileLoopStatement
because generateDoWhileLoopStatement will solve as: repeat until not condition if no operator in statement

[dwarfland]

Working as designed.

[ProHolz]

Working as designed. ?
Please look at the results:

// Delphi Original
procedure RepeatLoop;
  var
  lvalue : integer;
 begin
   lValue := 0;

   repeat
    lvalue := lvalue+2;
    
   until lvalue > 1000;

 end;

result from CodegGen4
method RepeatLoop;
var
  lvalue: Integer;
begin
  lValue := 0;
  repeat
    lvalue := lvalue + 2;

  until not lvalue > 1000;
end;