[comp.emacs] FORTRAN mode "relabel" wanted

fritzz@lamont.ldgo.columbia.edu (fritz zaucker) (07/11/90)

I am looking for EMACS code, which does relabeling of FORTRAN source code,
means for example making

DO 1 I=1,10
  DO 2 J=1,100
    DO 3 K=1,10
...

3 CONTINUE
2 CONTINUE
1 CONTINUE


to

DO 100 I=1,100
  DO 200 J=1,100
    DO 300 K=1,10
...
300 CONTINUE
200 CONTINUE
100 CONTINUE

or so.

Fortran is a nice language, isn't it?


Thanks for any help

Fritz Zaucker

jywdna@iam.unibe.ch (Camillus Jayewardena) (07/17/90)

I do not have emacs code that does the relabeling of fortran code. But as I
was writing fortran programs some time ago I have written two shell
scripts (basically awk stuff) that do what you want. The first one relabels
the program so that the labels on "do" lines are in ascending order; The
second one relabels so that the labels on "continue" lines are in ascending
order. The second one is nicer but takes a longer time. If you are interested
please send me e-mail.
                           Camillus

Camillus Jayewardena <jywdna@iam.unibe.ch>