Assumed-Sized Array Declarator Not Allowed in COMMON

• Microsoft FORTRAN for MS-DOS, versions 4.0, 4.01, 4.1, 5.0, 5.1
• Microsoft FORTRAN for OS/2, versions 4.1, 5.0, 5.1
• Microsoft FORTRAN PowerStation for MS-DOS, versions 1.0, 1.0a
• Microsoft Fortran Powerstation 32 for Windows NT, versions 1.0, 4.0

SUMMARY

In a COMMON block, an array must be declared with explicit dimensions; it cannot have an adjustable or assumed size. According to the ANSI FORTRAN standard (ANSI x3.9-1978, section 5.1.2), each array declarator is either an actual array declarator or a dummy array declarator. An adjustable-size array declarator and an assumed-size array declarator are dummy array declarators. A dummy array declarator is not permitted in a COMMON statement. Therefore, an adjustable-sized or an assumed-size array cannot be declared in a COMMON block.

In an application, one subprogram can pass an array as an argument to a subprogram and declare the argument with a dummy array declarator in a DIMENSION statement.

Sample Code

C Compiler options required: If array R has HUGE size,
C specify the HUGE attribute on R or the /AH compiler option switch.

      PROGRAM TEST
      COMMON R(32000)
      CALL DOIT(R)
      END

      SUBROUTINE DOIT (R)
      DIMENSION R[HUGE](*)
      RETURN
      END 

Additional query words: kbinf 1.00 4.00 4.10 5.00 5.10 assumed-size

Keywords : kbcode kbFortranPS kbLangFortran
Version : :1.0,1.0a,4.0,4.01,4.1,5.0,5.1
Platform : MS-DOS NT OS/2 WINDOWS
Issue type :