--- a/Object.st	Fri Mar 08 23:36:53 1996 +0100
+++ b/Object.st	Mon Mar 18 12:29:21 1996 +0100
@@ -1950,7 +1950,7 @@
     "/ (output streams not yet initialized)
     "/
     Stdout isNil ifTrue:[
-	Smalltalk fatalAbort:'error during init phase'.
+	Smalltalk fatalAbort:'error during init: ' , aMessage selector , ' not understood'.
     ].
 
     (sel := aMessage selector) isNil ifTrue:[
@@ -4584,6 +4584,6 @@
 !Object class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.104 1996-03-08 22:04:31 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Object.st,v 1.105 1996-03-18 11:29:21 cg Exp $'
 ! !
 Object initialize!