www

commit 97623e1f66d092ccfa229ac78e673e2d070b0802
parent cdffe7106e0c0354288e361494d5806ce489ef74
Author: Ryan Culpepper <ryanc@racket-lang.org>
Date:   Sun, 15 Nov 2015 16:19:41 -0500

fix for expand opaque expression

Relies on corresponding commit to expander.

Diffstat:
M
macro-debugger-text-lib/macro-debugger/model/deriv-parser.rkt
 | 
4
+++-

1 file changed, 3 insertions(+), 1 deletion(-)
diff --git a/macro-debugger-text-lib/macro-debugger/model/deriv-parser.rkt b/macro-debugger-text-lib/macro-debugger/model/deriv-parser.rkt
@@ -153,7 +153,9 @@
       ($3 $1 $2)]
      [(visit Resolves tag (? EE/k))
       (let ([next ($4 $3 $2)])
-        (make tagrule $1 (wderiv-e2 next) $3 next))])
+        (make tagrule $1 (wderiv-e2 next) $3 next))]
+     [(visit opaque)
+      (make p:stop $1 $2 null #f)])
 
     (EE/k
      (#:args e1 rs)