whoa. recursive macro is bad.

2013-03-05 17:33:16 -07:00 · 2013-03-05 17:33:16 -07:00 · f020fafd7c
commit f020fafd7c
parent 76115cc019
1 changed files with 3 additions and 2 deletions
--- a/whalesong/lang/private/traced-app.rkt
+++ b/whalesong/lang/private/traced-app.rkt
@ -21,5 +21,6 @@
         (syntax/loc stx
           (with-continuation-mark key 'pos
                                   (#%plain-app operator operands ...))))]
-      [else
-       stx])))
+      [(_)
+       (syntax/loc stx
+         (#%app))])))