59       g2int *gref=NULL,*gwidth=NULL,*glen=NULL;  in comunpack()  local
238       glen=(g2int *)calloc(ngroups,sizeof(g2int));  in comunpack()
239       if( glen == NULL )  in comunpack()
249          if( gbits(cpack,cpack_length,glen,iofst,nbitsglen,0,ngroups) != 0 )  in comunpack()
253             free(glen);  in comunpack()
264               glen[j]=0;  in comunpack()
274            if( glen[j] < 0 ||  in comunpack()
275                (idrstmpl[13] != 0 && glen[j] > INT_MAX / idrstmpl[13]) ||  in comunpack()
276                glen[j] *  idrstmpl[13] > INT_MAX - idrstmpl[12] )  in comunpack()
280                 free(glen);  in comunpack()
284            glen[j]=(glen[j]*idrstmpl[13])+idrstmpl[12];  in comunpack()
286       glen[ngroups-1]=idrstmpl[14];  in comunpack()
295         if( gwidth[j] < 0 || glen[j] < 0 ||  in comunpack()
296             (gwidth[j] > 0 && glen[j] > INT_MAX / gwidth[j]) )  in comunpack()
301         width_mult_len = gwidth[j]*glen[j];  in comunpack()
308         if( totLen > INT_MAX - glen[j] )  in comunpack()
313         totLen += glen[j];  in comunpack()
318         free(glen);  in comunpack()
329              if( gbits(cpack,cpack_length,ifld+n,iofst,gwidth[j],0,glen[j]) != 0 )  in comunpack()
333                  free(glen);  in comunpack()
337              for (k=0;k<glen[j];k++) {  in comunpack()
343              for (l=n;l<n+glen[j];l++) ifld[l]=gref[j];  in comunpack()
344              n=n+glen[j];  in comunpack()
346            iofst=iofst+(gwidth[j]*glen[j]);  in comunpack()
361              if( gbits(cpack,cpack_length,ifld+n,iofst,gwidth[j],0,glen[j]) != 0 )  in comunpack()
365                  free(glen);  in comunpack()
370              iofst=iofst+(gwidth[j]*glen[j]);  in comunpack()
371              for (k=0;k<glen[j];k++) {  in comunpack()
391                 for (l=n;l<n+glen[j];l++) ifldmiss[l]=1;  in comunpack()
394                 for (l=n;l<n+glen[j];l++) ifldmiss[l]=2;  in comunpack()
397                 for (l=n;l<n+glen[j];l++) ifldmiss[l]=0;  in comunpack()
398                 for (l=non;l<non+glen[j];l++) ifld[l]=gref[j];  in comunpack()
399                 non += glen[j];  in comunpack()
401              n=n+glen[j];  in comunpack()
408       if ( glen != 0 ) free(glen);  in comunpack()