--- a/DoubleArray.st	Wed Sep 07 09:18:33 2016 +0100
+++ b/DoubleArray.st	Wed Sep 07 13:49:27 2016 +0100
@@ -235,7 +235,7 @@
 
 %{  
     if (__ClassInstPtr(__qClass(self))->c_ninstvars == __mkSmallInteger(0)) {
-        INT _sz = __floatArraySize(self);
+        INT _sz = __doubleArraySize(self);
 
         if (_sz > 0) {
             INT _i;