bug: segmentation fault

--f+W+jCU1fRNres8c
Content-Type: text/plain; charset=us-ascii
Content-Disposition: inline

Hi,

I just tried out the latest binary version of g95.
I get a segmentation fault:

-----------------------------------------
tst.f:0: internal compiler error: Segmentation fault
Please submit a full bug report,
with preprocessed source if appropriate to
[email protected]
----------------------------------------

the error disappears, if I use
      integer nroots(8, 7)
instaed of
      integer nroots(8, maxmul)

   ...martin

--f+W+jCU1fRNres8c
Content-Type: text/plain; charset=us-ascii
Content-Disposition: attachment; filename="tst.f"

      subroutine vecswap1(syminfo)
      implicit NONE
      
      integer maxmul
      PARAMETER ( MAXMUL =   7)

      type syminfostruct
         integer nroots(8, maxmul)
c         integer nroots(8, 7)
      end type syminfostruct

      type(syminfostruct) syminfo

      return
      end

--f+W+jCU1fRNres8c--


-------------------------------------------------------
This SF.net email is sponsored by: The SF.net Donation Program.
Do you like what SourceForge.net is doing for the Open
Source Community?  Make a contribution, and help us add new
features and functionality. Click here: http://sourceforge.net/donate/