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/tclWinSerial.c | |
| 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/tclWinSerial.c')
| -rw-r--r-- | win/tclWinSerial.c | 10 |
1 files changed, 5 insertions, 5 deletions
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; |