structure(NULL, <n> = v) is defunct now (also illegal for primitives)

git-svn-id: https://svn.r-project.org/R/trunk@88075 00db46b3-68df-0310-9c12-caf00c1e9a41

Author: maechler

doc/NEWS.Rd

@@ -49,6 +49,12 @@
     }
   }
 
+  \subsection{DEPRECATED AND DEFUNCT}{
+    \itemize{
+      \item \code{structure(NULL, <name> = <val>)} is now defunct.% deprecated r71841, 2016-12-27
+    }
+  }
+
   \subsection{BUG FIXES}{
     \itemize{
       \item Setting \code{attributes} on primitive functions is an

src/library/base/R/structure.R

@@ -1,7 +1,7 @@
 #  File src/library/base/R/structure.R
 #  Part of the R package, https://www.R-project.org
 #
-#  Copyright (C) 1995-2019 The R Core Team
+#  Copyright (C) 1995-2025 The R Core Team
 #
 #  This program is free software; you can redistribute it and/or modify
 #  it under the terms of the GNU General Public License as published by
@@ -21,8 +21,7 @@
 structure <- function (.Data, ...)
 {
     if(is.null(.Data))
-        warning("Calling 'structure(NULL, *)' is deprecated, as NULL cannot have attributes.\n  Consider 'structure(list(), *)' instead.")
-        ## to become: stop("attempt to set an attribute on NULL")
+        stop("attempt to set an attribute on NULL")
     attrib <- list(...)
     if(length(attrib)) {
         specials <- c(".Dim", ".Dimnames", ".Names", ".Tsp", ".Label")

src/library/base/man/Primitive.Rd

@@ -40,6 +40,7 @@
 }
 \examples{
 mysqrt <- .Primitive("sqrt")
+try(structure(mysqrt, comment = "primitive function")) # no more possible
 c
 .Internal # this one *must* be primitive!
 `if` # need backticks

src/library/base/man/structure.Rd

@@ -1,6 +1,6 @@
 % File src/library/base/man/structure.Rd
 % Part of the R package, https://www.R-project.org
-% Copyright 1995-2007 R Core Team
+% Copyright 1995-2025 R Core Team
 % Distributed under GPL 2 or later
 
 \name{structure}
@@ -11,7 +11,9 @@ structure(.Data, \dots)
 \alias{structure}
 \arguments{
   \item{.Data}{an object which will have
-    various attributes attached to it.}
+    various attributes attached to it.  From \R 4.6.0, this must not be
+    \code{\link{NULL}} (previously deprecated for years), nor any
+    \code{\link{symbol}} or \code{\link{primitive}} function.}
   \item{\dots}{attributes, specified in \code{tag = value}
     form, which will be attached to data.}
 }