hardened TOrmCacheTable.Get method

synopse · May 10, 2024 · 2b2957f · 2b2957f
1 parent 168a0e5
commit 2b2957f
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 1 deletion.
diff --git a/src/mormot.commit.inc b/src/mormot.commit.inc
@@ -1 +1 @@
-'2.2.7480'
+'2.2.7481'
diff --git a/src/orm/mormot.orm.base.pas b/src/orm/mormot.orm.base.pas
@@ -10823,6 +10823,7 @@ function TOrmCacheTable.Get(aID: TID): pointer;
   result := nil;
   if (@self = nil) or
      not CacheEnable or
+     (Value = nil) or
      (TimeOutMS <> 0) then // by safety: TimeOutMS may delete the instance
     exit;
   i := SortFind(Value, aID, Count);