From 00059f9ec5b3ea9089a31e2ca0a44f16bdaeb7e7 Mon Sep 17 00:00:00 2001 From: Doug Coleman Date: Tue, 30 Jun 2015 21:18:52 -0700 Subject: [PATCH] classes.tuple: Add a note about "defining-class" --- core/classes/tuple/tuple.factor | 3 +++ 1 file changed, 3 insertions(+) diff --git a/core/classes/tuple/tuple.factor b/core/classes/tuple/tuple.factor index d8ea8b02d4..50235dce68 100644 --- a/core/classes/tuple/tuple.factor +++ b/core/classes/tuple/tuple.factor @@ -240,6 +240,9 @@ M: tuple-class update-class [ define-tuple-prototype ] } cleave ; +! The "defining-class" word-prop is to ensure that the tuple being +! defined becomes a classoid as it's being parsed so that it can +! be used as the type of its own slots. : define-new-tuple-class ( class superclass slots -- ) { [ drop f f tuple-class define-class ]