# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1551564913 -3600
# Node ID 72db4bb61aaf9f6b54b4fde0bb2fbcfc77673af0
# Parent  cdb4f82cb732f11928ae307f70fd8414a64a14af
#FEATURE by cg
class: Object
added: #isFloatArray

diff -r cdb4f82cb732 -r 72db4bb61aaf Object.st
--- a/Object.st	Sat Mar 02 23:12:16 2019 +0100
+++ b/Object.st	Sat Mar 02 23:15:13 2019 +0100
@@ -9920,6 +9920,15 @@
     "Modified: / 14.11.2001 / 14:57:46 / cg"
 !
 
+isFloatArray
+    "return true if the receiver has float elements.
+     These are Float, Double- and HalfFloat arrays"
+
+    ^ false
+
+    "Created: / 02-03-2019 / 23:14:46 / Claus Gittinger"
+!
+
 isForm
     "return true if the receiver is some kind of form;
      false is returned here - the method is only redefined in Form."