michaele@zephyr.ENS.TEK.COM (Michael J. Edelman;627-6707;50-454;;) (10/13/87)
In article <8710121634.AA00366@shum.Huji.AC.IL> ric@shum.huji.ac.il (Ric wheeler) writes: > > >Hi, > We are trying to bring up the mh system on a gould and have run >into trouble with the gould's restrictions on addressing data, >e.g. we receive a number of 'no base' errors when trying to compile. >Has anyone out there had any experience bringing up mh on gould? > > Any help would be greatly appreciated. Since I am not on this >board, please respond directly, thanks, > > Rick Wheeler > ric@hujics.bitnet > ric@israel.csnet I've enclosed the context diff's for the changes we had to make to get MH version 5 running on our goulds. The goulds are running UTX 2.0. -------------------------------------------------------------------------------- mh/sbr/m_gmsg.c: -------------------------------------------------------------------------------- *** /tmp/,RCSt1025463 Tue Oct 13 11:34:42 1987 --- m_gmsg.c Wed Feb 19 18:48:11 1986 *************** *** 1,5 #ifndef lint ! static char *RCSid = "$Header: m_gmsg.c,v 1.0 85/08/01 12:53:37 root Exp $"; #endif #ifndef lint static char *sccsid="@(#)m_gmsg.c 1.1 (Berkeley) 4/17/85"; --- 1,5 ----- #ifndef lint ! static char *RCSid = "$Header: m_gmsg.c,v 1.1 86/02/19 18:47:40 root Exp $"; #endif #ifndef lint static char *sccsid="@(#)m_gmsg.c 1.1 (Berkeley) 4/17/85"; *************** *** 19,24 static struct msgs folder; static short stats[MAXFOLDER + 1]; char *malloc (); /* */ --- 19,31 ----- static struct msgs folder; static short stats[MAXFOLDER + 1]; + #ifdef sel + /* + * Goulds don't seem to like "string"[0], so we give it a character ptr + */ + char *bletch = SBACKUP; + #endif + char *malloc (); /* */ *************** *** 61,66 stats[i] &= ~DELETED; } else if (dp -> d_name[0] == SBACKUP[0]) { if ((i = mu_atoi (dp -> d_name + 1)) && !(stats[i] & EXISTS)) stats[i] |= DELETED; --- 68,76 ----- stats[i] &= ~DELETED; } else + #ifdef sel + if (dp -> d_name[0] == *bletch) { + #else if (dp -> d_name[0] == SBACKUP[0]) { #endif if ((i = mu_atoi (dp -> d_name + 1)) && !(stats[i] & EXISTS)) *************** *** 62,67 } else if (dp -> d_name[0] == SBACKUP[0]) { if ((i = mu_atoi (dp -> d_name + 1)) && !(stats[i] & EXISTS)) stats[i] |= DELETED; } --- 72,78 ----- if (dp -> d_name[0] == *bletch) { #else if (dp -> d_name[0] == SBACKUP[0]) { + #endif if ((i = mu_atoi (dp -> d_name + 1)) && !(stats[i] & EXISTS)) stats[i] |= DELETED; } -------------------------------------------------------------------------------- mh/uip/msh.c: -------------------------------------------------------------------------------- *** /tmp/,RCSt1025400 Tue Oct 13 11:33:01 1987 --- msh.c Wed Feb 19 18:52:10 1986 *************** *** 1,5 #ifndef lint ! static char *RCSid = "$Header: msh.c,v 1.0 85/08/01 14:29:32 root Exp $"; #endif #ifndef lint static char sccsid[] = "@(#)msh.c 1.2 (Berkeley) 4/20/85"; --- 1,5 ----- #ifndef lint ! static char *RCSid = "$Header: msh.c,v 1.1 86/02/19 18:51:03 root Exp $"; #endif #ifndef lint static char sccsid[] = "@(#)msh.c 1.2 (Berkeley) 4/20/85"; *************** *** 694,699 long pos; char c, buffer[BUFSIZ]; struct Msg msgs[MAXFOLDER + 2]; ld3 = strlen (delim3); --- 694,702 ----- long pos; char c, buffer[BUFSIZ]; + #ifdef sel + static + #endif struct Msg msgs[MAXFOLDER + 2]; ld3 = strlen (delim3); -------------------------------------------------------------------------------- mh/uip/rmf.c: -------------------------------------------------------------------------------- *** /tmp/,RCSt1025659 Tue Oct 13 11:37:17 1987 --- rmf.c Wed Sep 16 13:31:06 1987 *************** *** 1,5 #ifndef lint ! static char *RCSid = "$Header: rmf.c,v 1.0 85/08/01 14:39:51 root Exp $"; #endif #ifndef lint static char sccsid[] = "@(#)rmf.c 1.1 (Berkeley) 2/3/85"; --- 1,5 ----- #ifndef lint ! static char *RCSid = "$Header: rmf.c,v 1.1 87/09/16 13:34:47 ens Exp $"; #endif #ifndef lint static char sccsid[] = "@(#)rmf.c 1.1 (Berkeley) 2/3/85"; *************** *** 128,133 others; char *maildir, cur[BUFSIZ]; struct direct *dp; DIR * dd; --- 128,136 ----- others; char *maildir, cur[BUFSIZ]; + #ifdef sel + char *_SBACKUP=SBACKUP; + #endif struct direct *dp; DIR * dd; *************** *** 166,171 if (strcmp (dp -> d_name, ".") && strcmp (dp -> d_name, "..")) { if (mu_atoi (dp -> d_name) || dp -> d_name[0] == '.' || dp -> d_name[0] == SBACKUP[0] #ifdef MHE || dp -> d_name[0] == '+' --- 169,177 ----- if (strcmp (dp -> d_name, ".") && strcmp (dp -> d_name, "..")) { if (mu_atoi (dp -> d_name) || dp -> d_name[0] == '.' + #ifdef sel + || dp -> d_name[0] == *_SBACKUP + #else || dp -> d_name[0] == SBACKUP[0] #endif #ifdef MHE *************** *** 167,172 if (mu_atoi (dp -> d_name) || dp -> d_name[0] == '.' || dp -> d_name[0] == SBACKUP[0] #ifdef MHE || dp -> d_name[0] == '+' #endif MHE --- 173,179 ----- || dp -> d_name[0] == *_SBACKUP #else || dp -> d_name[0] == SBACKUP[0] + #endif #ifdef MHE || dp -> d_name[0] == '+' #endif MHE -------------------------------------------------------------------------------- Hope this helps, Michael Edelman Tektronix, Inc.
rkoo@acornrc.UUCP (Richard Koo) (10/16/87)
I heard from the grapevine that UC Irvine is the distributor of MH. Is that true? If so, does any one know who the contact person at UC Irvine is? Thank you. Richard