mirror of
https://github.com/LCPQ/quantum_package
synced 2024-08-24 21:41:46 +02:00
Fixed "Unable to bind socket"
This commit is contained in:
parent
8802d98849
commit
afc4111e24
5
configure
vendored
5
configure
vendored
@ -487,7 +487,6 @@ def create_ninja_and_rc(l_installed):
|
|||||||
|
|
||||||
l_rc = [
|
l_rc = [
|
||||||
'export QP_ROOT={0}'.format(QP_ROOT),
|
'export QP_ROOT={0}'.format(QP_ROOT),
|
||||||
'#export QP_NIC=ib0 # Choose the correct network inuterface',
|
|
||||||
'export QP_EZFIO={0}'.format(path_ezfio.replace(QP_ROOT,"${QP_ROOT}")),
|
'export QP_EZFIO={0}'.format(path_ezfio.replace(QP_ROOT,"${QP_ROOT}")),
|
||||||
'export QP_PYTHON={0}'.format(":".join(l_python)), "",
|
'export QP_PYTHON={0}'.format(":".join(l_python)), "",
|
||||||
'export IRPF90={0}'.format(path_irpf90.replace(QP_ROOT,"${QP_ROOT}")),
|
'export IRPF90={0}'.format(path_irpf90.replace(QP_ROOT,"${QP_ROOT}")),
|
||||||
@ -498,6 +497,10 @@ def create_ninja_and_rc(l_installed):
|
|||||||
'export LIBRARY_PATH="${QP_ROOT}"/lib:"${LIBRARY_PATH}"', "",
|
'export LIBRARY_PATH="${QP_ROOT}"/lib:"${LIBRARY_PATH}"', "",
|
||||||
'source ${QP_ROOT}/install/EZFIO/Bash/ezfio.sh', "",
|
'source ${QP_ROOT}/install/EZFIO/Bash/ezfio.sh', "",
|
||||||
'source ${HOME}/.opam/opam-init/init.sh > /dev/null 2> /dev/null || true',
|
'source ${HOME}/.opam/opam-init/init.sh > /dev/null 2> /dev/null || true',
|
||||||
|
'',
|
||||||
|
'# Choose the correct network interface',
|
||||||
|
'# export QP_NIC=ib0',
|
||||||
|
'# export QP_NIC=eth0',
|
||||||
""
|
""
|
||||||
]
|
]
|
||||||
|
|
||||||
|
@ -257,15 +257,36 @@ function new_zmq_pull_socket()
|
|||||||
stop 'Unable to set ZMQ_RCVHWM on pull socket'
|
stop 'Unable to set ZMQ_RCVHWM on pull socket'
|
||||||
endif
|
endif
|
||||||
|
|
||||||
rc = f77_zmq_bind(new_zmq_pull_socket, zmq_socket_pull_tcp_address)
|
integer :: icount
|
||||||
if (rc /= 0) then
|
|
||||||
print *, 'Unable to bind new_zmq_pull_socket (tcp)', zmq_socket_pull_tcp_address
|
icount = 10
|
||||||
|
do while (icount > 0)
|
||||||
|
rc = f77_zmq_bind(new_zmq_pull_socket, zmq_socket_pull_inproc_address)
|
||||||
|
if (rc /= 0) then
|
||||||
|
icount = icount-1
|
||||||
|
call sleep(3)
|
||||||
|
endif
|
||||||
|
enddo
|
||||||
|
|
||||||
|
if (icount == 0) then
|
||||||
|
print *, 'Unable to bind new_zmq_pull_socket (inproc)', zmq_socket_pull_inproc_address
|
||||||
stop
|
stop
|
||||||
endif
|
endif
|
||||||
|
|
||||||
rc = f77_zmq_bind(new_zmq_pull_socket, zmq_socket_pull_inproc_address)
|
|
||||||
if (rc /= 0) then
|
icount = 10
|
||||||
stop 'Unable to bind new_zmq_pull_socket (inproc)'
|
do while (icount > 0)
|
||||||
|
rc = f77_zmq_bind(new_zmq_pull_socket, zmq_socket_pull_tcp_address)
|
||||||
|
if (rc /= 0) then
|
||||||
|
icount = icount-1
|
||||||
|
call sleep(3)
|
||||||
|
endif
|
||||||
|
|
||||||
|
enddo
|
||||||
|
|
||||||
|
if (icount == 0) then
|
||||||
|
print *, 'Unable to bind new_zmq_pull_socket (tcp)', zmq_socket_pull_tcp_address
|
||||||
|
stop
|
||||||
endif
|
endif
|
||||||
|
|
||||||
end
|
end
|
||||||
|
Loading…
Reference in New Issue
Block a user