The R Project SVN R

Rev

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

Rev 35998 Rev 36413
Line 905... Line 905...
905 
		value = R_Decode2Long(p, &ierr);
 905 
		value = R_Decode2Long(p, &ierr);
906 
		if(ierr) {
 906 
		if(ierr) {
907 
		    if(ierr < 0)
 907 
		    if(ierr < 0)
908 
			sprintf(s, _("WARNING: --max-mem-size value is invalid: ignored\n"));
 908 
			sprintf(s, _("WARNING: --max-mem-size value is invalid: ignored\n"));
909 
		    else
 909 
		    else
910 
		    sprintf(s, _("WARNING: --max-mem-size=%lu'%c': too large and ignored\n"),
 910 
			sprintf(s, _("WARNING: --max-mem-size=%lu'%c': too large and ignored\n"),
911 
			    (unsigned long) value,
 911 
				(unsigned long) value,
912 
			    (ierr == 1) ? 'M': ((ierr == 2) ? 'K':'k'));
 912 
				(ierr == 1) ? 'M': ((ierr == 2) ? 'K':'k'));
913 
		    R_ShowMessage(s);
 913 
		    R_ShowMessage(s);
914 
		} else if (value < 10*Mega) {
 914 
		} else if (value < 16*Mega) {
915 
		    sprintf(s, _("WARNING: max-mem-size =%4.1fM too small and ignored\n"), value/(1024.0 * 1024.0));
 915 
		    sprintf(s, _("WARNING: max-mem-size =%4.1fM too small and ignored\n"), value/(1024.0 * 1024.0));
916 
		    R_ShowMessage(s);
 916 
		    R_ShowMessage(s);
- 
 
 917 
		} else if (value >= 3072*Mega) {
- 
 
 918 
		    sprintf(s, _("WARNING: max-mem-size =%4.1fM is too large and taken as 3Gb\n"), value/(1024.0 * 1024.0));
- 
 
 919 
		    R_ShowMessage(s);
917 
		} else
 920 
		} else
918 
		    R_max_memory = value;
 921 
		    R_max_memory = value;
919 
	    } else if(!strcmp(*av, "--debug")) {
 922 
	    } else if(!strcmp(*av, "--debug")) {
920 
		DebugMenuitem = TRUE;
 923 
		DebugMenuitem = TRUE;
921 
		breaktodebugger();
 924 
		breaktodebugger();