summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2012-09-23 20:29:45 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2012-09-23 20:29:45 (GMT)
commit772953aa7f24fe39a87d949c789344bed284d75c (patch)
tree9f5c4a2c6fc170a5dcaa651c2df465a8a18ec080 /generic
parent3d73169d61cf9b795515d4c8a325ec0fa886bea8 (diff)
downloadtcl-772953aa7f24fe39a87d949c789344bed284d75c.zip
tcl-772953aa7f24fe39a87d949c789344bed284d75c.tar.gz
tcl-772953aa7f24fe39a87d949c789344bed284d75c.tar.bz2
eliminate unnecessary TEXT() macros
Diffstat (limited to 'generic')
-rw-r--r--generic/tclMain.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclMain.c b/generic/tclMain.c
index 14139ec..f445383 100644
--- a/generic/tclMain.c
+++ b/generic/tclMain.c
@@ -334,14 +334,14 @@ Tcl_MainEx(
*/
if ((argc > 3) && (0 == _tcscmp(TEXT("-encoding"), argv[1]))
- && (TEXT('-') != argv[3][0])) {
+ && ('-' != argv[3][0])) {
Tcl_Obj *value = NewNativeObj(argv[2], -1);
Tcl_SetStartupScript(NewNativeObj(argv[3], -1),
Tcl_GetString(value));
Tcl_DecrRefCount(value);
argc -= 3;
argv += 3;
- } else if ((argc > 1) && (TEXT('-') != argv[1][0])) {
+ } else if ((argc > 1) && ('-' != argv[1][0])) {
Tcl_SetStartupScript(NewNativeObj(argv[1], -1), NULL);
argc--;
argv++;