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

* Added 'HaltOnNotReleased:=True', without it a memory leak won't register as a test failure.

git-svn-id: trunk@17072 -
sergei 14 лет назад
Родитель
Сommit
9e3731c0e0
1 измененных файлов с 1 добавлено и 0 удалено
  1. 1 0
      tests/webtbs/tw18859.pp

+ 1 - 0
tests/webtbs/tw18859.pp

@@ -30,6 +30,7 @@ var
   tr: trec;
 
 begin
+  HaltOnNotReleased := True;
   tr.s := 'test';
   uniquestring(tr.s);
   test1([tr.s]);