(phantom) further bug fix with itype/apr stuff

danieljprice · Mar 4, 2024 · 8b77fc6 · 8b77fc6
1 parent 552bd47
commit 8b77fc6
Show file tree

Hide file tree

Showing 2 changed files with 4 additions and 1 deletion.
diff --git a/src/read_data_sphNG.f90 b/src/read_data_sphNG.f90
@@ -1907,6 +1907,7 @@ subroutine read_data_sphNG(rootname,indexstart,iposn,nstepsread)
        !print*,'skipping ',nskip
        do i=1,nskip
           if (tagged .and. .not.got_tag) read(iunit,end=33,iostat=ierr) tagtmp ! read tag, unless already read
+          got_tag = .false. ! must reset this flag otherwise get corrupted read
           !
           ! read the Adaptive Particle Refinement level array
           ! in order to correctly set particle masses, if present

diff --git a/src/splash.f90 b/src/splash.f90
@@ -51,6 +51,8 @@ program splash
 !
 !     -------------------------------------------------------------------------
 !     Version history/ Changelog:
+!     3.10.3  : (04/03/24)
+!             bug fix reading type information from phantom dumps introduced in 3.10.2
 !     3.10.2  : (01/03/24)
 !             reads phantom dumps with adaptive particle refinement;
 !             improved splash to phantom conversion;
@@ -605,7 +607,7 @@ program splash
  character(len=120) :: string,exactfile
  character(len=12)  :: convertformat
  character(len=lenlabel) :: stringx,stringy,stringr,stringc,stringv
- character(len=*), parameter :: version = 'v3.10.2 [1st Mar 2024]'
+ character(len=*), parameter :: version = 'v3.10.3 [4th Mar 2024]'
 
  !
  ! initialise some basic code variables