* add a check to TRecall.store for FStorage=nil. Patch by Luiz, Mantis #21404

git-svn-id: trunk@20462 -

rtl/objpas/classes/persist.inc

@@ -142,7 +142,7 @@ end;
 
 procedure TRecall.Store;
 begin
-  if Assigned(FReference) then
+  if Assigned(FStorage) and Assigned(FReference) then
     FStorage.Assign(FReference);
 end;