remove cause for warning when userdata is NULL

kingaa · Jul 24, 2023 · 04b510a · 04b510a
1 parent 47ab8d0
commit 04b510a
Show file tree

Hide file tree

Showing 2 changed files with 2 additions and 6 deletions.
diff --git a/DESCRIPTION b/DESCRIPTION
@@ -1,8 +1,8 @@
 Package: pomp
 Type: Package
 Title: Statistical Inference for Partially Observed Markov Processes
-Version: 5.3.1.1
-Date: 2023-07-23
+Version: 5.3.1.2
+Date: 2023-07-24
 Authors@R: c(person(given=c("Aaron","A."),family="King",role=c("aut","cre"),email="kingaa@umich.edu",comment=c(ORCID="0000-0001-6159-3207")),
 	  person(given=c("Edward","L."),family="Ionides",role="aut",comment=c(ORCID="0000-0002-4190-0174"))	,
 	  person(given="Carles",family="Bretó",role="aut",comment=c(ORCID="0000-0003-4695-4902")),

diff --git a/src/userdata.c b/src/userdata.c
@@ -6,15 +6,11 @@ static SEXP __pomp_ptr_userdata;
 #define USERDATA  (__pomp_ptr_userdata)
 
 void set_pomp_userdata (SEXP userdata) {
-#if (R_VERSION < 262659) // before 4.2.3
   if (LENGTH(userdata) > 0) {
     USERDATA = userdata;
   } else {
     USERDATA = R_NilValue;
   }
-#else
-  USERDATA = userdata;
-#endif
 }
 
 const SEXP get_userdata (const char *name) {