#DOCUMENTATION by stefan
authorStefan Vogel <sv@exept.de>
Wed, 30 Nov 2016 17:29:44 +0100
changeset 21081 7c7d1c059ce9
parent 21080 ffebd509a3ae
child 21082 c8e0ef40bf6e
#DOCUMENTATION by stefan class: FloatArray changed: #minMax
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|