Index: tests/tcl86.tcl
===================================================================
diff -u -r2510d1890d89e9b98cfdbf2106c1d4e50c9dba6a -rd137fce76cdcb71cb10ea76a24e480923124d12c
--- tests/tcl86.tcl	(.../tcl86.tcl)	(revision 2510d1890d89e9b98cfdbf2106c1d4e50c9dba6a)
+++ tests/tcl86.tcl	(.../tcl86.tcl)	(revision d137fce76cdcb71cb10ea76a24e480923124d12c)
@@ -60,6 +60,10 @@
   ? {o map {x {expr {$x**2 + 3*$x - 2}}} {-4 -3 -2 -1 0 1 2 3 4}} \
       "2 -2 -4 -4 -2 2 8 16 26"
 
+  ## Test case accessing object specific variable
+  #? {o map {x {::nsf::__db_show_stack; return [expr {$x * ${:delta}}]}} {-4 -3 -2 -1 0 1 2 3 4}} \
+  #    "-400 -300 -200 -100 0 100 200 300 400"
+
   # Test case accessing object specific variable
   ? {o map {x {expr {$x * ${:delta}}}} {-4 -3 -2 -1 0 1 2 3 4}} \
       "-400 -300 -200 -100 0 100 200 300 400"