Microsoft KB Archive/130471

= PRB: EXTERN Attribute Prevents F4999 on Unreferenced Function =

Article ID: 130471

Article Last Modified on 12/1/2003

-

APPLIES TO


 * Microsoft FORTRAN Compiler 5.1
 * Microsoft FORTRAN PowerStation 1.0 Standard Edition
 * Microsoft Fortran PowerStation 1.0a for MS-DOS
 * Microsoft FORTRAN PowerStation 32
 * Microsoft FORTRAN PowerStation 32

-



This article was previously published under Q130471



SYMPTOMS
A function that is defined using the INTERFACE TO statement and that includes the return type declaration but that is not called from within a program causes the compiler to generate this warning message:

warning F4999: : variable declared but not used

Or for Fortran PowerStation 4.0:

warning FOR4270: unused symbol



CAUSE
The compiler is correct to report that is not being used. This problem usually occurs when using a library of functions or subroutines. The library needs to have INTERFACE TO statements and function declarations for all routines in the library. An application may not need to call every function contained in the library. Any functions that are defined but not called result in the warning.



RESOLUTION
When declaring a function, use the EXTERN attribute as in the following code sample.

Sample Code
C INTERFACE TO usually in .FI      INTERFACE TO INTEGER*4 FUNCTION Func(I) INTEGER*4 I [VALUE] END

C Declaration usually in .FD (remove [EXTERN] to get the F4999) INTEGER*4 Func [EXTERN]

C Start of program PRINT *, 'Hello' END

C Body of function possibly somewhere else INTEGER*4 FUNCTION Func(I) INTEGER*4 I [VALUE] Func = I + 7 END



STATUS
This behavior is by design.

Additional query words: 5.00 5.10 1.00 1.00a 4.00

Keywords: kblangfortran kbcode KB130471

-

[mailto:TECHNET@MICROSOFT.COM Send feedback to Microsoft]

© Microsoft Corporation. All rights reserved.