heap-pop* ( heap -- )
Factor handbook » The language » Collections » Heaps

Prev:	heap-push-all ( assoc heap -- )
Next:	heap-pop ( heap -- value key )

Vocabulary
heaps

Inputs

heap

a heap

Outputs
None

Word description
Remove the first element from the heap.

Side effects
Modifies heap

Definition

IN: heaps

GENERIC: heap-pop* ( heap -- )

Methods

USING: accessors heaps heaps.private kernel sequences ;

M: heap heap-pop*
    dup data>> f over first index<< [ pop ] keep
    [ 2drop ] [ set-first 0 sift-up ] if-empty ;