From 9dd268bdfdcab710af6d7d67c28f95048969de6d Mon Sep 17 00:00:00 2001 From: Tony Garnock-Jones Date: Fri, 27 Jun 2014 16:27:16 -0400 Subject: [PATCH] Cosmetic --- minimart/actor.rkt | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/minimart/actor.rkt b/minimart/actor.rkt index dc3fbec..c49423b 100644 --- a/minimart/actor.rkt +++ b/minimart/actor.rkt @@ -242,7 +242,7 @@ (if (ormap (lambda (i) (free-identifier=? #'head i)) (syntax->list #'(define-values define-syntaxes begin-for-syntax module module* - #%module-begin + #%module-begin #%require #%provide))) (begin (push! body-forms #'expr) (walk-forms #'(rest ...))) @@ -507,7 +507,7 @@ (define (accumulate-actions context-id action-ids final-forms forms) (syntax-case forms () [() - #`(match-state state + #`(match-state state #,@(reverse final-forms) (transition state (list #,@(reverse action-ids))))] @@ -544,7 +544,7 @@ (if (ormap (lambda (i) (free-identifier=? #'head i)) (syntax->list #'(define-values define-syntaxes begin-for-syntax module module* - #%module-begin + #%module-begin #%require #%provide))) (accumulate-actions context-id action-ids