Bruce Hill
2bbc035f5d
using that to simplify the tools. Now the tools directly take lists of file paths rather than things that might go through nomsupath or directories or get processed by filetype. Use your shell for globbing stuff like `nomsu tools/test.nom core/*.nom`
27 lines
901 B
Plaintext
Executable File
27 lines
901 B
Plaintext
Executable File
#!/usr/bin/env nomsu -V4.11.12.8
|
|
#
|
|
Auto-format Nomsu code. Usage:
|
|
nomsu tools/autoformat.nom [-i] file1 file2 directory1 ...
|
|
If the first argument is "-i", modifications will be performed in-place. Otherwise,
|
|
the formatted code will be printed.
|
|
|
|
use "lib/os.nom"
|
|
|
|
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
|
|
|
|
%args = (command line args)
|
|
for %filename in %args.extra_args:
|
|
%file = (read file %filename)
|
|
unless %file:
|
|
barf "File does not exist: \%filename"
|
|
%leading_indent = (%file::matching "[\n]*([ ]*)")
|
|
%code = (NomsuCode from (%Source %filename 1 (size of %file)) %file)
|
|
%tree = (%code parsed)
|
|
%formatted = "\
|
|
..\%leading_indent\(((%tree as nomsu)::text)::with "\n" -> "\n\%leading_indent")"
|
|
|
|
if %args."-i":
|
|
write %formatted to file %filename
|
|
..else:
|
|
say %formatted inline
|