--- a/CompiledCode.st	Wed Jul 24 17:03:07 2002 +0200
+++ b/CompiledCode.st	Wed Jul 24 17:04:14 2002 +0200
@@ -737,7 +737,7 @@
 
     ^ ArgumentSignal
         raiseRequestWith:self
-        errorString:'argumentArray must be an Array'
+        errorString:' - argumentArray is not an Array'
 
     "Modified: 4.11.1996 / 22:46:52 / cg"
 !
@@ -859,7 +859,7 @@
 
     ^ ArgumentSignal
         raiseRequestWith:self
-        errorString:'too many args in send'
+        errorString:' - too many args in send'
 
     "Modified: 4.11.1996 / 22:47:14 / cg"
 !
@@ -874,10 +874,14 @@
 
     ^ ArgumentSignal
         raiseRequestWith:self
-        errorString:(self class name ,
+        errorString:(' - ', self class name ,
                      ' got ' , numberGiven printString ,
                      ' arg(s) where ' , self numArgs printString , ' expected')
 
+    "
+      2 perform:#+
+    "
+
     "Modified: 1.8.1997 / 00:23:10 / cg"
 ! !
 
@@ -1687,6 +1691,6 @@
 !CompiledCode class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.89 2002-05-14 12:38:26 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CompiledCode.st,v 1.90 2002-07-24 15:04:14 stefan Exp $'
 ! !
 CompiledCode initialize!