Oops, I made mistake.
correct loop nesting is here:
do 45 iv = 1 , nv
do 451 kv = 1 , nvmx(iv)
naccim(midchan(iv,kv)) = 0
451 continue
45 continue
Best regards,
Hiroaki
----- Original Message -----
> Date: Tue, 4 Feb 2020 01:27:17 +0900 (JST)
> From: Hiroaki MORIMOTO <cqx05...@nifty.com>
> To: Werner Icking Music Archive <tex-music@tug.org>
> Subject: Re: [Tex-music] New PMX version
>
>
> Dear Don and all,
>
> in case of GCC-3.4.5 (very old but very stable, reliable and legacy FORTRAN77
> compiler)
>
> g77 -fno-backslash -Wuninitialized -O -fno-automatic pmx294.for
>
> will do. The meanings of options are:
> -fno-backslash : to cancel escape sequence to avoid error raised by string
> '\'; for example line 3972 in pmx294.for
> -fno-automatic : initialize local variables to zero at the startup of
> executable
> -Wuninitialized -O : warn uninitialized variables in function/subroutine
>
> But recent days it becomes harder to setup such old GCC system tree; it
> requires several techniques.
>
> I also have GCC-9.2.0 (Rev2, Built by MSYS2 project); it seems recent
> gfortran has dropped the support for programming styles older than Fortran95.
>
> For example this example (taken from line 16663 through 16666 in pmx294.for)
> is not acceptable:
>
> do 45 iv = 1 , nv
> do 45 kv = 1 , nvmx(iv)
> naccim(midchan(iv,kv)) = 0
> 45 continue
>
> This was valid in FORTRAN66 and FORTRAN77; still used in Fortran90 for
> compatibility but now became quite obsolete.
> It shall be rewritten as :
>
> do 45 iv = 1 , nv
> do 451 kv = 1 , nvmx(iv)
> naccim(midchan(iv,kv)) = 0
> 45 continue
> 451 continue
>
> (where 451 is just as temporary description; appropriate label number shall
> be set)
> (there seems to be a lot of similar codes which should be amended to comply
> recent FORTRAN style)
>
> f2c is also compliant with FORTRAN77 and it *cannot* be handle Fortran90 and
> newer; so it can be used to convert pmx???.for into C with success.
>
> Best regards,
>
> Hiroaki
>
>
> ----- Original Message -----
> > To: tex-music@tug.org
> > From: Luigi Cataldi <luica...@gmail.com>
> > Date: Mon, 3 Feb 2020 07:59:44 +0100
> > Subject: Re: [Tex-music] New PMX version
> >
> >
> > Dear Don,
> > in my Fedora 30 Linux I'm able to compile pmxab.for only with 'f2c'.
> > With the previous pmx version I had made several attempts with
> > 'gfortran' and 'g77' but all of them failed. As far as I know, however,
> > 'f2c' no longer exists in Ubuntu and this is a problem.
> >
> > On Fedora 30 I have used the following command:
> >
> > ??? 'f2c -g -\!bs < pmx294.for > pmxab.c'
> >
> > The compilation returned me only one warning message:
> >
> > ??? 'Warning on line 11244: local variable gotclef never used'
> >
> > There was no problem with compiling via 'gcc' with the command:
> >
> > ??? gcc pmxab.c -lf2c -lm -o pmxab
> >
> > It happens nearly the same with 'scor2prt':
> >
> > ??? f2c -g -\!bs < scor2prt.for > scor2prt.c
> >
> > ??? 'Warning on line 783: local variable dumq never used'
> >
> > As far as I could see, 'pmx294' works well.
> >
> > Best regards (and thanks for your wonderful program!)
> >
> > Luigi
> >
> > Il 03/02/20 05:48, Don Simons ha scritto:
> > >
> > > Since last Tuesday I’ve had some more interaction with Bob and
> > > Christian about other issues compiling version 2.94 of PMX. I think
> > > Bob’s are resolved without any further revisions, but I believe
> > > Christian is still unable to create a functioning executable using
> > > fort77 under Linux. I’d very much appreciate it if some more folks
> > > would download the zip, compile pmx294.for, and report back on what
> > > system and compiler you used and whether the resulting executable runs OK.
> > >
> > > Thanks,
> > >
> > > --Don Simons
> > >
> > > *From:* Don Simons [mailto:dsim...@roadrunner.com]
> > > *Sent:* Tuesday, January 28, 2020 8:19 PM
> > > *To:* 'Werner Icking Music Archive' <tex-music@tug.org>
> > > *Subject:* RE: New PMX version
> > >
> > > With help from Christian Mondrup and Bob Tennent I’ve addressed a few
> > > FORTRAN bugs, and reposted the entire zip file under the same name.
> > > FYI these were very subtle, not showing up with my gfortran compiler
> > > but they did occur with several other compilers that Christian and Bob
> > > used. Hopefully they’re now fixed. If you downloaded the older one
> > > from yesterday, to be safe please replace it with today’s version.
> > >
> > > Happy PMX’ing!
> > >
> > > --Don Simons
> > >
> > > *From:* Don Simons [mailto:dsim...@roadrunner.com]
> > > *Sent:* Monday, January 27, 2020 7:30 AM
> > > *To:* 'Werner Icking Music Archive' <tex-music@tug.org
> > > <mailto:tex-music@tug.org>>
> > > *Subject:* New PMX version
> > >
> > > I’ve just created a new full release of PMX (Version 2.94), and it’s
> > > available from the archive at
> > >
> > > https://icking-music-archive.org/software/htdocs/index.html .
> > >
> > > No major external changes, but I did a lot of internal tweaking on
> > > moving dots, focused on main and chordal notes in dotted 2-note
> > > tremolos. I’d appreciate any feedback in case I’ve introduced any
> > > bugs. Bob Tennent will soon be preparing it for submission to TeXLive
> > > to make it more easily available to platforms other than Windows.
> > >
> > > --Don Simons
> > >
> > >
> > > -------------------------------
> > > TeX-music@tug.org mailing list
> > > If you want to unsubscribe or look at the archives, go to
> > > https://tug.org/mailman/listinfo/tex-music
> >
> > ----- inline -----
> > -------------------------------
> > TeX-music@tug.org mailing list
> > If you want to unsubscribe or look at the archives, go to
> > https://tug.org/mailman/listinfo/tex-music
>
> -------------------------------
> TeX-music@tug.org mailing list
> If you want to unsubscribe or look at the archives, go to
> https://tug.org/mailman/listinfo/tex-music
-------------------------------
TeX-music@tug.org mailing list
If you want to unsubscribe or look at the archives, go to
https://tug.org/mailman/listinfo/tex-music
