diff options
author | Kartik K. Agaram <vc@akkartik.com> | 2014-12-17 10:41:43 -0800 |
---|---|---|
committer | Kartik K. Agaram <vc@akkartik.com> | 2014-12-17 10:41:43 -0800 |
commit | 9eedf0348d411fa5cb15b1873a7d1cb264afd092 (patch) | |
tree | d067b4fc46ef32f5dda22d61c215ac3370a45363 | |
parent | 4725111d23e5e19e903d87a8447080229b0b9f35 (diff) | |
download | mu-9eedf0348d411fa5cb15b1873a7d1cb264afd092.tar.gz |
432
-rw-r--r-- | mu.arc | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/mu.arc b/mu.arc index 66478329..db5c25d5 100644 --- a/mu.arc +++ b/mu.arc @@ -1003,7 +1003,7 @@ (def add-code (forms) (each (op . rest) forms (case op - ; syntax: function <name> [ <instructions> ] + ; function <name> [ <instructions> ] ; don't apply our lightweight tools just yet function! (let (name (_make-br-fn body)) rest @@ -1014,7 +1014,7 @@ (assert (is 'make-br-fn _make-br-fn)) (= function*.name (join body function*.name))) - ; syntax: before <label> [ <instructions> ] + ; before <label> [ <instructions> ] ; ; multiple before directives => code in order before @@ -1023,7 +1023,7 @@ (or= before*.label (queue)) (enq fragment before*.label)) - ; syntax: after <label> [ <instructions> ] + ; after <label> [ <instructions> ] ; ; multiple after directives => code in *reverse* order ; (if initialization order in a function is A B, corresponding |