# HG changeset patch # User Claus Gittinger # Date 1510492853 -3600 # Node ID 579e65188993cfe01fa74fe9e13ced8cfc880827 # Parent 80c37cd7702aff52f361bc9c7a204d07b40e7fb2 #REFACTORING by cg class: CharacterEncoderImplementations::ASCII comment/format in: #decode: #encode: class: CharacterEncoderImplementations::ASCII::ASCII7 changed: #decode: diff -r 80c37cd7702a -r 579e65188993 CharacterEncoderImplementations__ASCII.st --- a/CharacterEncoderImplementations__ASCII.st Sun Nov 12 14:19:22 2017 +0100 +++ b/CharacterEncoderImplementations__ASCII.st Sun Nov 12 14:20:53 2017 +0100 @@ -220,29 +220,31 @@ !ASCII methodsFor:'encoding & decoding'! decode:codeArg - "Automagically generated by generateCode - do not modify. - Decode from my encoding into unicode." + "Decode from my encoding into unicode." |code "{ Class: SmallInteger }"| code := codeArg. code > 16r7F ifTrue:[ - ^ self decodingError. + ^ self decodingError. ]. ^ code. + + "Modified (comment): / 12-11-2017 / 14:19:47 / cg" ! encode:unicodeArg - "Automagically generated by generateCode - do not modify. - Encode from unicode into my encoding." + "Encode from unicode into my encoding." |unicode "{ Class: SmallInteger }"| unicode := unicodeArg. unicode > 16r7F ifTrue:[ - ^ self encodingError. + ^ self encodingError. ]. ^ unicode. + + "Modified (comment): / 12-11-2017 / 14:19:52 / cg" ! ! !ASCII::ASCII7 class methodsFor:'documentation'! @@ -261,14 +263,10 @@ decode:codeArg "Decode from my encoding into unicode." - - |code "{ Class: SmallInteger }"| + + ^ codeArg bitAnd:16r7F. - code := codeArg. - ^ code bitAnd:16r7F. - - "Modified: / 12-11-2017 / 11:42:27 / cg" - "Modified (comment): / 12-11-2017 / 14:19:08 / cg" + "Modified (format): / 12-11-2017 / 14:20:39 / cg" ! encode:codeArg