% Duplicate top operand stack object

meth dup =^ ( ·

var o : Object ·

var CurrentFrame : FrameInfo ·

TopFrame.GetFrame(CurrentFrame);

% the top object is popped from the operand stack

currentFrame.Pop (o);

% two copies are pushed onto the Operand stack

currentFrame.Push(o);

currentFrame.Push(o);

TopFrame.SetFrame(CurrentFrame);

end end

)

end