Intel® Fortran Compiler Classic and Intel® Fortran Compiler Developer Guide and Reference

ID 767251
Date 3/22/2024
Public

A newer version of this document is available. Customers should click here to go to the newest version.

Document Table of Contents

FOR_IFPORT_VERSION

Portability Function: Returns the version of the Fortran portability library (ifport).

Module

USE IFPORT

result = FOR_IFPORT_VERSION (string)

string

(Output) Character*(*). The version information for the Fortran portability library (ifport).

Results

The result type is INTEGER(4). The result is non-zero if successful; otherwise, zero.

If string is not long enough to contain the version information, the result is truncated on the right. If string is longer than the version information, the result is blank-padded on the right. The result may contain multiple blank or ASCII tab characters.

Example

Consider the following:

program what_ifport
    use ifport
    integer       :: res
    character*56  :: str

    res = for_ifport_version( str )
    print ("(3A)"), "'", str, "'"

end program what_ifport

The above example will produce a result similar to the following, depending on spacing and the actual version information:

'Intel Fortran portability library      Vvv.m-eee       Mmm dd yyyy '

where:

vv

Is a major version number

m

Is a minor version number

eee

Is an edit number

Mmm

Is a three-character abbreviation for the month

dd

Is a two-digit day of the month

yyyy

Is a four-digit year