diff --git a/racket/collects/compiler/private/pe-rsrc.rkt b/racket/collects/compiler/private/pe-rsrc.rkt
index b92302d9e0..9335c9665d 100644
--- a/racket/collects/compiler/private/pe-rsrc.rkt
+++ b/racket/collects/compiler/private/pe-rsrc.rkt
@@ -454,7 +454,7 @@
 
     (define new-virtual-addr
       (same-alignment
-       (section-virtual-addr s)
+       (pe-section-alignment pe)
        (for/fold ([pos 0]) ([s2 (in-list (pe-sections pe))]
                             #:unless (eq? s s2))
          (max pos