The R Project SVN R

Rev

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

Rev 70613 Rev 77228
Line 1... Line 1...
1 
/*
 1 
/*
2 
 *  R : A Computer Language for Statistical Data Analysis
 2 
 *  R : A Computer Language for Statistical Data Analysis
3 
 *  Copyright (C) 1997-2013   The R Core Team
 3 
 *  Copyright (C) 1997-2019   The R Core Team
4 
 *
 4 
 *
5 
 *  This program is free software; you can redistribute it and/or modify
 5 
 *  This program is free software; you can redistribute it and/or modify
6 
 *  it under the terms of the GNU General Public License as published by
 6 
 *  it under the terms of the GNU General Public License as published by
7 
 *  the Free Software Foundation; either version 2 of the License, or
 7 
 *  the Free Software Foundation; either version 2 of the License, or
8 
 *  (at your option) any later version.
 8 
 *  (at your option) any later version.
Line 146... Line 146...
146 
		Rp->NoRenviron = TRUE;
 146 
		Rp->NoRenviron = TRUE;
147 
	    }
 147 
	    }
148 
	    else if (!strcmp(*av, "--verbose")) {
 148 
	    else if (!strcmp(*av, "--verbose")) {
149 
		Rp->R_Verbose = TRUE;
 149 
		Rp->R_Verbose = TRUE;
150 
	    }
 150 
	    }
151 
	    else if (!strcmp(*av, "--slave") ||
 151 
	    else if (!strcmp(*av, "--no-echo") ||
- 
 
 152 
		     !strcmp(*av, "--no-echo") || // "deprecated" from R 4.0.0 (spring 2020)
152 
		     !strcmp(*av, "-s")) {
 153 
		     !strcmp(*av, "-s")) {
153 
		Rp->R_Quiet = TRUE;
 154 
		Rp->R_Quiet = TRUE;
154 
		Rp->R_Slave = TRUE;
 155 
		Rp->R_NoEcho = TRUE;
155 
		Rp->SaveAction = SA_NOSAVE;
 156 
		Rp->SaveAction = SA_NOSAVE;
156 
	    }
 157 
	    }
157 
	    else if (!strcmp(*av, "--no-site-file")) {
 158 
	    else if (!strcmp(*av, "--no-site-file")) {
158 
		Rp->LoadSiteFile = FALSE;
 159 
		Rp->LoadSiteFile = FALSE;
159 
	    }
 160 
	    }