www

commit 10674298c49f3b47a77f1d1fa674c7dc4763106f
parent dff0f2b79f06e097e767c67834c1c0ecf78aba96
Author: Stephen Chang <stchang@ccs.neu.edu>
Date:   Wed, 13 Aug 2014 14:30:13 -0400

stlc cleanup

Diffstat:
M
stlc.rkt
 | 
4
++--

1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/stlc.rkt b/stlc.rkt
@@ -384,8 +384,8 @@
      #:with (e ...) (template ((?@ . mb-form.e) ...))
      #:when (Γ (type-env-extend #'([f τ] ...)))
 ;     #:when (printf "fvs :~a\n" (fvs))
-;; error: "Just10: unbound identifier; also, no #%top syntax transformer is bound"
-;; cause: for struct def, define-values must come before define-syntaxes
+;; NOTE: for struct def, define-values *must* come before define-syntaxes
+;; ow, error: "Just10: unbound identifier; also, no #%top syntax transformer is bound"
      (quasisyntax/loc stx 
        (#%module-begin
         #,(expand/df #'(let-values ([def-val-lhs def-val-rhs] ...)