=> Bootstrap dependency digest>=20010302: found digest-20190127
WARNING: [license.mk] Every package should define a LICENSE.
===> Skipping vulnerability checks.
WARNING: No /opt/pkg/pkgdb/pkg-vulnerabilities file found.
WARNING: To fix run: `/opt/pkg/sbin/pkg_admin -K /opt/pkg/pkgdb fetch-pkg-vulnerabilities'.
===> Building for mopac-7.0nb1
cp /opt/work/biology/mopac/work/mopac7/esp.rof /opt/work/biology/mopac/work/mopac7/esp.f
rm -f /opt/work/biology/mopac/work/mopac7/Makefile
cp /opt/pkgsrc/biology/mopac/files/Makefile /opt/work/biology/mopac/work/mopac7
f77 -O2 -w -c aababc.f
f77 -O2 -w -c addfck.f
f77 -O2 -w -c addhcr.f
f77 -O2 -w -c addnuc.f
f77 -O2 -w -c analyt.f
f77 -O2 -w -c anavib.f
f77 -O2 -w -c axis.f
f77 -O2 -w -c block.f
addfck.f:
axis.f:
axis:
block.f:
BLOCK DATA:
aababc.f:
aababc:
addfck:
anavib.f:
anavib:
analyt.f:
analyt:
addnuc.f:
addnuc:
aabbcd:
addhcr.f:
addhcr:
aabacd:
babbbc:
babbcd:
diagi:
f77 -O2 -w -c bonds.f
f77 -O2 -w -c brlzon.f
f77 -O2 -w -c btoc.f
f77 -O2 -w -c calpar.f
f77 -O2 -w -c capcor.f
bonds.f:
bonds:
aababc.c:127:41: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
sum = sum + (xyijkl_1.xy[i__ + (j + (k + (k << 3) << 3) << 3) - 585]
~~^~~~~~~~~~ ~~
aababc.c:127:41: note: place parentheses around the '+' expression to silence this warning
sum = sum + (xyijkl_1.xy[i__ + (j + (k + (k << 3) << 3) << 3) - 585]
^
( )
aababc.c:127:36: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
sum = sum + (xyijkl_1.xy[i__ + (j + (k + (k << 3) << 3) << 3) - 585]
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:127:36: note: place parentheses around the '+' expression to silence this warning
sum = sum + (xyijkl_1.xy[i__ + (j + (k + (k << 3) << 3) << 3) - 585]
^
( )
aababc.c:128:31: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
- xyijkl_1.xy[i__ + (k + (j + (k << 3) << 3) << 3) - 585]) * (
~~^~~~~~~~~~ ~~
aababc.c:128:31: note: place parentheses around the '+' expression to silence this warning
- xyijkl_1.xy[i__ + (k + (j + (k << 3) << 3) << 3) - 585]) * (
^
( )
aababc.c:128:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
- xyijkl_1.xy[i__ + (k + (j + (k << 3) << 3) << 3) - 585]) * (
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:128:26: note: place parentheses around the '+' expression to silence this warning
- xyijkl_1.xy[i__ + (k + (j + (k << 3) << 3) << 3) - 585]) * (
^
( )
aababc.c:130:3: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
+ (k << 3) << 3) << 3) - 585] * (ioccb1[k] - baseoc_1.occa[k
^~~~~~~~~~ ~~
aababc.c:130:3: note: place parentheses around the '+' expression to silence this warning
+ (k << 3) << 3) << 3) - 585] * (ioccb1[k] - baseoc_1.occa[k
^
)
aababc.c:129:60: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
iocca1[k] - baseoc_1.occa[k - 1]) + xyijkl_1.xy[i__ + (j + (k
~~^~~~
aababc.c:129:60: note: place parentheses around the '+' expression to silence this warning
iocca1[k] - baseoc_1.occa[k - 1]) + xyijkl_1.xy[i__ + (j + (k
^
(
aababc.c:247:36: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xr = xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585];
~~^~~~~~~~~~ ~~
aababc.c:247:36: note: place parentheses around the '+' expression to silence this warning
xr = xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585];
^
( )
aababc.c:247:31: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xr = xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585];
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:247:31: note: place parentheses around the '+' expression to silence this warning
xr = xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585];
brlzon.f:
brlzon:
^
( )
aababc.c:388:37: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
sum = xyijkl_1.xy[i__ + (k + (j + (l << 3) << 3) << 3) - 585] -
~~^~~~~~~~~~ ~~
aababc.c:388:37: note: place parentheses around the '+' expression to silence this warning
sum = xyijkl_1.xy[i__ + (k + (j + (l << 3) << 3) << 3) - 585] -
^
( )
aababc.c:388:32: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
sum = xyijkl_1.xy[i__ + (k + (j + (l << 3) << 3) << 3) - 585] -
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:388:32: note: place parentheses around the '+' expression to silence this warning
sum = xyijkl_1.xy[i__ + (k + (j + (l << 3) << 3) << 3) - 585] -
^
( )
aababc.c:389:32: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (l + (k + (j << 3) << 3) << 3) - 585];
~~^~~~~~~~~~ ~~
aababc.c:389:32: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (l + (k + (j << 3) << 3) << 3) - 585];
^
( )
aababc.c:389:27: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (l + (k + (j << 3) << 3) << 3) - 585];
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:389:27: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (l + (k + (j << 3) << 3) << 3) - 585];
^
( )
aababc.c:480:41: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
sum = sum + (xyijkl_1.xy[i__ + (j + (k + (k << 3) << 3) << 3) - 585]
~~^~~~~~~~~~ ~~
aababc.c:480:41: note: place parentheses around the '+' expression to silence this warning
sum = sum + (xyijkl_1.xy[i__ + (j + (k + (k << 3) << 3) << 3) - 585]
^
( )
aababc.c:480:36: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
sum = sum + (xyijkl_1.xy[i__ + (j + (k + (k << 3) << 3) << 3) - 585]
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:480:36: note: place parentheses around the '+' expression to silence this warning
sum = sum + (xyijkl_1.xy[i__ + (j + (k + (k << 3) << 3) << 3) - 585]
^
( )
aababc.c:481:31: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
- xyijkl_1.xy[i__ + (k + (j + (k << 3) << 3) << 3) - 585]) * (
~~^~~~~~~~~~ ~~
aababc.c:481:31: note: place parentheses around the '+' expression to silence this warning
- xyijkl_1.xy[i__ + (k + (j + (k << 3) << 3) << 3) - 585]) * (
^
( )
aababc.c:481:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
- xyijkl_1.xy[i__ + (k + (j + (k << 3) << 3) << 3) - 585]) * (
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:481:26: note: place parentheses around the '+' expression to silence this warning
- xyijkl_1.xy[i__ + (k + (j + (k << 3) << 3) << 3) - 585]) * (
^
( )
aababc.c:483:3: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
+ (k << 3) << 3) << 3) - 585] * (iocca1[k] - baseoc_1.occa[k
^~~~~~~~~~ ~~
aababc.c:483:3: note: place parentheses around the '+' expression to silence this warning
+ (k << 3) << 3) << 3) - 585] * (iocca1[k] - baseoc_1.occa[k
^
)
aababc.c:482:60: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
ioccb1[k] - baseoc_1.occa[k - 1]) + xyijkl_1.xy[i__ + (j + (k
~~^~~~
aababc.c:482:60: note: place parentheses around the '+' expression to silence this warning
ioccb1[k] - baseoc_1.occa[k - 1]) + xyijkl_1.xy[i__ + (j + (k
^
(
aababc.c:595:42: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
ret_val = (xyijkl_1.xy[i__ + (k + (j + (l << 3) << 3) << 3) - 585] -
~~^~~~~~~~~~ ~~
aababc.c:595:42: note: place parentheses around the '+' expression to silence this warning
ret_val = (xyijkl_1.xy[i__ + (k + (j + (l << 3) << 3) << 3) - 585] -
^
( )
aababc.c:595:37: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
ret_val = (xyijkl_1.xy[i__ + (k + (j + (l << 3) << 3) << 3) - 585] -
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:595:37: note: place parentheses around the '+' expression to silence this warning
ret_val = (xyijkl_1.xy[i__ + (k + (j + (l << 3) << 3) << 3) - 585] -
^
( )
aababc.c:596:32: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (l + (j + (k << 3) << 3) << 3) - 585]) * one;
~~^~~~~~~~~~ ~~
aababc.c:596:32: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (l + (j + (k << 3) << 3) << 3) - 585]) * one;
^
( )
aababc.c:596:27: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (l + (j + (k << 3) << 3) << 3) - 585]) * one;
~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:596:27: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (l + (j + (k << 3) << 3) << 3) - 585]) * one;
^
( )
aababc.c:664:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
x += (xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] - xy[i__ + (
~~^~~~~~~~~~ ~~
aababc.c:664:28: note: place parentheses around the '+' expression to silence this warning
x += (xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] - xy[i__ + (
^
( )
aababc.c:664:23: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
x += (xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] - xy[i__ + (
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:664:23: note: place parentheses around the '+' expression to silence this war dopen:
ning
x += (xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] - xy[i__ + (
^
( )
aababc.c:665:13: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
j + (i__ + (j << 3) << 3) << 3)]) * ialpha[j] * .5 +
~~~~^~~~~~~~~~ ~~
aababc.c:665:13: note: place parentheses around the '+' expression to silence this warning
j + (i__ + (j << 3) << 3) << 3)]) * ialpha[j] * .5 +
^
( )
aababc.c:665:6: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
j + (i__ + (j << 3) << 3) << 3)]) * ialpha[j] * .5 +
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:665:6: note: place parentheses around the '+' expression to silence this warning
j + (i__ + (j << 3) << 3) << 3)]) * ialpha[j] * .5 +
^
( )
aababc.c:666:23: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] * ibeta[j];
~~^~~~~~~~~~ ~~
aababc.c:666:23: note: place parentheses around the '+' expression to silence this warning
xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] * ibeta[j];
^
( )
aababc.c:666:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] * ibeta[j];
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:666:18: note: place parentheses around the '+' expression to silence this warning
xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] * ibeta[j];
^
( )
aababc.c:679:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
x += (xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] - xy[i__ + (
~~^~~~~~~~~~ ~~
aababc.c:679:28: note: place parentheses around the '+' expression to silence this warning
x += (xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] - xy[i__ + (
^
( )
aababc.c:679:23: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
x += (xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] - xy[i__ + (
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:679:23: note: place parentheses around the '+' expression to silence this warning
x += (xy[i__ + (i__ + (j + (j << 3) << 3) << 3)] - xy[i__ + (
^
( )
aababc.c:680:13: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
j + (i__ + (j << 3) << 3) << 3)]) * ibeta[j];
~~~~^~~~~~~~~~ ~~
aababc.c:680:13: note: place parentheses around the '+' expression to silence this warning
j + (i__ + (j << 3) << 3) << 3)]) * ibeta[j];
^
( )
aababc.c:680:6: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
j + (i__ + (j << 3) << 3) << 3)]) * ibeta[j];
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
aababc.c:680:6: note: place parentheses around the '+' expression to silence this warning
j + (i__ + (j << 3) << 3) << 3)]) * ibeta[j];
^
( )
32 warnings generated.
btoc.f:
btoc:
f77 -O2 -w -c cdiag.f
anavib.c:319:62: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:319:62: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:322:60: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:322:60: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:337:62: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:337:62: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:340:60: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:340:60: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:352:62: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:352:62: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:355:60: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:355:60: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:367:62: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:367:62: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:370:60: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:370:60: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:380:62: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:380:62: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
anavib.c:383:60: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
anavib.c:383:60: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1
~~~~~~~~~~~~~~~~~~~~^~~
10 warnings generated.
capcor.f:
capcor:
f77 -O2 -w -c chrge.f
calpar.f:
calpar:
cdiag.f:
cdiag:
ea08c:
ea09c:
ec08c:
arg 2: here complex variable, previously real variable.
arg 4: here complex variable, previously real variable.
arg 7: here complex variable, previously real variable.
fm06as:
fm06bs:
me08a:
chrge.f:
chrge:
me08b:
sort:
f77 -O2 -w -c cnvg.f
f77 -O2 -w -c compfg.f
f77 -O2 -w -c consts.f
f77 -O2 -w -c cqden.f
compfg.f:
compfg:
cnvg.f:
cnvg:
f77 -O2 -w -c datin.f
f77 -O2 -w -c dcart.f
consts.f:
consts:
f77 -O2 -w -c delmol.f
cqden.f:
cqden:
datin.f:
datin:
delmol.f:
delmol:
f77 -O2 -w -c delri.f
dcart.f:
dcart:
dhc:
f77 -O2 -w -c denrot.f
f77 -O2 -w -c densit.f
delri.f:
delri:
denrot.f:
denrot:
densit.f:
densit:
datin.c:250:37: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__2[1] = 2, a__1[1] = elemnt + (j - 1 << 1);
~~^~~ ~~
datin.c:250:37: note: place parentheses around the '-' expression to silence this warning
i__2[1] = 2, a__1[1] = elemnt + (j - 1 << 1);
^
( )
datin.c:269:37: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__1 = i_indx(text, elemnt + (j - 1 << 1), (ftnlen)50, (ftnlen)2);
~~^~~ ~~
datin.c:269:37: note: place parentheses around the '-' expression to silence this warning
i__1 = i_indx(text, elemnt + (j - 1 << 1), (ftnlen)50, (ftnlen)2);
^
( )
datin.c:321:38: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemnt + (ielmnt - 1 << 1), (ftnlen)2);
~~~~~~~^~~ ~~
datin.c:321:38: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemnt + (ielmnt - 1 << 1), (ftnlen)2);
^
( )
datin.c:331:38: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemnt + (ielmnt - 1 << 1), (ftnlen)2);
~~~~~~~^~~ ~~
datin.c:331:38: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemnt + (ielmnt - 1 << 1), (ftnlen)2);
^
( )
4 warnings generated.
f77 -O2 -w -c depvar.f
f77 -O2 -w -c deri0.f
depvar.f:
depvar:
f77 -O2 -w -c deri1.f
f77 -O2 -w -c deri2.f
deri0.f:
deri0:
f77 -O2 -w -c deri21.f
deri1.f:
deri1:
dhcore:
deri2.f:
deri2:
f77 -O2 -w -c deri22.f
deri21.f:
deri21:
denrot.c:170:25: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j1 - 1 << 1), elemts_1.elemnt + (molkst_1.nat[i__
~~~^~~ ~~
denrot.c:170:25: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j1 - 1 << 1), elemts_1.elemnt + (molkst_1.nat[i__
^
( )
denrot.c:171:12: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
- 1] - 1 << 1), (ftnlen)2, (ftnlen)2);
~~~~~^~~ ~~
denrot.c:171:12: note: place parentheses around the '-' expression to silence this warning
- 1] - 1 << 1), (ftnlen)2, (ftnlen)2);
~~~~~^~~
denrot.c:346:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
denrot.c:346:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
^
( )
denrot.c:378:31: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, jtext + (n - 1 << 1), (ftnlen)2);
~~^~~ ~~
denrot.c:378:31: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, jtext + (n - 1 << 1), (ftnlen)2);
^
( )
denrot.c:393:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
denrot.c:393:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
^
( )
5 warnings generated.
f77 -O2 -w -c deri23.f
f77 -O2 -w -c deritr.f
deri22.f:
deri22:
f77 -O2 -w -c deriv.f
f77 -O2 -w -c dernvo.f
deri23.f:
deri23:
deritr.f:
deritr:
f77 -O2 -w -c ders.f
dernvo.f:
dernvo:
deri2.c:605:9: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
+ (l << 3) << 3) << 3) - 585], (ftnlen)
^~~~~~~~~~ ~~
deri2.c:605:9: note: place parentheses around the '+' expression to silence this warning
+ (l << 3) << 3) << 3) - 585], (ftnlen)
^
)
deri2.c:604:52: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, (char *)&xyijkl_1.xy[i__ + (j + (k
~~^~~~
deri2.c:604:52: note: place parentheses around the '+' expression to silence this warning
do_fio(&c__1, (char *)&xyijkl_1.xy[i__ + (j + (k
^
(
2 warnings generated.
deriv.f:
deriv:
ders.f:
ders:
f77 -O2 -w -c dfock2.f
deri1.c:418:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] *=
~~^~~~~~~~~~ ~~
deri1.c:418:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] *=
^
( )
deri1.c:418:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] *=
~~^~~~~~~~~~~~~~~~~~~~~ ~~
deri1.c:418:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] *=
^
( )
deri1.c:485:53: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, (char *)&xyijkl_1.xy[i__ + (j + (k + (l
~~^~~~
deri1.c:485:53: note: place parentheses around the '+' expression to silence this warning
do_fio(&c__1, (char *)&xyijkl_1.xy[i__ + (j + (k + (l
^
(
deri1.c:485:48: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, (char *)&xyijkl_1.xy[i__ + (j + (k + (l
~~^~~~~~~~~
deri1.c:485:48: note: place parentheses around the '+' expression to silence this warning
do_fio(&c__1, (char *)&xyijkl_1.xy[i__ + (j + (k + (l
^
(
4 warnings generated.
f77 -O2 -w -c dfpsav.f
dfock2.f:
dfock2:
f77 -O2 -w -c dgemm.f
f77 -O2 -w -c dgemv.f
f77 -O2 -w -c dger.f
f77 -O2 -w -c dgetf2.f
dgemm.f:
dgemm:
dfpsav.f:
dfpsav:
f77 -O2 -w -c dgetrf.f
dger.f:
dger:
dgemv.f:
dgemv:
dgetf2.f:
dgetf2:
dgetrf.f:
dgetrf:
f77 -O2 -w -c dgetri.f
f77 -O2 -w -c diag.f
f77 -O2 -w -c diat.f
f77 -O2 -w -c diat2.f
dgetri.f:
dgetri:
f77 -O2 -w -c diegrd.f
f77 -O2 -w -c dielen.f
diag.f:
diag:
f77 -O2 -w -c diis.f
diat.f:
diat:
ss:
coe:
dfock2.c:176:11: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i1 = i__ - 1 << 2;
~~~~^~~ ~~
dfock2.c:176:11: note: place parentheses around the '-' expression to silence this warning
i1 = i__ - 1 << 2;
^
( )
dfock2.c:183:25: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
llperm[l - 1] = i1 - 1 << 4;
~~~^~~ ~~
dfock2.c:183:25: note: place parentheses around the '-' expression to silence this warning
llperm[l - 1] = i1 - 1 << 4;
^
( )
2 warnings generated.
bfn:
diat2.f:
diat2:
dielen.f:
dielen:
f77 -O2 -w -c dijkl1.f
set:
aintgs:
bintgs:
diegrd.f:
diegrd:
diis.f:
diis:
space:
minv:
f77 -O2 -w -c dijkl2.f
f77 -O2 -w -c dipind.f
dijkl1.f:
dijkl1:
f77 -O2 -w -c dipole.f
dijkl2.f:
dijkl2:
dipind.f:
dipind:
f77 -O2 -w -c dlaswp.f
dipole.f:
dipole:
f77 -O2 -w -c dofs.f
diat2.c:87:32: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__1 = inmb[(0 + (0 + (*na - 1 << 2))) / 4], i__2 = inmb[(0 + (0 + (*nb -
~~~~^~~ ~~
diat2.c:87:32: note: place parentheses around the '-' expression to silence this warning
i__1 = inmb[(0 + (0 + (*na - 1 << 2))) / 4], i__2 = inmb[(0 + (0 + (*nb -
^
( )
diat2.c:87:77: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__1 = inmb[(0 + (0 + (*na - 1 << 2))) / 4], i__2 = inmb[(0 + (0 + (*nb -
~~~~^
diat2.c:87:77: note: place parentheses around the '-' expression to silence this warning
i__1 = inmb[(0 + (0 + (*na - 1 << 2))) / 4], i__2 = inmb[(0 + (0 + (*nb -
^
(
2 warnings generated.
f77 -O2 -w -c dot.f
dlaswp.f:
dlaswp:
f77 -O2 -w -c drc.f
dijkl1.c:214:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~ ~~
dijkl1.c:214:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:214:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~ ~~
dijkl1.c:214:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:216:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (l + (k << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~ ~~
dijkl1.c:216:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (l + (k << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:216:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (l + (k << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~ ~~
dijkl1.c:216:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (l + (k << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:218:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[j + (i__ + (k + (l << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~ ~~
dijkl1.c:218:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[j + (i__ + (k + (l << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:218:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[j + (i__ + (k + (l << 3) << 3) << 3) - 585] =
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
dijkl1.c:218:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[j + (i__ + (k + (l << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:220:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[j + (i__ + (l + (k << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~ ~~
dijkl1.c:220:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[j + (i__ + (l + (k << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:220:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[j + (i__ + (l + (k << 3) << 3) << 3) - 585] =
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
dijkl1.c:220:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[j + (i__ + (l + (k << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:222:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[k + (l + (i__ + (j << 3) << 3) << 3) - 585] =
~~~~^~~~~~~~~~ ~~
dijkl1.c:222:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[k + (l + (i__ + (j << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:222:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[k + (l + (i__ + (j << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
dijkl1.c:222:26: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[k + (l + (i__ + (j << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:224:31: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[k + (l + (j + (i__ << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~ ~~
dijkl1.c:224:31: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[k + (l + (j + (i__ << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:224:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[k + (l + (j + (i__ << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
dijkl1.c:224:26: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[k + (l + (j + (i__ << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:226:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[l + (k + (i__ + (j << 3) << 3) << 3) - 585] =
~~~~^~~~~~~~~~ ~~
dijkl1.c:226:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[l + (k + (i__ + (j << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:226:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[l + (k + (i__ + (j << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
dijkl1.c:226:26: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[l + (k + (i__ + (j << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:228:31: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[l + (k + (j + (i__ << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~ ~~
dijkl1.c:228:31: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[l + (k + (j + (i__ << 3) << 3) << 3) - 585] =
^
( )
dijkl1.c:228:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[l + (k + (j + (i__ << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
dijkl1.c:228:26: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[l + (k + (j + (i__ << 3) << 3) << 3) - 585] =
^
( )
16 warnings generated.
f77 -O2 -w -c drcout.f
dofs.f:
dofs:
dot.f:
dot:
drc.f:
drc:
f77 -O2 -w -c dtrmm.f
f77 -O2 -w -c dtrmv.f
f77 -O2 -w -c dtrsm.f
drcout.f:
drcout:
f77 -O2 -w -c dtrti2.f
dtrmv.f:
dtrmv:
f77 -O2 -w -c dtrtri.f
dtrmm.f:
dtrmm:
f77 -O2 -w -c dvfill.f
dtrsm.f:
dtrsm:
dtrti2.f:
dtrti2:
dtrtri.f:
dtrtri:
dvfill.f:
dvfill:
drcout.c:412:61: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~~~~^~~ ~~
drcout.c:412:61: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~~~~^~~
drcout.c:481:61: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (geokst_1.labels[i__ - 1] - 1
~~~~~~~~~~~~~~~~~~~~~~~~~^~~
drcout.c:481:61: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (geokst_1.labels[i__ - 1] - 1
~~~~~~~~~~~~~~~~~~~~~~~~~^~~
drcout.c:505:61: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (geokst_1.labels[i__ - 1] - 1
~~~~~~~~~~~~~~~~~~~~~~~~~^~~
drcout.c:505:61: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (geokst_1.labels[i__ - 1] - 1
~~~~~~~~~~~~~~~~~~~~~~~~~^~~
3 warnings generated.
f77 -O2 -w -c ef.f
f77 -O2 -w -c enpart.f
f77 -O2 -w -c esp.f
f77 -O2 -w -c exchng.f
enpart.f:
enpart:
ef.f:
ef:
esp.f:
esp:
pdgrid:
efsav:
surfac:
exchng.f:
exchng:
drc.c:355:58: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
drccom_1.mcoprt[(i__ << 1) - 2] = geovar_1.loc[(i__ + j << 1) - 2]
~~~~^~~ ~~
drc.c:355:58: note: place parentheses around the '+' expression to silence this warning
drccom_1.mcoprt[(i__ << 1) - 2] = geovar_1.loc[(i__ + j << 1) - 2]
^
( )
drc.c:358:58: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
drccom_1.mcoprt[(i__ << 1) - 1] = geovar_1.loc[(i__ + j << 1) - 1]
~~~~^~~ ~~
drc.c:358:58: note: place parentheses around the '+' expression to silence this warning
drccom_1.mcoprt[(i__ << 1) - 1] = geovar_1.loc[(i__ + j << 1) - 1]
^
( )
drc.c:371:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(l + 1 << 1) - 2] = i__;
~~^~~ ~~
drc.c:371:18: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(l + 1 << 1) - 2] = i__;
^
( )
drc.c:372:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(l + 1 << 1) - 1] = 1;
~~^~~ ~~
drc.c:372:18: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(l + 1 << 1) - 1] = 1;
^
( )
drc.c:376:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(l + 2 << 1) - 2] = i__;
~~^~~ ~~
drc.c:376:18: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(l + 2 << 1) - 2] = i__;
^
( )
drc.c:377:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(l + 2 << 1) - 1] = 2;
~~^~~ ~~
drc.c:377:18: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(l + 2 << 1) - 1] = 2;
^
( )
drc.c:381:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(l + 3 << 1) - 2] = i__;
~~^~~ ~~
drc.c:381:18: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(l + 3 << 1) - 2] = i__;
^
( )
drc.c:382:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(l + 3 << 1) - 1] = 3;
~~^~~ ~~
drc.c:382:18: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(l + 3 << 1) - 1] = 3;
^
( )
8 warnings generated.
f77 -O2 -w -c ffhpol.f
efstr:
dist2:
collid:
formd:
f77 -O2 -w -c flepo.f
genun:
f77 -O2 -w -c fmat.f
potcal:
elesp:
gethes:
dex2:
idamax:
espblo:
BLOCK DATA espblo:
overlp:
espfit:
fsub:
prjfc:
setup3:
ovlp:
naicas:
prthes:
updhes:
naicap:
daxpy:
dgedi:
flepo.f:
flepo:
dgefa:
dscal:
dswap:
fmat.f:
fmat:
ffhpol.f:
ffhpol:
f77 -O2 -w -c fock1.f
f77 -O2 -w -c fock2.f
fock1.f:
fock1:
fock2.f:
fock2:
jab:
kab:
f77 -O2 -w -c force.f
f77 -O2 -w -c formxy.f
enpart.c:768:57: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 << 1), (
~~~~~~~~~~~~~~~~~~~~~~^~~ ~~
enpart.c:768:57: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 << 1), (
~~~~~~~~~~~~~~~~~~~~~~^~~
enpart.c:804:58: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 <<
~~~~~~~~~~~~~~~~~~~~~~^~~ ~~
enpart.c:804:58: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 <<
~~~~~~~~~~~~~~~~~~~~~~^~~
enpart.c:807:56: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1 << 1)
~~~~~~~~~~~~~~~~~~~~^~~ ~~
enpart.c:807:56: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[j - 1] - 1 << 1)
~~~~~~~~~~~~~~~~~~~~^~~
3 warnings generated.
fmat.c:280:30: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[((i__ - 1) * 3 + 1 << 1) - 2] = i__;
~~~~~~~~~~~~~~^~~ ~~
fmat.c:280:30: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[((i__ - 1) * 3 + 1 << 1) - 2] = i__;
^
( )
fmat.c:281:30: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[((i__ - 1) * 3 + 1 << 1) - 1] = 1;
~~~~~~~~~~~~~~^~~ ~~
fmat.c:281:30: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[((i__ - 1) * 3 + 1 << 1) - 1] = 1;
^
( )
fmat.c:283:30: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[((i__ - 1) * 3 + 2 << 1) - 2] = i__;
~~~~~~~~~~~~~~^~~ ~~
fmat.c:283:30: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[((i__ - 1) * 3 + 2 << 1) - 2] = i__;
^
( )
fmat.c:284:30: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[((i__ - 1) * 3 + 2 << 1) - 1] = 2;
~~~~~~~~~~~~~~^~~ ~~
fmat.c:284:30: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[((i__ - 1) * 3 + 2 << 1) - 1] = 2;
^
( )
fmat.c:286:30: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[((i__ - 1) * 3 + 3 << 1) - 2] = i__;
~~~~~~~~~~~~~~^~~ ~~
fmat.c:286:30: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[((i__ - 1) * 3 + 3 << 1) - 2] = i__;
^
( )
fmat.c:287:30: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[((i__ - 1) * 3 + 3 << 1) - 1] = 3;
~~~~~~~~~~~~~~^~~ ~~
fmat.c:287:30: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[((i__ - 1) * 3 + 3 << 1) - 1] = 3;
^
( )
6 warnings generated.
f77 -O2 -w -c forsav.f
f77 -O2 -w -c frame.f
f77 -O2 -w -c freqcy.f
force.f:
force:
formxy.f:
formxy:
frame.f:
frame:
forsav.f:
forsav:
freqcy.f:
freqcy:
f77 -O2 -w -c geout.f
f77 -O2 -w -c geoutg.f
f77 -O2 -w -c getgeg.f
geout.f:
geout:
f77 -O2 -w -c getgeo.f
geoutg.f:
geoutg:
xxx:
force.c:455:64: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (geokst_1.labels[i__ - 1] - 1 <<
~~~~~~~~~~~~~~~~~~~~~~~~~^~~ ~~
force.c:455:64: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (geokst_1.labels[i__ - 1] - 1 <<
~~~~~~~~~~~~~~~~~~~~~~~~~^~~
1 warning generated.
getgeg.f:
getgeg:
getval:
f77 -O2 -w -c getsym.f
fock2.c:193:15: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i1 = i__ - 1 << 2;
~~~~^~~ ~~
fock2.c:193:15: note: place parentheses around the '-' expression to silence this warning
i1 = i__ - 1 << 2;
^
( )
fock2.c:200:22: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
llperm[l - 1] = i1 - 1 << 4;
~~~^~~ ~~
fock2.c:200:22: note: place parentheses around the '-' expression to silence this warning
llperm[l - 1] = i1 - 1 << 4;
^
( )
2 warnings generated.
f77 -O2 -w -c gettxt.f
getgeo.f:
getgeo:
getsym.f:
getsym:
geout.c:226:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
loctmp[(nvartm + j << 1) - 2] = i__;
~~~~~~~^~~ ~~
geout.c:226:18: note: place parentheses around the '+' expression to silence this warning
loctmp[(nvartm + j << 1) - 2] = i__;
^
( )
geout.c:228:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
loctmp[(nvartm + j << 1) - 1] = j;
~~~~~~~^~~ ~~
geout.c:228:18: note: place parentheses around the '+' expression to silence this warning
loctmp[(nvartm + j << 1) - 1] = j;
^
( )
geout.c:284:20: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(q + (j - 1 << 1), flag0, (ftnlen)2, (ftnlen)2);
~~^~~ ~~
geout.c:284:20: note: place parentheses around the '-' expression to silence this warning
s_copy(q + (j - 1 << 1), flag0, (ftnlen)2, (ftnlen)2);
^
( )
geout.c:291:20: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(q + (j - 1 << 1), flag1, (ftnlen)2, (ftnlen)2);
~~^~~ ~~
geout.c:291:20: note: place parentheses around the '-' expression to silence this warning
s_copy(q + (j - 1 << 1), flag1, (ftnlen)2, (ftnlen)2);
^
( )
geout.c:320:16: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(q + (j - 1 << 1), flagn, (ftnlen)2, (ftnlen)2);
~~^~~ ~~
geout.c:320:16: note: place parentheses around the '-' expression to silence this warning
s_copy(q + (j - 1 << 1), flagn, (ftnlen)2, (ftnlen)2);
^
( )
geout.c:323:69: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__7[0] = 2, a__1[0] = elemts_1.elemnt + (geokst_1.labels[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~~~~^
geout.c:323:69: note: place parentheses around the '-' expression to silence this warning
i__7[0] = 2, a__1[0] = elemts_1.elemnt + (geokst_1.labels[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~~~~^
geout.c:325:48: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__7[1] = 8, a__1[1] = atomtx_1.txtatm + (i__ - 1 << 3);
~~~~^~~ ~~
geout.c:325:48: note: place parentheses around the '-' expression to silence this warning
i__7[1] = 8, a__1[1] = atomtx_1.txtatm + (i__ - 1 << 3);
^
( )
7 warnings generated.
geoutg.c:260:60: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__2[0] = 2, a__1[0] = elemnt + (geokst_1.labels[i__ - 1] - 1 << 1);
~~~~~~~~~~~~~~~~~~~~~~~~~^~~ ~~
geoutg.c:260:60: note: place parentheses around the '-' expression to silence this warning
i__2[0] = 2, a__1[0] = elemnt + (geokst_1.labels[i__ - 1] - 1 << 1);
~~~~~~~~~~~~~~~~~~~~~~~~~^~~
geoutg.c:261:48: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__2[1] = 8, a__1[1] = atomtx_1.txtatm + (i__ - 1 << 3);
~~~~^~~ ~~
geoutg.c:261:48: note: place parentheses around the '-' expression to silence this warning
i__2[1] = 8, a__1[1] = atomtx_1.txtatm + (i__ - 1 << 3);
^
( )
2 warnings generated.
gettxt.f:
gettxt:
f77 -O2 -w -c gmetry.f
f77 -O2 -w -c gover.f
upcase:
getgeg.c:194:40: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(atomtx_1.txtatm + (*natoms - 1 << 3), line + (i__ - 1), (
~~~~~~~~^~~ ~~
getgeg.c:194:40: note: place parentheses around the '-' expression to silence this warning
s_copy(atomtx_1.txtatm + (*natoms - 1 << 3), line + (i__ - 1), (
^
( )
getgeg.c:206:40: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(atomtx_1.txtatm + (*natoms - 1 << 3), " ", (ftnlen)8, (
~~~~~~~~^~~ ~~
getgeg.c:206:40: note: place parentheses around the '-' expression to silence this warning
s_copy(atomtx_1.txtatm + (*natoms - 1 << 3), " ", (ftnlen)8, (
^
( )
getgeg.c:236:41: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__4[0] = 2, a__2[0] = elemnt + (j - 1 << 1);
~~^~~ ~~
getgeg.c:236:41: note: place parentheses around the '-' expression to silence this warning
i__4[0] = 2, a__2[0] = elemnt + (j - 1 << 1);
^
( )
3 warnings generated.
f77 -O2 -w -c greenf.f
f77 -O2 -w -c grid.f
gover.f:
gover:
gmetry.f:
gmetry:
greenf.f:
greenf:
gstore:
insymc:
mo:
moint:
f77 -O2 -w -c h1elec.f
sisms:
suma2:
worder:
grid.f:
grid:
wwstep:
asum:
f77 -O2 -w -c haddon.f
ccprod:
csum:
dsum:
getgeo.c:263:36: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(atomtx_1.txtatm + (*natoms - 1 << 3), line + (i__ - 1), (
~~~~~~~~^~~ ~~
getgeo.c:263:36: note: place parentheses around the '-' expression to silence this warning
s_copy(atomtx_1.txtatm + (*natoms - 1 << 3), line + (i__ - 1), (
^
( )
getgeo.c:275:36: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(atomtx_1.txtatm + (*natoms - 1 << 3), " ", (ftnlen)8, (ftnlen)
~~~~~~~~^~~ ~~
getgeo.c:275:36: note: place parentheses around the '-' expression to silence this warning
s_copy(atomtx_1.txtatm + (*natoms - 1 << 3), " ", (ftnlen)8, (ftnlen)
^
( )
getgeo.c:357:31: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
if (s_cmp(ele, elemnt + (i__ - 1 << 1), (ftnlen)2, (ftnlen)2) == 0) {
~~~~^~~ ~~
getgeo.c:357:31: note: place parentheses around the '-' expression to silence this warning
if (s_cmp(ele, elemnt + (i__ - 1 << 1), (ftnlen)2, (ftnlen)2) == 0) {
^
( )
3 warnings generated.
fcnpp:
h1elec.f:
h1elec:
f77 -O2 -w -c hcore.f
gover.c:114:43: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
ifa = (natype_1.nztype[(0 + (0 + (*ni - 1 << 2))) / 4] << 2) - 3;
~~~~^~~ ~~
gover.c:114:43: note: place parentheses around the '-' expression to silence this warning
ifa = (natype_1.nztype[(0 + (0 + (*ni - 1 << 2))) / 4] << 2) - 3;
^
( )
1 warning generated.
f77 -O2 -w -c helect.f
haddon.f:
haddon:
f77 -O2 -w -c hqrii.f
hcore.f:
hcore:
helect.f:
helect:
f77 -O2 -w -c ijkl.f
esp.c:1274:58: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (abc_1.ian[i__ - 1] - 1 << 1), (
~~~~~~~~~~~~~~~~~~~^~~ ~~
esp.c:1274:58: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (abc_1.ian[i__ - 1] - 1 << 1), (
~~~~~~~~~~~~~~~~~~~^~~
esp.c:1302:58: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (abc_1.ian[i__ - 1] - 1 << 1), (
~~~~~~~~~~~~~~~~~~~^~~ ~~
esp.c:1302:58: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (abc_1.ian[i__ - 1] - 1 << 1), (
~~~~~~~~~~~~~~~~~~~^~~
esp.c:1415:55: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (abc_1.ian[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~^~~ ~~
esp.c:1415:55: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (abc_1.ian[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~^~~
esp.c:1429:55: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (abc_1.ian[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~^~~ ~~
esp.c:1429:55: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (abc_1.ian[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~^~~
4 warnings generated.
f77 -O2 -w -c ilaenv.f
hqrii.f:
hqrii:
f77 -O2 -w -c initsv.f
f77 -O2 -w -c interp.f
f77 -O2 -w -c iter.f
ilaenv.f:
ilaenv:
ijkl.f:
ijkl:
initsv.f:
initsv:
iter.f:
iter:
interp.f:
interp:
spline:
schmit:
schmib:
pulay:
f77 -O2 -w -c jcarin.f
osinv:
f77 -O2 -w -c linmin.f
jcarin.f:
jcarin:
f77 -O2 -w -c local.f
ijkl.c:223:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~ ~~
ijkl.c:223:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:223:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~ ~~
ijkl.c:223:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (k + (l << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:225:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (l + (k << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~ ~~
ijkl.c:225:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (l + (k << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:225:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[i__ + (j + (l + (k << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~ ~~
ijkl.c:225:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[i__ + (j + (l + (k << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:227:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[j + (i__ + (k + (l << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~ ~~
ijkl.c:227:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[j + (i__ + (k + (l << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:227:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[j + (i__ + (k + (l << 3) << 3) << 3) - 585] =
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
ijkl.c:227:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[j + (i__ + (k + (l << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:229:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[j + (i__ + (l + (k << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~ ~~
ijkl.c:229:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[j + (i__ + (l + (k << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:229:28: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[j + (i__ + (l + (k << 3) << 3) << 3) - 585] =
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
ijkl.c:229:28: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[j + (i__ + (l + (k << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:231:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[k + (l + (i__ + (j << 3) << 3) << 3) - 585] =
~~~~^~~~~~~~~~ ~~
ijkl.c:231:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[k + (l + (i__ + (j << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:231:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[k + (l + (i__ + (j << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
ijkl.c:231:26: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[k + (l + (i__ + (j << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:233:31: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[k + (l + (j + (i__ << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~ ~~
ijkl.c:233:31: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[k + (l + (j + (i__ << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:233:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[k + (l + (j + (i__ << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
ijkl.c:233:26: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[k + (l + (j + (i__ << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:235:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[l + (k + (i__ + (j << 3) << 3) << 3) - 585] =
~~~~^~~~~~~~~~ ~~
ijkl.c:235:33: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[l + (k + (i__ + (j << 3) << 3) << 3) - 585] =
^
( )
ijkl.c:235:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[l + (k + (i__ + (j << 3) << 3) << 3) - 585] =
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
ijkl.c:235:26: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[l + (k + (i__ + (j << 3) << 3) << 3) - 585] =
^
( )
14 warnings generated.
f77 -O2 -w -c locmin.f
f77 -O2 -w -c lsame.f
linmin.f:
linmin:
local.f:
local:
locmin.f:
locmin:
lsame.f:
lsame:
f77 -O2 -w -c makpol.f
f77 -O2 -w -c mamult.f
local.c:355:59: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemnt + (molkst_1.nat[iel[k - 1] - 1] - 1 << 1), (
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~ ~~
local.c:355:59: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemnt + (molkst_1.nat[iel[k - 1] - 1] - 1 << 1), (
~~~~~~~~~~~~~~~~~~~~~~~~~~~~~^~~
1 warning generated.
makpol.f:
makpol:
f77 -O2 -w -c matou1.f
f77 -O2 -w -c matout.f
mamult.f:
mamult:
f77 -O2 -w -c matpak.f
matout.f:
matout:
matou1.f:
matou1:
f77 -O2 -w -c meci.f
matpak.f:
sdot:
scopy:
saxpy:
mxm:
mxmt:
mtxm:
mtxmc:
supdot:
f77 -O2 -w -c mecid.f
interp.c:747:46: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
fit_2.xmin = fit_2.x[(48 + (0 + (fit_2.n - 1 << 3)) - 48) / 8];
~~~~~~~~^~~ ~~
interp.c:747:46: note: place parentheses around the '-' expression to silence this warning
fit_2.xmin = fit_2.x[(48 + (0 + (fit_2.n - 1 << 3)) - 48) / 8];
~~~~~~~~^~~
1 warning generated.
f77 -O2 -w -c mecih.f
makpol.c:194:41: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(atomtx_1.txtatm + (ioff + j - 1 << 3), atomtx_1.txtatm + (
~~~~~~~~~^~~ ~~
makpol.c:194:41: note: place parentheses around the '-' expression to silence this warning
s_copy(atomtx_1.txtatm + (ioff + j - 1 << 3), atomtx_1.txtatm + (
^
( )
makpol.c:195:15: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
im1 + j - 1 << 3), (ftnlen)8, (ftnlen)8);
~~~~~~~~^~~ ~~
makpol.c:195:15: note: place parentheses around the '-' expression to silence this warning
im1 + j - 1 << 3), (ftnlen)8, (ftnlen)8);
^
( )
makpol.c:273:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 1 << 1) - 2] = geokst_1.natoms - 1;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:273:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 1 << 1) - 2] = geokst_1.natoms - 1;
~~~~~~~~~~~~~~^~~
makpol.c:274:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 1 << 1) - 1] = 1;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:274:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 1 << 1) - 1] = 1;
~~~~~~~~~~~~~~^~~
makpol.c:275:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 2 << 1) - 2] = geokst_1.natoms - 1;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:275:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 2 << 1) - 2] = geokst_1.natoms - 1;
~~~~~~~~~~~~~~^~~
makpol.c:276:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 2 << 1) - 1] = 2;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:276:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 2 << 1) - 1] = 2;
~~~~~~~~~~~~~~^~~
makpol.c:277:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 3 << 1) - 2] = geokst_1.natoms - 1;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:277:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 3 << 1) - 2] = geokst_1.natoms - 1;
~~~~~~~~~~~~~~^~~
makpol.c:278:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 3 << 1) - 1] = 3;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:278:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 3 << 1) - 1] = 3;
~~~~~~~~~~~~~~^~~
makpol.c:279:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 4 << 1) - 2] = geokst_1.natoms;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:279:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 4 << 1) - 2] = geokst_1.natoms;
~~~~~~~~~~~~~~^~~
makpol.c:280:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 4 << 1) - 1] = 2;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:280:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 4 << 1) - 1] = 2;
~~~~~~~~~~~~~~^~~
makpol.c:281:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 5 << 1) - 2] = geokst_1.natoms;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:281:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 5 << 1) - 2] = geokst_1.natoms;
~~~~~~~~~~~~~~^~~
makpol.c:282:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 5 << 1) - 1] = 3;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:282:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 5 << 1) - 1] = 3;
~~~~~~~~~~~~~~^~~
makpol.c:283:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 6 << 1) - 2] = geokst_1.natoms + 1;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:283:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 6 << 1) - 2] = geokst_1.natoms + 1;
~~~~~~~~~~~~~~^~~
makpol.c:284:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 6 << 1) - 1] = 3;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:284:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 6 << 1) - 1] = 3;
~~~~~~~~~~~~~~^~~
makpol.c:290:36: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(atomtx_1.txtatm + (last - 2 << 3), " ", (ftnlen)8, (ftnlen)1);
~~~~~^~~ ~~
makpol.c:290:36: note: place parentheses around the '-' expression to silence this warning
s_copy(atomtx_1.txtatm + (last - 2 << 3), " ", (ftnlen)8, (ftnlen)1);
^
( )
makpol.c:291:36: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(atomtx_1.txtatm + (last - 1 << 3), " ", (ftnlen)8, (ftnlen)1);
~~~~~^~~ ~~
makpol.c:291:36: note: place parentheses around the '-' expression to silence this warning
s_copy(atomtx_1.txtatm + (last - 1 << 3), " ", (ftnlen)8, (ftnlen)1);
^
( )
makpol.c:295:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 7 << 1) - 2] = last;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:295:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 7 << 1) - 2] = last;
~~~~~~~~~~~~~~^~~
makpol.c:296:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
geovar_1.loc[(geovar_1.nvar + 7 << 1) - 1] = 1;
~~~~~~~~~~~~~~^~~ ~~
makpol.c:296:33: note: place parentheses around the '+' expression to silence this warning
geovar_1.loc[(geovar_1.nvar + 7 << 1) - 1] = 1;
~~~~~~~~~~~~~~^~~
18 warnings generated.
f77 -O2 -w -c mecip.f
meci.f:
meci:
matou1.c:188:21: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (ftnlen)2,
~~^~~ ~~
matou1.c:188:21: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (ftnlen)2,
^
( )
matou1.c:188:44: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (ftnlen)2,
~~^~~ ~~
matou1.c:188:44: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (ftnlen)2,
^
( )
matou1.c:190:21: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 << 1), (
~~^~~ ~~
matou1.c:190:21: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 << 1), (
^
( )
matou1.c:190:53: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 << 1), (
~~^~~ ~~
matou1.c:190:53: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 << 1), (
^
( )
matou1.c:199:27: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (j + jhi - 1 << 1), xyz + (j - 1 << 1), (
~~~~~~~~^~~ ~~
matou1.c:199:27: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (j + jhi - 1 << 1), xyz + (j - 1 << 1), (
^
( )
matou1.c:199:47: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (j + jhi - 1 << 1), xyz + (j - 1 << 1), (
~~^~~ ~~
matou1.c:199:47: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (j + jhi - 1 << 1), xyz + (j - 1 << 1), (
^
( )
matou1.c:201:27: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j + jhi - 1 << 1), elemts_1.elemnt + (l - 1 <<
~~~~~~~~^~~ ~~
matou1.c:201:27: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j + jhi - 1 << 1), elemts_1.elemnt + (l - 1 <<
^
( )
matou1.c:201:59: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j + jhi - 1 << 1), elemts_1.elemnt + (l - 1 <<
~~^~~ ~~
matou1.c:201:59: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j + jhi - 1 << 1), elemts_1.elemnt + (l - 1 <<
^
( )
matou1.c:214:22: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
~~~~^~~ ~~
matou1.c:214:22: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
^
( )
matou1.c:215:22: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
~~~~^~~ ~~
matou1.c:215:22: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
^
( )
matou1.c:217:26: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (i__ - 1 << 1), elemts_1.elemnt + (molkst_1.nat[
~~~~^~~ ~~
matou1.c:217:26: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (i__ - 1 << 1), elemts_1.elemnt + (molkst_1.nat[
^
( )
matou1.c:218:16: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__ - 1] - 1 << 1), (ftnlen)2, (ftnlen)2);
~~~~~~~~~^~~ ~~
matou1.c:218:16: note: place parentheses around the '-' expression to silence this warning
i__ - 1] - 1 << 1), (ftnlen)2, (ftnlen)2);
~~~~~~~~~^~~
matou1.c:253:41: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, symres_1.namo + (i__ - 1 << 2), (ftnlen)4);
~~~~^~~ ~~
matou1.c:253:41: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, symres_1.namo + (i__ - 1 << 2), (ftnlen)4);
^
( )
matou1.c:282:25: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
if (s_cmp(itext + (i__ - 1 << 1), " S", (ftnlen)2, (ftnlen)2) == 0) {
~~~~^~~ ~~
matou1.c:282:25: note: place parentheses around the '-' expression to silence this warning
if (s_cmp(itext + (i__ - 1 << 1), " S", (ftnlen)2, (ftnlen)2) == 0) {
^
( )
matou1.c:287:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, itext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
matou1.c:287:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, itext + (i__ - 1 << 1), (ftnlen)2);
^
( )
matou1.c:288:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
matou1.c:288:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
^
( )
16 warnings generated.
matout.c:143:24: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (ftnlen)2, (
~~^~~ ~~
matout.c:143:24: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (ftnlen)2, (
^
( )
matout.c:143:47: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (ftnlen)2, (
~~^~~ ~~
matout.c:143:47: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (ftnlen)2, (
^
( )
matout.c:145:24: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 << 1), (
~~^~~ ~~
matout.c:145:24: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 << 1), (
^
( )
matout.c:145:56: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 << 1), (
~~^~~ ~~
matout.c:145:56: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 << 1), (
^
( )
matout.c:157:22: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
~~~~^~~ ~~
matout.c:157:22: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
^
( )
matout.c:158:22: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
~~~~^~~ ~~
matout.c:158:22: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
^
( )
matout.c:189:25: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
if (s_cmp(itext + (i__ - 1 << 1), " S", (ftnlen)2, (ftnlen)2) == 0) {
~~~~^~~ ~~
matout.c:189:25: note: place parentheses around the '-' expression to silence this warning
if (s_cmp(itext + (i__ - 1 << 1), " S", (ftnlen)2, (ftnlen)2) == 0) {
^
( )
matout.c:194:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, itext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
matout.c:194:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, itext + (i__ - 1 << 1), (ftnlen)2);
^
( )
matout.c:195:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
matout.c:195:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
^
( )
9 warnings generated.
mecid.f:
mecid:
f77 -O2 -w -c moldat.f
f77 -O2 -w -c molval.f
mecih.f:
mecih:
mecip.f:
mecip:
molval.f:
molval:
moldat.f:
moldat:
mecid.c:121:40: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
x += (xyijkl_1.xy[i__ + (i__ + (j + (j << 3) << 3) << 3) - 585] *
~~^~~~~~~~~~ ~~
mecid.c:121:40: note: place parentheses around the '+' expression to silence this warning
x += (xyijkl_1.xy[i__ + (i__ + (j + (j << 3) << 3) << 3) - 585] *
^
( )
mecid.c:121:35: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
x += (xyijkl_1.xy[i__ + (i__ + (j + (j << 3) << 3) << 3) - 585] *
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
mecid.c:121:35: note: place parentheses around the '+' expression to silence this warning
x += (xyijkl_1.xy[i__ + (i__ + (j + (j << 3) << 3) << 3) - 585] *
^
( )
mecid.c:122:40: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
2. - xyijkl_1.xy[i__ + (j + (i__ + (j << 3) << 3) << 3) -
~~~~^~~~~~~~~~ ~~
mecid.c:122:40: note: place parentheses around the '+' expression to silence this warning
2. - xyijkl_1.xy[i__ + (j + (i__ + (j << 3) << 3) << 3) -
^
( )
mecid.c:122:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
2. - xyijkl_1.xy[i__ + (j + (i__ + (j << 3) << 3) << 3) -
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
mecid.c:122:33: note: place parentheses around the '+' expression to silence this warning
2. - xyijkl_1.xy[i__ + (j + (i__ + (j << 3) << 3) << 3) -
^
( )
mecid.c:127:40: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
*gse += xyijkl_1.xy[i__ + (i__ + (i__ + (i__ << 3) << 3) << 3) - 585]
~~~~^~~~~~~~~~~~ ~~
mecid.c:127:40: note: place parentheses around the '+' expression to silence this warning
*gse += xyijkl_1.xy[i__ + (i__ + (i__ + (i__ << 3) << 3) << 3) - 585]
^
( )
mecid.c:127:33: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
*gse += xyijkl_1.xy[i__ + (i__ + (i__ + (i__ << 3) << 3) << 3) - 585]
~~~~^~~~~~~~~~~~~~~~~~~~~~~~~ ~~
mecid.c:127:33: note: place parentheses around the '+' expression to silence this warning
*gse += xyijkl_1.xy[i__ + (i__ + (i__ + (i__ << 3) << 3) << 3) - 585]
^
( )
mecid.c:132:43: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
*gse += (xyijkl_1.xy[i__ + (i__ + (j + (j << 3) << 3) << 3) - 585]
~~^~~~~~~~~~ ~~
mecid.c:132:43: note: place parentheses around the '+' expression to silence this warning
*gse += (xyijkl_1.xy[i__ + (i__ + (j + (j << 3) << 3) << 3) - 585]
^
( )
mecid.c:132:38: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
*gse += (xyijkl_1.xy[i__ + (i__ + (j + (j << 3) << 3) << 3) - 585]
~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
mecid.c:132:38: note: place parentheses around the '+' expression to silence this warning
*gse += (xyijkl_1.xy[i__ + (i__ + (j + (j << 3) << 3) << 3) - 585]
^
( )
mecid.c:133:43: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
* 2. - xyijkl_1.xy[i__ + (j + (i__ + (j << 3) << 3) << 3)
~~~~^~~~~~~~~~ ~~
mecid.c:133:43: note: place parentheses around the '+' expression to silence this warning
* 2. - xyijkl_1.xy[i__ + (j + (i__ + (j << 3) << 3) << 3)
^
( )
mecid.c:133:36: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
* 2. - xyijkl_1.xy[i__ + (j + (i__ + (j << 3) << 3) << 3)
~~^~~~~~~~~~~~~~~~~~~~~~~ ~~
mecid.c:133:36: note: place parentheses around the '+' expression to silence this warning
* 2. - xyijkl_1.xy[i__ + (j + (i__ + (j << 3) << 3) << 3)
^
( )
10 warnings generated.
f77 -O2 -w -c mopac.f
f77 -O2 -w -c mullik.f
f77 -O2 -w -c mult.f
mopac.f:
MAIN mopac:
f77 -O2 -w -c nllsq.f
getdat:
mullik.f:
mullik:
mult.f:
mult:
f77 -O2 -w -c nuchar.f
f77 -O2 -w -c parsav.f
nllsq.f:
nllsq:
nuchar.f:
nuchar:
f77 -O2 -w -c partxy.f
parsav.f:
parsav:
f77 -O2 -w -c pathk.f
meci.c:543:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
+ (spqr_1.i__ + (j + (j << 3) << 3) << 3) - 585] -
~~^~~~~~~~~~ ~~
meci.c:543:26: note: place parentheses around the '+' expression to silence this warning
+ (spqr_1.i__ + (j + (j << 3) << 3) << 3) - 585] -
^
( )
meci.c:543:21: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
+ (spqr_1.i__ + (j + (j << 3) << 3) << 3) - 585] -
~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
meci.c:543:21: note: place parentheses around the '+' expression to silence this warning
+ (spqr_1.i__ + (j + (j << 3) << 3) << 3) - 585] -
~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~
meci.c:544:49: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[spqr_1.i__ + (j + (spqr_1.i__ + (j << 3) << 3)
~~~~~~~~~~~^~~~~~~~~~ ~~
meci.c:544:49: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[spqr_1.i__ + (j + (spqr_1.i__ + (j << 3) << 3)
~~~~~~~~~~~^~~~~~~~~~
meci.c:544:35: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
xyijkl_1.xy[spqr_1.i__ + (j + (spqr_1.i__ + (j << 3) << 3)
~~^~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
meci.c:544:35: note: place parentheses around the '+' expression to silence this warning
xyijkl_1.xy[spqr_1.i__ + (j + (spqr_1.i__ + (j << 3) << 3)
^
( )
meci.c:548:26: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
+ (spqr_1.i__ + (j + (j << 3) << 3) << 3) - 585];
~~^~~~~~~~~~ ~~
meci.c:548:26: note: place parentheses around the '+' expression to silence this warning
+ (spqr_1.i__ + (j + (j << 3) << 3) << 3) - 585];
^
( )
meci.c:548:21: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
+ (spqr_1.i__ + (j + (j << 3) << 3) << 3) - 585];
~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~ ~~
meci.c:548:21: note: place parentheses around the '+' expression to silence this warning
+ (spqr_1.i__ + (j + (j << 3) << 3) << 3) - 585];
~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~
meci.c:769:60: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
gse += xyijkl_1.xy[spqr_1.i__ + (spqr_1.i__ + (spqr_1.i__ + (
~~~~~~~~~~~^~~
meci.c:769:60: note: place parentheses around the '+' expression to silence this warning
gse += xyijkl_1.xy[spqr_1.i__ + (spqr_1.i__ + (spqr_1.i__ + (
~~~~~~~~~~~^~~
meci.c:769:46: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
gse += xyijkl_1.xy[spqr_1.i__ + (spqr_1.i__ + (spqr_1.i__ + (
~~~~~~~~~~~^~~~~~~~~~~~~~~~~
meci.c:769:46: note: place parentheses around the '+' expression to silence this warning
gse += xyijkl_1.xy[spqr_1.i__ + (spqr_1.i__ + (spqr_1.i__ + (
~~~~~~~~~~~^~~~~~~~~~~~~~~~~
meci.c:775:56: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
gse += (xyijkl_1.xy[spqr_1.i__ + (spqr_1.i__ + (j + (j << 3) << 3)
~~^~~~~~~~~~ ~~
meci.c:775:56: note: place parentheses around the '+' expression to silence this warning
gse += (xyijkl_1.xy[spqr_1.i__ + (spqr_1.i__ + (j + (j << 3) << 3)
^
( )
meci.c:775:51: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
gse += (xyijkl_1.xy[spqr_1.i__ + (spqr_1.i__ + (j + (j << 3) << 3)
~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~
meci.c:775:51: note: place parentheses around the '+' expression to silence this warning
gse += (xyijkl_1.xy[spqr_1.i__ + (spqr_1.i__ + (j + (j << 3) << 3)
~~~~~~~~~~~^~~~~~~~~~~~~~~~~~~~~
meci.c:777:18: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
spqr_1.i__ + (j << 3) << 3) << 3) - 585]) * 2. *
~~~~~~~~~~~^~~~~~~~~~ ~~
meci.c:777:18: note: place parentheses around the '+' expression to silence this warning
spqr_1.i__ + (j << 3) << 3) << 3) - 585]) * 2. *
~~~~~~~~~~~^~~~~~~~~~
meci.c:776:56: warning: operator '<<' has lower precedence than '+'; '+' will be evaluated first [-Wshift-op-parentheses]
<< 3) - 585] * 2. - xyijkl_1.xy[spqr_1.i__ + (j + (
~~^~~
meci.c:776:56: note: place parentheses around the '+' expression to silence this warning
<< 3) - 585] * 2. - xyijkl_1.xy[spqr_1.i__ + (j + (
^
(
meci.c:997:31: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, tspin + (j - 1 << 3), (ftnlen)8);
~~^~~ ~~
meci.c:997:31: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, tspin + (j - 1 << 3), (ftnlen)8);
^
( )
meci.c:1014:37: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, tspin + (spqr_1.i__ - 1 << 3), (ftnlen)8);
~~~~~~~~~~~^~~ ~~
meci.c:1014:37: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, tspin + (spqr_1.i__ - 1 << 3), (ftnlen)8);
~~~~~~~~~~~^~~
14 warnings generated.
partxy.f:
partxy:
f77 -O2 -w -c paths.f
f77 -O2 -w -c perm.f
pathk.f:
pathk:
f77 -O2 -w -c polar.f
paths.f:
paths:
perm.f:
perm:
f77 -O2 -w -c powsav.f
polar.f:
polar:
tf:
transf:
trsub:
trudgu:
trugdu:
trugud:
zerom:
alphaf:
f77 -O2 -w -c powsq.f
aval:
bdensf:
beopor:
betaf:
betal1:
betall:
betcom:
bmakuf:
copym:
darea1:
daread:
dawrit:
dawrt1:
densf:
epsab:
ffreq1:
powsav.f:
powsav:
ffreq2:
fhpatn:
hmuf:
hplusf:
makeuf:
ngamtg:
f77 -O2 -w -c prtdrc.f
ngefis:
ngidri:
ngoke:
nonbet:
nonope:
nonor:
openda:
powsq.f:
powsq:
f77 -O2 -w -c quadr.f
prtdrc.f:
prtdrc:
f77 -O2 -w -c react1.f
f77 -O2 -w -c reada.f
quadr.f:
quadr:
react1.f:
react1:
f77 -O2 -w -c readmo.f
reada.f:
reada:
digit:
f77 -O2 -w -c refer.f
f77 -O2 -w -c repp.f
readmo.f:
readmo:
refer.f:
refer:
f77 -O2 -w -c rotat.f
repp.f:
repp:
prtdrc.c:826:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(text2, cotype + (j - 1 << 1), (ftnlen)2, (ftnlen)2);
~~^~~ ~~
prtdrc.c:826:29: note: place parentheses around the '-' expression to silence this warning
s_copy(text2, cotype + (j - 1 << 1), (ftnlen)2, (ftnlen)2);
^
( )
1 warning generated.
f77 -O2 -w -c rotate.f
rotat.f:
rotat:
f77 -O2 -w -c rsp.f
f77 -O2 -w -c search.f
f77 -O2 -w -c second.f
rotate.f:
rotate:
search.f:
search:
rsp.f:
rsp:
epseta:
tql2:
tqlrat:
trbak3:
tred3:
f77 -O2 -w -c setupg.f
second.f:
second:
getnam:
f77 -O2 -w -c solrot.f
readmo.c:876:8: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
- 1 << 1), (ftnlen)2);
^~~ ~~
readmo.c:876:8: note: place parentheses around the '-' expression to silence this warning
- 1 << 1), (ftnlen)2);
^~~
readmo.c:901:61: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (geokst_1.labels[i__ - 1] - 1
~~~~~~~~~~~~~~~~~~~~~~~~~^~~
readmo.c:901:61: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (geokst_1.labels[i__ - 1] - 1
~~~~~~~~~~~~~~~~~~~~~~~~~^~~
2 warnings generated.
f77 -O2 -w -c swap.f
setupg.f:
setupg:
solrot.f:
solrot:
f77 -O2 -w -c sympro.f
f77 -O2 -w -c symtry.f
swap.f:
swap:
symtry.f:
symtry:
sympro.f:
sympop:
symr:
f77 -O2 -w -c symtrz.f
symh:
syma:
symt:
mat33:
symp:
oper:
f77 -O2 -w -c thermo.f
f77 -O2 -w -c timer.f
f77 -O2 -w -c timout.f
symtrz.f:
symtrz:
syman1:
syman2:
r00001:
r00002:
r00003:
f77 -O2 -w -c update.f
r00004:
r00005:
r00006:
r00007:
f77 -O2 -w -c upsurf.f
r00008:
r00009:
thermo.f:
thermo:
r00010:
timout.f:
timout:
r00011:
timer.f:
timer:
mpcpop:
r00012:
r00013:
mpcsyb:
r00015:
r00016:
update.f:
update:
upsurf.f:
upsurf:
f77 -O2 -w -c vecprt.f
f77 -O2 -w -c writmo.f
f77 -O2 -w -c wrtkey.f
f77 -O2 -w -c wrttxt.f
vecprt.f:
vecprt:
writmo.f:
writmo:
wrtkey.f:
wrtkey:
myword:
wrttxt.f:
wrttxt:
vecprt.c:133:26: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
~~~~^~~ ~~
vecprt.c:133:26: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
^
( )
vecprt.c:134:26: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (i__ - 1 << 1), elemts_1.elemnt + (molkst_1.nat[
~~~~^~~ ~~
vecprt.c:134:26: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (i__ - 1 << 1), elemts_1.elemnt + (molkst_1.nat[
^
( )
vecprt.c:135:16: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
i__ - 1] - 1 << 1), (ftnlen)2, (ftnlen)2);
~~~~~~~~~^~~ ~~
vecprt.c:135:16: note: place parentheses around the '-' expression to silence this warning
i__ - 1] - 1 << 1), (ftnlen)2, (ftnlen)2);
~~~~~~~~~^~~
vecprt.c:151:25: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (
~~^~~ ~~
vecprt.c:151:25: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (
^
( )
vecprt.c:151:48: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (
~~^~~ ~~
vecprt.c:151:48: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (j - 1 << 1), atorbs + (k - 1 << 1), (
^
( )
vecprt.c:153:25: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 <<
~~^~~ ~~
vecprt.c:153:25: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 <<
^
( )
vecprt.c:153:57: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 <<
~~^~~ ~~
vecprt.c:153:57: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (j - 1 << 1), elemts_1.elemnt + (l - 1 <<
^
( )
vecprt.c:164:23: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(itext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
~~~~^~~ ~~
vecprt.c:164:23: note: place parentheses around the '-' expression to silence this warning
s_copy(itext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
^
( )
vecprt.c:165:23: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(jtext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
~~~~^~~ ~~
vecprt.c:165:23: note: place parentheses around the '-' expression to silence this warning
s_copy(jtext + (i__ - 1 << 1), " ", (ftnlen)2, (ftnlen)2);
^
( )
vecprt.c:189:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, itext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
vecprt.c:189:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, itext + (i__ - 1 << 1), (ftnlen)2);
^
( )
vecprt.c:190:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
vecprt.c:190:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
^
( )
vecprt.c:216:31: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, itext + (n - 1 << 1), (ftnlen)2);
~~^~~ ~~
vecprt.c:216:31: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, itext + (n - 1 << 1), (ftnlen)2);
^
( )
vecprt.c:217:31: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, jtext + (n - 1 << 1), (ftnlen)2);
~~^~~ ~~
vecprt.c:217:31: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, jtext + (n - 1 << 1), (ftnlen)2);
^
( )
vecprt.c:231:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, itext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
vecprt.c:231:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, itext + (i__ - 1 << 1), (ftnlen)2);
^
( )
vecprt.c:232:29: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
vecprt.c:232:29: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, jtext + (i__ - 1 << 1), (ftnlen)2);
^
( )
15 warnings generated.
f77 -O2 -w -c xerbla.f
f77 -O2 -w -c xyzint.f
clang -O2 -I/opt/pkg/include -c etime.c
clang -O2 -I/opt/pkg/include -c fdate.c
xerbla.f:
xerbla:
xyzint.f:
xyzint:
xyzgeo:
bangle:
dihed:
dang:
writmo.c:843:41: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (l - 1 << 1), (ftnlen)2);
~~^~~ ~~
writmo.c:843:41: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (l - 1 << 1), (ftnlen)2);
^
( )
writmo.c:995:37: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (l - 1 << 1), (ftnlen)2);
~~^~~ ~~
writmo.c:995:37: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (l - 1 << 1), (ftnlen)2);
^
( )
writmo.c:1010:61: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~~~~^~~ ~~
writmo.c:1010:61: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~~~~^~~
writmo.c:1143:62: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
writmo.c:1143:62: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] -
~~~~~~~~~~~~~~~~~~~~~~^
writmo.c:1234:26: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(ielemt + (ichfor - 1 << 1), elemts_1.elemnt + (i__ - 1 << 1), (
~~~~~~~^~~ ~~
writmo.c:1234:26: note: place parentheses around the '-' expression to silence this warning
s_copy(ielemt + (ichfor - 1 << 1), elemts_1.elemnt + (i__ - 1 << 1), (
^
( )
writmo.c:1234:60: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(ielemt + (ichfor - 1 << 1), elemts_1.elemnt + (i__ - 1 << 1), (
~~~~^~~ ~~
writmo.c:1234:60: note: place parentheses around the '-' expression to silence this warning
s_copy(ielemt + (ichfor - 1 << 1), elemts_1.elemnt + (i__ - 1 << 1), (
^
( )
writmo.c:1396:30: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, ielemt + (i__ - 1 << 1), (ftnlen)2);
~~~~^~~ ~~
writmo.c:1396:30: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, ielemt + (i__ - 1 << 1), (ftnlen)2);
^
( )
7 warnings generated.
symtrz.c:329:30: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(symres_1.namo + (i__ - 1 << 2), ifra, (ftnlen)4, (ftnlen)4);
~~~~^~~ ~~
symtrz.c:329:30: note: place parentheses around the '-' expression to silence this warning
s_copy(symres_1.namo + (i__ - 1 << 2), ifra, (ftnlen)4, (ftnlen)4);
^
( )
symtrz.c:489:45: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(s00020_1.nimm + (lcall + (i__ << 1) - 3 << 2), symres_1.namo +
~~~~~~~~~~~~~~~~~~~^~~ ~~
symtrz.c:489:45: note: place parentheses around the '-' expression to silence this warning
s_copy(s00020_1.nimm + (lcall + (i__ << 1) - 3 << 2), symres_1.namo +
^
( )
symtrz.c:490:8: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
(i__ - 1 << 2), (ftnlen)4, (ftnlen)4);
~~~~^~~ ~~
symtrz.c:490:8: note: place parentheses around the '-' expression to silence this warning
(i__ - 1 << 2), (ftnlen)4, (ftnlen)4);
^
( )
symtrz.c:492:37: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(s00020_1.nimm + ((i__ << 1) - 1 << 2), symres_1.namo + (i__ -
~~~~~~~~~~~^~~ ~~
symtrz.c:492:37: note: place parentheses around the '-' expression to silence this warning
s_copy(s00020_1.nimm + ((i__ << 1) - 1 << 2), symres_1.namo + (i__ -
^
( )
symtrz.c:492:69: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
s_copy(s00020_1.nimm + ((i__ << 1) - 1 << 2), symres_1.namo + (i__ -
~~~~^
symtrz.c:492:69: note: place parentheses around the '-' expression to silence this warning
s_copy(s00020_1.nimm + ((i__ << 1) - 1 << 2), symres_1.namo + (i__ -
^
(
5 warnings generated.
fdate.c:27:5: warning: implicit declaration of function 's_copy' is invalid in C99 [-Wimplicit-function-declaration]
s_copy(cht,ctime(&t),24L,24L);
^
1 warning generated.
polar.c:446:61: warning: operator '<<' has lower precedence than '-'; '-' will be evaluated first [-Wshift-op-parentheses]
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~~~~^~~ ~~
polar.c:446:61: note: place parentheses around the '-' expression to silence this warning
do_fio(&c__1, elemts_1.elemnt + (molkst_1.nat[i__ - 1] - 1 << 1),
~~~~~~~~~~~~~~~~~~~~~~^~~
1 warning generated.
-n Loading MOPAC7 ...
f77 -O2 -w aababc.o addfck.o addhcr.o addnuc.o analyt.o anavib.o axis.o block.o bonds.o brlzon.o btoc.o calpar.o capcor.o cdiag.o chrge.o cnvg.o compfg.o consts.o cqden.o datin.o dcart.o delmol.o delri.o denrot.o densit.o depvar.o deri0.o deri1.o deri2.o deri21.o deri22.o deri23.o deritr.o deriv.o dernvo.o ders.o dfock2.o dfpsav.o dgemm.o dgemv.o dger.o dgetf2.o dgetrf.o dgetri.o diag.o diat.o diat2.o diegrd.o dielen.o diis.o dijkl1.o dijkl2.o dipind.o dipole.o dlaswp.o dofs.o dot.o drc.o drcout.o dtrmm.o dtrmv.o dtrsm.o dtrti2.o dtrtri.o dvfill.o ef.o enpart.o esp.o exchng.o ffhpol.o flepo.o fmat.o fock1.o fock2.o force.o formxy.o forsav.o frame.o freqcy.o geout.o geoutg.o getgeg.o getgeo.o getsym.o gettxt.o gmetry.o gover.o greenf.o grid.o h1elec.o haddon.o hcore.o helect.o hqrii.o ijkl.o ilaenv.o initsv.o interp.o iter.o jcarin.o linmin.o local.o locmin.o lsame.o makpol.o mamult.o matou1.o matout.o matpak.o meci.o mecid.o mecih.o mecip.o moldat.o molval.o mopac.o mullik.o mult.o nllsq.o nuchar.o parsav.o partxy.o pathk.o paths.o perm.o polar.o powsav.o powsq.o prtdrc.o quadr.o react1.o reada.o readmo.o refer.o repp.o rotat.o rotate.o rsp.o search.o second.o setupg.o solrot.o swap.o sympro.o symtry.o symtrz.o thermo.o timer.o timout.o update.o upsurf.o vecprt.o writmo.o wrtkey.o wrttxt.o xerbla.o xyzint.o etime.o fdate.o -o MOPAC7
ld: unknown option: -R/opt/pkg/lib
clang: error: linker command failed with exit code 1 (use -v to see invocation)
gmake: *** [Makefile:35: MOPAC7] Error 1
*** Error code 2
Stop.
bmake[1]: stopped in /opt/pkgsrc/biology/mopac
*** Error code 1
Stop.
bmake: stopped in /opt/pkgsrc/biology/mopac