fix <displaced-alien> applied to already displaced alien
parent
4befcf201b
commit
64278e2112
|
@ -62,7 +62,7 @@ CELL allot_alien(CELL delegate, CELL displacement)
|
||||||
{
|
{
|
||||||
F_ALIEN *delegate_alien = untag_object(delegate);
|
F_ALIEN *delegate_alien = untag_object(delegate);
|
||||||
displacement += delegate_alien->displacement;
|
displacement += delegate_alien->displacement;
|
||||||
alien->alien = F;
|
alien->alien = delegate_alien->alien;
|
||||||
}
|
}
|
||||||
else
|
else
|
||||||
alien->alien = delegate;
|
alien->alien = delegate;
|
||||||
|
|
Loading…
Reference in New Issue