*** ../netlib/pvm3.2.1/patches/Contents	Wed Sep 22 16:10:05 1993
--- patches/Contents	Thu Sep 23 16:56:22 1993
***************
*** 1,4 ****
--- 1,16 ----
  
+ patch #2
+ version:
+     3.2.1 -> 3.2.2
+     interoperable with v 3.2.[01].
+ files:
+     patch  patches/Contents
+     patch  src/global.h
+     patch  src/patchlevel.h
+     patch  src/pvmd.c
+ what:
+     . patch #1 broke multicast messages in the pvmd; this fixes it.
+ 
  patch #1
  version:
      3.2.0 -> 3.2.1
*** ../netlib/pvm3.2.1/src/global.h	Wed Sep 22 16:10:06 1993
--- src/global.h	Thu Sep 23 16:53:56 1993
***************
*** 32,37 ****
--- 32,40 ----
   *	Generic includes.
   *
  $Log: global.h,v $
+  * Revision 1.3  1993/09/23  20:53:50  manchek
+  * version change
+  *
   * Revision 1.2  1993/09/22  18:59:46  manchek
   * version change
   *
***************
*** 43,49 ****
  
  /* release version */
  
! #define	PVM_VER	"3.2.1"
  
  /* UDPMAXLEN should be set to the largest UDP message length
     your system can handle. */
--- 46,52 ----
  
  /* release version */
  
! #define	PVM_VER	"3.2.2"
  
  /* UDPMAXLEN should be set to the largest UDP message length
     your system can handle. */
*** ../netlib/pvm3.2.1/src/patchlevel.h	Wed Sep 22 16:10:07 1993
--- src/patchlevel.h	Thu Sep 23 16:54:09 1993
***************
*** 1,3 ****
  
! #define PATCHLEVEL 1
  
--- 1,3 ----
  
! #define PATCHLEVEL 2
  
*** ../netlib/pvm3.2.1/src/pvmd.c	Wed Sep 22 16:10:07 1993
--- src/pvmd.c	Thu Sep 23 16:36:35 1993
***************
*** 32,37 ****
--- 32,40 ----
   *	Mr. pvm daemon.
   *
  $Log: pvmd.c,v $
+  * Revision 1.4  1993/09/23  20:36:19  manchek
+  * fixed broken mca lookup
+  *
   * Revision 1.3  1993/09/22  19:14:47  manchek
   * added network resend statistic.
   * removed redundant code in netinpkt() where it finds mca
***************
*** 179,185 ****
   **           **
   ***************/
  
! static char rcsid[] = "$Id: pvmd.c,v 1.3 1993/09/22 19:14:47 manchek Exp $";
  static int *deads = 0;			/* circ queue of dead pids */
  static char pvmtxt[512];		/* scratch for error log */
  static int ndead = 0;			/* len of deads */
--- 182,188 ----
   **           **
   ***************/
  
! static char rcsid[] = "$Id: pvmd.c,v 1.4 1993/09/23 20:36:19 manchek Exp $";
  static int *deads = 0;			/* circ queue of dead pids */
  static char pvmtxt[512];		/* scratch for error log */
  static int ndead = 0;			/* len of deads */
***************
*** 1381,1398 ****
  
  	/* throw out packet if it's not for us */
  
! 	if ((dst & tidhmask) != myhostpart) {
  		for (mcap = hp->hd_mcas->mc_link; mcap != hp->hd_mcas;
  				mcap = mcap->mc_link)
  			if (mcap->mc_tid == dst)
  				break;
! 		if (mcap == hp->hd_mcas) {
! 			sprintf(pvmtxt,
! 					"netinpkt() pkt from t%x for t%x scrapped (not us)\n",
! 					src, dst);
! 			pvmlogerror(pvmtxt);
! 			goto done;
! 		}
  	}
  
  	if (mcap) {
--- 1384,1404 ----
  
  	/* throw out packet if it's not for us */
  
! 	if (TIDISMCA(dst)) {
  		for (mcap = hp->hd_mcas->mc_link; mcap != hp->hd_mcas;
  				mcap = mcap->mc_link)
  			if (mcap->mc_tid == dst)
  				break;
! 		if (mcap == hp->hd_mcas)
! 			mcap = 0;
! 	}
! 
! 	if ((dst & tidhmask) != myhostpart && !mcap) {
! 		sprintf(pvmtxt,
! 				"netinpkt() pkt from t%x for t%x scrapped (not us)\n",
! 				src, dst);
! 		pvmlogerror(pvmtxt);
! 		goto done;
  	}
  
  	if (mcap) {
