You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
44 lines
545 B
44 lines
545 B
|
|
set data1 d1 |
|
set data2 [list a b c] |
|
|
|
x.=list " |
|
item1 |
|
[list $data1] |
|
[list $data2] |
|
[pwd] |
|
" |
|
puts stdout "4 element list built with x.=list \" (multiline) \" syntax" |
|
puts stdout $x |
|
|
|
|
|
x.=list " |
|
{[set x aaa]} |
|
{$x} |
|
blah |
|
" |
|
puts stdout "strange but possibly useful" |
|
puts stdout $x |
|
|
|
puts stdout "building a dict" |
|
|
|
d@0="list " |
|
k1 |
|
{[pwd]} |
|
k2 |
|
{[info patchlevel]} |
|
|
|
k3 |
|
{something} |
|
" |
|
puts stdout "dict: $d" |
|
|
|
puts stdout "comment test" |
|
x="# " |
|
testing |
|
comments |
|
here |
|
" |
|
puts stdout "x:$x" |
|
|
|
puts stdout -done-
|
|
|