g77 question.

[Fabio De Colle]

Hi!,

I compile this small code with g77 (gcc-3.4) --> no error. But when I
run the code I have a
"Segmentation fault".
Please someone can tell me where is the error?
Please note: commenting the call to the subroutine s2 --> no
segmentation fault!
Cheers

Fabio



      program test
      parameter(n=3000000)
      call s1(n)
      stop
      end

      subroutine s1(n)
      integer m1(n)
      call s2
      return
      end

      subroutine s2
      return
      end