using the new H{ } make.

[factor.git] / core / classes / tuple / tuple.factor

diff --git a/core/classes/tuple/tuple.factor b/core/classes/tuple/tuple.factor
index b338769706e3b2c309d8678adb65d6e66b70438c..dd7c63dea4ef5a37375b62401856d1c8aff58f5b 100644 (file)
--- a/core/classes/tuple/tuple.factor
+++ b/core/classes/tuple/tuple.factor
@@ -344,7 +344,7 @@ M: tuple-class rank-class drop 1 ;
 M: tuple-class instance?
     dup echelon-of layout-class-offset tuple-instance? ;
 
-M: tuple-class (flatten-class) dup set ;
+M: tuple-class (flatten-class) dup ,, ;
 
 M: tuple-class (classes-intersect?)
     {