diff --git a/collects/frtime/frtime-opt-lang.ss b/collects/frtime/opt/frtime-opt-lang.ss similarity index 99% rename from collects/frtime/frtime-opt-lang.ss rename to collects/frtime/opt/frtime-opt-lang.ss index 2a543d6f1a..c91ac0c092 100644 --- a/collects/frtime/frtime-opt-lang.ss +++ b/collects/frtime/opt/frtime-opt-lang.ss @@ -3,7 +3,7 @@ ;; optimization, though -- that is left to the frtime-opt module. (module frtime-opt-lang mzscheme (require (prefix frtime: frtime/frtime)) - (require-for-syntax frtime/lowered-equivs) + (require-for-syntax frtime/opt/lowered-equivs) ;; Export a function that is just a lifted version of a standard ;; function (with the same name). diff --git a/collects/frtime/frtime-opt.ss b/collects/frtime/opt/frtime-opt.ss similarity index 99% rename from collects/frtime/frtime-opt.ss rename to collects/frtime/opt/frtime-opt.ss index 723f77efe9..d8f78a83ce 100644 --- a/collects/frtime/frtime-opt.ss +++ b/collects/frtime/opt/frtime-opt.ss @@ -8,7 +8,7 @@ (provide (rename my-module-begin #%module-begin) #%app #%top #%datum optimize-expr optimize-module dont-optimize) - (require-for-syntax frtime/lowered-equivs) + (require-for-syntax frtime/opt/lowered-equivs) (require-for-syntax (only srfi/1 lset-union lset-difference every)) (require-for-syntax mzlib/list) (require (only frtime/core/frp super-lift undefined undefined?)) diff --git a/collects/frtime/lowered-equivs.ss b/collects/frtime/opt/lowered-equivs.ss similarity index 100% rename from collects/frtime/lowered-equivs.ss rename to collects/frtime/opt/lowered-equivs.ss