diff --git a/bmad/multiparticle/beam_file_io.f90 b/bmad/multiparticle/beam_file_io.f90
index 2639a36949..d9f3f1a7a0 100644
--- a/bmad/multiparticle/beam_file_io.f90
+++ b/bmad/multiparticle/beam_file_io.f90
@@ -852,7 +852,7 @@ subroutine read_beam_ascii4 (file_name, beam, beam_init, err_flag)
   call reallocate_beam(beam, n_bunch, save = .true.)
   call reallocate_bunch(beam%bunch(n_bunch), 1000)
   bunch => beam%bunch(n_bunch)
-  bunch = bunch_struct()
+  bunch = bunch_struct(null(), null(), 0.0_rp, 0.0_rp, 0.0_rp, 0.0_rp, real_garbage$, .false., 0, 0, 0, 0, 0, 0)
 
   p0 = coord_struct()