diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2012-07-16 12:36:40 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2012-07-16 12:36:40 (GMT) |
| commit | a96a4263f85fa276c74672a7e28251691f0c7680 (patch) | |
| tree | 83188d92aa77a52a178e0ae85ba5439c402f4eca /generic/tkRectOval.c | |
| parent | da1c30ff0d8a05251ef3ab0e9f6a5c5bae6f7b14 (diff) | |
| download | tk-a96a4263f85fa276c74672a7e28251691f0c7680.zip tk-a96a4263f85fa276c74672a7e28251691f0c7680.tar.gz tk-a96a4263f85fa276c74672a7e28251691f0c7680.tar.bz2 | |
Working towards adding all the Tcl_SetErrorCode calls that should be there.
** WORK IN PROGRESS **
Diffstat (limited to 'generic/tkRectOval.c')
| -rw-r--r-- | generic/tkRectOval.c | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/generic/tkRectOval.c b/generic/tkRectOval.c index 630737c..c41387c 100644 --- a/generic/tkRectOval.c +++ b/generic/tkRectOval.c @@ -348,10 +348,8 @@ RectOvalCoords( */ if (objc != 4) { - char buf[64 + TCL_INTEGER_SPACE]; - - sprintf(buf, "wrong # coordinates: expected 0 or 4, got %d", objc); - Tcl_SetResult(interp, buf, TCL_VOLATILE); + Tcl_SetObjResult(interp, Tcl_ObjPrintf( + "wrong # coordinates: expected 0 or 4, got %d", objc)); return TCL_ERROR; } |