Tcl Source Code

Artifact d817a5f37d7fa682c4b77055381a1f7a36f9d0ce:

Attachment "bug2.tcl" to ticket [3562482fff] added by duquette 2012-08-28 23:10:10.

---

set script {
    puts "line 2: [info frame 0]"
    set a 5               ;# End line comment
                          ;# End line comment with unneeded semi-colon
    puts "line 5: [info frame 0]"
    set a 5               ;# End line comment
                          ;# End line comment with unneeded semi-colon
    puts "line 8: [info frame 0]"
}

catch $script