Anselm Lingnau$Revision: 1.6 $

This TIP proposes a multiple assignment command as a backwards-compatible extension to the Tcl set command.

Often one needs to assign values to several variables in close proximity. Right now several set commands are necessary: ICBzZXQgYSAxMjM=ICBzZXQgYiA0NTY= or ICBzZXQgYSAxMjM7IHNldCBiIDQ1Ng== Or one abuses the foreach command: ICBmb3JlYWNoIHthIGJ9IHsxMjMgNDU2fSBicmVhaw== However, by analogy to the variable and array set commands, the following would be useful: ICBzZXQgYSAxMjMgYiA0NTY= This would assign 123 to the variable a and 456 to the variable b. Note that this extension is backwards-compatible to existing uses of the set command since until now only one or two arguments to set were allowed.

The set command is extended to allow either one or an even number of arguments. The behaviour in the case of one argument remains the one documented in the set manual page; when an even number of arguments is specified, the behaviour of set v0 e0 ... vn en is identical to that of the sequence of commands set v0 e0; ...; set vn en according to the traditional semantics, except that the way Tcl processes commands means that e0 ... en are all evaluated before any assignments are performed. I.e., the commands ICBzZXQgYSAxICBzZXQgYSAyIGIgJGE=ICBwdXRzICRi print 1, not 2. If this is an issue you must use separate set statements. The command set v0 e0 ... vn en returns the value of en.

This extension is an obvious analogy to the variable and array set commands of Tcl, both of which allow an alternating list of names and expressions to be given as arguments. It is completely backwards-compatible (set invocations with more than two arguments used to be syntax errors) and very easily implemented. This extension in no way prejudices against the adoption and use of other multiple-assignment commands, such as lassign (see ). In particular, the set extension is unsuitable for assigning a list result to a number of variables element by element. However, its simplicity and consistency to other similar Tcl commands is appealing.

A patch to Tcl 8.4a3 which implements the set extension may be found at - a patched Tcl 8.4a3 passes the Tcl 8.4a3 regression test suite with no test failures. No test cases nor documentation for the set extensions have been devised yet but this is easy to do once there is a consensus that this feature is actually desirable.

This document is placed in the public domain.