The R Project SVN R

Rev

Rev 581 | Rev 1016 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 581 Rev 1009
Line 1628... Line 1628...
1628 
					    integralBottomShift())));
1628 
					    integralBottomShift())));
1629 
  else
 1629 
  else
1630 
    return asciiBBox(operatorAscii(operator));
 1630 
    return asciiBBox(operatorAscii(operator));
1631 
}
 1631 
}
1632 
 
 1632 
 
1633 
static useRelGap = 1;
 1633 
static int useRelGap = 1;
1634
1634
1635 
static BBOX operatorLimitBBox(SEXP limit)
 1635 
static BBOX operatorLimitBBox(SEXP limit)
1636 
{
 1636 
{
1637 
  float cexSaved = mathDevice->gp.cex;
 1637 
  float cexSaved = mathDevice->gp.cex;
1638 
  BBOX limitBBox;
 1638 
  BBOX limitBBox;
Line 1836... Line 1836...
1836 
{
 1836 
{
1837 
	SEXP body = CADR(expr);
 1837 
	SEXP body = CADR(expr);
1838 
	BBOX bodyBBox = elementBBox(expr);
 1838 
	BBOX bodyBBox = elementBBox(expr);
1839 
	double height = bboxHeight(bodyBBox);
 1839 
	double height = bboxHeight(bodyBBox);
1840 
	double depth = bboxDepth(bodyBBox);
 1840 
	double depth = bboxDepth(bodyBBox);
1841 
	double width = bboxWidth(bodyBBox);
 - 
 
1842 
	double savedX = currentX;
 - 
 
1843 
	double savedY = currentY;
 - 
 
1844 
	double x[2], y[2];
 1841 
	double x[2], y[2];
1845 
 
 1842 
 
1846 
	moveUp(-depth);
 1843 
	moveUp(-depth);
1847 
	x[0] = convertedX(); y[0] = convertedY();
 1844 
	x[0] = convertedX(); y[0] = convertedY();
1848 
	moveUp(depth + height);
 1845 
	moveUp(depth + height);