diff options
| author | Bruce Hill <bruce@bruce-hill.com> | 2019-03-20 16:41:44 -0700 |
|---|---|---|
| committer | Bruce Hill <bruce@bruce-hill.com> | 2019-03-20 16:41:44 -0700 |
| commit | 56e3a0c48ca2b641f77f7e73cce94dc3b133e142 (patch) | |
| tree | 8efd996580e3bcd7845b39a0f7efe7bc0818a793 /lib/tools/find.nom | |
| parent | b44afbf417d602b7f018cd4d24ff07c2bc6d8b6e (diff) | |
Restoring `(foo) syntax to \(foo)
Diffstat (limited to 'lib/tools/find.nom')
| -rwxr-xr-x | lib/tools/find.nom | 5 |
1 files changed, 2 insertions, 3 deletions
diff --git a/lib/tools/find.nom b/lib/tools/find.nom index e3ef185..3e26ef4 100755 --- a/lib/tools/find.nom +++ b/lib/tools/find.nom @@ -1,5 +1,4 @@ #!/usr/bin/env nomsu -V7.0.0 - ### This is a tool to find syntax trees matching a pattern. "*" is a wildcard that will match any subtree, and "**" is a wildcard that will match any @@ -43,7 +42,7 @@ command line program with $args: for $ in (1 to #$patt): if ($patt.$ is syntax tree): - if ($patt.$ == `$multi_wildcard): return (yes) + if ($patt.$ == \$multi_wildcard): return (yes) unless ($tree.$ matches $patt.$): return (no) ..else: unless ($tree.$ == $patt.$): return (no) @@ -99,4 +98,4 @@ command line program with $args: ..else: sort $results by $ -> $.line for $ in $results: - say $.text + say $.text
\ No newline at end of file |