From 938adbfe446e7f4a4e45b9dd27b5cf2e7ee4070c Mon Sep 17 00:00:00 2001 From: Bruce Hill Date: Wed, 20 Mar 2019 16:16:41 -0700 Subject: Switching more verbose ("Action" tree with "foo" $x) syntax to `(foo `$x) when possible --- lib/tools/find.nom | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'lib/tools/find.nom') diff --git a/lib/tools/find.nom b/lib/tools/find.nom index 45a51e5..e3ef185 100755 --- a/lib/tools/find.nom +++ b/lib/tools/find.nom @@ -43,7 +43,7 @@ command line program with $args: for $ in (1 to #$patt): if ($patt.$ is syntax tree): - if ($patt.$ == ("Var" tree with "multi_wildcard")): return (yes) + if ($patt.$ == `$multi_wildcard): return (yes) unless ($tree.$ matches $patt.$): return (no) ..else: unless ($tree.$ == $patt.$): return (no) @@ -99,4 +99,4 @@ command line program with $args: ..else: sort $results by $ -> $.line for $ in $results: - say $.text \ No newline at end of file + say $.text -- cgit v1.2.3