diff --git a/core/classes/mixin/mixin.factor b/core/classes/mixin/mixin.factor index ec5c2ef2e4..706651cacf 100644 --- a/core/classes/mixin/mixin.factor +++ b/core/classes/mixin/mixin.factor @@ -18,11 +18,11 @@ M: mixin-class reset-class M: mixin-class rank-class drop 8 ; -TUPLE: check-mixin-class class ; +ERROR: check-mixin-class-error class ; : check-mixin-class ( mixin -- mixin ) dup mixin-class? [ - \ check-mixin-class boa throw + check-mixin-class-error ] unless ;