aboutsummaryrefslogtreecommitdiff
path: root/tools/parse.nom
diff options
context:
space:
mode:
authorBruce Hill <bruce@bruce-hill.com>2018-11-19 17:37:37 -0800
committerBruce Hill <bruce@bruce-hill.com>2018-11-19 17:37:37 -0800
commita89d69e843ba83df928051005d02a932a9981f46 (patch)
tree17f99cda2d4e5f0a7983ed14f4ac559b64944207 /tools/parse.nom
parent43ff3892f39188163446f1a00ee8d2aad59e0392 (diff)
Autoformatted/auto-upgraded.
Diffstat (limited to 'tools/parse.nom')
-rwxr-xr-xtools/parse.nom7
1 files changed, 5 insertions, 2 deletions
diff --git a/tools/parse.nom b/tools/parse.nom
index 10d4dde..9e43c88 100755
--- a/tools/parse.nom
+++ b/tools/parse.nom
@@ -1,4 +1,4 @@
-#!/usr/bin/env nomsu -V4.10.12.7
+#!/usr/bin/env nomsu -V4.11.12.8
#
Tool to print out a parse tree of files in an easy-to-read format. Usage:
nomsu tools/parse.nom file1 file2 directory1 ...
@@ -37,9 +37,12 @@ externally (print tree %t at indent %indent) means:
for %path in (command line args):
for %filename in (files for %path):
- if (%filename == "-"): %filename = "stdin"
+ if (%filename == "-"):
+ %filename = "stdin"
+
unless ((%filename == "stdin") or (%filename::matches "%.nom$")):
do next %filename
+
%text = (read file %filename)
%nomsu = (NomsuCode from (Source %filename 1 (size of %text)) %text)
%tree = (%nomsu parsed)