# Create non-public data object(s) and save them in a single 'sysdata.rda' 
# file in the package '/R' subdirectory.

# The main purpose is to initialize, in the package namespace, objects 
# '.lsetPkgOpt' and '.internalOpt'.  These will hold the state of package 
# options during a session.  The other object created is 'IM_IN_A_PKG', a 
# logical scalar with a starting value of TRUE.  (Outside of a package 
# context, this script will never be run.  Within a package context, it puts 
# the objects in the package namespace.)

# 20 Mar 2026 / Richard Raubertas

local({
  IM_IN_A_PKG <- TRUE
  .lsetPkgOpt <- NULL
  .internalOpt <- NULL
  save(list=c("IM_IN_A_PKG", ".lsetPkgOpt", ".internalOpt"), 
       file="../../R/sysdata.rda", compress=TRUE)
  tools::resaveRdaFiles("../../R/sysdata.rda")
})
