diff --git a/src/swiftest/swiftest_util.f90 b/src/swiftest/swiftest_util.f90 index f3ce3082f..19a0e6e98 100644 --- a/src/swiftest/swiftest_util.f90 +++ b/src/swiftest/swiftest_util.f90 @@ -2313,6 +2313,7 @@ module subroutine swiftest_util_setup_construct_system(nbody_system, param) case (INT_BS) write(*,*) 'Bulirsch-Stoer integrator not yet enabled' case (INT_HELIO) + allocate(helio_nbody_system :: nbody_system) select type(nbody_system) class is (helio_nbody_system) allocate(helio_cb :: nbody_system%cb)