next-handle ( -- n )

Vocabulary

alien.handles.private

Inputs

None

Outputs

n

an object

Definition

USING: assocs kernel namespaces ;

IN: alien.handles.private

: next-handle ( -- n )
    [ (next-handle) dup alien-handles get-global key? ] [ drop ]
    while ;