[comp.unix.questions] UMIPS-BSD Fortran I/O unit limit

kokody2@mill.me.toronto.edu () (05/27/88)

I am using the Mips Microsystems f77 fortran compiler running on a
MIPS M1000 computer running UMIPS-BSD UNIX. I have run into difficulty
installing a finite element package due to a compiler quirk that 
allows one have a maximum of 17 files at any one time. Documentation
for the fortran is unfortunately quite sparse and incomplete. Is it
possible to open more files by setting up some unmentioned flag
or reconfiguring the fortran compiler? Or is there something in the
UMIPS-BSD that can overide this apparent limit of 17 files. A test
program confirmed the 17 file limit.

The run-time error message given is:

	open: illegal unit number

The program compiles with no errors using the 2nd level of Optimization.

This same package works fine on our SUN 3/180's which appear to 
allow us to open 24 files at any one time. To re-write the package 
would be a slight major inconvenience considering the source code 
is slighlty over 3 Mbytes in size. Any help/pointers would be 
appreciated.

Thank you, 

		Gerry Kokodyniak

==============================================================================
-- 
Gerry Kokodyniak, Ph.D. Student, Dept. of Mechanical Engineering, U. of Toronto
Structural Integrity Fatigue and Fracture Research Laboratory (416) 978-6853
USENET: kokody2@me.utoronto.edu         BITNET: kokody2@ME.UTORONTO
UUCP: {linus,ihpn4,allegra,decvax,floyd}!utcsri!me!kokody2 

rogerk@mips.COM (Roger Klorese) (05/30/88)

In article <13426.1988May27.16:41:31@mill.me.toronto.edu> kokody2@me.toronto.edu (Gerry Kokodyniak) writes:
>
>I am using the Mips Microsystems f77 fortran compiler running on a
>MIPS M1000 computer running UMIPS-BSD UNIX. I have run into difficulty
>installing a finite element package due to a compiler quirk that 
>allows one have a maximum of 17 files at any one time. Documentation
>for the fortran is unfortunately quite sparse and incomplete. Is it
>possible to open more files by setting up some unmentioned flag
>or reconfiguring the fortran compiler? Or is there something in the
>UMIPS-BSD that can overide this apparent limit of 17 files. A test
>program confirmed the 17 file limit.
>
>The run-time error message given is:
>
>	open: illegal unit number
>
>The program compiles with no errors using the 2nd level of Optimization.
>
>This same package works fine on our SUN 3/180's which appear to 
>allow us to open 24 files at any one time. To re-write the package 
>would be a slight major inconvenience considering the source code 
>is slighlty over 3 Mbytes in size. Any help/pointers would be 
>appreciated.
>
>Thank you, 
>
>		Gerry Kokodyniak
>
>==============================================================================
>-- 
>Gerry Kokodyniak, Ph.D. Student, Dept. of Mechanical Engineering, U. of Toronto
>Structural Integrity Fatigue and Fracture Research Laboratory (416) 978-6853
>USENET: kokody2@me.utoronto.edu         BITNET: kokody2@ME.UTORONTO
>UUCP: {linus,ihpn4,allegra,decvax,floyd}!utcsri!me!kokody2 


-- 
Roger B.A. Klorese			MIPS Computer Systems, Inc.
{ames,decwrl,prls,pyramid}!mips!rogerk	25 Burlington Mall Rd, Suite 300
rogerk@mips.COM				Burlington, MA 01803
* Your witticism here.*			+1 617 270-0613

rogerk@mips.COM (Roger Klorese) (05/30/88)

In article <2269@admin.mips.COM> rogerk@admin.UUCP (Roger Klorese) writes:
(A mis-posted message, which SHOULD have been):

In article <13426.1988May27.16:41:31@mill.me.toronto.edu> kokody2@me.toronto.edu (Gerry Kokodyniak) writes:
>I am using the Mips Microsystems f77 fortran compiler running on a
>MIPS M1000 computer running UMIPS-BSD UNIX.

That's "MIPS Computer Systems"... it's that *other* company that's
something-or-other Microsystems... ;-)

>I have run into difficulty
>installing a finite element package due to a compiler quirk that 
>allows one have a maximum of 17 files at any one time. 

quirk (n.): 1. undocumented feature; 2. a bug by any other name...

Either of these may be the cause, but the fix is that age-old bug-aboo:

"Fixed in the next release"

See:
-----

Script started on Sun May 29 10:22:50 1988
rogerk@admin[1] cat x.f
	do 100 i=1,60
	open(unit=i+40)
	write(i+40,1000)
1000	format("Hello world")
100	continue
	end
rogerk@admin[2] f771.21 x.f
rogerk@admin[3] a.out
open: illegal unit number
rogerk@admin[4] f771.31 x.f
rogerk@admin[5] a.out
rogerk@admin[6] exit
script done on Sun May 29 10:23:38 1988

-----

Please contact Customer Service for a release date; my understanding is
that the 1.31 compilers will be available during June.
-- 
Roger B.A. Klorese			MIPS Computer Systems, Inc.
{ames,decwrl,prls,pyramid}!mips!rogerk	25 Burlington Mall Rd, Suite 300
rogerk@mips.COM				Burlington, MA 01803
* Your witticism here.*			+1 617 270-0613