library(gdsfmt)
fc <- function()
{
f <- createfn.gds("test.gds")
node <- add.gdsn(f, name="list", val=list(x=c(1,2), y=c("T","B","C"), z=TRUE))
# forget to close the file
}
fc()
showfile.gds()
# FileName ReadOnly State
# 1 /Documents/GitHub/test.gds FALSE open
gc()
showfile.gds() # no opened file
Since gdsfmt_v1.23.9: