[tcljava-user] JACL 1.4 - no line numbers on error.

[Patrick F. <fin...@gm...>]

Jacl seems to behave differently to Tcl in that it does not produce line
numbers with the error messages.

With WebSphere:

WASX7017E: Exception received while running file
"C:\home\patrick\eclipse\WSAdminCVS\WSAdmin\WAS5.1\JACL\installCluster.tcl";
exception information: com.ibm.bsf.BSFException: error while eval'ing Jacl
expression: extra switch pattern with no body

Even if I wrap the "switch statement" in a catch I still don't get a line
number.


       if { [ catch {

       switch xxxxx-exact -- $secondName {

          name {

              set nameList         [ list $secondName [ lindex $a 1 ] ]

          }

          description {

              set descriptionList  [ list $secondName [ lindex $a 1 ] ]

          }

          enableHA {

              set enableHAList     [ list $secondName [ lindex $a 1 ] ]

          }

          preferLocal {

              set preferLocalList  [ list $secondName [ lindex $a 1 ] ]

          }

          serverType {

              set serverTypeList   [ list $secondName [ lindex $a 1 ] ]

          }


       }

           } r ] != 0 } {

           return -code error $r

          }