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.
46 lines
629 B
46 lines
629 B
set sep [string repeat - 40] |
|
|
|
set x [list \ |
|
a b c\ |
|
d e f\ |
|
] |
|
puts stdout "x: $x" |
|
puts stdout $sep |
|
|
|
if {[catch { |
|
|
|
y.= .= list\ |
|
a b c\ |
|
d e f |> inspect -label inspect-y |
|
|
|
} errmsg]} { |
|
puts stderr "error: $errmsg" |
|
} else { |
|
puts stdout "y: $y" |
|
} |
|
puts stdout $sep |
|
|
|
z.= = " |
|
a b c |
|
d e f |
|
" |> inspect -label inspect-z |> .=* list |
|
|
|
puts stdout "z: $z" |
|
puts stdout $sep |
|
|
|
|
|
j.= = " |
|
a b c |
|
d e f |
|
" |> inspect -label inspect-j |> linelist |
|
|
|
puts stdout "linelist: $j" |
|
puts stdout $sep |
|
|
|
k.= = { |
|
a b c |
|
d e f |
|
} |> inspect -label inspect-k |> linelist |
|
|
|
puts stdout "linelist: $k" |
|
puts stdout $sep
|
|
|