encoder error handling
authorClaus Gittinger <cg@exept.de>
Thu, 30 Oct 2008 20:54:58 +0100
changeset 11297 49adeb063d77
parent 11296 5ac13a45fc3d
child 11298 28d9d4e747dc
encoder error handling
CharacterEncoderImplementations__JIS0208.st
Encoder_JIS0208.st
--- a/CharacterEncoderImplementations__JIS0208.st	Thu Oct 30 20:54:05 2008 +0100
+++ b/CharacterEncoderImplementations__JIS0208.st	Thu Oct 30 20:54:58 2008 +0100
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic' }"
 
 "{ NameSpace: CharacterEncoderImplementations }"
@@ -7636,7 +7635,7 @@
 
     unicode := unicodeArg.
     unicode <= 16r5B ifTrue:[
-        ^ self decodingError.
+        ^ self encodingError.
     ].
     unicode > 16rFFE5 ifTrue:[
         ^ self encodingError.
@@ -28647,5 +28646,5 @@
 !JIS0208 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__JIS0208.st,v 1.3 2004-03-09 22:00:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/CharacterEncoderImplementations__JIS0208.st,v 1.4 2008-10-30 19:54:58 cg Exp $'
 ! !
--- a/Encoder_JIS0208.st	Thu Oct 30 20:54:05 2008 +0100
+++ b/Encoder_JIS0208.st	Thu Oct 30 20:54:58 2008 +0100
@@ -9,7 +9,6 @@
  other person.  No title to or ownership of the software is
  hereby transferred.
 "
-
 "{ Package: 'stx:libbasic' }"
 
 "{ NameSpace: CharacterEncoderImplementations }"
@@ -7636,7 +7635,7 @@
 
     unicode := unicodeArg.
     unicode <= 16r5B ifTrue:[
-        ^ self decodingError.
+        ^ self encodingError.
     ].
     unicode > 16rFFE5 ifTrue:[
         ^ self encodingError.
@@ -28647,5 +28646,5 @@
 !JIS0208 class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Encoder_JIS0208.st,v 1.3 2004-03-09 22:00:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Attic/Encoder_JIS0208.st,v 1.4 2008-10-30 19:54:58 cg Exp $'
 ! !