diff --git a/src/symba/symba_io.f90 b/src/symba/symba_io.f90
index 5ab525e23..06472aae9 100644
--- a/src/symba/symba_io.f90
+++ b/src/symba/symba_io.f90
@@ -276,7 +276,7 @@ module subroutine symba_io_read_particle(system, param)
                associate(npl => pl%nbody, ntp => tp%nbody)
                   do 
                      lmatch = .false.
-                     read(LUN, err = 667, iomsg = errmsg) id
+                     read(LUN, err = 667, iomsg = errmsg, end = 333) id
 
                      if (idx == cb%id) then
                         read(LUN, err = 667, iomsg = errmsg) cb%info
@@ -308,6 +308,7 @@ module subroutine symba_io_read_particle(system, param)
          end select
       end select
 
+      333 continue
       return
 
       667 continue