4.5 eval (xleval.c)

�g����������eval����������C������xeval�������������� �������������D�����������Cxleval�������o���`�� �������������D

/* xeval - the built-in function 'eval' */
LVAL xeval()
{
  LVAL expr;
  
  /* get the expression to evaluate */
  expr = xlgetarg();
  xllastarg();
  
  /* evaluate the expression */
  return (xleval(expr));
}