diff options
| author | Kevin B Kenny <kennykb@acm.org> | 2007-04-20 06:10:56 (GMT) |
|---|---|---|
| committer | Kevin B Kenny <kennykb@acm.org> | 2007-04-20 06:10:56 (GMT) |
| commit | 2e1d6b21db75a43a44e02272dce97955e9aecde1 (patch) | |
| tree | 103cdcd515ae38406063be74a3bb942be25c9ebd /win | |
| parent | 19d1741894fc2c56ad61073c9004a90afabf2e56 (diff) | |
| download | tcl-2e1d6b21db75a43a44e02272dce97955e9aecde1.zip tcl-2e1d6b21db75a43a44e02272dce97955e9aecde1.tar.gz tcl-2e1d6b21db75a43a44e02272dce97955e9aecde1.tar.bz2 | |
Replaced commas in varargs with string concatenation where possible [Patch 1515234]
Diffstat (limited to 'win')
| -rw-r--r-- | win/tclWinLoad.c | 12 | ||||
| -rw-r--r-- | win/tclWinSerial.c | 10 |
2 files changed, 11 insertions, 11 deletions
diff --git a/win/tclWinLoad.c b/win/tclWinLoad.c index 7079571..30bc750 100644 --- a/win/tclWinLoad.c +++ b/win/tclWinLoad.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclWinLoad.c,v 1.19 2005/11/04 00:06:50 dkf Exp $ + * RCS: @(#) $Id: tclWinLoad.c,v 1.20 2007/04/20 06:11:00 kennykb Exp $ */ #include "tclWinInt.h" @@ -108,20 +108,20 @@ TclpDlopen( switch (lastError) { case ERROR_MOD_NOT_FOUND: case ERROR_DLL_NOT_FOUND: - Tcl_AppendResult(interp, "this library or a dependent library", + Tcl_AppendResult(interp, "this library or a dependent library" " could not be found in library path", NULL); break; case ERROR_PROC_NOT_FOUND: - Tcl_AppendResult(interp, "A function specified in the import", - " table could not be resolved by the system. Windows", + Tcl_AppendResult(interp, "A function specified in the import" + " table could not be resolved by the system. Windows" " is not telling which one, I'm sorry.", NULL); break; case ERROR_INVALID_DLL: - Tcl_AppendResult(interp, "this library or a dependent library", + Tcl_AppendResult(interp, "this library or a dependent library" " is damaged", NULL); break; case ERROR_DLL_INIT_FAILED: - Tcl_AppendResult(interp, "the library initialization", + Tcl_AppendResult(interp, "the library initialization" " routine failed", NULL); break; default: diff --git a/win/tclWinSerial.c b/win/tclWinSerial.c index a2846b3..7a4ee94 100644 --- a/win/tclWinSerial.c +++ b/win/tclWinSerial.c @@ -11,7 +11,7 @@ * * Serial functionality implemented by Rolf.Schroedter@dlr.de * - * RCS: @(#) $Id: tclWinSerial.c,v 1.34 2006/03/27 18:08:51 andreas_kupries Exp $ + * RCS: @(#) $Id: tclWinSerial.c,v 1.35 2007/04/20 06:11:00 kennykb Exp $ */ #include "tclWinInt.h" @@ -1758,7 +1758,7 @@ SerialSetOptionProc( } else { if (interp != NULL) { Tcl_AppendResult(interp, "bad value \"", value, - "\" for -handshake: must be one of xonxoff, rtscts, ", + "\" for -handshake: must be one of xonxoff, rtscts, " "dtrdsr or none", NULL); } return TCL_ERROR; @@ -1791,7 +1791,7 @@ SerialSetOptionProc( if (argc != 2) { badXchar: if (interp != NULL) { - Tcl_AppendResult(interp, "bad value for -xchar: should be ", + Tcl_AppendResult(interp, "bad value for -xchar: should be " "a list of two elements with each a single character", NULL); } @@ -1850,7 +1850,7 @@ SerialSetOptionProc( if ((argc % 2) == 1) { if (interp != NULL) { Tcl_AppendResult(interp, "bad value \"", value, - "\" for -ttycontrol: should be a list of ", + "\" for -ttycontrol: should be a list of " "signal,value pairs", NULL); } ckfree((char *) argv); @@ -1931,7 +1931,7 @@ SerialSetOptionProc( if ((argc < 1) || (argc > 2) || (inSize <= 0) || (outSize <= 0)) { if (interp != NULL) { Tcl_AppendResult(interp, "bad value \"", value, - "\" for -sysbuffer: should be a list of one or two ", + "\" for -sysbuffer: should be a list of one or two " "integers > 0", NULL); } return TCL_ERROR; |