declarations in MIPSpro f90 7.3 and 7.4

From: tomekj (member45662_at_dbforums.com)
Date: 10/25/03 

Date: Sat, 25 Oct 2003 05:34:03 -0400

Hello Everybody -

Can someone tell me what is wrong with the following code:

PROGRAM typetest

  IMPLICIT NONE

  TYPE Atype

     INTEGER, DIMENSION(:), POINTER :: pn

  END TYPE Atype

  TYPE Btype

     TYPE (Atype), DIMENSION(2) :: aa

  END TYPE Btype

  TYPE (Btype) :: b1, b2, b3, b4, b5, b6, b7, b8, b9, b10, &

       b11, b12, b13, b14, b15, b16, b17, b18, b19, b20

END PROGRAM typetest

This compiles with SGI's MIPSpro f90 7.3, but the execution may take

arbitrarily long - depending on how many objects of type Btype I
declare.

This phenomenon does not occur with the version 7.4 of the compiler.

Thanks for comments and any elucidation -

Thomas 

--
Posted via http://dbforums.com