transform: reduce simple commands...WIP

2018-11-17 20:08:17 +01:00 · 2018-11-17 20:08:17 +01:00 · bdbc29e448
parent 992479b0a3
commit bdbc29e448
1 changed files with 3 additions and 0 deletions
--- a/gash/grammar.scm
+++ b/gash/grammar.scm
@ -258,6 +258,9 @@
    (('command word ... ('io-redirect ('io-file "<" file-name)))
     `(with-input-from-file ,file-name (command ,@word)))

+    (('command ('word (and (? string?) string)) ...)
+     `(command ,@string))
+
    (('command ('if-clause if-clause ...))
     (transform `(if-clause ,@if-clause)))
    (('if-clause expr then)