# HG changeset patch # User Stefan Vogel # Date 1480523384 -3600 # Node ID 7c7d1c059ce9770695968ee66c44365efe48ab10 # Parent ffebd509a3aed43917bc7207ace36c22a733817d #DOCUMENTATION by stefan class: FloatArray changed: #minMax diff -r ffebd509a3ae -r 7c7d1c059ce9 FloatArray.st --- a/FloatArray.st Wed Nov 30 17:29:31 2016 +0100 +++ b/FloatArray.st Wed Nov 30 17:29:44 2016 +0100 @@ -1,5 +1,3 @@ -"{ Encoding: utf8 }" - " COPYRIGHT (c) 1993 by Claus Gittinger All Rights Reserved @@ -16,10 +14,10 @@ "{ NameSpace: Smalltalk }" AbstractNumberVector variableFloatSubclass:#FloatArray - instanceVariableNames:'' - classVariableNames:'' - poolDictionaries:'' - category:'Collections-Arrayed' + instanceVariableNames:'' + classVariableNames:'' + poolDictionaries:'' + category:'Collections-Arrayed' ! !FloatArray class methodsFor:'documentation'! @@ -688,28 +686,6 @@ OBJ retVal; _min = _max = _p[0]; -#ifdef PRE_4_OCT_2011 - if (_sz > 1) { - float _this = _p[1]; - float _prev; - - /* how about inline-mmx-asm for this ... */ - for (_i=2; _i<_sz; _i++) { - _prev = _this; - _this = _p[_i]; - if (_prev < _min) { - _min = _prev; - } else if (_prev > _max) { - _max = _prev; - } - } - if (_this < _min) { - _min = _this; - } else if (_this > _max) { - _max = _this; - } - } -#else for (_i=_sz-1; _i>0; _i-=2) { float _v1 = _p[_i]; float _v2 = _p[_i-1]; @@ -721,7 +697,7 @@ if (_v1 > _max) _max = _v1; } } -#endif + min = __MKFLOAT(_min); __PROTECT__(min); max = __MKFLOAT(_max); @@ -734,7 +710,7 @@ empty == true ifTrue:[ ^ self emptyCollectionError. ]. - ^ Array with:(super min) with:(super max) + ^ Array with:(self min) with:(self max) " |f1|