Update alien.destructors for DEFINE-CLASS
parent
6aa8b1fea8
commit
d3b2650ce9
basis/alien/destructors
|
@ -7,7 +7,7 @@ SLOT: alien
|
|||
|
||||
FUNCTOR: define-destructor ( F -- )
|
||||
|
||||
F-destructor DEFINES ${F}-destructor
|
||||
F-destructor DEFINES-CLASS ${F}-destructor
|
||||
<F-destructor> DEFINES <${F}-destructor>
|
||||
&F DEFINES &${F}
|
||||
|F DEFINES |${F}
|
||||
|
|
Loading…
Reference in New Issue