]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/math/vectors/conversion/conversion.factor
Merge branch 'master' of http://factorcode.org/git/factor
[factor.git] / basis / math / vectors / conversion / conversion.factor
index cb59aa95d5652fefbb68a006ba40b52fb15948e4..fd58b11dc8a31526fc5498bec4721355e9a18da0 100644 (file)
@@ -11,9 +11,9 @@ ERROR: bad-vconvert-input value expected-type ;
 <PRIVATE
 
 : float-type? ( c-type -- ? )
-    { float double } memq? ;
+    { float double } member-eq? ;
 : unsigned-type? ( c-type -- ? )
-    { uchar ushort uint ulonglong } memq? ;
+    { uchar ushort uint ulonglong } member-eq? ;
 
 : check-vconvert-type ( value expected-type -- value )
     2dup instance? [ drop ] [ bad-vconvert-input ] if ; inline