diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2014-06-23 08:41:51 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2014-06-23 08:41:51 (GMT) |
| commit | aba59c2bf7de72267f36362e81a8be60872a5b9f (patch) | |
| tree | 7a7b5f9f2ddb3602e5a5df967c45c3b04b5308f4 /generic/tclIOCmd.c | |
| parent | d27ff0c78862fc1652325b8c27e0882aa772171f (diff) | |
| download | tcl-aba59c2bf7de72267f36362e81a8be60872a5b9f.zip tcl-aba59c2bf7de72267f36362e81a8be60872a5b9f.tar.gz tcl-aba59c2bf7de72267f36362e81a8be60872a5b9f.tar.bz2 | |
cleaning up option processing throughout Tcl to use common functions/language
Diffstat (limited to 'generic/tclIOCmd.c')
| -rw-r--r-- | generic/tclIOCmd.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclIOCmd.c b/generic/tclIOCmd.c index 3368a76..bcd9307 100644 --- a/generic/tclIOCmd.c +++ b/generic/tclIOCmd.c @@ -1660,8 +1660,8 @@ Tcl_FcopyObjCmd( int mode, i, index; Tcl_WideInt toRead; Tcl_Obj *cmdPtr; - static const char *const switches[] = { "-size", "-command", NULL }; - enum { FcopySize, FcopyCommand }; + static const char *const switches[] = { "-command", "-size", NULL }; + enum { FcopyCommand, FcopySize }; if ((objc < 3) || (objc > 7) || (objc == 4) || (objc == 6)) { Tcl_WrongNumArgs(interp, 1, objv, |