The R Project SVN – R – Diff – /branches/R-classInheritance/src/main/plot.c

     /* Specifies an offset outward from the plot for the axis.
      * The values in the par value "mgp" are interpreted
      * relative to this value. */
     line = asReal(CAR(args));
-    if (!R_FINITE(line)) {
-	/* Except that here mgp values are not relative to themselves */
+    /* defer processing until after in-line pars */
-	line = gpptr(dd)->mgp[2];
-	lineoff = line;
-    }
     args = CDR(args);
     /* Optional argument: "pos" */
     /* Specifies a user coordinate at which the axis should be drawn. */
     /* This overrides the value of "line".  Again the "mgp" par values */
     /* are interpreted relative to this value. */
     pos = asReal(CAR(args));
-    if (!R_FINITE(pos)) pos = NA_REAL; else lineoff = 0;
+    /* defer processing until after in-line pars */
     args = CDR(args);
     /* Optional argument: "outer" */
     /* Should the axis be drawn in the outer margin. */
     /* This only affects the computation of axis_base. */
 	logflag = dpptr(dd)->ylog;
 	nint = dpptr(dd)->lab[1];
 	break;
+    }
+    /* Deferred processing */
+    if (!R_FINITE(line)) {
+	/* Except that here mgp values are not relative to themselves */
+	line = gpptr(dd)->mgp[2];
+	lineoff = line;
+    }
+    if (!R_FINITE(pos)) pos = NA_REAL; else lineoff = 0;
     /* Determine the tickmark positions.  Note that these may fall */
     /* outside the plot window. We will clip them in the code below. */
     create_at = isNull(at);
     if (create_at) {

The R Project SVN R