conversion errors (specific error classes)
authorClaus Gittinger <cg@exept.de>
Wed, 06 Aug 2008 12:26:10 +0200
changeset 11131 91a2d0eaf82d
parent 11130 fb6ebdb8c2a1
child 11132 e5bd3a66ca80
conversion errors (specific error classes)
Behavior.st
--- a/Behavior.st	Wed Aug 06 12:25:20 2008 +0200
+++ b/Behavior.st	Wed Aug 06 12:26:10 2008 +0200
@@ -1328,7 +1328,6 @@
     "Created: 16.4.1996 / 16:27:16 / cg"
 ! !
 
-
 !Behavior methodsFor:'compiler interface'!
 
 browserClass
@@ -2490,10 +2489,13 @@
      This is the reverse operation to 'storeOn:'.
 
      WARNING: storeOn: does not handle circular references and multiple 
-	      references to the same object.
-	      Use #storeBinary:/readBinaryFrom: for this."
-
-    ^ self readFrom:aStream onError:[self error:'conversion error for: ' , self name]
+              references to the same object.
+              Use #storeBinary:/readBinaryFrom: for this."
+
+    ^ self 
+        readFrom:aStream 
+        onError:[ self conversionErrorSignal 
+                    raiseErrorString:'conversion error for: ' , self name ]
 
     "
      |s|
@@ -2553,7 +2555,10 @@
      See comments in Behavior>>readFromString:onError:,
      Behavior>>readFrom: and Behavior>>readFrom:onError:"
 
-    ^ self readFromString:aString onError:[self error:'expected: ' , self name]
+    ^ self 
+        readFromString:aString 
+        onError:[ self conversionErrorSignal 
+                    raiseErrorString:'expected: ' , self name ]
 
     "
      Integer readFromString:'12345678901234567890' 
@@ -4444,5 +4449,5 @@
 !Behavior class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.279 2008-04-09 19:41:15 ab Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Behavior.st,v 1.280 2008-08-06 10:26:10 cg Exp $'
 ! !