diff --git a/typed-racket-lib/info.rkt b/typed-racket-lib/info.rkt index 07022d8b..13ce937f 100644 --- a/typed-racket-lib/info.rkt +++ b/typed-racket-lib/info.rkt @@ -2,7 +2,7 @@ (define collection 'multi) -(define deps '(("base" #:version "6.2.900.16") +(define deps '(("base" #:version "6.3.0.8") "pconvert-lib" "source-syntax" "compatibility-lib" ;; to assign types diff --git a/typed-racket-lib/typed-racket/base-env/base-env.rkt b/typed-racket-lib/typed-racket/base-env/base-env.rkt index 06504fd7..ac4a1511 100644 --- a/typed-racket-lib/typed-racket/base-env/base-env.rkt +++ b/typed-racket-lib/typed-racket/base-env/base-env.rkt @@ -17,7 +17,7 @@ racket/logging racket/private/stx (only-in mzscheme make-namespace) - (only-in racket/match/runtime match:error matchable? match-equality-test)) + (only-in racket/match/runtime match:error matchable? match-equality-test syntax-srclocs)) "base-structs.rkt" racket/file (only-in racket/private/pre-base new-apply-proc) @@ -1173,6 +1173,7 @@ ;[match:error (Univ . -> . (Un))] [match-equality-test (-Param (Univ Univ . -> . Univ) (Univ Univ . -> . Univ))] [matchable? (make-pred-ty (Un -String -Bytes))] +[syntax-srclocs (Univ . -> . Univ)] ;; Section 10.1 [values (-polydots (a b) (cl->*