From 3c2003d01ebfa39bc401bf93ccaeb338fa1cb5ca Mon Sep 17 00:00:00 2001 From: Matthew Flatt Date: Sun, 30 Dec 2018 13:59:16 -0700 Subject: [PATCH] cs: fix for fasl-related definition --- racket/src/cs/expander.sls | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/racket/src/cs/expander.sls b/racket/src/cs/expander.sls index d443ccb87d..ff29d91be9 100644 --- a/racket/src/cs/expander.sls +++ b/racket/src/cs/expander.sls @@ -38,6 +38,9 @@ ;; the build incompatible with previously generated ".zo" files. (define compile-as-independent? #f) + (define (fasl->s-exp/intern s) + (1/fasl->s-exp/intern s)) + ;; The expander needs various tables to set up primitive modules, and ;; the `primitive-table` function is the bridge between worlds @@ -82,9 +85,6 @@ (include "include.ss") (include-generated "expander.scm") - (define (fasl->s-exp/intern s) - (1/fasl->s-exp/intern s)) - ;; ---------------------------------------- ;; The environment is used to evaluate linklets, so all primitives