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

Fix C binding names on paths

Browse source
This commit is contained in:
Paul Romano 2018-08-24 12:58:21 -05:00
parent d1cc9fd9c6
commit 93f36b574d
1 changed files with 4 additions and 4 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/initialize.F90
View file

@ -17,10 +17,10 @@ module initialize
implicit none
type(C_PTR), bind(C) :: openmc_path_input
type(C_PTR), bind(C) :: openmc_path_statepoint
type(C_PTR), bind(C) :: openmc_path_sourcepoint
type(C_PTR), bind(C) :: openmc_path_particle_restart
type(C_PTR), bind(C, name='path_input') :: openmc_path_input
type(C_PTR), bind(C, name='path_statepoint') :: openmc_path_statepoint
type(C_PTR), bind(C, name='path_sourcepoint') :: openmc_path_sourcepoint
type(C_PTR), bind(C, name='path_particle_restart') :: openmc_path_particle_restart
contains