The R Project SVN R

Rev

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

Rev 37560 Rev 37725
Line 2674... Line 2674...
2674 
    if (!isLanguage(code))
 2674 
    if (!isLanguage(code))
2675 
      errorcall(call, _("'expr' argument must be an expression"));
 2675 
      errorcall(call, _("'expr' argument must be an expression"));
2676 
    if (TYPEOF(list) != VECSXP)
 2676 
    if (TYPEOF(list) != VECSXP)
2677 
      errorcall(call, _("'list' argument must be a list"));
 2677 
      errorcall(call, _("'list' argument must be a list"));
2678 
    if (isNull(parentenv)) {
 2678 
    if (isNull(parentenv)) {
2679 
	warning(_("use of NULL environment is deprecated"));
 2679 
	error(_("use of NULL environment is defunct"));
2680 
	parentenv = R_BaseEnv;
 2680 
	parentenv = R_BaseEnv;
2681 
    } else
2681 
    } else
2682 
    if (!isEnvironment(parentenv))
 2682 
    if (!isEnvironment(parentenv))
2683 
      errorcall(call, _("'env' argument must be an environment"));
 2683 
      errorcall(call, _("'env' argument must be an environment"));
2684 
    /*
 2684 
    /*