diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-07-12 16:13:27 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-07-12 16:13:27 (GMT) |
| commit | 7bea42569d8c2ccb8584155f706392d5812ec428 (patch) | |
| tree | 4f61b95593d24393fff08344b408215836a58a05 /generic/tclTestObj.c | |
| parent | f0bba60202785e634e8e1712db5cc37246d36e32 (diff) | |
| download | tcl-7bea42569d8c2ccb8584155f706392d5812ec428.zip tcl-7bea42569d8c2ccb8584155f706392d5812ec428.tar.gz tcl-7bea42569d8c2ccb8584155f706392d5812ec428.tar.bz2 | |
whopper change; now passes test suite on OSX
Diffstat (limited to 'generic/tclTestObj.c')
| -rw-r--r-- | generic/tclTestObj.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclTestObj.c b/generic/tclTestObj.c index f36b07f..a0425e8 100644 --- a/generic/tclTestObj.c +++ b/generic/tclTestObj.c @@ -379,7 +379,7 @@ TestbooleanobjCmd( } else { Tcl_AppendStringsToObj(Tcl_GetObjResult(interp), "bad option \"", Tcl_GetString(objv[1]), - "\": must be set, get, or not", NULL); + "\": should be set, get, or not", NULL); return TCL_ERROR; } return TCL_OK; @@ -498,7 +498,7 @@ TestdoubleobjCmd( } else { Tcl_AppendStringsToObj(Tcl_GetObjResult(interp), "bad option \"", Tcl_GetString(objv[1]), - "\": must be set, get, mult10, or div10", NULL); + "\": should be set, get, mult10, or div10", NULL); return TCL_ERROR; } return TCL_OK; @@ -805,7 +805,7 @@ TestintobjCmd( } else { Tcl_AppendStringsToObj(Tcl_GetObjResult(interp), "bad option \"", Tcl_GetString(objv[1]), - "\": must be set, get, get2, mult10, or div10", NULL); + "\": should be set, get, get2, mult10, or div10", NULL); return TCL_ERROR; } return TCL_OK; @@ -1105,7 +1105,7 @@ TestobjCmd( } else { Tcl_AppendStringsToObj(Tcl_GetObjResult(interp), "bad option \"", Tcl_GetString(objv[1]), - "\": must be assign, convert, duplicate, freeallvars, " + "\": should be assign, convert, duplicate, freeallvars, " "newobj, objcount, objtype, refcount, type, or types", NULL); return TCL_ERROR; } |