FIX: F1001: ctypes.c, Line 448, Extra Parentheses in CALL Stmt (51507)


The information in this article applies to:

  • Microsoft FORTRAN Compiler for MS-DOS 4.0
  • Microsoft FORTRAN Compiler for MS-DOS 4.01
  • Microsoft FORTRAN Compiler for MS-DOS 4.1
  • Microsoft FORTRAN Compiler for MS-DOS 5.0
  • Microsoft FORTRAN compiler for OS/2 4.1
  • Microsoft FORTRAN compiler for OS/2 5.0
This article was previously published under Q51507

SYMPTOMS

An attempt to compile an application fails and the compiler generates one of the following messages. For FORTRAN version 5.0:
fatal error F1001: Internal Compiler Error
(compiler file '@(#)ctypes.c:1.11', line 448)
For version 4.1:
fatal error F1001: Internal Compiler Error
(compiler file '@(#)ctypes.c:1.89', line 428)
For version 4.01:
fatal error F1001: Internal Compiler Error
(compiler file '@(#)ctypes.c:1.88', line 428)
For version 4.0:
fatal error F1001: Internal Compiler Error
(compiler file '@(#)ctypes.c:1.80', line 426)
If the compiler command line includes the /Fs compiler option switch, the compiler may generate a protection violation in OS/2, or the system may hang and stop responding in MS-DOS.

CAUSE

The application contains a CALL statement that contains an additional set of parentheses.

RESOLUTION

To address this problem, modify the source code to remove the additional parentheses from the CALL statement parameter.

STATUS

Microsoft has confirmed this to be a problem in FORTRAN versions 4.0, 4.01, 4.1, and 5.0 for MS-DOS and versions 4.1 and 5.0 for OS/2. This problem was corrected in FORTRAN version 5.1 for MS-DOS and OS/2.

MORE INFORMATION

The following code example demonstrates this problem.

Sample Code

C Compile options needed: None

      CHARACTER*3 A
      A = 'A'
      CALL X((A))
      END
Modification Type:MajorLast Reviewed:12/1/2003
Keywords:kbfix KB51507
©2003 Microsoft Corporation. All rights reserved.