From 3a668a9457f132547c1e6d0b5349f52eab9c84ed Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Sun, 18 Jan 2009 20:51:07 -0600 Subject: [PATCH] Fix bootstrap by adding protocol slot --- basis/alien/destructors/destructors.factor | 2 ++ 1 file changed, 2 insertions(+) diff --git a/basis/alien/destructors/destructors.factor b/basis/alien/destructors/destructors.factor index 8b3be72cea..fdc752e78c 100644 --- a/basis/alien/destructors/destructors.factor +++ b/basis/alien/destructors/destructors.factor @@ -3,6 +3,8 @@ USING: functors destructors accessors kernel parser words ; IN: alien.destructors +SLOT: alien + FUNCTOR: define-destructor ( F -- ) F-destructor DEFINES ${F}-destructor