# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1462670647 -7200
# Node ID 63c5834d27c141d5be927c9667ce547412d59c26
# Parent  42ad9ef773331129f8874f51ab8dcf061688d8fe
#FEATURE by cg
class: FourByteString
added: #bytesPerCharacter

diff -r 42ad9ef77333 -r 63c5834d27c1 FourByteString.st
--- a/FourByteString.st	Sat May 07 12:39:06 2016 +0200
+++ b/FourByteString.st	Sun May 08 03:24:07 2016 +0200
@@ -131,6 +131,13 @@
     ^ 32
 !
 
+bytesPerCharacter
+    "return the number of bytes each character has.
+     Here, 4 is returned (storing quad byte characters)."
+
+    ^ 4
+!
+
 isWideString
     "true if I require more than one byte per character"