Use of @ and $ characters in names

It is often useful to be able to name a subroutine or common block in such a way that it will not clash with names chosen by everyday use of the compiler. FTN95 allows the @ and $ characters as any non-initial character of a Fortran name.

Example:

      SUBROUTINE PRINT$(I)
      COMMON/COM@/A,B,C(100)
      EXTERNAL F1@,F2@
      INTEGER F1@
      . . .
      CALL MY_SUB(F1@)
      . . .

No guarantee can be given that use of a name containing an @ character will not cause unpredictable results as a result of a clash with an FTN95 library name or other reserved name. However, no system name contains a $ character.

 

 

Basket
Empty
 
Copyright © 1999-2024 Silverfrost Limited