exportPattern("^tcl[[:alnum:]]*($|<-)") # skip S3 methods
exportPattern("^tk")
exportPattern("^.Tcl")
exportPattern("^.Tk")
export(addTclPath, as.tclObj, is.tclObj, is.tkwin)

S3method("$", tclvar)
S3method("$<-", tclvar)
S3method(as.character, tclObj)
S3method(as.character, tclVar)
S3method(as.double, tclObj)
S3method(as.integer, tclObj)
S3method(print, tclObj)
S3method(tclObj, tclVar)
S3method("tclObj<-", tclVar)
S3method("tclvalue", default)
S3method("tclvalue", tclObj)
S3method("tclvalue", tclVar)
S3method("tclvalue<-", default)
S3method("tclvalue<-", tclVar)