Просмотр исходного кода

* patch by J. Gareth Moreton: conditional Jump Inversion stoploop variable, resolves #36680

git-svn-id: trunk@44144 -
florian 5 лет назад
Родитель
Сommit
991ce83a2b
1 измененных файлов с 2 добавлено и 0 удалено
  1. 2 0
      compiler/aoptobj.pas

+ 2 - 0
compiler/aoptobj.pas

@@ -2006,6 +2006,8 @@ Unit AoptObj;
                             asml.remove(hp1);
                             asml.remove(hp1);
                             hp1.free;
                             hp1.free;
 
 
+                            stoploop := False;
+
                             if not CJLabel.is_used then
                             if not CJLabel.is_used then
                               begin
                               begin
                                 CJLabel := NCJLabel;
                                 CJLabel := NCJLabel;