Path: utzoo!attcan!uunet!samsung!zaphod.mps.ohio-state.edu!mips!gumby!lilian
From: lilian@mips.COM (Lilian Leung)
Newsgroups: comp.sys.mips
Subject: Re: f77 bug
Message-ID: <36289@mips.mips.COM>
Date: 20 Feb 90 19:30:19 GMT
References: <1990Feb17.213900.26927@sobeco.com>
Sender: news@mips.COM
Reply-To: lilian@mips.COM (Lilian Leung)
Organization: MIPS Computer Systems, Sunnyvale, CA
Lines: 46

In article <1990Feb17.213900.26927@sobeco.com> laporte@sobeco.com (p.laporte) writes:
>Using structures in fortran we have discovered a bug in the compiler.
>
>When compiling this simple program
>
>      structure /typea/
>        character*11 key
>      end structure
>      record /typea/ rec
>
>      rec(1) = 0
>      rec.key = '0001'
>      write(*,*) rec.key
>      stop
>      end
>
>We get the following message
>
>Fatal error in: /usr/lib/cmplrs/f77/fcom - core dumped
>
This has been filed as a bug and will be fixed in our later version.
Not in our 2.10 release though.

>
>Also i am looking for a way to initialyse a structure without referencing 
>all the elements. Particularely i need to initialyse the positions that
>i defined with %fill to put null in them.
>
I don't quite understand your question here.  Currently you can initialize
any record element you like by doing something like
       structure /typea/
         character*11 key /'abcde'/
	 integer i1 /1/
	 integer i2 
	 real r3 /2.0/
	 double precision d4
       end structure
       record /typea/ rec
	
If the above is not what you want, please give us a call and provide us with
more details.

-- 
UUCP:	{ames,decwrl,prls,pyramid}!mips!lilian	(or lilian@mips.com)
DDD:	408-991-7848 Lilian Leung		(or 408-720-1700, Ext. 848)
USPS:	MIPS Computer Systems, 930 Arques, Sunnyvale, CA 94086-3650