Posted to tcl by kevin_walzer at Fri Oct 13 17:34:49 GMT 2017view pretty
wm iconphoto . -default basket if (strcmp(Tcl_GetString(objv[3]), "-default") == 0) { isDefault = 1; } i = 3 + isDefault + 1; char *icon = Tcl_GetString(objv[i]); fprintf("%s", icon);