From d66fa174f01310189c0daba1efaeee00bb50d1de Mon Sep 17 00:00:00 2001 From: Omar Rizwan Date: Mon, 24 Apr 2023 04:12:08 -0400 Subject: WIP (most tests pass): Move recollect into C (Its Tcl implementation was the last bottleneck) --- test/basic.tcl | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'test') diff --git a/test/basic.tcl b/test/basic.tcl index 2dedd50d..10c8ac1f 100644 --- a/test/basic.tcl +++ b/test/basic.tcl @@ -5,7 +5,7 @@ proc assert condition { } } proc count condition { - llength [Statements::findMatches $condition] + Statements::count $condition } Assert programOakland has program code { -- cgit v1.2.3