Xref: utzoo comp.lang.fortran:1872 comp.sys.hp:1811
Path: utzoo!utgpu!jarvis.csri.toronto.edu!mailrus!tut.cis.ohio-state.edu!quanta.eng.ohio-state.edu!icarus.eng.ohio-state.edu!kaul
From: kaul@icarus.eng.ohio-state.edu (Rich Kaul)
Newsgroups: comp.lang.fortran,comp.sys.hp
Subject: FORTRAN porting question
Message-ID: <1868@quanta.eng.ohio-state.edu>
Date: 3 Apr 89 17:29:11 GMT
Sender: news@quanta.eng.ohio-state.edu
Reply-To: kaul@icarus.eng.ohio-state.edu (Rich Kaul)
Followup-To: comp.lang.fortran
Distribution: usa
Organization: The Ohio State University Dept of Electrical Engineering
Lines: 24


I've been given the dubious honor of porting some rather awful FORTRAN
code that someone wrote for our Suns to the HP300s we have around
here.  My question involves how a particular instruction should
behave.  The code I have to port has lots of loops like:
	IF (I.EQ.J) GOTO 1000
	...
	DO 1000 K=1,77
	...
   1000 CONTINUE

My question is, how should this behave?  I don't think this is good
FORTRAN (I already told you my opinion of the code), but it's been
quite a while since I've done any serious FORTRAN hacking.  The Sun
f77 compiler takes this construction happily, but the HP compiler
complains loudly and dies.

-rich

-=-
Rich Kaul			  | Richard Daley, Jr. is the front runner
The Ohio State University	  | for mayor of Chicago.  If recent history
2015 Neil Ave, Columbus, OH 43210 | is a guide, he will at least get his
kaul@icarus.eng.ohio-state.edu    | father's vote.