mirror of
https://github.com/QuantumPackage/qp2.git
synced 2024-12-23 04:43:45 +01:00
Merge branch 'dev' into csf
This commit is contained in:
commit
d750915fcf
@ -1230,8 +1230,8 @@ integer function zmq_delete_tasks_async_recv(zmq_to_qp_run_socket,more,sending)
|
||||
integer :: rc
|
||||
character*(64) :: reply
|
||||
|
||||
if (.not.sending) return
|
||||
zmq_delete_tasks_async_recv = 0
|
||||
if (.not.sending) return
|
||||
|
||||
reply = ''
|
||||
rc = f77_zmq_recv(zmq_to_qp_run_socket,reply,64,0)
|
||||
|
Loading…
Reference in New Issue
Block a user