Slight performance improvement

Figure out the length of static string at compile time (sizeof) so Tcl doesn't have to compute them everytime (Tcl_NewStringObj with -1 as length argument).