http://www.newton-inc.com/dev/techinfo/qa/qa.htm
call func(theFrame) begin
local i := 0;
foreach slot, value in theFrame do begin
print(i && ': && slot);
i := i + 1;
end
end with (<the reordered frame>)