switch -- [tk windowingsystem] { aqua { set thisPlatform "macosx" } classic { set thisPlatform "macintosh" } win32 { set thisPlatform "windows" } x11 { set thisPlatform "unix" }}