--- a/ByteArray.st	Mon Aug 03 15:39:58 2015 +0200
+++ b/ByteArray.st	Mon Aug 03 15:40:29 2015 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1989 by Claus Gittinger
 	      All Rights Reserved
@@ -166,7 +164,6 @@
 ! !
 
 
-
 !ByteArray class methodsFor:'queries'!
 
 elementByteSize
@@ -187,7 +184,6 @@
     "Modified: 23.4.1996 / 15:56:25 / cg"
 ! !
 
-
 !ByteArray methodsFor:'Compatibility-Squeak'!
 
 bitXor:aByteArray
@@ -2607,81 +2603,6 @@
     "Modified: 22.4.1996 / 12:54:06 / cg"
 !
 
-hexPrintOn:aStream
-    "print as hex string, eg: 'FF0243'.
-     This string can be used in #fromHexString: to recreate the byteArray"
-
-    self do:[:byte|
-	byte printOn:aStream base:16 size:2 fill:$0.
-    ].
-
-    "
-      #[1 2 3 4 10 17] hexPrintOn:Transcript
-    "
-
-    "
-     |s|
-     s := String streamContents:[:s | #[1 2 3 4 10 17] hexPrintOn:s].
-     ByteArray fromHexString:s
-    "
-!
-
-hexPrintOn:aStream withSeparator:aSeparatorStringOrCharacter
-    "print as hex string, eg: 'FF:02:43'"
-
-    self do:[:byte|
-	byte printOn:aStream base:16 size:2 fill:$0.
-    ] separatedBy:[
-	aSeparatorStringOrCharacter printOn:aStream
-    ].
-
-    "
-      #[1 2 3 4 10 17] hexPrintOn:Transcript withSeparator:$:
-    "
-!
-
-hexPrintString
-    "print as hex string, eg: 'FF0243'.
-     This string can be used in #fromHexString: to recreate the byteArray"
-
-    |s|
-
-    s := '' writeStream.
-    self do:[:byteOrCharacter |
-	|byte|
-	byte := byteOrCharacter isCharacter
-		    ifTrue:[byteOrCharacter codePoint]
-		    ifFalse:[byteOrCharacter].
-	byte printOn:s base:16 size:2 fill:$0.
-    ].
-    ^ s contents.
-
-    "
-      #[1 2 3 4 10 17] hexPrintString
-    "
-
-    "
-     ByteArray fromHexString:#[1 2 3 4 10 17] hexPrintString
-    "
-
-    "Modified: / 03-07-2010 / 01:59:19 / cg"
-!
-
-hexPrintStringWithSeparator:aSeparatorStringOrCharacter
-    "print as hex string, eg: 'FF:02:43'."
-
-    |s|
-
-    s := '' writeStream.
-    self hexPrintOn:s withSeparator:aSeparatorStringOrCharacter.
-    ^ s contents.
-
-    "
-      #[1 2 3 4 10 17] hexPrintStringWithSeparator:$:
-      #[1 2 3 4 10 17] hexPrintStringWithSeparator:Character space
-    "
-!
-
 printOn:aStream
     "append a printed representation to aStream"
 
@@ -2993,7 +2914,6 @@
     "
 ! !
 
-
 !ByteArray methodsFor:'searching'!
 
 indexOf:aByte startingAt:start
@@ -3059,7 +2979,6 @@
     "
 ! !
 
-
 !ByteArray methodsFor:'testing'!
 
 isByteArray