racket/base instead of scheme/base, see PR 10870
This commit is contained in:
parent
2a5b43a321
commit
a46461d4f7
|
@ -15,15 +15,14 @@
|
|||
(type-ascription (let ([ons (current-namespace)]
|
||||
[ns (make-empty-namespace)])
|
||||
(parameterize ([current-namespace ns])
|
||||
(namespace-attach-module ons 'scheme/base ns)
|
||||
(namespace-require 'scheme/base)
|
||||
(namespace-attach-module ons 'racket/base ns)
|
||||
(namespace-require 'racket/base)
|
||||
(namespace-require 'typed-scheme/private/prims)
|
||||
(namespace-require 'typed-scheme/private/base-types)
|
||||
(namespace-require 'typed-scheme/private/base-types-extra)
|
||||
(expand 'ann-stx))))
|
||||
ty))
|
||||
|
||||
#reader typed-scheme/typed-reader
|
||||
(define (type-annotation-tests)
|
||||
(test-suite
|
||||
"Type Annotation tests"
|
||||
|
|
Loading…
Reference in New Issue
Block a user