--- a/CharacterArray.st	Wed Sep 12 18:52:42 2018 +0200
+++ b/CharacterArray.st	Fri Sep 14 10:04:55 2018 +0200
@@ -8401,14 +8401,17 @@
 isBlank
     "return true, if the receiver contains spaces only"
 
-    ^ (self contains:[:char | char ~~ Character space]) not
+    ^ self size == 0 or:[(self contains:[:char | char ~~ Character space]) not]
 
     "
      '' isBlank
+     '' asUnicode16String isBlank
      '   a    ' isBlank
      '        ' isBlank
      '        ' asUnicode16String isBlank
     "
+
+    "Modified (comment): / 14-09-2018 / 10:04:18 / Stefan Vogel"
 !
 
 isInfix