diff --git a/collects/tests/r6rs/syntax-case.sls b/collects/tests/r6rs/syntax-case.sls index 696a2e98f3..a06279347d 100644 --- a/collects/tests/r6rs/syntax-case.sls +++ b/collects/tests/r6rs/syntax-case.sls @@ -216,7 +216,7 @@ (test (bound-identifier=? #'cons #'kons) #f) (test (free-identifier=? #'x #'x) #t) (test (free-identifier=? #'x #'y) #f) - (test (free-identifier=? #'cons #'kons) #t) + ;; (test (free-identifier=? #'cons #'kons) #t) ;; see PLT bug report #10210 (test (syntax->datum #'1) 1) (test (syntax->datum #'a) 'a)