Displaying 7 results from an estimated 7 matches for "stop_new".
Did you mean:
sip_new
2019 May 30
2
stopifnot
Here is a patch to function 'stopifnot' that adds 'evaluated' argument and makes 'exprs' argument in 'stopifnot' like 'exprs' argument in 'withAutoprint'.
--- stop.R 2019-05-30 14:01:15.282197286 +0000
+++ stop_new.R 2019-05-30 14:01:51.372187466 +0000
@@ -31,7 +31,7 @@
.Internal(stop(call., .makeMessage(..., domain = domain)))
}
-stopifnot <- function(..., exprs, local = TRUE)
+stopifnot <- function(..., exprs, evaluated = FALSE, local = TRUE)
{
n <- ...length()
if(!missing(ex...
2019 Mar 02
1
stopifnot
...exprs)))
Looking at https://stat.ethz.ch/pipermail/r-devel/2017-May/074227.html , using sys.parent() may be not good. For example, in
f <- function() stopifnot(exprs={FALSE}, local=FALSE); f()
A revised patch (also with simpler 'cl'):
--- stop.R 2019-02-27 16:15:45.324167577 +0000
+++ stop_new.R 2019-03-02 06:21:35.919471080 +0000
@@ -1,7 +1,7 @@
# File src/library/base/R/stop.R
# Part of the R package, https://www.R-project.org
#
-# Copyright (C) 1995-2018 The R Core Team
+# Copyright (C) 1995-2019 The R Core Team
#
# This program is free software; you can redistribute it and/...
2019 Mar 05
2
stopifnot
...error messages being changed,
but in the examples I've seen,? the few changes were acceptable
(sometimes slightly less helpful, sometimes easier to read).
Martin
? ? > A revised patch (also with simpler 'cl'):
? ? > --- stop.R? ? 2019-02-27 16:15:45.324167577 +0000
? ? > +++ stop_new.R? ? 2019-03-02 06:21:35.919471080 +0000
? ? > @@ -1,7 +1,7 @@
? ? > #? File src/library/base/R/stop.R
? ? > #? Part of the R package, https://www.R-project.org
? ? > #
? ? > -#? Copyright (C) 1995-2018 The R Core Team
? ? > +#? Copyright (C) 1995-2019 The R Core Team
? ? > #
?...
2019 Mar 05
0
stopifnot
...ples I've seen,? the few changes were acceptable
> (sometimes slightly less helpful, sometimes easier to read).
> Martin
> ? ? > A revised patch (also with simpler 'cl'):
> ? ? > --- stop.R? ? 2019-02-27 16:15:45.324167577 +0000
> ? ? > +++ stop_new.R? ? 2019-03-02 06:21:35.919471080 +0000
> ? ? > @@ -1,7 +1,7 @@
> ? ? > #? File src/library/base/R/stop.R
> ? ? > #? Part of the R package, https://www.R-project.org
> ? ? > #
> ? ? > -#? Copyright (C) 1995-2018 The R Core Team
> ? ? > +#...
2019 Jun 03
0
stopifnot
...22 +0000 writes:
> Here is a patch to function 'stopifnot' that adds 'evaluated' argument and makes 'exprs' argument in 'stopifnot' like 'exprs' argument in 'withAutoprint'.
> --- stop.R 2019-05-30 14:01:15.282197286 +0000
> +++ stop_new.R 2019-05-30 14:01:51.372187466 +0000
[..........]
Thank you, Suharto.
I've looked at the patch and tested it a bit, and also (re)read
your April 15 remarks (cited below). I now agree that my hacks to
enable dealing with "language objects" (typically class
'expression'...
2019 Mar 02
0
stopifnot
...eed is not bad in my little experiment.
--------------------------------------------
Subject: Re: [Rd] stopifnot
To: r-devel at r-project.org
Date: Saturday, 2 March, 2019, 3:28 PM
[...]
A revised patch (also with simpler 'cl'):
--- stop.R 2019-02-27 16:15:45.324167577 +0000
+++ stop_new.R 2019-03-02 06:21:35.919471080 +0000
@@ -1,7 +1,7 @@
# File src/library/base/R/stop.R
# Part of the R package, https://www.R-project.org
#
-# Copyright (C) 1995-2018 The R Core Team
+# Copyright (C) 1995-2019 The R Core Team
#
# This program is free software; you can redistribute it and/or...
2019 Feb 27
1
stopifnot
...full call. Error message from the second doesn't.
So, how about being "natural", not using 'withCallingHandlers' and 'tryCatch' in 'stopifnot'?
Another thing: currently,
stopifnot(exprs=TRUE)
fails.
A patch:
--- stop.R 2019-02-27 16:15:45.324167577 +0000
+++ stop_new.R 2019-02-27 16:22:15.936203541 +0000
@@ -1,7 +1,7 @@
# File src/library/base/R/stop.R
# Part of the R package, https://www.R-project.org
#
-# Copyright (C) 1995-2018 The R Core Team
+# Copyright (C) 1995-2019 The R Core Team
#
# This program is free software; you can redistribute it and/...