diff --git a/racket/syndicate/core-lang.rkt b/racket/syndicate/core-lang.rkt index cfabc8c..0b44c3b 100644 --- a/racket/syndicate/core-lang.rkt +++ b/racket/syndicate/core-lang.rkt @@ -76,7 +76,8 @@ (define cleaned-acts (clean-actions acts)) (for ([act (in-list cleaned-acts)] #:unless (actor? act)) - (error "only actor creation actions allowed at module level"))) + (error "only actor creation actions allowed at module level")) + cleaned-acts) (define-syntax (syndicate-module stx) (syntax-parse stx