* installing *source* package 'mmeta' ...
** using staged installation
** libs
using C compiler: 'gcc.exe (GCC) 13.2.0'
using Fortran compiler: 'GNU Fortran (GCC) 13.2.0'
gcc  -I"D:/RCompile/recent/R/include" -DNDEBUG     -I"d:/rtools44/x86_64-w64-mingw32.static.posix/include"     -pedantic -Wstrict-prototypes -O2 -Wall  -mfpmath=sse -msse2 -mstackrealign  -c arms-R.c -o arms-R.o
arms-R.c: In function 'invert':
arms-R.c:328:37: warning: unused variable 'z' [-Wunused-variable]
  328 |   double u,xl,xr,yl,yr,eyl,eyr,prop,z;
      |                                     ^
arms-R.c:381:6: warning: 'xl' may be used uninitialized [-Wmaybe-uninitialized]
  381 |   if ((p->x < xl) || (p->x > xr)) error("exit 1");
      |      ^
arms-R.c:328:12: note: 'xl' was declared here
  328 |   double u,xl,xr,yl,yr,eyl,eyr,prop,z;
      |            ^~
arms-R.c:381:19: warning: 'xr' may be used uninitialized [-Wmaybe-uninitialized]
  381 |   if ((p->x < xl) || (p->x > xr)) error("exit 1");
      |       ~~~~~~~~~~~~^~~~~~~~~~~~~~
arms-R.c:328:15: note: 'xr' was declared here
  328 |   double u,xl,xr,yl,yr,eyl,eyr,prop,z;
      |               ^~
arms-R.c: In function 'meet':
arms-R.c:695:15: warning: 'gr' may be used uninitialized [-Wmaybe-uninitialized]
  695 |     dl = (grl - gr) * (q->pr->x - q->pl->x);
      |          ~~~~~^~~~~
arms-R.c:633:13: note: 'gr' was declared here
  633 |   double gl,gr,grl,dl,dr;
      |             ^~
arms-R.c:705:48: warning: 'dr' may be used uninitialized [-Wmaybe-uninitialized]
  705 |     q->y = (dl * q->pr->y + dr * q->pl->y + dl * dr)/(dl + dr);
      |                                             ~~~^~~~
arms-R.c:633:23: note: 'dr' was declared here
  633 |   double gl,gr,grl,dl,dr;
      |                       ^~
gfortran      -pedantic -O2  -mfpmath=sse -msse2 -mstackrealign  -c hygfx.f -o hygfx.o
hygfx.f:82:72:

   82 | 10            HF=HF+R
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
hygfx.f:83:14:

   83 |            ENDDO
      |              1
Error: Expecting END IF statement at (1)
hygfx.f:92:72:

   92 | 15            HF=HF+R
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1)
hygfx.f:93:14:

   93 |            ENDDO
      |              1
Error: Expecting END IF statement at (1)
hygfx.f:122:72:

  122 | 100           HW=HF
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 100 at (1)
hygfx.f:123:14:

  123 |            ENDDO
      |              1
Error: Expecting END SUBROUTINE statement at (1)
hygfx.f:153:72:

  153 | 10               GA=GA*K
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
hygfx.f:154:17:

  154 |               ENDDO
      |                 1
Error: Expecting END IF statement at (1)
hygfx.f:164:72:

  164 | 15               R=R*(Z-K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 15 at (1)
hygfx.f:165:17:

  165 |               ENDDO
      |                 1
Error: Expecting END IF statement at (1)
hygfx.f:181:72:

  181 |      &          -.206D-13, -.54D-14, .14D-14, .1D-15/
      |                                                                        1
Warning: Obsolescent feature: DATA statement at (1) after the first executable statement
hygfx.f:184:72:

  184 | 20            GR=GR*Z+G(K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
hygfx.f:185:14:

  185 |            ENDDO
      |              1
Error: Expecting END IF statement at (1)
hygfx.f:215:72:

  215 | 10            S=S+1.0D0/K
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 10 at (1)
hygfx.f:216:14:

  216 |            ENDDO
      |              1
Error: Expecting END IF statement at (1)
hygfx.f:221:72:

  221 | 20            S=S+1.0/(2.0D0*K-1.0D0)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 20 at (1)
hygfx.f:222:14:

  222 |            ENDDO
      |              1
Error: Expecting END IF statement at (1)
hygfx.f:228:72:

  228 | 30               S=S+1.0D0/(XA+K)
      |                                                                        1
Warning: Fortran 2018 deleted feature: DO termination statement which is not END DO or CONTINUE with label 30 at (1)
hygfx.f:229:17:

  229 |               ENDDO
      |                 1
Error: Expecting END IF statement at (1)
make: *** [D:/RCompile/recent/R/etc/x64/Makeconf:313: hygfx.o] Error 1
ERROR: compilation failed for package 'mmeta'
* removing 'd:/RCompile/CRANincoming/R-devel/lib/mmeta'
* restoring previous 'd:/RCompile/CRANincoming/R-devel/lib/mmeta'