The R Project SVN R

Rev

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

Rev 87120 Rev 87740
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) 1995, 1996  Robert Gentleman and Ross Ihaka
 3 
 *  Copyright (C) 1995, 1996  Robert Gentleman and Ross Ihaka
4 
 *  Copyright (C) 1998-2020   The R Core Team.
 4 
 *  Copyright (C) 1998-2025   The R Core Team.
5 
 *
 5 
 *
6 
 *  This program is free software; you can redistribute it and/or modify
 6 
 *  This program is free software; you can redistribute it and/or modify
7 
 *  it under the terms of the GNU General Public License as published by
 7 
 *  it under the terms of the GNU General Public License as published by
8 
 *  the Free Software Foundation; either version 2 of the License, or
 8 
 *  the Free Software Foundation; either version 2 of the License, or
9 
 *  (at your option) any later version.
 9 
 *  (at your option) any later version.
Line 173... Line 173...
173 
    return R_NilValue;
 173 
    return R_NilValue;
174 
}
 174 
}
175 
 
 175 
 
176 
#else
 176 
#else
177 
 
 177 
 
178 
attribute_hidden NORET SEXP do_tracemem(SEXP call, SEXP op, SEXP args, SEXP rho)
 178 
NORET attribute_hidden SEXP do_tracemem(SEXP call, SEXP op, SEXP args, SEXP rho)
179 
{
 179 
{
180 
    checkArity(op, args);
 180 
    checkArity(op, args);
181 
    check1arg(args, call, "x");
 181 
    check1arg(args, call, "x");
182 
    errorcall(call, _("R was not compiled with support for memory profiling"));
 182 
    errorcall(call, _("R was not compiled with support for memory profiling"));
183 
}
 183 
}
184 
 
 184 
 
185 
attribute_hidden NORET SEXP do_untracemem(SEXP call, SEXP op, SEXP args, SEXP rho)
 185 
NORET attribute_hidden SEXP do_untracemem(SEXP call, SEXP op, SEXP args, SEXP rho)
186 
{
 186 
{
187 
    checkArity(op, args);
 187 
    checkArity(op, args);
188 
    check1arg(args, call, "x");
 188 
    check1arg(args, call, "x");
189 
    errorcall(call, _("R was not compiled with support for memory profiling"));
 189 
    errorcall(call, _("R was not compiled with support for memory profiling"));
190 
}
 190 
}