Newsgroups: comp.lang.fortran
Path: utzoo!utgpu!news-server.csri.toronto.edu!rpi!zaphod.mps.ohio-state.edu!lavaca.uh.edu!menudo.uh.edu!davison
From: davison@menudo.uh.edu (Dan Davison)
Subject: What does "adjustable array is not a dummy argument" mean?
Message-ID: <1991Apr18.223457.23190@menudo.uh.edu>
Sender: usenet@menudo.uh.edu (USENET News System)
Nntp-Posting-Host: menudo.uh.edu
Organization: University of Houston
Distribution: comp
Date: Thu, 18 Apr 1991 22:34:57 GMT

The Absoft Fortran compiler for the NeXT issues the warning:

 error on line 1446 of sn.f: adjustable array is not a dummy argument

and line 1446 is a "return 1" statement at the end of a large
subroutine. The alleged adjustable array is declared:
                                                       v------dummy arg
      subroutine seqin(nf,lf,Outfl,Termnl,seqid,min,n,seq,ic,nmax,*)
      parameter (ndim=10000, mdim=50000,nchr=80)
      dimension seq(mdim)
                     ^-------------doesn't look adjustable to me
And no compiler thinks it is an adjustable array, except Absoft.
Changing the dimension to be seq(50000) doesn't change the compiler's
mind [sic].

Some experimentation reveals that this error message can be eliminated
by putting the alleged adjustable array in common, but I'd like to
know what this compiler is drinking.  This code compiles without
complaint on Suns (we know how amazing that is in and of itself), PCs
(RM and Lahey), Crays (CFT and CFT77), VAX/VMS and MIPS.  What could
be going on here?  Any insights would be appreciated.

Beware: the Absoft compiler thinks LSeq and Lseq are different
variables, surely a novel interpretation of the standard.  Guess they
don't know how to fold case.  It also obeys the Feldman/Unix Brain
Damage and doesn't generate a list file.

thanks very much,

dan 
--
dr. dan davison/dept. of biochemical and biophysical sciences/univ. of
Houston/4800 Calhoun/Houston,TX 77054-5500/davison@uh.edu/DAVISON@UHOU
Disclaimer: As always, I speak only for myself, and, usually, only to
myself.


