* installing to library ‘/home/hornik/tmp/R.check/r-release-gcc/Work/build/Packages’
* installing *source* package ‘event’ ...
** this is package ‘event’ version ‘1.1.2’
** package ‘event’ successfully unpacked and MD5 sums checked
** using staged installation
** libs
using C compiler: ‘gcc-14 (Debian 14.3.0-12) 14.3.0’
using Fortran compiler: ‘GNU Fortran (Debian 14.3.0-12) 14.3.0’
make[1]: Entering directory '/home/hornik/tmp/scratch/RtmpEjG2ru/R.INSTALL1fea29683a0160/event/src'
gcc-14 -std=gnu23 -I"/home/hornik/tmp/R.check/r-release-gcc/Work/build/include" -DNDEBUG -I/usr/local/include -D_FORTIFY_SOURCE=3 -fpic -g -O2 -Wall -Wstrict-prototypes -pedantic -mtune=native -c event_init.c -o event_init.o
gcc-14 -std=gnu23 -I"/home/hornik/tmp/R.check/r-release-gcc/Work/build/include" -DNDEBUG -I/usr/local/include -D_FORTIFY_SOURCE=3 -fpic -g -O2 -Wall -Wstrict-prototypes -pedantic -mtune=native -c ksurvb.c -o ksurvb.o
ksurvb.c: In function ‘ksurvb’:
ksurvb.c:213:18: warning: ‘omega’ may be used uninitialized [-Wmaybe-uninitialized]
213 | case 7: a=omega*a1; break;
| ~^~~~~~~~~
ksurvb.c:51:33: note: ‘omega’ was declared here
51 | double a,a1,b,b1,delta,lambda,omega,om,beta,bt,h,yy,tmp,ly,plap,intercept,
| ^~~~~
ksurvb.c:181:41: warning: ‘family’ may be used uninitialized [-Wmaybe-uninitialized]
181 | if(*pfamily)*like-=(c>0)*(family-c)*log(b1)-a*(pow(b1,family)-pow(b,family))/family;
| ~~~~~~~^~~
ksurvb.c:52:5: note: ‘family’ was declared here
52 | family;
| ^~~~~~
ksurvb.c:158:84: warning: ‘intercept’ may be used uninitialized [-Wmaybe-uninitialized]
158 | h=-yy/lambda+(1/(lambda*bt)+1)*log((lambda+intercept)/(lambda+intercept*exp(-bt*yy)));
| ~~~~~~~~~^~~~~~~~~~~~
ksurvb.c:51:67: note: ‘intercept’ was declared here
51 | double a,a1,b,b1,delta,lambda,omega,om,beta,bt,h,yy,tmp,ly,plap,intercept,
| ^~~~~~~~~
ksurvb.c:98:20: warning: ‘Rf_beta’ may be used uninitialized [-Wmaybe-uninitialized]
98 | else bt+=beta;}
In file included from ksurvb.c:43:
/home/hornik/tmp/R.check/r-release-gcc/Work/build/include/Rmath.h:221:25: note: ‘Rf_beta’ was declared here
221 | #define beta Rf_beta
| ^~~~~~~
ksurvb.c:51:42: note: in expansion of macro ‘beta’
51 | double a,a1,b,b1,delta,lambda,omega,om,beta,bt,h,yy,tmp,ly,plap,intercept,
| ^~~~
ksurvb.c:173:17: warning: ‘lambda’ may be used uninitialized [-Wmaybe-uninitialized]
173 | tmp=exp(-fabs(ly-bt)/lambda)/2;
| ^~~~~~~~~~~~~~~~~~~~~~~~
ksurvb.c:51:26: note: ‘lambda’ was declared here
51 | double a,a1,b,b1,delta,lambda,omega,om,beta,bt,h,yy,tmp,ly,plap,intercept,
| ^~~~~~
ksurvb.c:174:26: warning: ‘ly’ may be used uninitialized [-Wmaybe-uninitialized]
174 | b1+=ly<bt?tmp:1-tmp;
| ~~~~~~~~~^~~~~~
ksurvb.c:51:59: note: ‘ly’ was declared here
51 | double a,a1,b,b1,delta,lambda,omega,om,beta,bt,h,yy,tmp,ly,plap,intercept,
| ^~
ksurvb.c:174:26: warning: ‘bt’ may be used uninitialized [-Wmaybe-uninitialized]
174 | b1+=ly<bt?tmp:1-tmp;
| ~~~~~~~~~^~~~~~
ksurvb.c:51:47: note: ‘bt’ was declared here
51 | double a,a1,b,b1,delta,lambda,omega,om,beta,bt,h,yy,tmp,ly,plap,intercept,
| ^~
ksurvb.c:178:71: warning: ‘h’ may be used uninitialized [-Wmaybe-uninitialized]
178 | *like-=(c>1?lgammafn(a1)-lgammafn(a)-lgammafn(c+1):c*log(a))+c*h;
| ~^~
ksurvb.c:51:50: note: ‘h’ was declared here
51 | double a,a1,b,b1,delta,lambda,omega,om,beta,bt,h,yy,tmp,ly,plap,intercept,
| ^
ksurvb.c:217:21: warning: ‘om’ may be used uninitialized [-Wmaybe-uninitialized]
217 | case 2: b=om*b1+(1-om)*delta; break;
| ~~^~~
ksurvb.c:51:39: note: ‘om’ was declared here
51 | double a,a1,b,b1,delta,lambda,omega,om,beta,bt,h,yy,tmp,ly,plap,intercept,
| ^~
ksurvb.c: In function ‘frailb’:
ksurvb.c:340:68: warning: ‘intercept’ may be used uninitialized [-Wmaybe-uninitialized]
340 | l1+=-yy/lambda+log((lambda+intercept)/(lambda+intercept*exp(-bt*yy)))/((lambda*bt)+1);
| ~~~~~~~~~^~~~~~~~~~~~
ksurvb.c:233:55: note: ‘intercept’ was declared here
233 | double b1,delta,lambda,beta,bt,l1,yy,nb,ly,plap,tmp,intercept,H,btp,res;
| ^~~~~~~~~
ksurvb.c:257:9: warning: ‘Rf_beta’ may be used uninitialized [-Wmaybe-uninitialized]
257 | nb/=beta;}
/home/hornik/tmp/R.check/r-release-gcc/Work/build/include/Rmath.h:221:25: note: ‘Rf_beta’ was declared here
221 | #define beta Rf_beta
| ^~~~~~~
ksurvb.c:233:26: note: in expansion of macro ‘beta’
233 | double b1,delta,lambda,beta,bt,l1,yy,nb,ly,plap,tmp,intercept,H,btp,res;
| ^~~~
ksurvb.c:355:17: warning: ‘lambda’ may be used uninitialized [-Wmaybe-uninitialized]
355 | tmp=exp(-fabs(ly-bt)/lambda)/2;
| ^~~~~~~~~~~~~~~~~~~~~~~~
ksurvb.c:233:19: note: ‘lambda’ was declared here
233 | double b1,delta,lambda,beta,bt,l1,yy,nb,ly,plap,tmp,intercept,H,btp,res;
| ^~~~~~
ksurvb.c:266:25: warning: ‘yy’ may be used uninitialized [-Wmaybe-uninitialized]
266 | if(*model>=5)ly=log(yy);
| ^~~~~~~
ksurvb.c:233:37: note: ‘yy’ was declared here
233 | double b1,delta,lambda,beta,bt,l1,yy,nb,ly,plap,tmp,intercept,H,btp,res;
| ^~
ksurvb.c:356:24: warning: ‘ly’ may be used uninitialized [-Wmaybe-uninitialized]
356 | H=ly<bt?tmp:1-tmp;
| ~~~~~~~~~^~~~~~
ksurvb.c:233:43: note: ‘ly’ was declared here
233 | double b1,delta,lambda,beta,bt,l1,yy,nb,ly,plap,tmp,intercept,H,btp,res;
| ^~
ksurvb.c:284:20: warning: ‘bt’ may be used uninitialized [-Wmaybe-uninitialized]
284 | bt=exp(log(bt)+exp(p[*nccov+*birth+*tvc+2]*y[nm])*res);
| ^~~~~~~
ksurvb.c:233:31: note: ‘bt’ was declared here
233 | double b1,delta,lambda,beta,bt,l1,yy,nb,ly,plap,tmp,intercept,H,btp,res;
| ^~
ksurvb.c:390:11: warning: ‘H’ may be used uninitialized [-Wmaybe-uninitialized]
390 | b1+=H;
| ~~^~~
ksurvb.c:233:65: note: ‘H’ was declared here
233 | double b1,delta,lambda,beta,bt,l1,yy,nb,ly,plap,tmp,intercept,H,btp,res;
| ^
gcc-14 -std=gnu23 -I"/home/hornik/tmp/R.check/r-release-gcc/Work/build/include" -DNDEBUG -I/usr/local/include -D_FORTIFY_SOURCE=3 -fpic -g -O2 -Wall -Wstrict-prototypes -pedantic -mtune=native -c ksurvg.c -o ksurvg.o
ksurvg.c: In function ‘ksurvg’:
ksurvg.c:209:18: warning: ‘omega’ may be used uninitialized [-Wmaybe-uninitialized]
209 | case 7: a=omega*a1; break;
| ~^~~~~~~~~
ksurvg.c:46:32: note: ‘omega’ was declared here
46 | double a,a1,b,H,delta,lambda,omega,om,beta,bt,l1,yy,ly,plap,tmp,
| ^~~~~
ksurvg.c:148:72: warning: ‘intercept’ may be used uninitialized [-Wmaybe-uninitialized]
148 | l1=exp(-yy/lambda)*pow((lambda+intercept)/(lambda+intercept*exp(-bt*yy)),1/(lambda*bt)+1);
| ~~~~~~~~~^~~~~~~~~~~~
ksurvg.c:47:5: note: ‘intercept’ was declared here
47 | intercept;
| ^~~~~~~~~
ksurvg.c:88:20: warning: ‘Rf_beta’ may be used uninitialized [-Wmaybe-uninitialized]
88 | else bt+=beta;}
In file included from ksurvg.c:38:
/home/hornik/tmp/R.check/r-release-gcc/Work/build/include/Rmath.h:221:25: note: ‘Rf_beta’ was declared here
221 | #define beta Rf_beta
| ^~~~~~~
ksurvg.c:46:41: note: in expansion of macro ‘beta’
46 | double a,a1,b,H,delta,lambda,omega,om,beta,bt,l1,yy,ly,plap,tmp,
| ^~~~
ksurvg.c:163:17: warning: ‘lambda’ may be used uninitialized [-Wmaybe-uninitialized]
163 | tmp=exp(-fabs(ly-bt)/lambda)/2;
| ^~~~~~~~~~~~~~~~~~~~~~~~
ksurvg.c:46:25: note: ‘lambda’ was declared here
46 | double a,a1,b,H,delta,lambda,omega,om,beta,bt,l1,yy,ly,plap,tmp,
| ^~~~~~
ksurvg.c:164:24: warning: ‘ly’ may be used uninitialized [-Wmaybe-uninitialized]
164 | H=ly<bt?tmp:1-tmp;
| ~~~~~~~~~^~~~~~
ksurvg.c:46:55: note: ‘ly’ was declared here
46 | double a,a1,b,H,delta,lambda,omega,om,beta,bt,l1,yy,ly,plap,tmp,
| ^~
ksurvg.c:164:24: warning: ‘bt’ may be used uninitialized [-Wmaybe-uninitialized]
164 | H=ly<bt?tmp:1-tmp;
| ~~~~~~~~~^~~~~~
ksurvg.c:46:46: note: ‘bt’ was declared here
46 | double a,a1,b,H,delta,lambda,omega,om,beta,bt,l1,yy,ly,plap,tmp,
| ^~
ksurvg.c:169:11: warning: ‘H’ may be used uninitialized [-Wmaybe-uninitialized]
169 | if(H<1e-20)H=1e-20;
| ^
ksurvg.c:46:17: note: ‘H’ was declared here
46 | double a,a1,b,H,delta,lambda,omega,om,beta,bt,l1,yy,ly,plap,tmp,
| ^
ksurvg.c:46:49: warning: ‘l1’ may be used uninitialized [-Wmaybe-uninitialized]
46 | double a,a1,b,H,delta,lambda,omega,om,beta,bt,l1,yy,ly,plap,tmp,
| ^~
ksurvg.c:213:19: warning: ‘om’ may be used uninitialized [-Wmaybe-uninitialized]
213 | case 2: b=pow(H,-om)*delta; break;
| ^~~~~~~~~~
ksurvg.c:46:38: note: ‘om’ was declared here
46 | double a,a1,b,H,delta,lambda,omega,om,beta,bt,l1,yy,ly,plap,tmp,
| ^~
gfortran-14 -fpic -g -O2 -Wall -pedantic -mtune=native -c survkit.f -o survkit.o
f951: Warning: Nonconforming tab character in column 1 of line 206 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 222 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 439 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 810 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 997 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1092 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1095 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1385 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1577 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1686 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1688 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1711 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1712 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1722 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1742 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1749 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1750 [-Wtabs]
f951: Warning: Nonconforming tab character in column 6 of line 1751 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1752 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1755 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 1758 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1759 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1764 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1769 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1775 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1804 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1809 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1814 [-Wtabs]
f951: Warning: Nonconforming tab character in column 6 of line 1819 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1821 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1822 [-Wtabs]
f951: Warning: Nonconforming tab character in column 6 of line 1823 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1824 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1829 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1835 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1957 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1965 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1969 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1970 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1971 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1972 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1974 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1975 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 1977 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2081 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2121 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2124 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2138 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2170 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2171 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2173 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2198 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2211 [-Wtabs]
f951: Warning: Nonconforming tab character in column 5 of line 2242 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2291 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2298 [-Wtabs]
f951: Warning: Nonconforming tab character in column 3 of line 2311 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2323 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2325 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2326 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2327 [-Wtabs]
f951: Warning: Nonconforming tab character in column 3 of line 2330 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2332 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2427 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2428 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2435 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2464 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 2520 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4078 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4079 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4080 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4081 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4193 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4194 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4195 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4196 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4198 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4199 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4422 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4511 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 4967 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 5907 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 5908 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 5947 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 6597 [-Wtabs]
f951: Warning: Nonconforming tab character in column 1 of line 6599 [-Wtabs]
survkit.f:1816:39:
1816 | IF (IGPM.GT.0) THEN
| 1
Warning: Nonconforming tab character at (1) [-Wtabs]
survkit.f:778:22:
778 | XDATA(INRR,I)= XTABL(iNRR,I)
| 1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion]
survkit.f:810:22:
810 | XDATA2(I,INRR)= XTABL2(iNRR,I)
| 1
Warning: Possible change of value in conversion from REAL(8) to REAL(4) at (1) [-Wconversion]
survkit.f:2248:5:
2248 | 189 IF (NCOND.EQ.0) THEN
| 1
Warning: Label 189 at (1) defined but not used [-Wunused-label]
survkit.f:1858:4:
1858 | 100 continue
| 1
Warning: Label 100 at (1) defined but not used [-Wunused-label]
survkit.f:4470:5:
4470 | 40 CONTINUE
| 1
Warning: Label 40 at (1) defined but not used [-Wunused-label]
survkit.f:4566:5:
4566 | 140 CONTINUE
| 1
Warning: Label 140 at (1) defined but not used [-Wunused-label]
survkit.f:1049:4:
1049 | 800 format(1x,a10,20F8.3)
| 1
Warning: Label 800 at (1) defined but not used [-Wunused-label]
survkit.f:1489:5:
1489 | 189 IF (NCOND.EQ.0) THEN
| 1
Warning: Label 189 at (1) defined but not used [-Wunused-label]
survkit.f:1195:4:
1195 | 100 continue
| 1
Warning: Label 100 at (1) defined but not used [-Wunused-label]
survkit.f:5094:4:
5094 | 100 continue
| 1
Warning: Label 100 at (1) defined but not used [-Wunused-label]
survkit.f:5508:4:
5508 | 100 continue
| 1
Warning: Label 100 at (1) defined but not used [-Wunused-label]
survkit.f:3888:5:
3888 | 30 IF (DABS(P) .GE. DABS(0.5D0*Q*R)) GO TO 40
| 1
Warning: Label 30 at (1) defined but not used [-Wunused-label]
survkit.f:2533:4:
2533 | 300 continue
| 1
Warning: Label 300 at (1) defined but not used [-Wunused-label]
survkit.f:6250:4:
6250 | 300 continue
| 1
Warning: Label 300 at (1) defined but not used [-Wunused-label]
survkit.f:5998:4:
5998 | 100 continue
| 1
Warning: Label 100 at (1) defined but not used [-Wunused-label]
survkit.f:5937:30:
5937 | SUBROUTINE BASELINE(NDIM,NBASE,NSURV,NKAPLAN,BETA,info,nrr,nccov,
| 1
Warning: Unused dummy argument ‘ndim’ at (1) [-Wunused-dummy-argument]
survkit.f:5330:32:
5330 | + icons,XGAM,XNOR,BOUND,IGAM,INOR,info,nccov,ndcov,iplus1,
| 1
Warning: Unused dummy argument ‘bound’ at (1) [-Wunused-dummy-argument]
survkit.f:5360:37:
5360 | real(8) D2C_RISK(NDIMAX,NDIMAX),BOUND(NCCOV+NDCOV,3)
| 1
Warning: Array ‘d2c_risk’ at (1) is larger than limit set by ‘-fmax-stack-var-size=’, moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the ‘-fmax-stack-var-size=’ limit (or use ‘-frecursive’, which implies unlimited ‘-fmax-stack-var-size’) - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising]
survkit.f:5329:53:
5329 | SUBROUTINE FCOX2(BETA,F,GRADF,STD,DLDET,NSTATUS,NOPTION,NDIM,nrr,
| 1
Warning: Unused dummy argument ‘nstatus’ at (1) [-Wunused-dummy-argument]
survkit.f:4958:21:
4958 | + XNOR,BOUND,IGAM,INOR,info,nccov,ndcov,iplus1,iplus2,ipedig,
| 1
Warning: Unused dummy argument ‘bound’ at (1) [-Wunused-dummy-argument]
survkit.f:509:57:
509 | + nccov,ndcov,nstime,nquant,itabl2,xtabl2,ipedig,nrr2,err)
| 1
Warning: Unused dummy argument ‘ipedig’ at (1) [-Wunused-dummy-argument]
survkit.f:507:41:
507 | SUBROUTINE INIT(NSURV,NCONS,NSTATUS,itabl,xtabl,nrr,
| 1
Warning: Unused dummy argument ‘nstatus’ at (1) [-Wunused-dummy-argument]
survkit.f:1566:45:
1566 | +VALRHO,IPEDIG,IGAM,INOR,XGAM,XNOR,BOUND,icons,info,nrr,nccov,
| 1
Warning: Unused dummy argument ‘bound’ at (1) [-Wunused-dummy-argument]
survkit.f:1599:55:
1599 | real(8) HESS(NDIMAX,NDIMAX),D2OMEG(NDIMAX,NDIMAX)
| 1
Warning: Array ‘d2omeg’ at (1) is larger than limit set by ‘-fmax-stack-var-size=’, moved from stack to static storage. This makes the procedure unsafe when called recursively, or concurrently from multiple threads. Consider increasing the ‘-fmax-stack-var-size=’ limit (or use ‘-frecursive’, which implies unlimited ‘-fmax-stack-var-size’) - or change the code to use an ALLOCATABLE array. If the variable is never accessed concurrently, this warning can be ignored, and the variable could also be declared with the SAVE attribute. [-Wsurprising]
survkit.f:1565:55:
1565 | SUBROUTINE FWEIB2D(BETA,F,GRADF,STD,DLDET,NSTATUS,NOPTION,NDIM,
| 1
Warning: Unused dummy argument ‘nstatus’ at (1) [-Wunused-dummy-argument]
survkit.f:988:36:
988 | + IGAM,INOR,XGAM,XNOR,BOUND,icons,info,nrr,nccov,ndcov,err)
| 1
Warning: Unused dummy argument ‘bound’ at (1) [-Wunused-dummy-argument]
survkit.f:5952:46:
5952 | INTEGER I,J,JJ,K,K2,KK,N,NREC,ICODE,ISTR
| ^
Warning: ‘istr’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:6354:72:
6354 | CUM_RISK = CUM_RSKP + W * (XLAMB0(KLT) - XL_PREV)
| ^
Warning: ‘cum_rskp’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:5974:40:
5974 | real(8) CUM_RISK,CUM_RIS2,CUM_RSKP,U,UMINUS,W,WMINUS,XFAIL,XCOV,R
| ^
note: ‘cum_rskp’ was declared here
survkit.f:6354:72:
6354 | CUM_RISK = CUM_RSKP + W * (XLAMB0(KLT) - XL_PREV)
| ^
Warning: ‘xl_prev’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:5975:28:
5975 | real(8) XSTIME,XL_PREV,SX,SX2,REST(NSTIMAX)
| ^
note: ‘xl_prev’ was declared here
survkit.f:5950:58:
5950 | INTEGER IDICHO,ILT,ILT2,IHT,KLT,KLT2,IDIF,IMID,IS,IQ,IT,JST
| ^
Warning: ‘iq’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:6335:11:
6335 | IF (ISTIME(IS).LT.NEXTJUMP) THEN
| ^
Warning: ‘is’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:5950:55:
5950 | INTEGER IDICHO,ILT,ILT2,IHT,KLT,KLT2,IDIF,IMID,IS,IQ,IT,JST
| ^
note: ‘is’ was declared here
survkit.f:6412:16:
6412 | ELSE IF (ISUP.EQ.1) THEN
| ^
Warning: ‘isup’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:5953:47:
5953 | INTEGER IPRESTR,NSTRATA,NSTR,IPRETIM,ISUP
| ^
note: ‘isup’ was declared here
survkit.f:6459:72:
6459 | surv(nn,1)=IANI
| ^
Warning: ‘iani’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:5951:18:
5951 | INTEGER IANI,IANIPREV,NEXTJUMP,nrr,ut,nn,nrr2,nccov,ndcov
| ^
note: ‘iani’ was declared here
survkit.f:3907:72:
3907 | D = C*E
| ^
Warning: ‘e’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:3822:23:
3822 | real(8) A,B,C,D,E,EPS,XM,P,Q,R,TOL1,TOL2,U,V,W
| ^
note: ‘e’ was declared here
survkit.f:3852:72:
3852 | if(err.gt.0)return
| ^
Warning: ‘__result_dfmin’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:3754:37:
3754 | double precision FUNCTION DFMIN(AX,BX,FTOMIN,TOL,OBJ,IGAM,INOR,
| ^
note: ‘__result_dfmin’ was declared here
survkit.f:4461:72:
4461 | A(J,K)=0.D0
| ^
Warning: ‘k’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:4427:37:
4427 | INTEGER LDA,N,INFO,I,J,JJ,JM1,K,ICONS(0:NDIMAX),ICODE,err
| ^
note: ‘k’ was declared here
survkit.f:2310:72:
2310 | WADD = -R3GAM * GAMVAR * DOMEG(LAST1)
| ^
Warning: ‘r3gam’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:1600:56:
1600 | real(8) GAM0,CONST,XNQGAM,OMQGAM,R1GAM,R2GAM,R3GAM,OMEG
| ^
note: ‘r3gam’ was declared here
survkit.f:2323:72:
2323 | WADD = - R2GAM * DOMEG(LAST1) * DOMEG(LAST2)
| ^
Warning: ‘r2gam’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:1600:50:
1600 | real(8) GAM0,CONST,XNQGAM,OMQGAM,R1GAM,R2GAM,R3GAM,OMEG
| ^
note: ‘r2gam’ was declared here
survkit.f:489:10:
489 | IF (NSTATUS.NE.1) NSTATUS=0
| ^
Warning: ‘nstatus’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:448:21:
448 | INTEGER NSTATUS,NOPTION,INFO(NRR,4),iplus1(nccov),iplus2(ndcov)
| ^
note: ‘nstatus’ declared here
survkit.f:834:34:
834 | IF (NRULE.EQ.3.AND.NRELMAT2.EQ.K-1) JJ=1
| ^
Warning: ‘k’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:520:28:
520 | INTEGER I,II,IW,J,JJ,K,KK,NDIM
| ^
note: ‘k’ was declared here
survkit.f:375:72:
375 | W = DABS(XMOM(1) - XMOMP(1))/XMOM(1)
| ^
Warning: ‘xmomp[0]’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:78:56:
78 | real(8) WGAUSS(5,5),XGAUSS(5,5),XMOM(0:3),XMOMP(2),W2
| ^
note: ‘xmomp[0]’ was declared here
survkit.f:376:72:
376 | W2 = DABS(XMOM(2) - XMOMP(2))/XMOM(2)
| ^
Warning: ‘xmomp[1]’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:78:56:
78 | real(8) WGAUSS(5,5),XGAUSS(5,5),XMOM(0:3),XMOMP(2),W2
| ^
note: ‘xmomp[1]’ was declared here
survkit.f:68:27:
68 | INTEGER ITGAUSS,KITER
| ^
Warning: ‘kiter’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:4897:72:
4897 | W2 = DABS(XMOM(2) - XMOMP(2))/XMOM(2)
| ^
Warning: ‘xmomp[1]’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:4667:56:
4667 | real(8) WGAUSS(5,5),XGAUSS(5,5),XMOM(0:3),XMOMP(2),W2
| ^
note: ‘xmomp[1]’ was declared here
survkit.f:4896:72:
4896 | W = DABS(XMOM(1) - XMOMP(1))/XMOM(1)
| ^
Warning: ‘xmomp[0]’ may be used uninitialized [-Wmaybe-uninitialized]
survkit.f:4667:56:
4667 | real(8) WGAUSS(5,5),XGAUSS(5,5),XMOM(0:3),XMOMP(2),W2
| ^
note: ‘xmomp[0]’ was declared here
survkit.f:4649:19:
4649 | INTEGER KITER,N,ITGAUSS,NCOVMOD,NSTRATA,NKAPLAN,ICRHO
| ^
Warning: ‘kiter’ may be used uninitialized [-Wmaybe-uninitialized]
gcc-14 -std=gnu23 -shared -L/home/hornik/tmp/R.check/r-release-gcc/Work/build/lib -Wl,-O1 -o event.so event_init.o ksurvb.o ksurvg.o survkit.o -lgfortran -lm -lquadmath -L/home/hornik/tmp/R.check/r-release-gcc/Work/build/lib -lR
make[1]: Leaving directory '/home/hornik/tmp/scratch/RtmpEjG2ru/R.INSTALL1fea29683a0160/event/src'
make[1]: Entering directory '/home/hornik/tmp/scratch/RtmpEjG2ru/R.INSTALL1fea29683a0160/event/src'
make[1]: Leaving directory '/home/hornik/tmp/scratch/RtmpEjG2ru/R.INSTALL1fea29683a0160/event/src'
installing to /home/hornik/tmp/R.check/r-release-gcc/Work/build/Packages/00LOCK-event/00new/event/libs
** R
** byte-compile and prepare package for lazy loading
** help
*** installing help indices
** building package indices
** 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 (event)