--- a/Float.st	Fri Sep 15 17:02:29 2017 +0200
+++ b/Float.st	Fri Sep 15 17:02:36 2017 +0200
@@ -1,3 +1,5 @@
+"{ Encoding: utf8 }"
+
 "
  COPYRIGHT (c) 1988 by Claus Gittinger
 	      All Rights Reserved
@@ -523,7 +525,6 @@
     "Modified (comment): / 22-06-2017 / 13:44:12 / cg"
 ! !
 
-
 !Float class methodsFor:'binary storage'!
 
 readBinaryIEEEDoubleFrom:aStream
@@ -859,7 +860,6 @@
     "Modified (comment): / 20-06-2017 / 11:51:54 / cg"
 ! !
 
-
 !Float class methodsFor:'queries'!
 
 exponentCharacter
@@ -914,7 +914,6 @@
     ^ 2 "must be careful here, whenever ST/X is used on VAX or a 370"
 ! !
 
-
 !Float methodsFor:'arithmetic'!
 
 * aNumber
@@ -2396,6 +2395,14 @@
 
     RETURN (__mkSmallInteger(sizeof(double)));
 %}.
+!
+
+byteAt:index
+    ^ self basicAt:index
+!
+
+byteAt:index put:newByte
+    self shouldNotImplement
 ! !
 
 !Float methodsFor:'queries'!
@@ -2515,7 +2522,6 @@
     "Modified: / 20-06-2017 / 11:37:13 / cg"
 ! !
 
-
 !Float methodsFor:'testing'!
 
 isFinite