Opened 7 months ago

Closed 7 months ago

Last modified 7 months ago

#69849 closed defect (fixed)

R-minqa @1.2.6: clang: error: no such file or directory: 'WARNING:'

Reported by: ryandesign (Ryan Carsten Schmidt) Owned by: barracuda156
Priority: Normal Milestone:
Component: ports Version: 2.9.3
Keywords: Cc:
Port: R-minqa

Description

This might be specific to this older builder but the failure mode is still strange:

https://build.macports.org/builders/ports-10.6_i386-builder/builds/162078/steps/install-port/logs/stdio

clang: error: no such file or directory: 'WARNING:'
clang: error: no such file or directory: 'too'
clang: error: no such file or directory: 'small'
clang: error: no such file or directory: 'maximum'
clang: error: no such file or directory: 'for'
clang: error: no such file or directory: 'v(ector'
clang: error: no such file or directory: 'heap)size'
clang: error: no such file or directory: ''0''
clang: error: no such file or directory: 'ignored,'
clang: error: no such file or directory: 'the'
clang: error: no such file or directory: 'current'
clang: error: no such file or directory: 'usage'
clang: error: no such file or directory: '64M'
clang: error: no such file or directory: 'is'
clang: error: no such file or directory: 'already'
clang: error: no such file or directory: 'larger'
clang: error: no such file or directory: 'WARNING:'
clang: error: no such file or directory: 'too'
clang: error: no such file or directory: 'small'
clang: error: no such file or directory: 'maximum'
clang: error: no such file or directory: 'for'
clang: error: no such file or directory: 'v(ector'
clang: error: no such file or directory: 'heap)size'
clang: error: no such file or directory: ''0''
clang: error: no such file or directory: 'ignored,'
clang: error: no such file or directory: 'the'
clang: error: no such file or directory: 'current'
clang: error: no such file or directory: 'usage'
clang: error: no such file or directory: '64M'
clang: error: no such file or directory: 'is'
clang: error: no such file or directory: 'already'
clang: error: no such file or directory: 'larger'
make: *** [minqa.so] Error 1
ERROR: compilation failed for package ‘minqa’

Change History (17)

comment:1 in reply to:  description Changed 7 months ago by barracuda156

Replying to ryandesign:

This might be specific to this older builder but the failure mode is still strange:

https://build.macports.org/builders/ports-10.6_i386-builder/builds/162078/steps/install-port/logs/stdio

clang: error: no such file or directory: 'WARNING:'
clang: error: no such file or directory: 'too'
clang: error: no such file or directory: 'small'
clang: error: no such file or directory: 'maximum'
clang: error: no such file or directory: 'for'
clang: error: no such file or directory: 'v(ector'
clang: error: no such file or directory: 'heap)size'
clang: error: no such file or directory: ''0''
clang: error: no such file or directory: 'ignored,'
clang: error: no such file or directory: 'the'
clang: error: no such file or directory: 'current'
clang: error: no such file or directory: 'usage'
clang: error: no such file or directory: '64M'
clang: error: no such file or directory: 'is'
clang: error: no such file or directory: 'already'
clang: error: no such file or directory: 'larger'
clang: error: no such file or directory: 'WARNING:'
clang: error: no such file or directory: 'too'
clang: error: no such file or directory: 'small'
clang: error: no such file or directory: 'maximum'
clang: error: no such file or directory: 'for'
clang: error: no such file or directory: 'v(ector'
clang: error: no such file or directory: 'heap)size'
clang: error: no such file or directory: ''0''
clang: error: no such file or directory: 'ignored,'
clang: error: no such file or directory: 'the'
clang: error: no such file or directory: 'current'
clang: error: no such file or directory: 'usage'
clang: error: no such file or directory: '64M'
clang: error: no such file or directory: 'is'
clang: error: no such file or directory: 'already'
clang: error: no such file or directory: 'larger'
make: *** [minqa.so] Error 1
ERROR: compilation failed for package ‘minqa’

It is very weird indeed: compiler takes WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger as a set of arguments.

comment:3 in reply to:  2 Changed 7 months ago by barracuda156

Replying to ryandesign:

And it's not the only case.

So it only happens on i386? Cannot say anything at the moment, but I will try reproducing it.

  1. S. Perhaps, worth adding a tag for i386 and add other affected ports.
Last edited 7 months ago by barracuda156 (previous) (diff)

comment:4 Changed 7 months ago by barracuda156

Oh wow, it is actually broken now:

--->  Extracting minqa_1.2.6.tar.gz
Executing:  cd "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_R_R-minqa/R-minqa/work" && /usr/bin/gzip -dc '/opt/local/var/macports/distfiles/R-minqa/minqa_1.2.6.tar.gz' | /usr/bin/gnutar --no-same-owner -xf - 
--->  Configuring R-minqa
Executing:  cd "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_R_R-minqa/R-minqa/work/minqa" && /opt/local/bin/R CMD build . --no-manual --no-build-vignettes --keep-empty-dirs 
WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger

WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger

* checking for file ‘./DESCRIPTION’ ... OK
* preparing ‘minqa’:
* checking DESCRIPTION meta-information ... OK
* cleaning src
* checking for LF line-endings in source and make files and shell scripts
* checking for empty or unneeded directories
* building ‘minqa_1.2.6.tar.gz’

--->  Building R-minqa
xinstall: mkdir /opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_R_R-minqa/R-minqa/work/build
Executing:  cd "/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_R_R-minqa/R-minqa/work/minqa" && /opt/local/bin/R CMD INSTALL . --library=/opt/local/var/macports/build/_opt_local_var_macports_sources_rsync.macports.org_macports_release_tarballs_ports_R_R-minqa/R-minqa/work/build --install-tests 
WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger

WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger

* installing *source* package ‘minqa’ ...
** package ‘minqa’ successfully unpacked and MD5 sums checked
** using staged installation
** libs
using Fortran compiler: ‘GNU Fortran (MacPorts gcc13 13.2.0_4+stdlib_flag) 13.2.0’
using C++ compiler: ‘g++-mp-13 (MacPorts gcc13 13.2.0_4+stdlib_flag) 13.2.0’
Warning in system2("xcrun", "--show-sdk-path", TRUE, TRUE) :
  running command ''xcrun' --show-sdk-path 2>&1' had status 64
using SDK: ‘NA’‘NA’‘NA’‘NA’‘NA’‘NA’
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c altmov.f -o altmov.o
altmov.f:42:72:

   42 |    10 HCOL(K)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
altmov.f:45:72:

   45 |       DO 20 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
altmov.f:46:72:

   46 |    20 HCOL(K)=HCOL(K)+TEMP*ZMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
altmov.f:53:72:

   53 |    30 GLAG(I)=BMAT(KNEW,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
altmov.f:57:72:

   57 |    40 TEMP=TEMP+XPT(K,J)*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
altmov.f:59:72:

   59 |       DO 50 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1)
altmov.f:60:72:

   60 |    50 GLAG(I)=GLAG(I)+TEMP*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
altmov.f:76:72:

   76 |    60 DISTSQ=DISTSQ+TEMP*TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
altmov.f:173:72:

  173 |    90 XNEW(I)=DMAX1(SL(I),DMIN1(SU(I),TEMP))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
altmov.f:238:72:

  238 |   140 GW=GW+GLAG(I)*W(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1)
altmov.f:249:72:

  249 |   150 TEMP=TEMP+XPT(K,J)*W(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
altmov.f:250:72:

  250 |   160 CURV=CURV+HCOL(K)*TEMP*TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
altmov.f:256:72:

  256 |   170     XALT(I)=DMAX1(SL(I),DMIN1(SU(I),TEMP))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
altmov.f:269:72:

  269 |   180     W(N+I)=XALT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
altmov.f:276:72:

  276 |   190     XALT(I)=W(N+I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c bigden.f -o bigden.o
bigden.f:45:72:

   45 |    10 W(N+K)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
bigden.f:49:72:

   49 |       DO 20 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
bigden.f:50:72:

   50 |    20 W(N+K)=W(N+K)+TEMP*ZMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
bigden.f:67:72:

   67 |    30 XOPTSQ=XOPTSQ+XOPT(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
bigden.f:78:72:

   78 |    40         SSTEMP=SSTEMP+DIFF*DIFF
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
bigden.f:88:72:

   88 |    60     S(I)=XPT(KSAV,I)-XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
bigden.f:104:72:

  104 |    80 XOPTS=XOPTS+XOPT(I)*S(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
bigden.f:116:72:

  116 |    90 DEN(I)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
bigden.f:127:72:

  127 |   100 TEMPC=TEMPC+XPT(K,I)*XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
bigden.f:132:72:

  132 |   110 WVEC(K,5)=HALF*TEMPA*TEMPB
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
bigden.f:139:72:

  139 |   120 WVEC(IP,5)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
bigden.f:147:72:

  147 |   130 PROD(K,JC)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
bigden.f:151:72:

  151 |   140 SUM=SUM+ZMAT(K,J)*WVEC(K,JC)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1)
bigden.f:153:72:

  153 |       DO 150 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1)
bigden.f:154:72:

  154 |   150 PROD(K,JC)=PROD(K,JC)+SUM*ZMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
bigden.f:159:72:

  159 |   160     SUM=SUM+BMAT(K,J)*WVEC(NPT+J,JC)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
bigden.f:160:72:

  160 |   170     PROD(K,JC)=PROD(K,JC)+SUM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
bigden.f:162:72:

  162 |       DO 190 J=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 190 at (1)
bigden.f:165:72:

  165 |   180 SUM=SUM+BMAT(I,J)*WVEC(I,JC)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
bigden.f:166:72:

  166 |   190 PROD(NPT+J,JC)=SUM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1)
bigden.f:174:72:

  174 |   200 SUM=SUM+PAR(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1)
bigden.f:193:72:

  193 |   210 DEN(9)=DEN(9)-HALF*TEMPA
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
bigden.f:200:72:

  200 |   220 SUM=SUM+PAR(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
bigden.f:234:72:

  234 |   230 PAR(J+1)=PAR(2)*PAR(J-1)+PAR(3)*PAR(J-2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1)
bigden.f:238:72:

  238 |   240 SUM=SUM+DENEX(J)*PAR(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
bigden.f:264:72:

  264 |   260 PAR(J+1)=PAR(2)*PAR(J-1)+PAR(3)*PAR(J-2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1)
bigden.f:269:72:

  269 |   270 DENMAX=DENMAX+DENEX(J)*PAR(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1)
bigden.f:272:72:

  272 |       DO 280 J=1,5
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 280 at (1)
bigden.f:273:72:

  273 |   280 VLAG(K)=VLAG(K)+PROD(K,J)*PAR(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1)
bigden.f:283:72:

  283 |   290 TEMPB=TEMPB+W(I)*W(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1)
bigden.f:294:72:

  294 |   300 S(I)=TAU*BMAT(KNEW,I)+ALPHA*TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1)
bigden.f:298:72:

  298 |   310 SUM=SUM+XPT(K,J)*W(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
bigden.f:300:72:

  300 |       DO 320 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 320 at (1)
bigden.f:301:72:

  301 |   320 S(I)=S(I)+TEMP*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1)
bigden.f:306:72:

  306 |   330 DS=DS+D(I)*S(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1)
bigden.f:314:72:

  314 |       DO 350 J=1,5
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 350 at (1)
bigden.f:315:72:

  315 |   350 W(K)=W(K)+WVEC(K,J)*PAR(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c biglag.f -o biglag.o
biglag.f:38:72:

   38 |    10 HCOL(K)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
biglag.f:42:72:

   42 |       DO 20 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
biglag.f:43:72:

   43 |    20 HCOL(K)=HCOL(K)+TEMP*ZMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
biglag.f:54:72:

   54 |    30 DD=DD+D(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
biglag.f:60:72:

   60 |    40 SUM=SUM+XPT(K,J)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
biglag.f:63:72:

   63 |       DO 50 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1)
biglag.f:65:72:

   65 |    50 GD(I)=GD(I)+SUM*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
biglag.f:76:72:

   76 |    60 DHD=DHD+D(I)*GD(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
biglag.f:86:72:

   86 |    70 S(I)=GC(I)+TEMP*GD(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
biglag.f:99:72:

   99 |    90 SS=SS+S(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
biglag.f:105:72:

  105 |   100 W(I)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
biglag.f:113:72:

  113 |   110 SUM=SUM+XPT(K,J)*S(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
biglag.f:115:72:

  115 |       DO 120 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 120 at (1)
biglag.f:116:72:

  116 |   120 W(I)=W(I)+SUM*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
biglag.f:127:72:

  127 |   130 CF5=CF5+S(I)*GD(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
biglag.f:151:72:

  151 |   140 TAUOLD=TAU
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1)
biglag.f:170:72:

  170 |   150 S(I)=GC(I)+GD(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c bobyqa.f -o bobyqa.o
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c bobyqb.f -o bobyqb.o
bobyqb.f:68:72:

   68 |    10 XOPTSQ=XOPTSQ+XOPT(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
bobyqb.f:97:72:

   97 |           DO 30 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 30 at (1)
bobyqb.f:100:72:

  100 |    30     GOPT(I)=GOPT(I)+HQ(IH)*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
bobyqb.f:105:72:

  105 |    40         TEMP=TEMP+XPT(K,J)*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
bobyqb.f:107:72:

  107 |               DO 50 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1)
bobyqb.f:108:72:

  108 |    50         GOPT(I)=GOPT(I)+TEMP*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
bobyqb.f:145:72:

  145 |    70         CURV=CURV+PQ(K)*XPT(K,J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
bobyqb.f:167:72:

  167 |   100     SUM=SUM+XPT(K,I)*XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
bobyqb.f:170:72:

  170 |           DO 110 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1)
bobyqb.f:174:72:

  174 |           DO 110 J=1,I
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1)
bobyqb.f:175:72:

  175 |   110     BMAT(IP,J)=BMAT(IP,J)+W(I)*VLAG(J)+VLAG(I)*W(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
bobyqb.f:185:72:

  185 |   120     SUMW=SUMW+VLAG(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
bobyqb.f:189:72:

  189 |   130     SUM=SUM+VLAG(K)*XPT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
bobyqb.f:191:72:

  191 |           DO 140 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 140 at (1)
bobyqb.f:192:72:

  192 |   140     BMAT(K,J)=BMAT(K,J)+SUM*ZMAT(K,JJ)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1)
bobyqb.f:193:72:

  193 |           DO 150 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1)
bobyqb.f:196:72:

  196 |           DO 150 J=1,I
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1)
bobyqb.f:197:72:

  197 |   150     BMAT(IP,J)=BMAT(IP,J)+TEMP*W(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
bobyqb.f:207:72:

  207 |   160     XPT(K,J)=XPT(K,J)-XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
bobyqb.f:208:72:

  208 |           DO 170 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1)
bobyqb.f:211:72:

  211 |   170     BMAT(NPT+I,J)=BMAT(NPT+J,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
bobyqb.f:217:72:

  217 |   180     XOPT(I)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
bobyqb.f:246:72:

  246 |   200     XOPTSQ=XOPTSQ+XOPT(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1)
bobyqb.f:278:72:

  278 |   220 D(I)=XNEW(I)-XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
bobyqb.f:291:72:

  291 |   240 SUM=SUM+BMAT(K,J)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
bobyqb.f:294:72:

  294 |   250 W(NPT+K)=SUMA
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1)
bobyqb.f:299:72:

  299 |   260 SUM=SUM+ZMAT(K,JJ)*W(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1)
bobyqb.f:301:72:

  301 |       DO 270 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 270 at (1)
bobyqb.f:302:72:

  302 |   270 VLAG(K)=VLAG(K)+SUM*ZMAT(K,JJ)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1)
bobyqb.f:310:72:

  310 |   280 SUM=SUM+W(K)*BMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1)
bobyqb.f:314:72:

  314 |   290 SUM=SUM+BMAT(JP,I)*D(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1)
bobyqb.f:317:72:

  317 |   300 DX=DX+D(J)*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1)
bobyqb.f:330:72:

  330 |   310         D(I)=XNEW(I)-XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
bobyqb.f:361:72:

  361 |   330     HDIAG=HDIAG+ZMAT(K,JJ)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1)
bobyqb.f:365:72:

  365 |   340     DISTSQ=DISTSQ+(XPT(K,J)-XOPT(J))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
bobyqb.f:428:72:

  428 |       DO 410 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 410 at (1)
bobyqb.f:432:72:

  432 |   410 VQUAD=VQUAD+HQ(IH)*TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 410 at (1)
bobyqb.f:434:72:

  434 |   420 VQUAD=VQUAD+HALF*PQ(K)*W(NPT+K)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1)
bobyqb.f:476:72:

  476 |   440         HDIAG=HDIAG+ZMAT(K,JJ)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1)
bobyqb.f:480:72:

  480 |   450         DISTSQ=DISTSQ+(XPT(K,J)-XNEW(J))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 450 at (1)
bobyqb.f:487:72:

  487 |   460         BIGLSQ=DMAX1(BIGLSQ,TEMP*VLAG(K)**2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 460 at (1)
bobyqb.f:504:72:

  504 |       DO 470 J=1,I
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 470 at (1)
bobyqb.f:506:72:

  506 |   470 HQ(IH)=HQ(IH)+TEMP*XPT(KNEW,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 470 at (1)
bobyqb.f:509:72:

  509 |       DO 480 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 480 at (1)
bobyqb.f:510:72:

  510 |   480 PQ(K)=PQ(K)+TEMP*ZMAT(K,JJ)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 480 at (1)
bobyqb.f:518:72:

  518 |   490 W(I)=BMAT(KNEW,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 490 at (1)
bobyqb.f:522:72:

  522 |   500 SUMA=SUMA+ZMAT(KNEW,JJ)*ZMAT(K,JJ)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 500 at (1)
bobyqb.f:525:72:

  525 |   510 SUMB=SUMB+XPT(K,J)*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 510 at (1)
bobyqb.f:527:72:

  527 |       DO 520 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 520 at (1)
bobyqb.f:528:72:

  528 |   520 W(I)=W(I)+TEMP*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 520 at (1)
bobyqb.f:530:72:

  530 |   530 GOPT(I)=GOPT(I)+DIFF*W(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 530 at (1)
bobyqb.f:541:72:

  541 |           DO 540 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 540 at (1)
bobyqb.f:544:72:

  544 |   540     GOPT(I)=GOPT(I)+HQ(IH)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 540 at (1)
bobyqb.f:548:72:

  548 |   550     TEMP=TEMP+XPT(K,J)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 550 at (1)
bobyqb.f:550:72:

  550 |           DO 560 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 560 at (1)
bobyqb.f:551:72:

  551 |   560     GOPT(I)=GOPT(I)+TEMP*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 560 at (1)
bobyqb.f:561:72:

  561 |   570     W(K)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 570 at (1)
bobyqb.f:565:72:

  565 |   580     SUM=SUM+ZMAT(K,J)*VLAG(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 580 at (1)
bobyqb.f:566:72:

  566 |           DO 590 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 590 at (1)
bobyqb.f:567:72:

  567 |   590     W(K)=W(K)+SUM*ZMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 590 at (1)
bobyqb.f:571:72:

  571 |   600     SUM=SUM+XPT(K,J)*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 600 at (1)
bobyqb.f:573:72:

  573 |   610     W(K)=SUM*W(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 610 at (1)
bobyqb.f:579:72:

  579 |   620     SUM=SUM+BMAT(K,I)*VLAG(K)+XPT(K,I)*W(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 620 at (1)
bobyqb.f:590:72:

  590 |   630     VLAG(NPT+I)=SUM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 630 at (1)
bobyqb.f:622:72:

  622 |   660 SUM=SUM+(XPT(K,J)-XOPT(J))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 660 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c lagmax.f -o lagmax.o
lagmax.f:36:72:

   36 |    10 SUM=SUM+H(I,J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
lagmax.f:43:72:

   43 |    30 V(J)=H(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
lagmax.f:56:72:

   56 |    40 D(I)=D(I)+H(I,J)*V(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
lagmax.f:58:72:

   58 |    50 DSQ=DSQ+D(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
lagmax.f:64:72:

   64 |    60     WSQ=WSQ+D(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
lagmax.f:70:72:

   70 |    70     TEMP=TEMP+H(I,J)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
lagmax.f:72:72:

   72 |    80     V(I)=RATIO*V(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
lagmax.f:78:72:

   78 |    90     D(I)=VHW*V(I)+TEMP*D(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
lagmax.f:94:72:

   94 |   100 SUM=SUM+H(I,J)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
lagmax.f:95:72:

   95 |   110 DHD=DHD+SUM*D(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
lagmax.f:102:72:

  102 |   120 D(I)=SCALE*D(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
lagmax.f:122:72:

  122 |   130 SUMV=SUMV+H(I,J)*V(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
lagmax.f:125:72:

  125 |   140 VHV=VHV+SUMV*V(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1)
lagmax.f:147:72:

  147 |   150 V(I)=TEMPC*V(I)-TEMPD*G(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
lagmax.f:168:72:

  168 |   160 D(I)=TEMPD*D(I)+TEMPV*V(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
/opt/local/bin/g++-mp-13 -std=gnu++17 -I"/opt/local/Library/Frameworks/R.framework/Resources/include" -DNDEBUG  -I'/opt/local/Library/Frameworks/R.framework/Versions/4.4/Resources/library/Rcpp/include' -isystem/opt/local/include/LegacySupport -I/opt/local/include    -fPIC  -pipe -Os -arch ppc   -c minqa.cpp -o minqa.o
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c newuoa.f -o newuoa.o
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c newuob.f -o newuob.o
newuob.f:49:72:

   49 |    10 XPT(K,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
newuob.f:50:72:

   50 |       DO 20 I=1,NDIM
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
newuob.f:51:72:

   51 |    20 BMAT(I,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
newuob.f:53:72:

   53 |    30 HQ(IH)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
newuob.f:56:72:

   56 |       DO 40 J=1,NPTM
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1)
newuob.f:57:72:

   57 |    40 ZMAT(K,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
newuob.f:98:72:

   98 |    60 X(J)=XPT(NF,J)+XBASE(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
newuob.f:159:72:

  159 |    80 XOPTSQ=XOPTSQ+XOPT(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
newuob.f:170:72:

  170 |   110 DSQ=DSQ+D(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
newuob.f:191:72:

  191 |   130     SUM=SUM+XPT(K,I)*XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
newuob.f:195:72:

  195 |           DO 140 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 140 at (1)
newuob.f:201:72:

  201 |           DO 140 J=1,I
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 140 at (1)
newuob.f:202:72:

  202 |   140     BMAT(IP,J)=BMAT(IP,J)+VLAG(I)*W(J)+W(I)*VLAG(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1)
newuob.f:210:72:

  210 |   150     W(I)=W(NPT+I)*ZMAT(I,K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
newuob.f:214:72:

  214 |   160     SUM=SUM+W(I)*XPT(I,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
newuob.f:217:72:

  217 |           DO 170 I=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 170 at (1)
newuob.f:218:72:

  218 |   170     BMAT(I,J)=BMAT(I,J)+SUM*ZMAT(I,K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
newuob.f:219:72:

  219 |           DO 180 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 180 at (1)
newuob.f:223:72:

  223 |           DO 180 J=1,I
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 180 at (1)
newuob.f:224:72:

  224 |   180     BMAT(IP,J)=BMAT(IP,J)+TEMP*VLAG(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
newuob.f:234:72:

  234 |   190     XPT(K,J)=XPT(K,J)-HALF*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1)
newuob.f:235:72:

  235 |           DO 200 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 200 at (1)
newuob.f:240:72:

  240 |   200     BMAT(NPT+I,J)=BMAT(NPT+J,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1)
newuob.f:243:72:

  243 |   210     XOPT(J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
newuob.f:266:72:

  266 |   220 SUM=SUM+BMAT(K,J)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
newuob.f:268:72:

  268 |   230 VLAG(K)=SUM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1)
newuob.f:273:72:

  273 |   240 SUM=SUM+ZMAT(I,K)*W(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
newuob.f:280:72:

  280 |       DO 250 I=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 250 at (1)
newuob.f:281:72:

  281 |   250 VLAG(I)=VLAG(I)+SUM*ZMAT(I,K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1)
newuob.f:287:72:

  287 |   260 SUM=SUM+W(I)*BMAT(I,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1)
newuob.f:291:72:

  291 |   270 SUM=SUM+BMAT(JP,K)*D(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1)
newuob.f:294:72:

  294 |   280 DX=DX+D(J)*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1)
newuob.f:314:72:

  314 |   300 X(I)=XBASE(I)+XNEW(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1)
newuob.f:343:72:

  343 |       DO 340 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 340 at (1)
newuob.f:347:72:

  347 |   340 VQUAD=VQUAD+TEMP*HQ(IH)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
newuob.f:349:72:

  349 |   350 VQUAD=VQUAD+PQ(K)*W(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1)
newuob.f:366:72:

  366 |   360     XOPTSQ=XOPTSQ+XOPT(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1)
newuob.f:405:72:

  405 |   380 HDIAG=HDIAG+TEMP*ZMAT(K,J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1)
newuob.f:409:72:

  409 |   390 DISTSQ=DISTSQ+(XPT(K,J)-XOPT(J))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1)
newuob.f:427:72:

  427 |       DO 420 J=1,I
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 420 at (1)
newuob.f:429:72:

  429 |   420 HQ(IH)=HQ(IH)+TEMP*XPT(KNEW,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 420 at (1)
newuob.f:438:72:

  438 |       DO 440 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 440 at (1)
newuob.f:439:72:

  439 |   440 PQ(K)=PQ(K)+TEMP*ZMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 440 at (1)
newuob.f:444:72:

  444 |   450 XPT(KNEW,I)=XNEW(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 450 at (1)
newuob.f:455:72:

  455 |   700         VLAG(K)=FVAL(K)-FVAL(KOPT)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 700 at (1)
newuob.f:460:72:

  460 |   710         SUM=SUM+BMAT(K,I)*VLAG(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 710 at (1)
newuob.f:462:72:

  462 |   720         W(I)=SUM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 720 at (1)
newuob.f:471:72:

  471 |   730             GQ(I)=W(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 730 at (1)
newuob.f:473:72:

  473 |   740             HQ(IH)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 740 at (1)
newuob.f:477:72:

  477 |   750             W(J)=W(J)+VLAG(K)*ZMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 750 at (1)
newuob.f:478:72:

  478 |   760             IF (J .LT. IDZ) W(J)=-W(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 760 at (1)
newuob.f:481:72:

  481 |                   DO 770 J=1,NPTM
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 770 at (1)
newuob.f:482:72:

  482 |   770             PQ(K)=PQ(K)+ZMAT(K,J)*W(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 770 at (1)
newuob.f:504:72:

  504 |   470 SUM=SUM+(XPT(K,J)-XOPT(J))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 470 at (1)
newuob.f:556:72:

  556 |   540     X(I)=XBASE(I)+XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 540 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c prelim.f -o prelim.o
prelim.f:39:72:

   39 |    10 XPT(K,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
prelim.f:40:72:

   40 |       DO 20 I=1,NDIM
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
prelim.f:41:72:

   41 |    20 BMAT(I,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
prelim.f:43:72:

   43 |    30 HQ(IH)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
prelim.f:46:72:

   46 |       DO 40 J=1,NPT-NP
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1)
prelim.f:47:72:

   47 |    40 ZMAT(K,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c rescue.f -o rescue.o
rescue.f:66:72:

   66 |    10 DISTSQ=DISTSQ+XPT(K,J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
rescue.f:70:72:

   70 |       DO 20 J=1,NPTM
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
rescue.f:71:72:

   71 |    20 ZMAT(K,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
rescue.f:80:72:

   80 |    30 W(J)=W(J)+PQ(K)*XPT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
rescue.f:81:72:

   81 |       DO 40 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 40 at (1)
rescue.f:83:72:

   83 |    40 HQ(IH)=HQ(IH)+W(I)*XOPT(J)+W(J)*XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
rescue.f:103:72:

  103 |       DO 50 I=1,NDIM
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 50 at (1)
rescue.f:104:72:

  104 |    50 BMAT(I,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
rescue.f:145:72:

  145 |    70     ZMAT(K,K-NP)=TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
rescue.f:157:72:

  157 |    90 BMAT(KNEW,J)=TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
rescue.f:161:72:

  161 |   100 ZMAT(KNEW,J)=TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
rescue.f:180:72:

  180 |  110         W(NDIM+K)=DABS(W(NDIM+K))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
rescue.f:201:72:

  201 |   140 W(NPT+J)=XPT(KNEW,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1)
rescue.f:208:72:

  208 |   150     SUM=SUM+W(NPT+J)*XPT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
rescue.f:219:72:

  219 |   160 W(K)=HALF*SUM*SUM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
rescue.f:227:72:

  227 |   170 SUM=SUM+BMAT(K,J)*W(NPT+J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
rescue.f:228:72:

  228 |   180 VLAG(K)=SUM
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
rescue.f:233:72:

  233 |   190 SUM=SUM+ZMAT(K,J)*W(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1)
rescue.f:235:72:

  235 |       DO 200 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 200 at (1)
rescue.f:236:72:

  236 |   200 VLAG(K)=VLAG(K)+SUM*ZMAT(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1)
rescue.f:242:72:

  242 |   210 SUM=SUM+BMAT(K,J)*W(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
rescue.f:246:72:

  246 |   220 SUM=SUM+BMAT(IP,J)*W(IP)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
rescue.f:249:72:

  249 |   230 DISTSQ=DISTSQ+XPT(KNEW,J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1)
rescue.f:264:72:

  264 |   240     HDIAG=HDIAG+ZMAT(K,J)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
rescue.f:271:72:

  271 |   250 VLMXSQ=DMAX1(VLMXSQ,VLAG(K)**2)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1)
rescue.f:297:72:

  297 |       DO 270 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 270 at (1)
rescue.f:299:72:

  299 |   270 HQ(IH)=HQ(IH)+TEMP*W(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1)
rescue.f:332:72:

  332 |   280 VQUAD=VQUAD+HALF*PQ(K)*TEMP*TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1)
rescue.f:359:72:

  359 |   310 GOPT(I)=GOPT(I)+DIFF*BMAT(KPT,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
rescue.f:363:72:

  363 |   320 SUM=SUM+ZMAT(K,J)*ZMAT(KPT,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 320 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c trsapp.f -o trsapp.o
trsapp.f:33:72:

   33 |    10 D(I)=XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
trsapp.f:45:72:

   45 |    30 DD=DD+D(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
trsapp.f:61:72:

   61 |    60 DHD=DHD+D(J)*HD(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
trsapp.f:82:72:

   82 |    70 GG=GG+(G(I)+HS(I))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 70 at (1)
trsapp.f:98:72:

   98 |    80     SS=SS+STEP(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
trsapp.f:112:72:

  112 |   100 SHS=SHS+STEP(I)*HS(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
trsapp.f:125:72:

  125 |   110 D(I)=TEMPA*(G(I)+HS(I))-TEMPB*STEP(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
trsapp.f:133:72:

  133 |   130 DHS=DHS+HD(I)*STEP(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
trsapp.f:156:72:

  156 |   140 QSAV=QNEW
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 140 at (1)
trsapp.f:176:72:

  176 |   150 GG=GG+(G(I)+HS(I))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
trsapp.f:188:72:

  188 |   180 HD(I)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
trsapp.f:192:72:

  192 |   190 TEMP=TEMP+XPT(K,J)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1)
trsapp.f:194:72:

  194 |       DO 200 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 200 at (1)
trsapp.f:195:72:

  195 |   200 HD(I)=HD(I)+TEMP*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1)
trsapp.f:198:72:

  198 |       DO 210 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 210 at (1)
trsapp.f:201:72:

  201 |   210 HD(I)=HD(I)+HQ(IH)*D(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c trsbox.f -o trsbox.o
trsbox.f:71:72:

   71 |    10 GNEW(I)=GOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
trsbox.f:92:72:

   92 |    40 STEPSQ=STEPSQ+S(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
trsbox.f:163:72:

  163 |    80     D(I)=D(I)+STPLEN*S(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
trsbox.f:304:72:

  304 |   170 REDSAV=REDNEW
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
trsbox.f:333:72:

  333 |   180 HRED(I)=CTH*HRED(I)+STH*HS(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
trsbox.f:351:72:

  351 |   200 DSQ=DSQ+D(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1)
trsbox.f:362:72:

  362 |       DO 220 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 220 at (1)
trsbox.f:365:72:

  365 |   220 HS(I)=HS(I)+HQ(IH)*S(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
trsbox.f:370:72:

  370 |   230     TEMP=TEMP+XPT(K,J)*S(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 230 at (1)
trsbox.f:373:72:

  373 |   240     HS(I)=HS(I)+TEMP*XPT(K,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
trsbox.f:379:72:

  379 |   260 HRED(I)=HS(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c trstep.f -o trstep.o
trstep.f:41:72:

   41 |       DO 10 J=1,I
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1)
trstep.f:42:72:

   42 |    10 H(I,J)=H(J,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
trstep.f:55:72:

   55 |    20     SUM=SUM+H(I,K)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
trstep.f:68:72:

   68 |    30     Z(I)=TD(I)*W(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
trstep.f:74:72:

   74 |    40     Z(J)=Z(J)+H(I,J)*W(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
trstep.f:75:72:

   75 |    50     WZ=WZ+W(J)*Z(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
trstep.f:82:72:

   82 |    60         H(I,J)=H(I,J)-W(I)*Z(J)-W(J)*(Z(I)-WZ*W(I))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
trstep.f:93:72:

   93 |    90 GSQ=GSQ+G(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
trstep.f:99:72:

   99 |   100 SUM=SUM+GG(I)*H(I,K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
trstep.f:100:72:

  100 |       DO 110 I=KP,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 110 at (1)
trstep.f:101:72:

  101 |   110 GG(I)=GG(I)-SUM*H(I,K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
trstep.f:112:72:

  112 |   120 TDMIN=DMIN1(TDMIN,TD(I))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 120 at (1)
trstep.f:117:72:

  117 |   130     D(I)=-SCALE*GG(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 130 at (1)
trstep.f:187:72:

  187 |   180     D(I)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
trstep.f:200:72:

  200 |   200     DTG=DTG+D(I)*GG(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1)
trstep.f:203:72:

  203 |   210     D(I)=SCALE*D(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 210 at (1)
trstep.f:222:72:

  222 |   240 W(I)=(-GG(I)-TN(I-1)*W(I-1))/PIV(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 240 at (1)
trstep.f:225:72:

  225 |   250 D(I)=W(I)-TN(I)*D(I+1)/PIV(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1)
trstep.f:233:72:

  233 |   260 WSQ=WSQ+PIV(I)*W(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1)
trstep.f:244:72:

  244 |   270     D(I)=SCALE*D(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1)
trstep.f:276:72:

  276 |   280     W(I)=(DSIGN(ONE,TEMP)+TEMP)/PIV(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 280 at (1)
trstep.f:279:72:

  279 |   290     Z(I)=W(I)-TN(I)*Z(I+1)/PIV(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 290 at (1)
trstep.f:286:72:

  286 |   300     DTZ=DTZ+D(I)*Z(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1)
trstep.f:296:72:

  296 |   310         D(I)=D(I)+GAM*Z(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 310 at (1)
trstep.f:327:72:

  327 |   330 SHFMAX=DMIN1(SHFMAX,PIVOT)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1)
trstep.f:371:72:

  371 |   380 SUM=SUM+D(I)*H(I,K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1)
trstep.f:372:72:

  372 |       DO 390 I=KP,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 390 at (1)
trstep.f:373:72:

  373 |   390 D(I)=D(I)-SUM*H(I,K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 390 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c uobyqa.f -o uobyqa.o
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c uobyqb.f -o uobyqb.o
uobyqb.f:49:72:

   49 |       DO 10 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1)
uobyqb.f:50:72:

   50 |    10 XPT(K,I)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
uobyqb.f:52:72:

   52 |       DO 20 J=1,NPTM
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 20 at (1)
uobyqb.f:53:72:

   53 |    20 PL(K,J)=ZERO
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
uobyqb.f:61:72:

   61 |    40 X(I)=XBASE(I)+XPT(NF+1,I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
uobyqb.f:173:72:

  173 |       DO 80 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 80 at (1)
uobyqb.f:177:72:

  177 |    80 H(I,J)=PQ(IH)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 80 at (1)
uobyqb.f:187:72:

  187 |    90 TEMP=TEMP+D(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 90 at (1)
uobyqb.f:201:72:

  201 |  110     X(I)=XBASE(I)+XNEW(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 110 at (1)
uobyqb.f:230:72:

  230 |       DO 150 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 150 at (1)
uobyqb.f:234:72:

  234 |   150 VQUAD=VQUAD+W(IH)*PQ(IH)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 150 at (1)
uobyqb.f:238:72:

  238 |   160 TEMP=TEMP+W(J)*PL(K,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 160 at (1)
uobyqb.f:239:72:

  239 |   170 VLAG(K)=TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 170 at (1)
uobyqb.f:250:72:

  250 |   180 TEMP=TEMP+(XPT(K,I)-XNEW(I))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 180 at (1)
uobyqb.f:252:72:

  252 |   190 SUM=SUM+DABS(TEMP*TEMP*TEMP*VLAG(K))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 190 at (1)
uobyqb.f:262:72:

  262 |   200     XOPT(I)=XNEW(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 200 at (1)
uobyqb.f:298:72:

  298 |   220 SUM=SUM+(XPT(K,I)-XOPT(I))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 220 at (1)
uobyqb.f:313:72:

  313 |   250 XPT(KNEW,I)=XNEW(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 250 at (1)
uobyqb.f:317:72:

  317 |   260 PQ(J)=PQ(J)+DIFF*PL(KNEW,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 260 at (1)
uobyqb.f:322:72:

  322 |   270     PL(K,J)=PL(K,J)-TEMP*PL(KNEW,J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 270 at (1)
uobyqb.f:343:72:

  343 |       DO 300 I=1,N
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 300 at (1)
uobyqb.f:344:72:

  344 |   300 W(K)=W(K)+(XPT(K,I)-XOPT(I))**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 300 at (1)
uobyqb.f:371:72:

  371 |   330     H(I,J)=TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 330 at (1)
uobyqb.f:372:72:

  372 |   340     SUMH=SUMH+HALF*TEMP*TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 340 at (1)
uobyqb.f:382:72:

  382 |   350         SUMG=SUMG+G(I)**2
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 350 at (1)
uobyqb.f:409:72:

  409 |   360     XPT(K,J)=XPT(K,J)-XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 360 at (1)
uobyqb.f:410:72:

  410 |           DO 380 I=1,J
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 380 at (1)
uobyqb.f:416:72:

  416 |   370         PL(K,J)=PL(K,J)+PL(K,IH)*XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 370 at (1)
uobyqb.f:418:72:

  418 |           DO 380 K=1,NPT
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 380 at (1)
uobyqb.f:419:72:

  419 |   380     PL(K,I)=PL(K,I)+PL(K,IH)*XOPT(J)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 380 at (1)
uobyqb.f:453:72:

  453 |   430     X(I)=XBASE(I)+XOPT(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 430 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c update.f -o update.o
update.f:30:72:

   30 |    10     ZMAT(I,JL)=TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
update.f:61:72:

   61 |    40     ZMAT(I,1)=TEMPA*ZMAT(I,1)-TEMPB*VLAG(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 40 at (1)
update.f:79:72:

   79 |    50     ZMAT(I,JB)=SCALB*(ZMAT(I,JB)-TEMPA*W(I)-TEMPB*VLAG(I))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
update.f:94:72:

   94 |    60     ZMAT(I,IDZ)=TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 60 at (1)
update.f:104:72:

  104 |       DO 70 I=1,JP
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 70 at (1)
/opt/local/bin/gfortran-mp-13  -fPIC  -pipe -Os -m32  -c updatebobyqa.f -o updatebobyqa.o
updatebobyqa.f:22:72:

   22 |       DO 10 J=1,NPTM
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 10 at (1)
updatebobyqa.f:23:72:

   23 |    10 ZTEST=DMAX1(ZTEST,DABS(ZMAT(K,J)))
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
updatebobyqa.f:37:72:

   37 |    20     ZMAT(I,1)=TEMP
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
updatebobyqa.f:58:72:

   58 |    50 ZMAT(I,1)=TEMPA*ZMAT(I,1)-TEMPB*VLAG(I)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 50 at (1)
updatebobyqa.f:67:72:

   67 |       DO 60 I=1,JP
      |                                                                        1
Warning: Fortran 2018 deleted feature: Shared DO termination label 60 at (1)
/opt/local/bin/g++-mp-13 -std=gnu++17 -dynamiclib -Wl,-headerpad_max_install_names -undefined dynamic_lookup -single_module -multiply_defined suppress -L/opt/local/Library/Frameworks/R.framework/Resources/lib -Wl,-headerpad_max_install_names -L/opt/local/lib -lMacportsLegacySupport -Wl,-rpath,/opt/local/lib/libgcc -arch ppc -o minqa.so altmov.o bigden.o biglag.o bobyqa.o bobyqb.o lagmax.o minqa.o newuoa.o newuob.o prelim.o rescue.o trsapp.o trsbox.o trstep.o uobyqa.o uobyqb.o update.o updatebobyqa.o WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger -lMacportsLegacySupport -lgfortran -lef_ppc -F/opt/local/Library/Frameworks/R.framework/.. -framework R -Wl,-framework -Wl,CoreFoundation
ld: file not found: WARNING:
collect2: error: ld returned 1 exit status
make: *** [minqa.so] Error 1

Nothing related to i386. Sorry, I just now reached it.

This must be fixed ASAP, of course, I will look into this now.

Version 0, edited 7 months ago by barracuda156 (next)

comment:5 Changed 7 months ago by barracuda156

Likely upstream has broken something in R itself, which is rather upsetting.

comment:6 in reply to:  2 Changed 7 months ago by barracuda156

Replying to ryandesign:

And it's not the only case.

Okay, I do not yet know why, but perhaps I know what is broken:

PKG_LIBS = `$(R_HOME)/bin/Rscript -e "Rcpp:::LdFlags()"`

This fails to work correctly now. Since the packages themselves are not changed, it is likely broken in R 4.4.0. Though not impossible that elsewhere, just very few packages use this odd invocation for ldflags.

comment:7 Changed 7 months ago by barracuda156

I reverted to an older version of R-Rcpp, and the error remained. So it is either R itself or still R-Rcpp, but triggered by these warnings which were introduced in R 4.4.0.

UPD. Let's see if the upstream of R-Rcpp could help us: https://github.com/RcppCore/Rcpp/issues/1302

Last edited 7 months ago by barracuda156 (previous) (diff)

comment:8 Changed 7 months ago by barracuda156

So we have a fix now, but I need to know which packages fail, since it has to be fixed on packages' side. Is there a way to find that out from buildbots' results without peeping into every log?

comment:9 Changed 7 months ago by barracuda156

comment:10 Changed 7 months ago by barracuda156

We may have three issues here :)

  1. A bug in startup.c (?) in R, which uses wrong types when determining memory limits. It also seems to use Linux defines for macOS.

Something like this will work, perhaps: https://github.com/wshanks/qiskit-aer/commit/11f6afa311ba609eeb3bca37ed01b797076739f9 But with the fixed type MinMaxVSize (which R source uses). This perhaps leads to silly warnings being set in the first place. So even when starting R now,

36-170% /opt/local/bin/R
WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger

WARNING: too small maximum for v(ector heap)size '0' ignored, the current usage 64M is already larger


R version 4.4.0 (2024-04-24) -- "Puppy Cup"
Copyright (C) 2024 The R Foundation for Statistical Computing
Platform: powerpc-apple-darwin10.0.0d2 (32-bit)
  1. A bug somewhere, which interprets that as objects to pass to the linker. It is probably in Rcpp, however the position of upstream is that Rcpp:::LdFlags() should not be used as deprecated a decade ago.

It should be easier to fix this in R to get rid of the warning string, though it will leave the second bug unfixed – but it won't affect us.

  1. Packages which use a deprecated call – but there are apparently many of such, we cannot bother fixing each one.

comment:11 Changed 7 months ago by barracuda156

Ticket with R upstream: https://bugs.r-project.org/show_bug.cgi?id=18713

I will make a PR with a fix now.

comment:12 Changed 7 months ago by barracuda156

Resolution: fixed
Status: assignedclosed

In af47c04a24ab65239f211c614a7d76067a5966b9/macports-ports (master):

R: fix a bug breaking installation of some packages on 32-bit platforms

Fixes: #69849

comment:13 in reply to:  8 Changed 7 months ago by ryandesign (Ryan Carsten Schmidt)

Replying to barracuda156:

So we have a fix now, but I need to know which packages fail, since it has to be fixed on packages' side. Is there a way to find that out from buildbots' results without peeping into every log?

I report problems as I happen to notice them, usually because a build failure just happened on the buildbot while I was looking at the waterfall. We don't have a way to find all ports that failed due to a particular error message. Buildbot build information is collected by the ports web site, for example at https://ports.macports.org/all_builds/ , but the ports web site does not offer an API for retrieving that information.

comment:14 Changed 7 months ago by ryandesign (Ryan Carsten Schmidt)

We do keep track of which ports failed to build in each builder's failcache directory so I rescheduled builds of every failed R port which should appear here:

https://build.macports.org/builders/ports-10.6_i386-watcher/builds/58058

comment:15 Changed 7 months ago by barracuda156

Unfortunately, the issue seems not to be resolved on buildbots. Example with R-stringfish: https://build.macports.org/builders/ports-10.6_i386-builder/builds/164395/steps/install-port/logs/stdio

This is odd, since it does seem to have resolved it for me.

There is a hard solution of patching out the call which triggers this, but gonna be ugly and time-consuming.

comment:16 Changed 7 months ago by barracuda156

Well, we could obviously revert a commit which introduces these warnings for i386 builds of R. That shall solve the practical problem, but then the patch has to be carried over.

UPD. FWIW, on ppc the error does not occur now. Just tested on Rosetta, R starts up normally now:

macmini:~ svacchanda$ R

R version 4.4.0 (2024-04-24) -- "Puppy Cup"
Copyright (C) 2024 The R Foundation for Statistical Computing
Platform: powerpc-apple-darwin10.8.0 (32-bit)

R is free software and comes with ABSOLUTELY NO WARRANTY.
You are welcome to redistribute it under certain conditions.
Type 'license()' or 'licence()' for distribution details.

  Natural language support but running in an English locale

R is a collaborative project with many contributors.
Type 'contributors()' for more information and
'citation()' on how to cite R or R packages in publications.

Type 'demo()' for some demos, 'help()' for on-line help, or
'help.start()' for an HTML browser interface to help.
Type 'q()' to quit R.
Last edited 7 months ago by barracuda156 (previous) (diff)

comment:17 Changed 7 months ago by barracuda156

UPD2. So it is fixed for GCC builds (including i386), but not for Clang builds. What do you think, just revert a problematic commit for now, when clang is used on x86 32-bit?

Note: See TracTickets for help on using tickets.