Skip to content
Snippets Groups Projects
Commit 15c23836 authored by famen's avatar famen
Browse files

Bugfix for loading .so file from the third party called by Linux version of HAWC2

parent c0bc7877
No related branches found
No related tags found
1 merge request!62bugfix/improvements on calling the third party ".so" controller
Pipeline #32076 passed
......@@ -650,6 +650,16 @@ subroutine initstring(istring) bind(c,name='initstring')
write(6,'(A)') 'HAWC2 found additional control parameter file: '//trim(additionalCtrlParamFilename)
! TODO: set a flag here
exit
else if (name(len_trim(name)-len_trim(ext(i_ext))+1:len_trim(name))==trim(ext(3))) then
write(6,'(A)') 'HAWC2 found additional data file: '//trim(adjustl(name))
! TODO: set a flag here
exit
else if (name(len_trim(name)-len_trim(ext(i_ext))+1:len_trim(name))==trim(ext(4))) then
external_dll%filename = trim(adjustl(name))
write(6,'(A)') 'HAWC2 found controller .so file: "'//trim(external_dll%filename)//'" from third party.'
! TODO: set a flag here
exit
end if
enddo
end subroutine initstring
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment