diff options
| author | Kaz Kylheku <kaz@kylheku.com> | 2016-09-25 18:47:01 -0700 |
|---|---|---|
| committer | Kaz Kylheku <kaz@kylheku.com> | 2016-09-25 18:47:01 -0700 |
| commit | 11b3f2618324391f4dfa1ba768f34a07eb2b2a2a (patch) | |
| tree | b342cfbcfe174caf3609ab452bc49303d5408ba7 /share | |
| parent | b0bbe6e9dfd169f78b4908296d6edba52ed9a707 (diff) | |
| download | txr-11b3f2618324391f4dfa1ba768f34a07eb2b2a2a.tar.gz txr-11b3f2618324391f4dfa1ba768f34a07eb2b2a2a.tar.bz2 txr-11b3f2618324391f4dfa1ba768f34a07eb2b2a2a.zip | |
awk macro: code formatting.
* share/txr/stdlib/awk.tl (awk): Fix indentation
in two places.
Diffstat (limited to 'share')
| -rw-r--r-- | share/txr/stdlib/awk.tl | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/share/txr/stdlib/awk.tl b/share/txr/stdlib/awk.tl index e99f62d2..3efdc1ef 100644 --- a/share/txr/stdlib/awk.tl +++ b/share/txr/stdlib/awk.tl @@ -274,7 +274,7 @@ ^((*stdout* (qref ,aws-sym output)))) ,*(if (and awc.cond-actions awc.begin-file-actions) ^((,awk-begf-fun (lambda (,aws-sym) - ,*awc.begin-file-actions)))) + ,*awc.begin-file-actions)))) ,*(if (and awc.cond-actions awc.end-file-actions) ^((,awk-endf-fun (lambda (,aws-sym) ,*awc.end-file-actions)))) @@ -282,9 +282,9 @@ ^((,awk-fun (lambda (,aws-sym) ,(if awc.rng-exprs ^(let* ((,awc.rng-rec-temp rec) - ,*(nreverse - (zip awc.rng-expr-temps - awc.rng-exprs))) + ,*(nreverse + (zip awc.rng-expr-temps + awc.rng-exprs))) ,p-actions-xform) p-actions-xform)))))) ,*awc.begin-actions |