--- a/CharacterArray.st	Thu Nov 16 12:16:59 2000 +0100
+++ b/CharacterArray.st	Thu Nov 16 17:00:58 2000 +0100
@@ -2237,12 +2237,12 @@
                     nr := Integer readFrom:in onError:nil.
                     nr isNil ifTrue:[
                         "/ what does VW do here ?
-                        self halt:'invalid format'.
+                        self error:'invalid format' mayProceed:true.
                         ^ self
                     ].
                     (nr between:1 and:argArray size) ifFalse:[
                         "/ what does VW do here ?
-                        self halt:'invalid format - bad argNr'.
+                        self error:'invalid format - bad argNr' mayProceed:true.
                         ^ self
                     ].
                 ].
@@ -2265,14 +2265,14 @@
                     ].
                 ] ifFalse:[
                     "/ what does VW do here ?
-                    self halt:'invalid format'.
+                    self error:'invalid format' mayProceed:true.
                     ^ self
                 ]]].
             ]].
             c := in next.
             c ~~ $> ifTrue:[
                 "/ what does VW do here ?
-                self halt:'invalid format'.
+                self error:'invalid format' mayProceed:true.
                 ^ self
             ]
         ] ifFalse:[
@@ -5652,6 +5652,6 @@
 !CharacterArray class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.190 2000-09-26 12:49:23 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterArray.st,v 1.191 2000-11-16 16:00:58 cg Exp $'
 ! !
 CharacterArray initialize!