[SS] Feb162004 - In the process of writing the GC for the references package, I needed to
know what [Tcl_Obj] [Tcl_ObjType%|%types] aren't able to represent a valid reference.
Numerical types are an example, but I wanted the full list of types
defined inside the core. To reach the goal I wrote the little script
at the end of the page, that I hope is sane enough to provide the full list.

This is the list of types defined in the .c and .h files under the /generic directory.
For every type there is the [C] symbol name, and the name to pass to the '''Tcl_GetObjType'''
function to get the pointer to the type stucture.
%|C Symbol|Name|%
&| `tclByteArrayType`|     "bytearray" |&
&| `tclByteCodeType`  |    "bytecode" |&
&| `tclDictType`        |  "dict" |&
&| `tclIndexType`       |  "index" |&
&| `tclListType`        |  "list" |&
&| `tclNsNameType`  |      "nsName" |&
&| `tclEnsembleCmdType`|   "ensembleCommand" |&
&| `tclBooleanType`     |  "boolean" |&
&| `tclDoubleType`       | "double" |&
&| `tclIntType`          | "int" |&
&| `tclWideIntType`    |   "wideInt" |&
&| `tclCmdNameType` |      "cmdName" |&
&| `tclFsPathType`       | "path" |&
&| `tclProcBodyType`    |  "procbody" |&
&| `tclRegexpType`        |"regexp" |&
&| `tclStringType`      |  "string" |&
&| `tclLocalVarNameType`|  "localVarName" |&
&| `tclNsVarNameType`     |"namespaceVarName" |&
&| `tclParsedVarNameType`| "parsedVarName" |&
----
The following is the script used to get the list. Please report any bug of the script, or additional types defined in well known Tcl extensions!
======
 set files [glob {/home/antirez/SVC/tcltk/CVS/tcl/generic/*.[ch]}]
 append re {Tcl_ObjType\s+([A-z]+?)\s+=\s+}
 append re \{
 append re {\s+"([A-z]+?)"}
 foreach f $files {
     set fd [open $f]
     set text [read $fd]
     close $fd
     set types [regexp -all -inline $re $text]
     foreach {- cname name} $types {
        puts [format "%-20.20s \"%s\"" $cname $name]
     }
 }
======
[DKF]: Don't forget to list the types defined by Tk as well.  And you might want to check for platform-specific types too.

<<categories>> Tcl Library