The R Project SVN R

Rev

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

Rev 7701 Rev 7824
Line 2412... Line 2412...
2412
 *  Code for Relation Expressions (i.e. ... ==, !=, ...)
2412
 *  Code for Relation Expressions (i.e. ... ==, !=, ...)
2413
 *
2413
 *
2414
 */
2414
 */
2415
 
2415
 
2416
				/* Binary Relationships */
2416
				/* Binary Relationships */
2417
 
2417
static
2418
SymTab RelTable[] = {
2418
SymTab RelTable[] = {
2419
    { "<",		 60 },	/* less */
2419
    { "<",		 60 },	/* less */
2420
    { "==",		 61 },	/* equal */
2420
    { "==",		 61 },	/* equal */
2421
    { ">",		 62 },	/* greater */
2421
    { ">",		 62 },	/* greater */
2422
    { "%=~%",		 64 },	/* congruent */
2422
    { "%=~%",		 64 },	/* congruent */
Line 2818... Line 2818...
2818
}
2818
}
2819
 
2819
 
2820
/* Calculate width of expression */
2820
/* Calculate width of expression */
2821
/* BBOXes are in INCHES (see MetricUnit) */
2821
/* BBOXes are in INCHES (see MetricUnit) */
2822
 
2822
 
-
 
2823
static
2823
void GExpressionBBox(SEXP expr, int units, double *width,
2824
void GExpressionBBox(SEXP expr, int units, double *width,
2824
		     double *height, double *depth, DevDesc *dd)
2825
		     double *height, double *depth, DevDesc *dd)
2825
{
2826
{
2826
    BBOX bbox;
2827
    BBOX bbox;
2827
    MathDevice = dd;
2828
    MathDevice = dd;