The R Project SVN R

(root)/trunk/src/main/base.c @ 34412 – Rev 30832 → 32860



	   */
	  ddpSaved->cra[0] *= rf; 
	  ddpSaved->cra[1] *= rf;
	}
	else 
	  error(_("Event UpdatePS requires a single numeric value"));
	break;
    }
    return result;
}
 

Rev 30832	Rev 32860
Line 160...	Line 160...
160	`*/`	160	`*/`
161	`ddpSaved->cra[0] *= rf;`	161	`ddpSaved->cra[0] *= rf;`
162	`ddpSaved->cra[1] *= rf;`	162	`ddpSaved->cra[1] *= rf;`
163	`}`	163	`}`
164	`else`	164	`else`
165	`error("Event UpdatePS requires a single numeric value");`	165	`error(_("Event UpdatePS requires a single numeric value"));`
166	`break;`	166	`break;`
167	`}`	167	`}`
168	`return result;`	168	`return result;`
169	`}`	169	`}`
170		170