From 52c8b8b6adba1e32b460d44cb0a716db9fda69bc Mon Sep 17 00:00:00 2001 From: Steve Bennett Date: Sat, 26 Aug 2017 09:23:03 +1000 Subject: Support lambda even if references are disabled It's convenient to support a non-gc lambda, even if references are disabled. Signed-off-by: Steve Bennett --- tcltest.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'tcltest.tcl') diff --git a/tcltest.tcl b/tcltest.tcl index b98164a..b7e3983 100644 --- a/tcltest.tcl +++ b/tcltest.tcl @@ -166,7 +166,7 @@ proc testConstraint {constraint {bool {}}} { } testConstraint {utf8} [expr {[string length "\xc2\xb5"] == 1}] -testConstraint {references} [expr {[info commands ref] ne ""}] +testConstraint {references} [expr {[info commands getref] ne ""}] testConstraint {jim} 1 testConstraint {tcl} 0 -- cgit v1.1