* installing to library ‘/home/hornik/tmp/R.check/r-devel-gcc/Work/build/Packages’ * installing *source* package ‘event’ ... ** package ‘event’ successfully unpacked and MD5 sums checked ** using staged installation ** libs using C compiler: ‘gcc-13 (Debian 13.2.0-23) 13.2.0’ make[1]: Entering directory '/home/hornik/tmp/scratch/Rtmp48oG4m/R.INSTALLdbf83227f8f4b/event/src' gcc-13 -I"/home/hornik/tmp/R.check/r-devel-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-13 -I"/home/hornik/tmp/R.check/r-devel-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-devel-gcc/Work/build/include/Rmath.h:210:25: note: ‘Rf_beta’ was declared here 210 | #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+=ly1?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-devel-gcc/Work/build/include/Rmath.h:210:25: note: ‘Rf_beta’ was declared here 210 | #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