Assumed-Sized Array Declarator Not Allowed in COMMON

ID: Q37544

4.00 4.01 4.10 5.00 5.10 1.00 1.00a | 4.10 5.00 5.10 | 1.00 4.00

MS-DOS                              | OS/2           | WINDOWS NT

The information in this article applies to:

Microsoft FORTRAN for MS-DOS, versions 4.0, 4.01, 4.1, 5.0, and 5.1
Microsoft FORTRAN for OS/2, versions 4.1, 5.0, 5.1
Microsoft FORTRAN PowerStation for MS-DOS, versions 1.0 and 1.0a
Microsoft FORTRAN PowerStation 32 for Windows NT, version 1.0 and 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 reference words: kbinf 1.00 4.00 4.10 5.00 5.10 assumed-size KBCategory: KBSubcategory: FORTLngIss

Keywords          : kbcode kbFortranPS kbLangFortran 
Version           : 4.00 4.01 4.10 5.00 5.10 1.00 1.
Platform          : MS-DOS NT OS/2 WINDOWS

Last Reviewed: May 23, 1998