# HG changeset patch # User sr # Date 1505487742 -7200 # Node ID 4f711d28437042b30b294b7c7b2f9090adc8f53d # Parent 9ce7e373cf911d866059c94c112b3d325d4686a0 #BUGFIX by sr class: LongFloat added: #byteAt: #byteAt:put: diff -r 9ce7e373cf91 -r 4f711d284370 LongFloat.st --- a/LongFloat.st Fri Sep 15 15:25:57 2017 +0200 +++ b/LongFloat.st Fri Sep 15 17:02:22 2017 +0200 @@ -1,3 +1,5 @@ +"{ Encoding: utf8 }" + " COPYRIGHT (c) 1999 by eXept Software AG All Rights Reserved @@ -1957,6 +1959,14 @@ RETURN (__mkSmallInteger(sizeof(LONGFLOAT))); %}. +! + +byteAt:index + ^ self basicAt:index +! + +byteAt:index put:newByte + self shouldNotImplement ! ! !LongFloat methodsFor:'special access'!