setd("one",0)
setd(2,0)
function visitor(object key, object /*data*/, object /*user_data*/)
?key
return 1
end function
traverse_dict(routine_id("visitor")) -- shows 2, "one"