New tests for atomic ops

2025-06-03 19:49:48 +02:00
parent 556690fa5e
commit f438c91dbd
11 changed files with 511 additions and 951 deletions
@@ -411,7 +411,6 @@ begin
    funcLazyObj := TMycFuncLazy<Integer>.Create(sourceDirty.State, function: Integer begin Result := 1; end);
    Assert.IsTrue(funcLazyObj.Pop(tempVal), 'Initial Pop should succeed');
    funcLazyObj.Destroy;
-    funcLazyObj := nil;
    Assert.WillNotRaise(
        procedure
        begin