home *** CD-ROM | disk | FTP | other *** search
/ NetNews Usenet Archive 1992 #16 / NN_1992_16.iso / spool / comp / lang / fortran / 2826 < prev    next >
Encoding:
Text File  |  1992-07-25  |  2.3 KB  |  53 lines
  1. Newsgroups: comp.lang.fortran
  2. Path: sparky!uunet!decwrl!pa.dec.com!nntpd2.cxo.dec.com!nntpd.lkg.dec.com!engage.pko.dec.com!e2big.mko.dec.com!quark.enet.dec.com!lionel
  3. From: lionel@quark.enet.dec.com (Steve Lionel)
  4. Subject: Re: Variable repeat count specifier for FORMAT statments
  5. Message-ID: <1992Jul24.183733.13887@e2big.mko.dec.com>
  6. Sender: guest@e2big.mko.dec.com (Guest (DECnet))
  7. Organization: Digital Equipment Corporation
  8. References: <1992Jul23.215113.16531@jhunix.hcf.jhu.edu> <BURLEY.92Jul24125501@geech.gnu.ai.mit.edu>
  9. Distribution: na
  10. Date: 24 JUL 92 14:19:23    
  11. Lines: 40
  12.  
  13.  
  14. In article <BURLEY.92Jul24125501@geech.gnu.ai.mit.edu>, 
  15. burley@geech.gnu.ai.mit.edu (Craig Burley) writes...
  16. >In article <1992Jul23.215113.16531@jhunix.hcf.jhu.edu> 
  17. > psun@jhunix.hcf.jhu.edu (Peter Sun) writes:
  18. > 
  19. >   My apologies if this questions seems trivial, but I've tried to find the
  20. >   answer in so many places.  I need to know how to give a variable as the
  21. >   number of repeat counts to a format field descriptor statement.  For
  22. >   example I know on VAX/VMS this can be done with something like:
  23. > 
  24. >              write (*, '(<n>(I8))')
  25. > 
  26. > 
  27. >What you show is nonstandard and probably doesn't work on VAX/VMS either.
  28.  
  29. If you ignore the variable format expression (the <n> construct), this IS
  30. standard FORTRAN-77, and certainly does work on VMS.  The relevant portion
  31. of the standard is page 12-8, lines 17-22, which say that a "format identifier"
  32. may be:
  33.  
  34.     (4) Any character expression except a character expression
  35.         involving concatenation of an operand whose length 
  36.         specification is an asterisk in parentheses unless the
  37.         operand is the symbolic name of a constant.  Note that
  38.         a character constant is permitted.
  39.  
  40. Craig then goes on to give a very accurate description of how VAX FORTRAN
  41. deals with formats and variable format expressions.  VAX FORTRAN does allow
  42. arbitrary expressions in the VFE, including formal arguments and external
  43. function calls.  A compiler dealing with VFEs needs to be aware of
  44. what variables are used inside VFEs when considering optimizations.  It gets
  45. even more fun when the variables used in the VFE aren't at static addresses
  46. (one solution is to pass a context pointer into the Run-Time Library).
  47.  
  48. Steve Lionel                    lionel@quark.enet.dec.com
  49. SDT Languages Group
  50. Digital Equipment Corporation
  51. 110 Spit Brook Road
  52. Nashua, NH 03062
  53.