
opt1 = GlobalOptions::setGlobalOptions(
	a = list(.value = 1,
	         .private = TRUE),
	b = 2
)

v1 = opt1("a")
opt1(a = 2)
v2 = opt1("a")
message(paste(v1, v2, sep = ""), appendLF = FALSE)
