[begin] key dup emit emit key? 0= [until]