--- a/DoubleArray.st	Wed Nov 30 16:58:18 2016 +0100
+++ b/DoubleArray.st	Wed Nov 30 17:29:31 2016 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 1993 by Claus Gittinger
 	      All Rights Reserved
@@ -235,7 +233,7 @@
 
 %{  
     if (__ClassInstPtr(__qClass(self))->c_ninstvars == __mkSmallInteger(0)) {
-        INT _sz = __floatArraySize(self);
+        INT _sz = __doubleArraySize(self);
 
         if (_sz > 0) {
             INT _i;
@@ -255,6 +253,7 @@
                     if (_v1 > _max) _max = _v1;
                 }
             }
+
             min = __MKFLOAT(_min);
             __PROTECT__(min);
             max = __MKFLOAT(_max);