Revert "boids: population needs to be an integer for slicing."

This reverts commit dec9becf65.
locals-and-roots
John Benediktsson 2016-04-23 12:43:15 -07:00
parent 7cab3d61fe
commit abf4ca20c2
1 changed files with 1 additions and 1 deletions

View File

@ -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 ;