diff --git a/collects/compiler/demodularizer/merge.rkt b/collects/compiler/demodularizer/merge.rkt index 4ca7184e59..6edd751cb7 100644 --- a/collects/compiler/demodularizer/merge.rkt +++ b/collects/compiler/demodularizer/merge.rkt @@ -134,18 +134,18 @@ (list-ref toplevel-remap n))) (unless (= (length toplevel-remap) (length mod-toplevels)) - (error 'merge-module "Not remapping everything: ~S ~S" - mod-toplevels toplevel-remap)) + (error 'merge-module "Not remapping everything: ~S ~S" + mod-toplevels toplevel-remap)) (log-debug (format "[~S] Incrementing toplevels by ~a" - name - toplevel-offset)) + name + toplevel-offset)) (log-debug (format "[~S] Incrementing lifts by ~a" - name - lift-offset)) + name + lift-offset)) (log-debug (format "[~S] Filtered mod-vars from ~a to ~a" - name - (length mod-toplevels) - (length new-mod-toplevels))) + name + (length mod-toplevels) + (length new-mod-toplevels))) (values (max max-let-depth mod-max-let-depth) (merge-prefix top-prefix new-mod-prefix) (lambda (top-prefix)