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

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