Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!mnetor!uunet!tektronix!zephyr!michaele From: michaele@zephyr.ENS.TEK.COM (Michael J. Edelman;627-6707;50-454;;) Newsgroups: comp.mail.mh Subject: Re: 'no base' errors on a Gould Message-ID: <12194@tektronix.TEK.COM> Date: Tue, 13-Oct-87 14:43:48 EDT Article-I.D.: tektroni.12194 Posted: Tue Oct 13 14:43:48 1987 Date-Received: Thu, 15-Oct-87 04:43:52 EDT References: <8710121634.AA00366@shum.Huji.AC.IL> Sender: michaele@tektronix.TEK.COM Reply-To: michaele@zephyr.ENS.TEK.COM (Michael J. Edelman) Organization: Engineering Network Services, Tektronix, Inc. Lines: 214 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.