function element = top(self)
%return 'top' node
% usage
%   data = top(stack)

% $Id$

% return object prepared in data
% ------------------------------

if isempty(self.stack_pointer)
  element = {};
else
  element = data(self.stack_pointer);
end
end