Thank you again, Jens. I got executables to work (have not checked all yet);
however, I
had to declare the variable "time_tag_flag" in a couple of functions of the
"seed.for"
file to get the "make all" to run through.

Hans

On Sun, Mar 13, 2011 at 8:43 PM, Jens Havskov <[email protected]>wrote:

> hans
> wonder if you soemhow still have the old seed.for, since the line number
> for error does not corresond to the line number of the current file. please
> try attached file.
> jens
>
>
> On Sun, 13 Mar 2011, Hans Israelsson wrote:
>
>  Thank you for the suggestion, Jens. I still get compilation error for a
>> function in seed.for, like so(adding "-fno-align-commons" removes
>>  warnings
>> for common blocks) :
>>
>> $ gfortran -m64 -g -c -I../INC -fdollar-ok -fno-range-check -fno-automatic
>> -fno-align-commons seed.for
>> seed.for: In function ?summarize_sequential?:
>> seed.for:565:0: error: non-trivial conversion in unary operation
>> logical(kind=4)
>> logical(kind=1)
>> D.3651 = !D.3650;
>>
>> seed.for:565:0: internal compiler error: verify_gimple failed
>> Please submit a full bug report,
>> with preprocessed source if appropriate.
>> See <http://gcc.gnu.org/bugs.html> for instructions.
>>
>>
>> Cheers,
>>
>> Hans
>>
>>
>> On Sun, Mar 13, 2011 at 8:26 AM, Jens Havskov <[email protected]>
>> wrote:
>>      hans
>>
>>      we recently have had problems compiling seed.for with newer
>>      versions of gfortran. please try seisan 9.0, we have a
>>      preliminary versoion available
>>      now.
>>
>>      jens
>>
>>
>> On Sat, 12 Mar 2011, Hans Israelsson wrote:
>>
>>      Attempting to compile 8.3 on a Mac (OSX 10.5.8) I get a
>>      number of error. Any
>>      suggestions out there?
>>      Cheers,
>>
>>      Hans Israelssons
>>
>>
>> ---------------------------------------------------------------------------
>>
>>      --------------------------------------------------------
>>      bash-3.2$ make all
>>      cd ../LIB; make all; cd ../PRO
>>      -------------------------------------------------
>>      ---- COMPILING SEISAN 8 LIBRARIES ----------------
>>      -------------------------------------------------
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      comp_linux.o comp_linux.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      abstim.o abstim.for gfortran -m64 -g -c -I../INC
>>      -fdollar-ok -fno-automatic -fno-range-check -o
>>      auto_tr.o auto_tr.for gfortran -m64 -g -c -I../INC
>>      -fdollar-ok -fno-automatic -fno-range-check -o
>>      auto_amp.o auto_amp.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      autocoda.o autocoda.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      autofil.o autofil.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      azibazi.o azibazi.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      bcd.o bcd.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      bndpas.o bndpas.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      check_s.o check_s.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      compdecomp.o compdecomp.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      codecoutil.o codecoutil.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      comp_unix.o comp_unix.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      componen.o componen.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      conv_def.o conv_def.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      fft.o fft.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      eev_sub.o eev_sub.for
>>      eev_sub.for:1690.5:
>>
>>       4724       continue
>>           1
>>      eev_sub.for:1508.72:
>>
>>               if (code .ne. e_ok$) go to 4724
>>
>>                   2
>>      Warning: Label at (1) is not in the same block as the GOTO
>>      statement at (2)
>>      eev_sub.for:1690.5:
>>
>>       4724       continue
>>           1
>>      eev_sub.for:1616.72:
>>
>>                 goto 4724
>>
>>                   2
>>      Warning: Label at (1) is not in the same block as the GOTO
>>      statement at (2)
>>      eev_sub.for:1690.5:
>>
>>       4724       continue
>>           1
>>      eev_sub.for:3850.72:
>>
>>               if (code .ne. e_ok$) go to 4724
>>
>>                   2
>>      Warning: Label at (1) is not in the same block as the GOTO
>>      statement at (2)
>>      eev_sub.for:4092.5:
>>
>>       3749    continue                              ! get to
>>      here from append
>>           1
>>      eev_sub.for:4576.72:
>>
>>            if(choise.eq.'y'.or.choise.eq.'Y') goto 3749   !
>>      goto delete
>>
>>                   2
>>      Warning: Label at (1) is not in the same block as the GOTO
>>      statement at (2)
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      err_ellipse.o err_ellipse.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      filename.o filename.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      findchan.o findchan.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      findevin.o findevin.for
>>      findevin.for:461.5:
>>
>>       7365    continue     ! to here from section of
>>      positioning (goto 1)
>>           1
>>      findevin.for:653.72:
>>
>>                  goto 7365                  ! check if next
>>      month has data in
>>
>>                   2
>>      Warning: Label at (1) is not in the same block as the GOTO
>>      statement at (2)
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      focmec_exe_sub.o focmec_exe_sub.for
>>      focmec_exe_sub.for:376.7:
>>
>>           .   '  MRT =',F5.2,'  MRP =',F5.2,'  MTP =',F5.2)
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1022.7:
>>
>>           2   'NumPol',T52,'DenTOAng',T62,'Comment')
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1025.7:
>>
>>           .   A1,T53,F6.2,T60,A)
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1027.7:
>>
>>           .   I4,' ratios')
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1034.7:
>>
>>           2     F5.2,'    VP/VS =',F6.3)
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1038.7:
>>
>>           3   ' for the angle of the A axis are ',3F8.2)
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1041.7:
>>
>>           .   T50,'Rat Err',T59,'RMS RErr',T70,'RErr (All)')
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1044.7:
>>
>>           .   ' (weighted) errors  Threshold =',F5.2)
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1046.7:
>>
>>           .   '  errors')
>>             1
>>      Warning: Extension: Tab character in format at (1)
>>      focmec_exe_sub.for:1569.8:
>>
>>           .  '  Half Range is ',G10.3)
>>              1
>>      Warning: Extension: Tab character in format at (1)
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      ga_lib.o ga_lib.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      get_baz.o get_baz.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      gmt.o gmt.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      gse_io.o gse_io.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      gserespl.o gserespl.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      gsesei_lib.o gsesei_lib.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      hypoloc.o hypoloc.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      hypoloc1.o hypoloc1.for
>>      hypoloc1.for:2258.72:
>>
>>           *'bad arguments in plgndr'
>>
>>                   1
>>      Warning: Deleted feature: PAUSE statement at (1)
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      hyposub1.o hyposub1.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      hyposub2.o hyposub2.for
>>      hyposub2.for:1542.72:
>>
>>            if(x.lt.0..or.x.gt.1.)pause 'bad argument x in
>>      betai'
>>
>>                   1
>>      Warning: Deleted feature: PAUSE statement at (1)
>>      hyposub2.for:1618.72:
>>
>>            pause 'a or b too big, or MAXIT too small in betacf'
>>
>>                   1
>>      Warning: Deleted feature: PAUSE statement at (1)
>>      hyposub2.for:1657.72:
>>
>>            if(f*fmid.ge.0.) pause 'root must be bracketed in
>>      rtbis'
>>
>>                   1
>>      Warning: Deleted feature: PAUSE statement at (1)
>>      hyposub2.for:1672.72:
>>
>>            pause 'too many bisections in rtbis'
>>
>>                   1
>>      Warning: Deleted feature: PAUSE statement at (1)
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      hyposub3.o hyposub3.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      hyposub4.o hyposub4.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      hyposub6.o hyposub6.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      hypo71sub.o hypo71sub.for
>>      hypo71sub.for:60.22:
>>
>>
>>       common/readings/NSTAT,NPHASE,NHEAD,NRECORD,TYP,EXP,DATA,ID
>>                            1
>>      Warning: Padding of 2 bytes required before 'id' in COMMON
>>      'readings' at
>>      (1); reorder elements or use -fno-align-commons
>>      hypo71sub.for:507.22:
>>
>>
>>       common/readings/NSTAT,NPHASE,NHEAD,NRECORD,TYP,EXP,DATA,ID
>>                            1
>>      Warning: Padding of 2 bytes required before 'id' in COMMON
>>      'readings' at
>>      (1); reorder elements or use -fno-align-commons
>>      hypo71sub.for:1005.72:
>>
>>           *        line2(38:44)
>>
>>                   1
>>      Warning: $ should be the last specifier in format at (1)
>>      hypo71sub.for:1008.72:
>>
>>               write(2,'(''Depth       : '',a$,'' kms'')')
>>      line2(38:44)
>>
>>                   1
>>      Warning: $ should be the last specifier in format at (1)
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      make_hypoc_brief.o make_hypoc_brief.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      iscloc_wrap.o iscloc_wrap.for
>>      gcc -m64 -g -c -I../INC -I/usr/X11R6/include -o iscloc.o
>>      iscloc.c
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      inc_id.o inc_id.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      indata.o indata.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      isf_isc.o isf_isc.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      isfnor_lib.o isfnor_lib.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      libsei.o libsei.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      lsqlin.o lsqlin.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      lgstr.o lgstr.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      maglib.o maglib.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      maxlik.o maxlik.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      mb_att.o mb_att.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      merge_f.o merge_f.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      mfhead.o mfhead.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      mul_spec.o mul_spec.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      nortype.o nortype.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      picsub.o picsub.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      polos.o polos.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      quarrycheck.o quarrycheck.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      recfil.o recfil.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      rea.o rea.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      rea2.o rea2.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      removedc.o removedc.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      sei_mes.o sei_mes.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      seiplot.o seiplot.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      seisinc.o seisinc.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      sfilname.o sfilname.for
>>      gfortran -m64 -g -c -I../INC -fdollar-ok -fno-automatic
>>      -fno-range-check -o
>>      seed.o -fno-range-check seed.for
>>      seed.inc.f:88.32:
>>          Included at seed.for:60:
>>
>>            common / section_summary / seed_blk_time,
>>      seed_blk_index,
>>                                      1
>>      Warning: Padding of 4 bytes required before
>>      'seed_chan_time' in COMMON
>>      'section_summary' at (1); reorder elements or use
>>      -fno-align-commons
>>      seed.inc.f:88.32:
>>          Included at seed.for:209:
>>
>>            common / section_summary / seed_blk_time,
>>      seed_blk_index,
>>                                      1
>>      Warning: Padding of 4 bytes required before
>>      'seed_chan_time' in COMMON
>>      'section_summary' at (1); reorder elements or use
>>      -fno-align-commons
>>      seed.inc.f:88.32:
>>          Included at seed.for:345:
>>
>>            common / section_summary / seed_blk_time,
>>      seed_blk_index,
>>                                      1
>>      Warning: Padding of 4 bytes required before
>>      'seed_chan_time' in COMMON
>>      'section_summary' at (1); reorder elements or use
>>      -fno-align-commons
>>      seed.inc.f:88.32:
>>          Included at seed.for:500:
>>
>>            common / section_summary / seed_blk_time,
>>      seed_blk_index,
>>                                      1
>>      Warning: Padding of 4 bytes required before
>>      'seed_chan_time' in COMMON
>>      'section_summary' at (1); reorder elements or use
>>      -fno-align-commons
>>      seed.inc.f:88.32:
>>          Included at seed.for:542:
>>
>>            common / section_summary / seed_blk_time,
>>      seed_blk_index,
>>                                      1
>>      Warning: Padding of 4 bytes required before
>>      'seed_chan_time' in COMMON
>>      'section_summary' at (1); reorder elements or use
>>      -fno-align-commons
>>      seed.inc.f:88.32:
>>          Included at seed.for:569:
>>
>>            common / section_summary / seed_blk_time,
>>      seed_blk_index,
>>                                      1
>>      Warning: Padding of 4 bytes required before
>>      'seed_chan_time' in COMMON
>>      'section_summary' at (1); reorder elements or use
>>      -fno-align-commons
>>      seed.for: In function ?summarize_sequential?:
>>      seed.for:565:0: error: non-trivial conversion in unary
>>      operation
>>      logical(kind=4)
>>      logical(kind=1)
>>      D.3651 = !D.3650;
>>
>>      seed.for:565:0: internal compiler error: verify_gimple
>>      failed
>>      Please submit a full bug report,
>>      with preprocessed source if appropriate.
>>      See <http://gcc.gnu.org/bugs.html> for instructions.
>>      make[1]: *** [seed.o] Error 1
>>      --------------------------------------------------
>>      ---- COMPILING SEISAN 8 PROGRAMS -----------------
>>      --------------------------------------------------
>>      make: Circular auto <- auto dependency dropped.
>>
>>
>>
>>
>>
>>
>>
>>


-- 
==================

Hans Israelsson
SeismicInfra Research
2716 27th Street NW
Washington DC 20008
USA
===================
_______________________________________________
seisan mailing list
[email protected]
http://mailman.uib.no/listinfo/seisan

Reply via email to