------- Comment #1 from fxcoudert at gcc dot gnu dot org  2005-11-26 18:54 -------
## gfortran ##
foo.f90: In function ‘s1’:
foo.f90:2: internal compiler error: Segmentation fault

## g95 ##
In file foo.f90:5

  write(6,*) PRODUCT(A,B)
                        1
Error: 'mask' argument of 'product' intrinsic at (1) must be conformable with
ARRAY parameter

## Intel ##
fortcom: Error: foo.f90, line 5: The shapes of the arguments do not conform.  
[PRODUCT]
  write(6,*) PRODUCT(A,B)
-----------------------^
fortcom: Warning: foo.f90, line 2: This name has not been given an explicit
type.   [N]
SUBROUTINE S1(N)
--------------^
fortcom: Info: foo.f90, line 2: This variable has not been used.   [N]
SUBROUTINE S1(N)
--------------^
compilation aborted for foo.f90 (code 1)
## Sun ##

  write(6,*) PRODUCT(A,B)
             ^
"foo.f90", Line = 5, Column = 14: ERROR: No specific intrinsic exists for the
intrinsic call "PRODUCT".


-- 

fxcoudert at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
             Status|UNCONFIRMED                 |NEW
     Ever Confirmed|0                           |1
           Keywords|                            |ice-on-invalid-code
   Last reconfirmed|0000-00-00 00:00:00         |2005-11-26 18:54:32
               date|                            |
            Summary|better diagnostic needed    |MASK and ARRAY arguments of
                   |                            |PRODUCT must have conformant
                   |                            |shapes


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=25046