This archive contains answers to questions sent to Unidata support through mid-2025. Note that the archive is no longer being updated. We provide the archive for reference; many of the answers presented here remain technically correct, even if somewhat outdated. For the most up-to-date information on the use of NSF Unidata software and data services, please consult the Software Documentation first.
Steve, >Date: 11 Jun 1997 17:01:03 -0500 >From: "Steve Mauget" <address@hidden> >Organization: USDA >To: "Steve Emmerson" <address@hidden> >Subject: Re: Compiler test... >Keywords: 199706021417.IAA27579 In the above message, you wrote: > Below is the standard out & err of f90 -c f90tst.f > Steve M. > > C program f90tst.f > C > integer*1 i1 > integer*2 i2 > integer i4 > > integer*1 i1a(2) > integer*2 i2a(2) > integer i4a(2) > > external sub > > call sub(i1) > call sub(i2) > call sub(i3) Whoops! Should have made the above "i4". > > call sub(i1a) > call sub(i2a) > call sub(i4a) > > end > > C standard out & err of f90 -c f90tst.f > > Extension: f90tst.f, line 2: Byte count on numeric data type > detected at *@1 > Extension: f90tst.f, line 3: Byte count on numeric data type > detected at *@2 > Extension: f90tst.f, line 6: Byte count on numeric data type > detected at *@1 > Extension: f90tst.f, line 7: Byte count on numeric data type > detected at *@2 > Warning: f90tst.f, line 20: Unused symbol I4 > detected at END@<end-of-statement> > [f90 continuing despite warning messages] > Error: f90tst.f, line 13: Inconsistent datatype for arg 1 in call to SUB > Error: f90tst.f, line 14: Inconsistent datatype for arg 1 in call to SUB > Error: f90tst.f, line 16: Inconsistent structure for arg 1 in call to SUB > Error: f90tst.f, line 17: Inconsistent datatype for arg 1 in call to SUB > Error: f90tst.f, line 18: Inconsistent datatype for arg 1 in call to SUB > [f90 error termination] Ah ha! Looks like we're zeroing in on the problem. Can the NAG f90 compiler compile the following: integer*1 i1(2) integer*2 i2(2) integer i4(2) external sub call sub(i1) call sub(i2) call sub(i4) end If not, then send this to the NAG folks and ask why not. Please let me know what the compiler spits out. -------- Steve Emmerson <address@hidden>