Relay-Version: version B 2.10 5/3/83; site utzoo.UUCP Path: utzoo!utgpu!water!watmath!clyde!rutgers!sri-spam!ames!sdcsvax!ucsdhub!hp-sdd!hplabs!hpcea!hpfcdc!hpfcmp!hpfcse!hpunsca!chuck From: chuck@hpunsca.UUCP Newsgroups: comp.sys.hp Subject: Re: HP Fortran problems Message-ID: <370006@hpunsca.HP.COM> Date: Thu, 3-Dec-87 07:58:08 EST Article-I.D.: hpunsca.370006 Posted: Thu Dec 3 07:58:08 1987 Date-Received: Thu, 10-Dec-87 03:06:01 EST References: <429@auvax.UUCP> Organization: Hewlett-Packard Canada, Dartmouth, N.S. Lines: 33 >I would like to install a very large astronomical image processing >system on an HP9000 series 500 workstation. The image processing >system's code is largely written in F66 style and contains many >coding gems of the form > REAL TEST > DATA TEST/'ABCD'/ >i.e. it uses the old F66 way of storing character data. Now most >Unix style f77 compilers tend to produce warning messages which tell me >that this coding style is hardly state-of-the-art, but they do keep >going and compile the code. (At least they do on a Sun 3 and a VAX 785 >running Ultrix.) Unfortunately the HP9000 compiler produces a fatal >error message stating that the data types are incompatible and does >not complete the compilation. Therefore HP's compiler is clearly >not upwardly compatible with f66 code. ---------- Well, I could be shot on sight by *good* programmers, but here's a solution which will do the trick (I tried it with my Rev5.11 s500 compiler) - REAL TEST DATA TEST/4hABCD/ ! Simply edit this statement This is not great, but it works, and eliminates most of the headaches which occur when those REALs get equated to some other data type (which probably happens in code of this vintage, along with GOTOs, etc.). You should be able to search for all occurrances of this with your editor. Hope this helps. Chuck (*not* a great programmer) Munro.