punkshell/scriptlib/b1.tcl

set x {
    puts a{b
    puts x{y
    
    puts stderr {test etc}
    
    #}}
}

puts here
# a comment\
etc blah\
ok then
puts there

puts "first curly {"

proc test {} {
puts "a curly {"
puts "close curly }"
}

test
puts done

puts [list
a
b
]