crp/OpenMC
1
0
Fork 0
mirror of https://github.com/openmc-dev/openmc.git synced 2026-07-28 14:15:42 -04:00
Code Issues Projects Releases Packages Wiki Activity Actions 5

Add target on buffer argument in hdf5_read_long.

Browse source
This commit is contained in:
Paul Romano 2012-11-28 15:54:38 -05:00
parent c68734eb62
commit 4625949f51
1 changed files with 3 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

6
src/hdf5_interface.F90
View file

@ -1246,9 +1246,9 @@ contains
subroutine hdf5_read_long(group, name, buffer)
integer(HID_T), intent(in) :: group
character(*), intent(in) :: name
integer(8), intent(out) :: buffer
integer(HID_T), intent(in) :: group
character(*), intent(in) :: name
integer(8), target, intent(out) :: buffer
integer(HID_T) :: dset
type(c_ptr) :: f_ptr