(pool-new) ( pool -- object )

Vocabulary

memory.pools.private

Inputs

pool

an object

Outputs

object

an object

Definition

USING: accessors sequences ;

IN: memory.pools.private

: (pool-new) ( pool -- object )
    objects>> [ f ] [ pop ] if-empty ;