ByteArray.st
changeset 20306 07ff17265c6b
parent 20137 b89a5898c3d2
child 20344 152b525b5c63
child 20519 da1c421ea59c
--- a/ByteArray.st	Thu Aug 25 16:40:54 2016 +0200
+++ b/ByteArray.st	Fri Aug 26 01:04:45 2016 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -165,8 +167,6 @@
 
 
 
-
-
 !ByteArray class methodsFor:'queries'!
 
 elementByteSize
@@ -202,7 +202,6 @@
 ! !
 
 
-
 !ByteArray methodsFor:'Compatibility-Squeak'!
 
 bitXor:aByteArray
@@ -2860,6 +2859,14 @@
     ^ false.
 !
 
+isValidElement:anObject
+    "return true, if I can hold this kind of object"
+
+    ^ anObject isInteger
+    and:[ (anObject >= self class minVal)
+    and:[ (anObject <= self class maxVal) ]]
+!
+
 max
     "return the maximum value in the receiver -
      redefined to speedup image processing and sound-player
@@ -3214,7 +3221,6 @@
     "Modified: 22.4.1996 / 12:55:30 / cg"
 ! !
 
-
 !ByteArray class methodsFor:'documentation'!
 
 version