tags 687264 +patch
thanks
On Mon, Apr 22, 2013 at 03:20:48AM +0200, Michael Banck wrote:
> The upside is that I've been working on a patch and I think I might be
> able to fix it.
Patch is attached and seems to work.
Michael
--- ./manager/sip_server_work.F.orig 2013-04-22 00:13:01.294845683 +0200
+++ ./manager/sip_server_work.F 2013-04-22 00:14:55.254851520 +0200
@@ -247,7 +247,12 @@
if (barrier_in_progress) barrier_seqno = server_seqno
nind = server_msg(c_msg_nind,imsg)
- if (nind .lt. 1 .or. nind .gt. mx_array_index) then
+
+ if (nind .lt. 1 .or.
+ * nind .gt. mx_array_index .or.
+ * msg(1) .eq. server_barrier_signal .or.
+ * msg(1) .eq. server_quit_msgtype) then
+
nind = 0
server_msg(c_msg_stptr,imsg) = 0
server_msg(c_msg_size,imsg) = 0
