diff --git a/Loader.st b/Loader.st
index 1c24b9b..59ceb63 100644
--- a/Loader.st
+++ b/Loader.st
@@ -52,5 +52,6 @@ Object subclass: Loader [
 Eval [
     | l | 
     l := Loader new.
-    ObjectMemory snapshot: Smalltalk arguments first
+    PackageLoader flush.
+    ObjectMemory snapshot: Smalltalk arguments first.
 ]