FIX: F1001:/P2/trees.c, Line 1165; Complex CALL, LEN_TRIM (73397)

The information in this article applies to:

Microsoft FORTRAN Compiler for MS-DOS 5.0
Microsoft FORTRAN Compiler for MS-DOS 5.1
Microsoft FORTRAN compiler for OS/2 5.0
Microsoft FORTRAN compiler for OS/2 5.1

This article was previously published under Q73397

SYMPTOMS

Compiling the sample code below causes the compiler to produce the fatal error:

F1001: Internal Compiler Error
(compiler file '../../../P2/trees.c', line 1165)

STATUS

Microsoft has confirmed this to be a bug in the products listed above. This problem was corrected in FORTRAN PowerStation, version 1.0.

MORE INFORMATION

The following sample code can be used to demonstrate the problem.

Sample code

C Compile options needed: /4Yb

      subroutine X (j,k)
      integer l(1,1),  j(5), n(5) /1,2,3,4,5/ 
      character*40  string(1,1)

        j = 1
        k = 1
        i = 1
        l(1,1) = 1
        m = 1
        string(1,1) = 'This is a test'
        call Y (
     +               n(l(i,k*1)),
     +               2,
     +               string(m,j(i)),
     +               0.0,
     +               len_trim(string(m,j(i))),
     +               1
     +              )

      end

Modification Type:	Major	Last Reviewed:	12/1/2003
Keywords:	kbfix KB73397