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