--- a/ObjectMemory.st	Thu May 24 21:09:56 2018 +0200
+++ b/ObjectMemory.st	Thu May 24 21:10:08 2018 +0200
@@ -2033,12 +2033,13 @@
             ]
         ].
     ].
-    self error:'no reference' mayProceed:true.
+    self proceedableError:'no reference'.
     ^ nil.
 
     "Created: / 02-02-1998 / 23:46:12 / cg"
     "Modified: / 04-02-1998 / 22:03:36 / cg"
     "Modified (format): / 13-02-2017 / 20:28:14 / cg"
+    "Modified: / 24-05-2018 / 21:03:49 / Claus Gittinger"
 !
 
 sizeOf:anObject