Index: tests/tcl86.test =================================================================== diff -u -N -r8e2e356e9bcef39f43dfe3690b82d9586c7adc72 -r9e281d5110f397a9e9b8317325d0675f1793246d --- tests/tcl86.test (.../tcl86.test) (revision 8e2e356e9bcef39f43dfe3690b82d9586c7adc72) +++ tests/tcl86.test (.../tcl86.test) (revision 9e281d5110f397a9e9b8317325d0675f1793246d) @@ -297,7 +297,7 @@ ::o foo ? {getType @} "bytecode" ;# "@" is still of type "bytecode" (byte code compilation should not leak) - ? {::o foo} ::nx::@ ;# "@" is resolved in the nx context, therefore we get nx::@ + ? {::o foo} ::nx::@ ;# "@" is resolved in the nx context, therefore, we get nx::@ # # 2) Provide alternative @ @@ -317,7 +317,7 @@ ? @ ::@ ;# proc "?" interprets "@" as a script and turns "@" ;# into type "bytecode". The proc leaves the nx context - ;# by using a "namespace eval", therefore we see ::@ + ;# by using a "namespace eval", therefore, we see ::@ ? {getType @} "bytecode" ;# "@" is of type "bytecode" ? {namespace eval :: @} ::@ ;# exercise the same "namespace eval" as described above @@ -375,7 +375,7 @@ return ::nx::@ } -set r [@] ;# "@" is not executed in an nx environment (no testcase eval), therefore resolved globally +set r [@] ;# "@" is not executed in an nx environment (no testcase eval), therefore, resolved globally ? {set r} ::@ if {!$::tcl87} { ? {getType @} "cmdName" @@ -395,9 +395,9 @@ ? {::o foo} ::nx::@ -set r [@] ;# "@" is not executed in an nx environment (no testcase eval), therefore resolves globally +set r [@] ;# "@" is not executed in an nx environment (no testcase eval), therefore, resolves globally ? {set r} ::@ -? {@} ::@ ;# "@" is executed in an "namespace eval ::", therefore no nx context +? {@} ::@ ;# "@" is executed in an "namespace eval ::", therefore, no nx context # cleanup rename ::nx::@ ""