diff --git a/pkgs/base/info.rkt b/pkgs/base/info.rkt index 72d9ba38de..3d7577b098 100644 --- a/pkgs/base/info.rkt +++ b/pkgs/base/info.rkt @@ -12,7 +12,7 @@ (define collection 'multi) -(define version "7.6.0.7") +(define version "7.6.0.8") (define deps `("racket-lib" ["racket" #:version ,version])) diff --git a/racket/src/cs/compile-file.ss b/racket/src/cs/compile-file.ss index 5ae05b0caf..74bd732ea9 100644 --- a/racket/src/cs/compile-file.ss +++ b/racket/src/cs/compile-file.ss @@ -2,7 +2,7 @@ ;; Check to make we're using a build of Chez Scheme ;; that has all the features we need. (define-values (need-maj need-min need-sub need-dev) - (values 9 5 3 15)) + (values 9 5 3 16)) (unless (guard (x [else #f]) (eval 'scheme-fork-version-number)) (error 'compile-file diff --git a/racket/src/cs/linklet.sls b/racket/src/cs/linklet.sls index c696c21078..aecd94351d 100644 --- a/racket/src/cs/linklet.sls +++ b/racket/src/cs/linklet.sls @@ -1269,10 +1269,12 @@ ;; Since the schemify layer inserts `|#%app|` any time the rator of ;; an application might not be a procedure, we can avoid redundant - ;; checks for other applications by enabling unsafe mode. But do that + ;; checks for other applications by enabling unsafe mode. Ditto for + ;; potential early reference to `letrec`-bound variables. But do that ;; only if we're compiling the primitive layer in unsafe mode. (meta-cond [(>= (optimize-level) 3) - (enable-unsafe-application #t)] + (enable-unsafe-application #t) + (enable-unsafe-variable-reference #t)] [else (void)])) diff --git a/racket/src/racket/src/schvers.h b/racket/src/racket/src/schvers.h index 8194502c59..a036e1e215 100644 --- a/racket/src/racket/src/schvers.h +++ b/racket/src/racket/src/schvers.h @@ -16,7 +16,7 @@ #define MZSCHEME_VERSION_X 7 #define MZSCHEME_VERSION_Y 6 #define MZSCHEME_VERSION_Z 0 -#define MZSCHEME_VERSION_W 7 +#define MZSCHEME_VERSION_W 8 /* A level of indirection makes `#` work as needed: */ #define AS_a_STR_HELPER(x) #x