lzip ( list1 list2 -- result )

Vocabulary

lists.lazy

Inputs

list1	an object
list2	an object

Outputs

result

an object

Definition

USING: kernel lists ;

IN: lists.lazy

: lzip ( list1 list2 -- result )
    2dup [ nil? ] either? [ 2drop nil ] [ <lazy-zip> ] if ;