bug#79789: simple loop fails to compile when last entry is a when clause that just does #t true

hi all,
my first guile bug report ,

bug causes guile-3.0.10 to fail to compile the function
it can load it using (load "xxx") but (compile-file "xxx") causes bug
error stating : cannot find 45
the number follows changes every so often
if comment out  line {when clause} its fine
sanity check with racket and stklos , they seem ok with it


;; GNU Guile 3.0.10
(define (find-elfs-goblins arr)
  (let loopy ((y 1))
    (when  (<= y 2)
      (let loopx ((x 1))
(when  (<= x 3)
  (display (list "x is " x " and y is " y))
  (newline)
  (loopx (+ x 1))))
      (when (<= y 2)  #t ) ;; << this line causes problem
      (loopy (+ y 1)))))