--- 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|