[J3] Revision of "inquiry function" definition is needed

Steven G. Kargl kargl at troutmask.apl.washington.edu
Fri Nov 22 13:50:27 EST 2019


The document I have is 18-007r1.pdf.

On page 3, 

  3 Terms and definitions

  For the purposes of this document, the following terms and
  definitions apply.

On page 12,

  3.89
  inquiry function
  intrinsic function, or function in an intrinsic module, whose result
  depends on the properties of one or more of its arguments instead of
  their values

John Harper on comp.lang.fortran has pointed out that the above
definition needs to be updated/modified.  Consider,

   USE IEEE_ARITHMETIC
   PRINT *, IEEE_SUPPORT_DENORMAL()
   END

IEEE_SUPPORT_DENORMAL is a "function in an intrinsic module" and
17.11.49 (page 460) indicates "Class. Inquiry function".  In the 
above valid Fortran code, the inquiry function has no arguments,
so does it have a result?

-- 
Steve


More information about the J3 mailing list