Revert "boids: population needs to be an integer for slicing."
This reverts commit dec9becf65
.
locals-and-roots
parent
7cab3d61fe
commit
abf4ca20c2
|
@ -96,7 +96,7 @@ M: range-observer model-changed
|
||||||
|
|
||||||
:: set-population ( n boids-gadget -- )
|
:: set-population ( n boids-gadget -- )
|
||||||
boids-gadget [
|
boids-gadget [
|
||||||
dup length n - >integer dup 0 >
|
dup length n - dup 0 >
|
||||||
[ head* ]
|
[ head* ]
|
||||||
[ neg random-boids append ] if
|
[ neg random-boids append ] if
|
||||||
] change-boids drop ;
|
] change-boids drop ;
|
||||||
|
|
Loading…
Reference in New Issue