diff --git a/src/OpenFOAM/db/Time/TimeIO.C b/src/OpenFOAM/db/Time/TimeIO.C
index cbe63d5a329ae7d839e605cf21b5807d52ce1c4a..0683a3243abe7931cadb23a61b053f777752e7e5 100644
--- a/src/OpenFOAM/db/Time/TimeIO.C
+++ b/src/OpenFOAM/db/Time/TimeIO.C
@@ -655,7 +655,11 @@ bool Foam::Time::writeObject
             // Does the writeTime trigger purging?
             if (writeTime_ && purgeWrite_)
             {
-                if (previousWriteTimes_.top() != timeName())
+                if
+                (
+                    previousWriteTimes_.empty()
+                 || previousWriteTimes_.top() != timeName()
+                )
                 {
                     previousWriteTimes_.push(timeName());
                 }