Path: utzoo!utgpu!news-server.csri.toronto.edu!mailrus!uunet!samsung!zaphod.mps.ohio-state.edu!sdd.hp.com!hplabs!hpfcso!cunniff
From: cunniff@hpfcso.HP.COM (Ross Cunniff)
Newsgroups: comp.sys.hp
Subject: Re: FORTRAN/"C" Char Descriptors
Message-ID: <7370134@hpfcso.HP.COM>
Date: 8 May 90 15:59:57 GMT
References: <1990May7.193136.19897@ux1.cso.uiuc.edu>
Organization: Hewlett-Packard, Fort Collins, CO, USA
Lines: 28

> Does anybody know a way to DISABLE CHARACTER STRING LENGTH 
> passing from Fortran to "C" subroutines?  

> Fortran says this: call       csub(s1,s2)
> C hears this:      subroutine csub(s1,len1,s2,len2)

I'm assuming you're on a Series 800, since the Series 300 acts
more like the industry default in this case.

Try the $HP9000 CHARS compiler directive, like this:

program a.f:
$HP9000 CHARS
	character*80 s1, s2
	call csub( s1, s2 )
	end

program b.c:
void csub( s1, s2, len1, len2 )
char *s1, *s2;
int len1, len2;
{
}

				Ross Cunniff
				Hewlett-Packard Colorado Language Lab
				...{ucbvax,hplabs}!hpfcla!cunniff
				cunniff%hpfcrt@hplabs.HP.COM