* installing *source* package ‘nsRFA’ ...
** package ‘nsRFA’ successfully unpacked and MD5 sums checked
** using staged installation
** libs
using C compiler: ‘clang version 18.1.4’
using Fortran compiler: ‘flang-new version 18.1.4’
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-clang/nsRFA/src'
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c alg136.f -o alg136.o
./alg136.f:61:2: portability: A DO loop should terminate with an END DO or CONTINUE
DO 60 J = 1, N
^^^^^^^^^^^^^^
./alg136.f:62:4: DO loop currently ends at statement:
60 C(L,J) = ZERO
^^^^^^^^^^^^^^^^^^
./alg136.f:67:2: portability: A DO loop should terminate with an END DO or CONTINUE
DO 80 J = 1, N
^^^^^^^^^^^^^^
./alg136.f:68:4: DO loop currently ends at statement:
80 C(L,J) = C(L,J) + A(I,J)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./alg136.f:79:2: portability: A DO loop should terminate with an END DO or CONTINUE
DO 110 J = 1, N
^^^^^^^^^^^^^^^
./alg136.f:80:3: DO loop currently ends at statement:
110 C(L,J) = C(L,J) / AA
^^^^^^^^^^^^^^^^^^^^^^^^^^
./alg136.f:128:2: portability: A DO loop should terminate with an END DO or CONTINUE
DO 130 L = 1, K
^^^^^^^^^^^^^^^
./alg136.f:129:3: DO loop currently ends at statement:
130 NCP(L) = 0
^^^^^^^^^^^^^^^^
./alg136.f:150:2: portability: A DO loop should terminate with an END DO or CONTINUE
DO 180 L = 1, K
^^^^^^^^^^^^^^^
./alg136.f:151:3: DO loop currently ends at statement:
180 C(L,J) = C(L,J) / FLOAT(NC(L))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfexp.f -o cdfexp.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfgam.f -o cdfgam.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfgev.f -o cdfgev.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfglo.f -o cdfglo.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfgno.f -o cdfgno.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfgpa.f -o cdfgpa.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfgum.f -o cdfgum.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfkap.f -o cdfkap.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfnor.f -o cdfnor.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfpe3.f -o cdfpe3.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cdfwak.f -o cdfwak.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cluagg.f -o cluagg.o
./cluagg.f:92:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 IATT=1,NATT
^^^^^^^^^^^^^^^^^
./cluagg.f:93:4: DO loop currently ends at statement:
10 SUM=SUM+(X(I,IATT)-X(J,IATT))**2
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./cluagg.f:97:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 30 I=1,N
^^^^^^^^^^^
./cluagg.f:98:4: DO loop currently ends at statement:
30 IWORK(I)=1
^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c cluinf.f -o cluinf.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c clukm.f -o clukm.o
./clukm.f:77:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 5 IATT=1,NATT
^^^^^^^^^^^^^^^^
./clukm.f:80:5: DO loop currently ends at statement:
5 RW(IW)=X(I,IATT)
^^^^^^^^^^^^^^^^^^
./clukm.f:78:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 5 I=1,N
^^^^^^^^^^
./clukm.f:80:5: DO loop currently ends at statement:
5 RW(IW)=X(I,IATT)
^^^^^^^^^^^^^^^^^^
./clukm.f:84:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 ICL=1,NCLUST
^^^^^^^^^^^^^^^^^^
./clukm.f:85:4: DO loop currently ends at statement:
10 NUM(ICL)=0
^^^^^^^^^^^^^
./clukm.f:87:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 20 IW=1,IWMAX
^^^^^^^^^^^^^^^^
./clukm.f:88:4: DO loop currently ends at statement:
20 RW(IW)=ZERO
^^^^^^^^^^^^^^
./clukm.f:128:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 90 ICL=1,NCLUST
^^^^^^^^^^^^^^^^^^
./clukm.f:129:4: DO loop currently ends at statement:
90 SS=SS+RW(LWSS+ICL)
^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c derf.f -o derf.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c digamd.f -o digamd.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c dlgama.f -o dlgama.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c durand.f -o durand.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c gamind.f -o gamind.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c leaps.f -o leaps.o
./leaps.f:217:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 20 I = 1, NRBAR
^^^^^^^^^^^^^^^^^^
./leaps.f:218:4: DO loop currently ends at statement:
20 RBAR(I) = ZERO
^^^^^^^^^^^^^^^^^
./leaps.f:410:6: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 I = JMIN, POS-1
^^^^^^^^^^^^^^^^^^^^^
./leaps.f:411:4: DO loop currently ends at statement:
10 CALL REPORT(I, RSS(I), BOUND, NVMAX, RESS, IR, NBEST, LOPT,
^
./leaps.f:532:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 J = IVAR, LAST
^^^^^^^^^^^^^^^^^^^^
./leaps.f:533:4: DO loop currently ends at statement:
10 WK(J) = SS(J)
^^^^^^^^^^^^^^^^
./leaps.f:888:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 20 I = FIRST, NVMAX
^^^^^^^^^^^^^^^^^^^^^^
./leaps.f:889:4: DO loop currently ends at statement:
20 IWK(I) = LAST
^^^^^^^^^^^^^^^^
./leaps.f:915:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 50 I = IPT, MIN(NVMAX, NEWPOS-1)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./leaps.f:916:4: DO loop currently ends at statement:
50 CALL REPORT(I, RSS(I), BOUND, NVMAX, RESS, IR, NBEST, LOPT, IL,
^
./leaps.f:921:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 60 I = IPT, NVMAX
^^^^^^^^^^^^^^^^^^^^
./leaps.f:922:4: DO loop currently ends at statement:
60 IWK(I) = NEWPOS - 1
^^^^^^^^^^^^^^^^^^^^^^
./leaps.f:1043:4: portability: A DO loop should terminate with an END DO or CONTINUE
DO 40 I = JMIN, SIZE-1
^^^^^^^^^^^^^^^^^^^^^^
./leaps.f:1044:4: DO loop currently ends at statement:
40 CALL REPORT(I, RSS(I), BOUND, NVMAX, RESS, IR, NBEST, LOPT,
^
./leaps.f:1127:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 COL = 1, NP
^^^^^^^^^^^^^^^^^
./leaps.f:1128:4: DO loop currently ends at statement:
10 WORK(COL) = SQRT(D(COL))
^^^^^^^^^^^^^^^^^^^^^^^^^^^
./leaps.f:1230:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 ROW = 1, NP
^^^^^^^^^^^^^^^^^
./leaps.f:1231:4: DO loop currently ends at statement:
10 WORK(ROW) = SQRT(D(ROW))
^^^^^^^^^^^^^^^^^^^^^^^^^^^
./leaps.f:1317:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 ROW = 1, NP
^^^^^^^^^^^^^^^^^
./leaps.f:1318:4: DO loop currently ends at statement:
10 SUMY = SUMY + D(ROW) * THETAB(ROW)**2
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c leapshdr.f -o leapshdr.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrexp.f -o lmrexp.o
./lmrexp.f:38:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 J=3,NMOM
^^^^^^^^^^^^^^
./lmrexp.f:39:4: DO loop currently ends at statement:
10 XMOM(J)=TWO/DBLE(J*(J-1))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrgam.f -o lmrgam.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrgev.f -o lmrgev.o
./lmrgev.f:66:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 2 I=3,NMOM
^^^^^^^^^^^^^
./lmrgev.f:67:5: DO loop currently ends at statement:
2 XMOM(I)=ZMOM(I)
^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrglo.f -o lmrglo.o
./lmrglo.f:139:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 K=KMAX-1,1,-1
^^^^^^^^^^^^^^^^^^^
./lmrglo.f:140:4: DO loop currently ends at statement:
10 SUM=SUM*GG+Z(K,M)
^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrgno.f -o lmrgno.o
./lmrgno.f:71:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 2 I=3,NMOM
^^^^^^^^^^^^^
./lmrgno.f:72:5: DO loop currently ends at statement:
2 XMOM(I)=ZMOM(I)
^^^^^^^^^^^^^^^^^
./lmrgno.f:98:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 M=3,NMOM
^^^^^^^^^^^^^^
./lmrgno.f:99:4: DO loop currently ends at statement:
10 SUM(M)=ZERO
^^^^^^^^^^^^^^
./lmrgno.f:108:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 20 M=3,NMOM
^^^^^^^^^^^^^^
./lmrgno.f:115:4: DO loop currently ends at statement:
20 SUM(M)=SUM(M)+E*P
^^^^^^^^^^^^^^^^^^^^
./lmrgno.f:117:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 40 M=3,NMOM
^^^^^^^^^^^^^^
./lmrgno.f:118:4: DO loop currently ends at statement:
40 EST(M)=SUM(M)*XINC
^^^^^^^^^^^^^^^^^^^^^
./lmrgno.f:123:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 50 M=3,NMOM
^^^^^^^^^^^^^^
./lmrgno.f:124:4: DO loop currently ends at statement:
50 ESTX(M)=EST(M)
^^^^^^^^^^^^^^^^^
./lmrgno.f:133:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 60 M=3,NMOM
^^^^^^^^^^^^^^
./lmrgno.f:140:4: DO loop currently ends at statement:
60 SUM(M)=SUM(M)+E*P
^^^^^^^^^^^^^^^^^^^^
./lmrgno.f:156:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 110 M=3,NMOM
^^^^^^^^^^^^^^^
./lmrgno.f:157:3: DO loop currently ends at statement:
110 XMOM(M)=CONST*EST(M)
^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrgpa.f -o lmrgpa.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrgum.f -o lmrgum.o
./lmrgum.f:54:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 J=3,NMOM
^^^^^^^^^^^^^^
./lmrgum.f:55:4: DO loop currently ends at statement:
10 XMOM(J)=ZMOM(J)
^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrkap.f -o lmrkap.o
./lmrkap.f:65:4: portability: A DO loop should terminate with an END DO or CONTINUE
10 DO 20 IR=1,NMOM
^^^^^^^^^^^^^^^^^^
./lmrkap.f:69:4: DO loop currently ends at statement:
20 BETA(IR)=DEXP(ARG)
^^^^^^^^^^^^^^^^^^^^^
./lmrkap.f:74:4: portability: A DO loop should terminate with an END DO or CONTINUE
30 DO 40 IR=1,NMOM
^^^^^^^^^^^^^^^^^^
./lmrkap.f:76:4: DO loop currently ends at statement:
40 BETA(IR)=DEXP(DLGAM-G*DLOG(R))*(ONE-HALF*H*G*(ONE+G)/R)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./lmrkap.f:81:4: portability: A DO loop should terminate with an END DO or CONTINUE
50 DO 60 IR=1,NMOM
^^^^^^^^^^^^^^^^^^
./lmrkap.f:85:4: DO loop currently ends at statement:
60 BETA(IR)=DEXP(ARG)
^^^^^^^^^^^^^^^^^^^^^
./lmrkap.f:90:4: portability: A DO loop should terminate with an END DO or CONTINUE
70 DO 80 IR=1,NMOM
^^^^^^^^^^^^^^^^^^
./lmrkap.f:92:4: DO loop currently ends at statement:
80 BETA(IR)=EU+DLOG(-H)+DIGAMD(-R/H)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./lmrkap.f:97:4: portability: A DO loop should terminate with an END DO or CONTINUE
90 DO 100 IR=1,NMOM
^^^^^^^^^^^^^^^^^^^
./lmrkap.f:99:3: DO loop currently ends at statement:
100 BETA(IR)=EU+DLOG(R)
^^^^^^^^^^^^^^^^^^^^^^^
./lmrkap.f:104:3: portability: A DO loop should terminate with an END DO or CONTINUE
110 DO 120 IR=1,NMOM
^^^^^^^^^^^^^^^^^^^^
./lmrkap.f:106:3: DO loop currently ends at statement:
120 BETA(IR)=EU+DLOG(H)+DIGAMD(ONE+R/H)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrnor.f -o lmrnor.o
./lmrnor.f:50:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 M=3,NMOM
^^^^^^^^^^^^^^
./lmrnor.f:51:4: DO loop currently ends at statement:
10 XMOM(M)=ZMOM(M)
^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrpe3.f -o lmrpe3.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c lmrwak.f -o lmrwak.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelexp.f -o pelexp.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelgam.f -o pelgam.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelgev.f -o pelgev.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelglo.f -o pelglo.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelgno.f -o pelgno.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelgpa.f -o pelgpa.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelgum.f -o pelgum.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelkap.f -o pelkap.o
./pelkap.f:69:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 I=1,4
^^^^^^^^^^^
./pelkap.f:70:4: DO loop currently ends at statement:
10 PARA(I)=ZERO
^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelnor.f -o pelnor.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelpe3.f -o pelpe3.o
./pelpe3.f:74:2: portability: A DO loop should terminate with an END DO or CONTINUE
1000 DO 1010 I=1,3
^^^^^^^^^^^^^^^^^^
./pelpe3.f:75:2: DO loop currently ends at statement:
1010 PARA(I)=ZERO
^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c pelwak.f -o pelwak.o
./pelwak.f:151:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 1010 I=1,5
^^^^^^^^^^^^^
./pelwak.f:152:2: DO loop currently ends at statement:
1010 PARA(I)=ZERO
^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quaexp.f -o quaexp.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quagam.f -o quagam.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quagev.f -o quagev.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quaglo.f -o quaglo.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quagno.f -o quagno.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quagpa.f -o quagpa.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quagum.f -o quagum.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quakap.f -o quakap.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quanor.f -o quanor.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quape3.f -o quape3.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quastn.f -o quastn.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c quawak.f -o quawak.o
/usr/local/clang18/bin/clang -I"/data/gannet/ripley/R/R-clang/include" -DNDEBUG -isystem /usr/local/clang18/include -I/usr/local/clang/include -fpic -O3 -Wall -pedantic -Wp,-D_FORTIFY_SOURCE=3 -c registerDynamicSymbol.c -o registerDynamicSymbol.o
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c reglmr.f -o reglmr.o
./reglmr.f:35:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 J=1,NMOM
^^^^^^^^^^^^^^
./reglmr.f:36:4: DO loop currently ends at statement:
10 RMOM(J)=ZERO
^^^^^^^^^^^^^^^
./reglmr.f:45:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 20 J=3,NMOM
^^^^^^^^^^^^^^
./reglmr.f:46:4: DO loop currently ends at statement:
20 RMOM(J)=RMOM(J)+W*XMOM(J,ISITE)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./reglmr.f:52:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 40 J=3,NMOM
^^^^^^^^^^^^^^
./reglmr.f:53:4: DO loop currently ends at statement:
40 RMOM(J)=RMOM(J)/WSUM
^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c regtst.f -o regtst.o
./regtst.f:162:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 I=1,NSITES
^^^^^^^^^^^^^^^^
./regtst.f:166:4: DO loop currently ends at statement:
10 D(I)=ZERO
^^^^^^^^^^^^
./regtst.f:173:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 30 IDIST=1,5
^^^^^^^^^^^^^^^
./regtst.f:174:4: DO loop currently ends at statement:
30 Z(IDIST)=ZERO
^^^^^^^^^^^^^^^^
./regtst.f:175:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 40 IPARA=1,5
^^^^^^^^^^^^^^^
./regtst.f:177:4: DO loop currently ends at statement:
40 PARA(IPARA,IDIST)=ZERO
^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:176:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 40 IDIST=1,6
^^^^^^^^^^^^^^^
./regtst.f:177:4: DO loop currently ends at statement:
40 PARA(IPARA,IDIST)=ZERO
^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:182:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 60 K=2,5
^^^^^^^^^^^
./regtst.f:186:4: DO loop currently ends at statement:
60 RMOM(K)=RMOM(K)/SUMLEN
^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:184:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 50 I=1,NSITES
^^^^^^^^^^^^^^^^
./regtst.f:185:4: DO loop currently ends at statement:
50 RMOM(K)=RMOM(K)+LEN(I)*XMOM(K,I)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:211:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 90 I=1,NSITES
^^^^^^^^^^^^^^^^
./regtst.f:212:4: DO loop currently ends at statement:
90 SMAT(J,K)=SMAT(J,K)+WORK(I,J)*WORK(I,K)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:239:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 120 J=1,3
^^^^^^^^^^^^
./regtst.f:241:3: DO loop currently ends at statement:
120 D(I)=D(I)+WORK(I,J)*WORK(I,K)*SMAT(J,K)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:240:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 120 K=1,3
^^^^^^^^^^^^
./regtst.f:241:3: DO loop currently ends at statement:
120 D(I)=D(I)+WORK(I,J)*WORK(I,K)*SMAT(J,K)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:247:3: portability: A DO loop should terminate with an END DO or CONTINUE
135 DO 138 I=1,NSITES
^^^^^^^^^^^^^^^^^^^^^
./regtst.f:248:3: DO loop currently ends at statement:
138 D(I)=ONE
^^^^^^^^^^^^
./regtst.f:313:7: warning: Reference to the procedure 'sort' has an implicit interface that is distinct from another reference: incompatible dummy argument #1: incompatible dummy data object shapes
CALL SORT(X,NREC)
^^^^^^^^^^^^^^^^^
./regtst.f:245:7: previous reference to 'sort'
CALL SORT(WORK(1,1),NSITES)
^^^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:433:7: warning: Reference to the procedure 'pelglo' has an implicit interface that is distinct from another reference: incompatible dummy argument #2: incompatible dummy data object shapes
CALL PELGLO(RMOM,PARA(1,1))
^^^^^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:282:7: previous reference to 'pelglo'
CALL PELGLO(RMOM,RPARA)
^^^^^^^^^^^^^^^^^^^^^^^
./regtst.f:466:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 310 IQ=1,NPROB
^^^^^^^^^^^^^^^^^
./regtst.f:467:3: DO loop currently ends at statement:
310 Q(IQ)=QUAWAK(PROB(IQ),PARA(1,6))
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c samlmr.f -o samlmr.o
./samlmr.f:39:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 J=1,NMOM
^^^^^^^^^^^^^^
./samlmr.f:40:4: DO loop currently ends at statement:
10 SUM(J)=ZERO
^^^^^^^^^^^^^^
./samlmr.f:50:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 20 J=2,NMOM
^^^^^^^^^^^^^^
./samlmr.f:52:4: DO loop currently ends at statement:
20 SUM(J)=SUM(J)+TERM
^^^^^^^^^^^^^^^^^^^^^
./samlmr.f:54:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 40 J=1,NMOM
^^^^^^^^^^^^^^
./samlmr.f:55:4: DO loop currently ends at statement:
40 SUM(J)=SUM(J)/N
^^^^^^^^^^^^^^^^^^
./samlmr.f:64:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 60 J=2,NMOM
^^^^^^^^^^^^^^
./samlmr.f:67:4: DO loop currently ends at statement:
60 SUM(J)=SUM(J)+TERM
^^^^^^^^^^^^^^^^^^^^^
./samlmr.f:72:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 80 J=2,NMOM
^^^^^^^^^^^^^^
./samlmr.f:75:4: DO loop currently ends at statement:
80 SUM(J)=SUM(J)/Z
^^^^^^^^^^^^^^^^^^
./samlmr.f:82:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 120 KK=2,NMOM
^^^^^^^^^^^^^^^^
./samlmr.f:92:3: DO loop currently ends at statement:
120 K=K-1
^^^^^^^^^
./samlmr.f:87:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 110 I=1,K-1
^^^^^^^^^^^^^^
./samlmr.f:90:3: DO loop currently ends at statement:
110 TEMP=TEMP+P*SUM(I+1)
^^^^^^^^^^^^^^^^^^^^^^^^
./samlmr.f:98:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 130 K=3,NMOM
^^^^^^^^^^^^^^^
./samlmr.f:99:3: DO loop currently ends at statement:
130 XMOM(K)=SUM(K)/SUM(2)
^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c samlmu.f -o samlmu.o
./samlmu.f:34:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 J=1,NMOM
^^^^^^^^^^^^^^
./samlmu.f:35:4: DO loop currently ends at statement:
10 XMOM(J)=ZERO
^^^^^^^^^^^^^^^
./samlmu.f:87:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 70 J=3,NMOM
^^^^^^^^^^^^^^
./samlmu.f:88:4: DO loop currently ends at statement:
70 XMOM(J)=XMOM(J)/XMOM(2)
^^^^^^^^^^^^^^^^^^^^^^^^^^
./samlmu.f:111:2: portability: A DO loop should terminate with an END DO or CONTINUE
1010 DO 1020 J=1,NMOM
^^^^^^^^^^^^^^^^^^^^^
./samlmu.f:112:2: DO loop currently ends at statement:
1020 XMOM(J)=ZERO
^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c sampwm.f -o sampwm.o
./sampwm.f:45:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 10 J=1,NMOM
^^^^^^^^^^^^^^
./sampwm.f:46:4: DO loop currently ends at statement:
10 XMOM(J)=ZERO
^^^^^^^^^^^^^^^
./sampwm.f:58:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 20 J=2,NMOM
^^^^^^^^^^^^^^
./sampwm.f:60:4: DO loop currently ends at statement:
20 XMOM(J)=XMOM(J)+TERM
^^^^^^^^^^^^^^^^^^^^^^^
./sampwm.f:62:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 40 J=1,NMOM
^^^^^^^^^^^^^^
./sampwm.f:63:4: DO loop currently ends at statement:
40 XMOM(J)=XMOM(J)/DN
^^^^^^^^^^^^^^^^^^^^^
./sampwm.f:72:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 60 J=2,NMOM
^^^^^^^^^^^^^^
./sampwm.f:76:4: DO loop currently ends at statement:
60 XMOM(J)=XMOM(J)+WEIGHT*X(I)
^^^^^^^^^^^^^^^^^^^^^^^^^^^^^^
/usr/local/clang18/bin/flang-new -fpic -O2 -pedantic -c sort.f -o sort.o
./sort.f:40:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 50 I=M+1,N
^^^^^^^^^^^^^
./sort.f:49:4: DO loop currently ends at statement:
50 X(J+M)=TEST
^^^^^^^^^^^^^^
./sort.f:43:7: portability: A DO loop should terminate with an END DO or CONTINUE
DO 30 JJ=1,100
^^^^^^^^^^^^^^
./sort.f:47:4: DO loop currently ends at statement:
30 X(J+M)=X(J)
^^^^^^^^^^^^^^
/usr/local/clang18/bin/clang -shared -L/usr/local/clang/lib64 -L/usr/local/clang18/lib -L/usr/local/clang18/lib/x86_64-unknown-linux-gnu -L/usr/local/gcc13/lib64 -L/usr/local/lib64 -o nsRFA.so alg136.o cdfexp.o cdfgam.o cdfgev.o cdfglo.o cdfgno.o cdfgpa.o cdfgum.o cdfkap.o cdfnor.o cdfpe3.o cdfwak.o cluagg.o cluinf.o clukm.o derf.o digamd.o dlgama.o durand.o gamind.o leaps.o leapshdr.o lmrexp.o lmrgam.o lmrgev.o lmrglo.o lmrgno.o lmrgpa.o lmrgum.o lmrkap.o lmrnor.o lmrpe3.o lmrwak.o pelexp.o pelgam.o pelgev.o pelglo.o pelgno.o pelgpa.o pelgum.o pelkap.o pelnor.o pelpe3.o pelwak.o quaexp.o quagam.o quagev.o quaglo.o quagno.o quagpa.o quagum.o quakap.o quanor.o quape3.o quastn.o quawak.o registerDynamicSymbol.o reglmr.o regtst.o samlmr.o samlmu.o sampwm.o sort.o -lFortran_main -lFortranRuntime -lFortranDecimal -lm
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-clang/nsRFA/src'
make[1]: Entering directory '/data/gannet/ripley/R/packages/tests-clang/nsRFA/src'
make[1]: Leaving directory '/data/gannet/ripley/R/packages/tests-clang/nsRFA/src'
installing to /data/gannet/ripley/R/packages/tests-clang/nsRFA.Rcheck/00LOCK-nsRFA/00new/nsRFA/libs
** R
** data
** demo
** inst
** byte-compile and prepare package for lazy loading
** help
*** installing help indices
** building package indices
** installing vignettes
** testing if installed package can be loaded from temporary location
** checking absolute paths in shared objects and dynamic libraries
** testing if installed package can be loaded from final location
** testing if installed package keeps a record of temporary installation path
* DONE (nsRFA)