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

* fixed SetIsEmpty

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

+ 1 - 1
compiler/symdef.pas

@@ -5990,7 +5990,7 @@ implementation
         if AValue then
           include(implprocoptions,pio_empty)
         else
-          include(implprocoptions,pio_empty);
+          exclude(implprocoptions,pio_empty);
       end;