diff --git a/ide/packages/idedebugger/debugger.pp b/ide/packages/idedebugger/debugger.pp index 0235d73ea8..70f86b04c4 100644 --- a/ide/packages/idedebugger/debugger.pp +++ b/ide/packages/idedebugger/debugger.pp @@ -3338,7 +3338,8 @@ end; procedure TCurrentResData.MarkResDataAsUsedByOwner; begin - assert(FNewResultData<>nil, 'TCurrentResData.MarkResDataAsUsedByOwner: FNewResultData<>nil'); + if FNewResultData = nil then + exit; if FNewResultData.ValueKind = rdkError then begin Exclude(FFLags, crfFreeErrResData); Include(FFLags, crfFreeResData);