suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

adjust a core test to avoid mscheme

Browse Source
This commit is contained in:
Matthew Flatt 2015-07-16 17:06:59 -06:00
parent b72dceb865
commit e65beb2636
1 changed files with 2 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

4
pkgs/racket-test-core/tests/racket/stx.rktl
View File

@ -2074,8 +2074,8 @@
(define (evalx e)
(parameterize ([current-namespace ns])
(eval-syntax (expand (datum->syntax #f e)))))
(evalx '(module m mzscheme (provide e) (define e #'1)))
(evalx '(module n mzscheme (require-for-syntax 'm) (provide s) (define-syntax (s stx) e)))
(evalx '(module m racket/base (provide e) (define e #'1)))
(evalx '(module n racket/base (require (for-syntax 'm)) (provide s) (define-syntax (s stx) e)))
(evalx '(require 'n))
(err/rt-test (evalx 's) #rx"literal data is not allowed"))